Histórico da Página
Ponto de Entrada
Descrição: | O Ponto de Entrada M103CODR foi disponibilizado apenas para validar / visualizar se as informações contidas no array "aCodR" (Códigos de Retenção / Impostos) foram preenchidas corretamente. | ||||||||
Localização: | O Ponto de Entrada será executado no momento de confirmar a inclusão do documento de entrada. | ||||||||
Eventos: | Documento de Entrada | ||||||||
Programa Fonte: | MATA103.PRX | ||||||||
Função: | A103VldCodR | ||||||||
| Parâmetros: |
| ||||||||
Retorno: |
|
Exemplo:
#Include 'Protheus.ch'
User Function M103CODR()
Local aCodR := PARAMIXB[1]
Local nPos := 0
Local lRet:= .T.
//Validações do Usuário.
If !Empty(aCodR) //aCodR: Posição 2 do array "Código de retenção; Posição 4 do array "Imposto";
nPos := aScan( aCodR, {|aX| aX[4]=="IRR"})
If nPos>0
lRet:= MsgYesNo ("Encontrado codigo de retenção do IRR:"+ aCodR[nPos,2]+". Confirma?")
Else
lRet:= MsgYesNo ("Não encontrado codigo de retenção do IRR. Confirma?")
EndIf
EndIf
Return lRet
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas