Histórico da Página

...

Ele será executado nos momentos abaixo:

1. Rotina Contas a Pagar Títulos a pagar (FINA050):FINA050 -
   1. Inclusão/alteração de títulos a pagar (botão Confirmar);
   2. Acessando o botão "Complemento de Título" através do browse do Contas a Pagar (botão Confirmar);
   1. Rotina Contas a Pagar Títulos a pagar (FINA040):
      FINA040 -
      1. Inclusão/alteração de títulos a receber (botão Confirmar);
      2. Acessando o botão "Complemento de Título" através do browse do Contas a Receber (botão Confirmar);

   Informações
   title ImportanteDados Técnicos
   Parâmetros: ParamIXB[1] - Objeto - Sub-model MVC da tabela FKF para verificar os dados já informados nos campos; ParamIXB[2] - Caracter - Nome do alias da carteira do título (SE1 para contas a receber / SE2 para contas a pagar); ParamIXB[3] - Numérico - Identificação da operação que está sendo executada (3-Inclusão/4-Alteração); ParamIXB[4] - Lógico - Identifica se o acesso ao complemento do título foi pelo botão do browse (.T. para acesso via browse) Retorno: Deve ser retornada uma variável lógica: .T. = Não houve problemas na validação do ponto de entrada e a rotina deve seguir; .F. = Houve problemas na validação do ponto de entrada e a inclusão/alteração do título será bloqueada;

   03. EXEMPLO DE UTILIZAÇÃO

   ...

   Bloco de código
   language java theme Midnight title FA986NF
   #INCLUDE "PROTHEUS.CH" User Function F986Valid() Local oModel := ParamIxb[1] //Sub-model MVC da tabela FKF Local cAliasC := ParamIxb[2] //SE1 para contas a receber / SE2 para contas a pagar) Local nOpc := ParamIxb[3] //3-Inclusão/4-Alteração Local lBrowse := ParamIxb[4] //.T. para acesso via browse Local lRet := .T. Local nIrrf := 0 If cAliasC == "SE2" //Complemento de Título do Contas a Pagar If lBrowse nIrrf := SE2->E2_IRRF > 0 Else nIrrf := M->E2_IRRF > 0 EndIf If Alltrim(oModel:GetValue("FKFMASTER","FKF_NATREN")) $ "20001" .And. M->E2_IRRF > 0 nIrrf lRet := .F. Help( ,,"F986Valid",,"Revise a Natureza de Rendimento informada.", pois1, não0 deve) conter imposto na carteira a pagar", 1, 0 )EndIf EndIf EndIf Return lRet

   
   

   04. DEMAIS INFORMAÇÕES

   • A chamada desse ponto de entrada é realizada após as validações do fonte padrão, portanto através dele é possível complementar as validações existentes, não as substituir. Desta forma, se as validações do fonte padrão forem realizadas, mas as

     substituir

     do ponto de entrada não forem, o processo não terá continuidade;

   • Em caso de retorno .F. do ponto de entrada , é recomendável tratar uma mensagem a ser exibida em tela para que o usuário , através da possa entender o ocorrido (vide exemplo acima com a função HELP);

   05. ASSUNTOS RELACIONADOS

   ...