× Linguagem de Programação ADVPL

Perguntas Problemas com execAuto FINA080

Mais
9 anos 1 mês atrás #27513 por hbaldin
Galera quando baixo um titulo via ExecAuto FINA080 , o mesmo não preenche os dados do Banco, agencia e conta na SE5,
Esse eh meu ExecAuto , Se alguém tiver uma dica ou visualizar onde estou errando.

AAdd( aBaixa , {"E2_FILIAL" ,xFilial("SE2") , Nil})
AAdd( aBaixa , {"E2_PREFIXO" ,SE2->E2_PREFIXO , Nil})
AAdd( aBaixa , {"E2_NUM" ,SE2->E2_NUM , Nil})
AAdd( aBaixa , {"E2_PARCELA" ,SE2->E2_PARCELA , Nil})
AAdd( aBaixa , {"E2_TIPO" ,SE2->E2_TIPO , Nil})
AAdd( aBaixa , {"E2_FORNECE" ,SE2->E2_FORNECE , Nil})
AAdd( aBaixa , {"E2_LOJA" ,SE2->E2_LOJA , Nil})
AAdd( aBaixa , {"E2_NATUREZ" ,SE2->E2_NATUREZ , Nil})
AAdd( aBaixa , {"E2_EMISSAO" ,SE2->E2_EMISSAO , Nil})
AAdd( aBaixa , {"E2_VENCTO" ,SE2->E2_VENCTO , Nil})
AAdd( aBaixa , {"E2_VENCREA" ,SE2->E2_VENCREA , Nil})
AAdd( aBaixa , {"E2_VALOR" ,SE2->E2_VALOR , Nil})
AAdd( aBaixa , {"AUTVLRPG" ,nVl10925 , Nil})
AAdd( aBaixa , {"AUTMOTBX" ,"NORNORMAL" , Nil})
// dados banco Pamcard
AADD( aBaixa, { "AUTBANCO" ,"001" , Nil})
AADD(aBaixa, {"AUTAGENCIA" ,"3404 " , Nil})
AADD(aBaixa, {"AUTCONTA" ,"5918" , Nil})

AAdd( aBaixa , {"AUTDTBAIXA" ,STOD(aGrv[nFor,27]) , Nil})
AAdd( aBaixa , {"AUTDTCREDITO" ,STOD(aGrv[nFor,27]) , Nil})
AAdd( aBaixa , {"AUTHIST" ,"Valor pago via ROADCARD" , Nil})
AADD( aBaixa , {"AUTJUROS" ,nJuros , Nil})
AADD( aBaixa , {"AUTDESCONT" ,nDesc , Nil})

xOpc := 3 // 3=Baixa; 5=Cancelamento
lNoMBrowse := .F.
nOpbaixa := 1
lExibeLanc := .F.
lOnline := .T.
MSExecAuto({| a,b,c,d,e,f | FINA080(a,b,c,d,e,f)} ,aBaixa,xOpc,lNoMBrowse,nOpbaixa,lExibeLanc,lOnline)//3 para baixar ou 5 para cancelar a baixa.




Abraços.

Por favor Acessar ou Registrar para participar da conversa.

Tempo para a criação da página:0.087 segundos
Joomla templates by a4joomla