Perguntas MsExecAuto [FINA040] não contabiliza

/*ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ*/
//Assinatura de variável que conterá os campos/valores da RA a ser criada;
/*ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ*/
aFin040 := {}

AADD( aFin040, {"E1_FILIAL",  xFilial("SE1"),Nil})
AADD( aFin040, {"E1_PREFIXO",  "RA ",Nil})
AADD( aFin040, {"E1_NUM",  cProxNum,Nil})
AADD( aFin040, {"E1_PARCELA",  GetMv("MV_1DUP"),Nil})
AADD( aFin040, {"E1_TIPO",  "RA ",Nil})
AADD( aFin040, {"E1_NATUREZ",  "0048",Nil})
AADD( aFin040, {"E1_PORTADO",  _cBanco,Nil})
AADD( aFin040, {"E1_AGEDEP",  _cAgencia,Nil})
AADD( aFin040, {"E1_CONTA",  _cConta,Nil})
AADD( aFin040, {"E1_CLIENTE",  SA1->A1_COD,Nil})
AADD( aFin040, {"E1_LOJA",  SA1->A1_LOJA,Nil})
AADD( aFin040, {"E1_NOMCLI",  SA1->A1_NOME,Nil})
AADD( aFin040, {"E1_EMISSAO",  _dtMov,Nil})
AADD( aFin040, {"E1_VENCTO",  _dtMov,Nil})
AADD( aFin040, {"E1_VENCREA",  _dtMov,Nil})
AADD( aFin040, {"E1_VALOR",  _nVlrDoc,Nil})
...
...
...


/*ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ*/
//Assinatura de variáveis que controlarão a inserção automática da RA;
/*ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ*/     
lMsErroAuto := .F.
lMsHelpAuto := .T.

/*ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ*/
//Invocando rotina automática para criação da RA;
/*ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ*/               
MSExecAuto({|x,y| Fina040(x,y)}, aFin040, 3)
          
/*ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ*/
//Quando houver erros, exibí-los em tela;
/*ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ*/     
If lMsErroAuto
   MostraErro()
   Return
Endif

MSExecAuto( {|X,Y,Z| CTBA102(X,Y,Z)} ,aCab ,aItens, 3)