Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

 Tempo aproximado para leitura: 05 min

01. DADOS GERAIS

Linha de Produto:Microsiga Protheus®
Segmento:Jurídico
Módulo:

Pré-faturamento de Serviços - SIGAPFS

Função:Cobrança - JURA243


02. PONTO DE ENTRADA

Descrição:

Este ponto de entrada pertence à rotina de Cobrança, JURA243(). Usado para customização das legendas, permitindo alterar os textos e cores que representam o “origem” dos títulos.

Localização:

Módulo SIGAPFS 

Atualizações >> Financeiro >> Cobrança

Programa Fonte:

JURA243

Função:

J243Browse

Ponto de Entrada:

J243SetLeg

Parâmetros:

  

Nome

Tipo

Descrição

Obrigatório

PARAMIXBarray

Array multidimensional 

NomeTipoDescrição
PARAMIXB[1]caractere

Expressão AdvPL com a regra da legenda

PARAMIXB[2]caractere

Cor que identifica a regra

PARAMIXB[3]caractere

Título da legenda, utilizado na janela de visualização das legendas

Sim



Retorno:

 

Nome

Tipo

Descrição

Obrigatório

aLegPE

Array

Retorna um array com as legendas na estrutura correta customizadas. As legendas do padrão não serão aplicadas.

Sim




03. EXEMPLO

#INCLUDE#include "PROTHEUSprotheus.CHch"
#INCLUDE#include "FWMVCDEFparmtype.CHch"
#INCLUDE#include "PARMTYPEfwmvcdef.CH"

//-------------------------------------------------------------------
/*/{Protheus.doc} J273Pre
Valida a cópia do título

ch"



User Function J243SetLeg()
Local aLegPad  := PARAMIXB[1// Array com as Legendas do Padrão
Local aLegPE   := {}

    // O array que será enviado pelo ponto de entrada deve ter a seguinte estrutura
    // Array multidimensional, sendo
    // aLegPE[X][1] (caractere) = Expressão AdvPL com a regra da legenda
    // aLegPE[X][2] (caractere) = Cor que identifica a regra
    // aLegPE[X][3] (caractere) = Título da legenda, utilizado na janela de visualização das legendas
    AAdd(aLegPE, {"E1_SALDO <> 0", "PINK", "Títulos em aberto"})
    AAdd(aLegPE, {"E1_SALDO == 0", "YELLOW", "Títulos pagos"    })

Return aLegPE // Ao enviar um array com as legendas na estrutura correta, as legendas do padrão não serão aplicadas.@param PARAMIXB     , array       , Parâmetros do ponto de entrada
               PARAMIXB[1], numérico, Recno do título a ser copiado
@return lCopia, lógico  , .T. Indica que o título poderá ser copiado
                                        .F. Indica que o título NÃO poderá ser copiado
@author  TOTVS
@since    14/04/2020
/*/
//-------------------------------------------------------------------
User Function J273Pre()
    Local lCopia := .T.
    If ValType(PARAMIXB) == "A"
        SE2->(DbGoTo(PARAMIXB[1])) // Posiciona no título a ser copiado
        // Não permitir cópia de títulos sem prefixo
        If Empty(SE2->E2_PREFIXO)
            lCopia := .F.
            ApMsgAlert("Não é permitido copiar título com prefixo vazio.","Prefixo inválido")
        EndIf
    EndIf
Return lCopia


Templatedocumentos


HTML
<style>
div.theme-default .ia-splitter #main {
    margin-left: 0px;
}
.ia-fixed-sidebar, .ia-splitter-left {
    display: none;
}
#main {
    padding-left: 10px;
    padding-right: 10px;
    overflow-x: hidden;
}

.aui-header-primary .aui-nav,  .aui-page-panel {
    margin-left: 0px !important;
}
.aui-header-primary .aui-nav {
    margin-left: 0px !important;
}
</style>