Histórico da Página

Descrição

O ponto de entrada MT103DIRF tem a finalidade de validar os códigos de retenção dos impostos. Utilizando-o podemos abortar a operação de inclusão do Documento de Entrada, caso se verifique alguma inconsistência nos códigos.

Exemplos

User Function MT103DIRF()
Local aCodR := {}
Local lRet := .T.
Local nX := 0

aCodR := aClone(PARAMIXB[1])

//validações do usuário

For nX := 1 to len(aCodR)

If aCodr[nX][2] == '0297' //Se o código de retenção for igual "0297" aborta inclusão da nota.

lRet := .F.

EndIf
Next nX

Return lRet

Idioma

Português(Brasil)

Versões

Microsiga_Protheus11, 12.1.17 e superiores

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Todas

Parâmetros

PARAMIXB[1] -> Vetor contendo os códigos de retenção e seus respectivos impostos, na seguinte disposição:
PARAMIXB[1][X][2] -> Código de retenção;
PARAMIXB[1][X][4] -> Imposto;

Retorno

Lógico -> .T. para incluir o documento; .F. para não incluir o documento;

Eventos de chamada do Ponto de Entrada

Inclusão e classificação do documento de entrada.

Programa Fonte

MATA103.PRW