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 lRet := .T. If cAliasC == "SE2" //Complemento de Título do Contas a Pagar If Alltrim(oModel:GetValue("FKFMASTER","FKF_NATREN")) $ "20001" .And. M->E2_IRRF > 0 lRet := .F. Help( ,,"F986Valid",,"Revise a Natureza de Rendimento, pois não deve conter imposto na carteira a pagar informada.", 1, 0 ) EndIf EndIf Return lRet |
...
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas