Salve salve....
Ponto de entrada FA080ACES - ( Financeiro- Baixa contas a pagar )
FINA080-FA080ACES- Valida os valores de impostos PCC podem ser alterado
#INCLUDE "TOTVS.CH"
/*/{Protheus.doc} FA080ACES
Valida os valores de impostos PCC podem ser alterado
@type function
@author Eurai Rapelli
@since 2023.01.01
/*/
User Function FA080ACES()
Local lRet := .T. as logical
nPis := SE2->(E2_PIS - E2_VRETPIS)
nCsll := SE2->(E2_CSLL - E2_VRETCSL)
nCofins := SE2->(E2_COFINS - E2_VRETCOF)
nTotal := nPis + nCsll + nCofins
Return( lRet )
Gostou? Compartilhe com seus amigos e deixe um comentário! 😎
Um abraço, e até a próxima