Versão atual:

ExecAuto da Mata250

Ao executar a ExecAuto da MATA250, não dá erro mas também não grava, alguém por gentileza sabe o que poderia ser?

SC2->(dbSetorder(1))

SC2->(dbSeek(xFilial("SC2") + TRS->C2_NUM))

AADD(aCabec, {"D3_FILIAL" , xFilial('SD3') , Nil })

AADD(aCabec, {"D3_OP" , TRS->C2_NUM + TRS->C2_ITEM + TRS->C2_SEQUEN, Nil })

AADD(aCabec, {"D3_TM" , '110' , Nil })

AADD(aCabec, {"D3_COD" , cNumProd , Nil })

AADD(aCabec, {"D3_QUANT" , nQtdPro , Nil })

AADD(aCabec, {"D3_LOCAL" , "01" , NIL })

AADD(aCabec, {"D3_EMISSAO" , date() , Nil })

AADD(aCabec, {"D3_PERDA" , nQtdPer , Nil })

AADD(aCabec, {"D3_PARCTOT" , IIF(nQtdFal = 0,'T','P') , Nil })

if alltrim(cLote) <> ''

AADD(aCabec, {"D3_LOTECTL" , cLote , Nil })

endif

AADD(aCabec, {"D3_OBSERVA" , "APONTAMENTO VIA PLC_PINTURA" , Nil })

MsExecAuto({|x, y| MATA250(x, y)} , aCabec , 3 ) //Inclusao

Versão (1):

Ver a versão formatada

ExecAuto da Mata250

  • criado 31 de Mar de 2022

Comentário

new question