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

#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

• It is noteworthy that the customer is responsible for EP utilization and its impacts on the system.
• The examples used in this documentation are for demonstration purposes only. Each customer must check what behavior they want to perform according to the scope of the entry point.