ExecAuto MATA241

Produtos da Linha Protheus Sigacom - Compras - Backoffice
,
1

Ao fazer um movimento chamando ExecAuto da MATA241 o sistema apresenta erro referente TM invalido:/----------------------------------------------------------------------------AJUDA:REGBLOQEste registro está bloqueado para uso. SB1-Descrição Genérica do Produto

Tabela SD3 03/02/22 14:46:14 - cDocumento :=TRANSXCHS - cTM :=501 < -- Invalido - cCC := - dA241Data :=03/02/22/--------------------------------------------------------------------

Porém se eu faço o mesmo movimento de forma manual, ai dá certo.

segue o fonte

_aCab1 := {{"D3_DOC" ,GetSxeNum("SD3","D3_DOC"), NIL},; {"D3_TM" ,cCodigoTM , NIL},; {"D3_CC" ," ", NIL},; {"D3_EMISSAO" ,ddatabase, NIL}}

Do While !(cQrySB2)->(eof()) .and. (cQrySB2)->B2_LOCAL = cArm93

IncProc((cQrySB2)->B2_COD)

If SB1->(dbSeek(xFilial("SB1")+(cQrySB2)->B2_COD)) .and. (cQrySB2)->B2_QATU > 0 If ( nQtdTot + (cQrySB2)->B2_QATU ) <= nSomaTot .and. RegistroOk("SB1")

If (cQrySB2)->Z5_PESOATU < (cQrySB2)->B2_QATU nQuant := (cQrySB2)->B2_QATU - (cQrySB2)->Z5_PESOATU Elseif (cQrySB2)->Z5_PESOATU == (cQrySB2)->B2_QATU .or. (cQrySB2)->Z5_PESOATU > (cQrySB2)->B2_QATU (cQrySB2)->(dbSkip()) Loop Endif AADD(_atotitem,{{"D3_COD" ,(cQrySB2)->B2_COD ,NIL},; {"D3_QUANT" ,nQuant ,NIL},; {"D3_LOCAL" ,cArm93 ,NIL},; {"D3_UM" ,"KG" ,NIL},; {"D3_GRUPO" ,SB1->B1_GRUPO,NIL},; {"D3_CONTA" ,"114010003" ,NIL},; {"D3_OBSERV" ,"BAIXA REF.RETALHOS" ,NIL}}) nQtdTot += nQuant nQuant := 0 Else (cQrySB2)->(dbSkip()) Loop ENDIF Endif (cQrySB2)->(dbSkip()) Enddo

If !Empty(_atotitem) MSExecAuto({|x,y,z| MATA241(x,y,z)},_aCab1,_atotitem,3) If lMsErroAuto Mostraerro() lOk := .F. Else ConfirmSx8() lOk := .T. EndIf Endif (cQrySB2)->(dbCloseArea()) RestArea(Aarea)

2

Olá, verifique o tamanho e espaçamentos dos campos encaminhados no array apra a execAuto.

Sugiro que chumbe os valores com os tamanhos corretos e verifique se o erro persoste.

Exemplo: https://centraldeatendimento.totvs.com/hc/pt-br/articles/360022031372-MP-SIGAEST-EXECAUTO-Execu%C3%A7%C3%A3o-autom%C3%A1tica-da-rotina-MATA241-Movimentos-M%C3%BAltiplos-

Att, Eduardo Paro

3

Pelo retorno do execauto parece que o tipo de movimento 501 está bloqueado para uso, vale a pena tentar com outro tipo de movimento ou verificar o cadastro desse tipo de movimento.

4

Analisando esse trecho abaixo:

"AJUDA:REGBLOQ Este registro está bloqueado para uso. SB1-Descrição Genérica do Produto"

Verifique se o produto utilizado está bloqueado. Campo B1_MSBLQL = 1 (Sim) e 2 (Não).

Se estiver bloqueado, faça o desbloqueio e tente novamente.