Product: | TOTVS Backoffice |
Product Line: | Protheus Line |
Industry: | Services |
Module: | TOTVS Backoffice (Protheus Line) - Fixed Assets (SIGAATF) |
Function: | ATFXSAL |
Country: | Brazil |
Ticket: | Internal |
Requisite/Story/Issue | DSERCTR1-46829 |
Entry point ATFSINAL allows handling the variable cSinal.
Handling of EP in the system
If ExistBlock("ATFSINAL")
cSinal := Execblock("ATFSINAL",.f.,.f.,{cConta,dData,cTipo,aValor[1],aValor[2],aValor[3],aValor[4],aValor[5],cSinal,nTaxa,cSubConta,cFil,cClvl,cCusto,cTipoCnt, FunName(), aValor })
Endif
EP Example
#INCLUDE "PROTHEUS.CH"
User Function ATFSINAL
Local cConta := PARAMIXB[1]
Local dData := PARAMIXB[2]
Local cTipo := PARAMIXB[3]
Local aValor1 := PARAMIXB[4]
Local aValor2 := PARAMIXB[5]
Local aValor3 := PARAMIXB[6]
Local aValor4 := PARAMIXB[7]
Local aValor5 := PARAMIXB[8]
Local cSinal := PARAMIXB[9]
Local nTaxa := PARAMIXB[10]
Local cSubConta := PARAMIXB[11]
Local cFil := PARAMIXB[12]
Local cClvl := PARAMIXB[13]
Local cCusto := PARAMIXB[14]
Local cTipoCnt := PARAMIXB[15]
Local cFunName := PARAMIXB[16]
Local aValor := PARAMIXB[17]
// CUSTOMER VALIDATION
If cSinal == '+'
cSinal := '-'
EndIf
Return cSinal
Important !!