Histórico da Página
...
Bloco de código | ||||||
---|---|---|---|---|---|---|
| ||||||
#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. nIrrf lRet := .F. Help( ,,"F986Valid",,"Revise a Natureza de Rendimento informada.", 1, 0 ) 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 do ponto de entrada não forem, o processo não terá continuidade;
- Em caso de retorno .F. , é recomendável tratar uma mensagem a ser exibida em tela para que o usuário possa entender o ocorrido (vide exemplo acima com a função HELP);
...
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas