Product Line: | Microsiga Protheus Line |
---|
Industry: | Services |
---|
Module: | SIGAFIS - TAX MANAGEMENT |
---|
Country: | All |
---|
This entry point is used to transmit ICMS (MATA953) calculation information such as code, description, value, sub-code, and GNRE (National Tax Collection Form). This happens after confirmation of the calculation.
Entry point parameters:
Name | Type | Description |
---|
ParamIXB[n][1] | character | calculation row/code |
ParamIXB[n][2] | character | description |
ParamIXB[n][3] | Numeric | value calculated |
ParamIXB[n][4] | character | sub-code |
ParamIXB[n][5] | character | GNRE |
This Entry Point has no return.
#INCLUDE 'protheus.ch'
User Function A953CONT()
local cCod := ""
local cDesc := ""
local nValor := 0
local cSubCod := ""
local cGNRE := ""
local nCount := 0
for nCount := 1 to len(ParamIXB)// ParamIXB is received implicitly
cCod := ParamIXB[nCount][1] // code
cDesc := ParamIXB[nCount][2] // description
nValor := ParamIXB[nCount][3] // value
cSubCod := ParamIXB[nCount][4] // sub-code
cGNRE := ParamIXB[nCount][5] // GNRE
if cCod == "001" .and. nValor > 0
ConOut(cCod,cDesc,nValor,cSubCod,cGNRE)
endif
next
Return Nil