Perguntas PE MT103FIM

Luiz Bom dia,
Segue um exemplo simples:
User Function MT103FIN
Local lRet := .T.
Local _DtVenc := ""
Local _dDate := Date()
Local _nVal := 0
Local nPosTes := aScan(aHeader,{|x| Alltrim(x[2])=="D1_TES"})
Local _lFlag := .F.
Local aLocHead := PARAMIXB[1] // aHeader do getdados apresentado no folter Financeiro.
Local aDupCols := PARAMIXB[2] // aCols do getdados apresentado no folter Financeiro.
Local lLocRet := PARAMIXB[3] // Flag de validações anteriores padrões do sistema.
// Caso este flag esteja como .T., todas as validações
// anteriores foram aceitas com sucesso, no contrário, .F.
// indica que alguma validação anterior NÃO foi aceita.
If aDupCols[1][2]<_dDate // aDupCols[1][2] data de vencimento na enchoice duplicatas
ALERT ("Favor não incluir uma Nota com vencimento menor que a data atual!")
lLocRet := .F.
EndIf

Return lLocRet
De: Este endereço de email está sendo protegido de spambots. Você precisa do JavaScript ativado para vê-lo. [Este endereço de email está sendo protegido de spambots. Você precisa do JavaScript ativado para vê-lo.] Em nome de Luiz Augusto - Depto de TI
Enviada em: terça-feira, 22 de novembro de 2011 07:10
Para: SIGA - Grupo
Assunto: [siga-br] PE MT103FIM

Pessoal, Bom Dia !!
Alguém tem o PE MT103FIM para me mandar de exemplo... ?
[]´s
Luiz Augusto
Depto de TI