Linha de Produto: | Microsiga Protheus® |
---|---|
Segmento: | Serviços |
Módulo: | Fiscal |
Ponto de entrada para manipulação da variável do tipo array aExcecao contida na função MaExcecao() que por sua vez alimenta as referências IT_EXCECAO, IT_EXCEFAT.
Nome | Tipo | Descrição |
---|---|---|
ExpA1 | Array | aExcecao padrão populado pelo sistema. [01] - Aliq. de ICMS Interna |
ExpA2 | Array | [01] - Numero do Item |
Nome | Tipo | Descrição |
---|---|---|
aRet | Array of Record | O array de retorno, obrigatoriamente deve ter tamanho igual ou maior que 33, ou seja, caso não haja necessidade de alteração do conteúdo do determinado índice, deve-se então populá-lo com seu valor default. |
#Include "Protheus.ch" #Include "TopConn.ch" User Function MAEXCEFISC() Local aRet := {} Local nx := 0 Local aDadosExce := PARAMIXB[1] Local aDadosNece := PARAMIXB[2] For nX := 1 to Len(aDadosExce) If nX == 6 .And. aDadosNece[4]$'2|5' aAdd(aRet, 97) Else aAdd(aRet, aDadosExce[nX] EndIf Next nX Return aRet |
Não há