Imprimi Página | Fechar janela

Erro no MSExecAuto MATA410

Impresso de: Helpfacil - Portal do conhecimento
Nome do Forum: Faturamento
Descrição do Forum: Dúvidas Módulo de Faturamento
URL:http://www.helpfacil.com.br/display_topic_threads.asp?ForumID=7&TopicID=43714
Data da Impressão: sábado, 23 de outubro de 2021 at 20:03


Topico: Erro no MSExecAuto MATA410

Postado por: RTHEODORO
Assunto: Erro no MSExecAuto MATA410
Data Postagem: terça-feira, 13 de julho de 2021 at 16:29

Um dos meus scripts de automação de inserção de pedidos de venda começou a dar o seguinte erro:


===== ERRO =====

ERROR: invalid macro source (SSYacc0105e: Error token failed, no valid token):(M->          )
           ENCHAUTO - MSAUTOPR.PRW(308) - Params: CALIAS:SC5,@AFIELD:,UTUDOOK:{ || OBRIGATORIO(AGETS,ATELA)},NOPC:3,ACPOS: )
A410INCLUI - MATA410.PRX(1234) - Params: CALIAS:SC5,NREG:1,NOPC:3,LORCAMENTO:.F.,NSTACK:0,AREGSCK:,LCONTRAT:.F.,NTPCONTR:0,CCODCLI:,CLOJA:,CMEDPMS:NIL )
MBROWSEAUTO - MSAUTOPR.PRW(86) - Params: NOPCAUTO:3,@AAUTO:,CALIAS:SC5,LSEEK:.T.,LPOS:.F. )
MATA410 - MATA410.PRX(134) - Params: @XAUTOCAB:,@XAUTOITENS:,NOPCAUTO:3,LSIMULACAO:.F.,CROTINA:NIL,CCODCLI:NIL,CLOJA:NIL,XRATCTBPC:NIL,XADTPC:NIL,XPARAMAUTO:NIL,LSIGADPR:.F.,CFILDEF:,AADDFIL:,CVDEFAULT:,XAPOSESP:NIL )
{|X,Y,Z,A| MATA410(X,Y,Z,A)} - IMPORTAPEDIDOTXT.PRW(267) - Params: @X:,@Y:,Z:3,A:.F. )
MSEXECAUTO - MATXFUNB.PRX(3003) - Params: BROTINA:{|X,Y,Z,A| MATA410(X,Y,Z,A)},@UPAR1:,@UPAR2:,UPAR3:3,UPAR4:.F.,UPAR5:NIL,UPAR6:NIL,UPAR7:NIL,UPAR8:NIL,UPAR9:NIL,UPAR10:NIL,UPAR11:NIL,UPAR12:NIL,UPAR13:NIL,UPAR14:NIL,UPAR15:NIL )
_FGRAPED - IMPORTAPEDIDOTXT.PRW(267)
U_IMPPED - IMPORTAPEDIDOTXT.PRW(236)
SIGAIXB - APLIB190.PRW(231) - Params: CBLOCK:IMPPED )
__EXECUTE - APLIB090.PRW(654) - Params: CFUNCTION:IMPPED,CACCESS:xxxxxxxxxx,CDESCRI:Importar Pedido,CMODEXEC:06,CPAI:Importar Pedido,NTYPE:3,LONLOAD:.F.,NOLDMOD:NIL )
MDIEXECUTE - APLIB260.PRW(896) - Params: LEXECUTE:.T.,CMDIARQTAB: ....


====== SCRIPT TESTE ======

#INCLUDE "TOTVS.CH"
#INCLUDE "topconn.ch"
#include "protheus.ch"
#INCLUDE "rwmake.ch"
#include "apwebsrv.ch"
#include "apwebex.ch"
#include "ap5mail.ch"
#include "TbiConn.ch"
#include "TbiCode.ch"
#INCLUDE "XMLXFUN.CH"

/*/{Protheus.doc} TesteImpPedido
    (long_description)
    @type Function
    @author Ricardo Theodoro
    @since 12/07/2021
    @version 1.0
    @param param_name, param_type, param_descr
    @return return_var, return_type, return_description
    @example
    (examples)
    @see (links_or_references)
/*/
User Function TesteImpPedido()
                        
    //Cabeçalho
    _aPedido := {{"C5_FILIAL", ‘01‘, Nil},;
    {"C5_TIPO", "N", Nil},;
    {"C5_CLIENTE", "000966", Nil},;
    {"C5_LOJACLI", "01", Nil},;
    {"C5_CLIENT", "000966", Nil},;
    {"C5_LOJAENT", "01", Nil},;
    {"C5_TIPOCLI", "F", Nil},;
    {"C5_CONDPAG", "001", Nil},;
    {"C5_TRANSP", "000001", Nil},;
    {"C5_TPFRETE", "C", Nil},;
    {"C5_XIDPED", "1000123456", Nil},;
    {"C5_XIDTPPD", "1", Nil}}

    //Item
    _aItem := {{"C6_FILIAL", "01", Nil},;
    {"C6_ITEM", "01", Nil},;
    {"C6_PRODUTO", "1510", Nil},;
    {"C6_QTDVEN", 100.00, Nil},;
    {"C6_PRCVEN", 100.00, Nil},;
    {"C6_PRUNIT", 2, Nil},;
    {"C6_VALOR", 100.00, Nil},;
    {"C6_TES", "501", Nil}}

    MSExecAuto({|x,y,z| Mata410(x,y,z)}, _aPedido, _aItem, 3)

Return

Já tentei encontrar informações sobre esse erro mas me parece ser um erro bem genérico.


Respostas:

Postado Por: EMERSON.EN
Data Postagem: quarta-feira, 14 de julho de 2021 at 14:48

o array de itens está errado.


====== SCRIPT TESTE ======

#INCLUDE "TOTVS.CH"
#INCLUDE "topconn.ch"
#include "protheus.ch"
#INCLUDE "rwmake.ch"
#include "apwebsrv.ch"
#include "apwebex.ch"
#include "ap5mail.ch"
#include "TbiConn.ch"
#include "TbiCode.ch"
#INCLUDE "XMLXFUN.CH"

/*/{Protheus.doc} TesteImpPedido
    (long_description)
    @type Function
    @author Ricardo Theodoro
    @since 12/07/2021
    @version 1.0
    @param param_name, param_type, param_descr
    @return return_var, return_type, return_description
    @example
    (examples)
    @see (links_or_references)
/*/
User Function TesteImpPedido()
Local _aItens := {} // relação de itens
                        
    //Cabeçalho
    _aPedido := {;
        {"C5_TIPO", "N", Nil},;
        {"C5_CLIENTE", "000966", Nil},;
        {"C5_LOJACLI", "01", Nil},;
        {"C5_CLIENT", "000966", Nil},;
        {"C5_LOJAENT", "01", Nil},;
        {"C5_TIPOCLI", "F", Nil},;
        {"C5_CONDPAG", "001", Nil},;
        {"C5_TRANSP", "000001", Nil},;
        {"C5_TPFRETE", "C", Nil},;
        {"C5_XIDPED", "1000123456", Nil},;
        {"C5_XIDTPPD", "1", Nil}}

    //Item
    _aItem := {;
        {"C6_ITEM", "01", Nil},;
        {"C6_PRODUTO", "1510", Nil},;
        {"C6_QTDVEN", 100.00, Nil},;
        {"C6_PRCVEN", 100.00, Nil},;
        {"C6_PRUNIT", 2, Nil},;
        {"C6_VALOR", 100.00, Nil},;
        {"C6_TES", "501", Nil}} // um único item

    aAdd(_aItens, _aItem) // relação de itens

    MSExecAuto({|x,y,z| Mata410(x,y,z)}, _aPedido, _aItens, 3)

Return




Postado Por: RTHEODORO
Data Postagem: quarta-feira, 14 de julho de 2021 at 16:10

Tentei executar dessa forma que você mandou e o erro continua.

=======

ERROR: invalid macro source (SSYacc0105e: Error token failed, no valid token):(M->          )
           ENCHAUTO - MSAUTOPR.PRW(308) - Params: CALIAS:SC5,@AFIELD:,UTUDOOK:{ || OBRIGATORIO(AGETS,ATELA)},NOPC:3,ACPOS: )
A410INCLUI - MATA410.PRX(1234) - Params: CALIAS:SC5,NREG:1,NOPC:3,LORCAMENTO:.F.,NSTACK:0,AREGSCK:,LCONTRAT:.F.,NTPCONTR:0,CCODCLI:,CLOJA:,CMEDPMS:NIL )
MBROWSEAUTO - MSAUTOPR.PRW(86) - Params: NOPCAUTO:3,@AAUTO:,CALIAS:SC5,LSEEK:.T.,LPOS:.F. )
MATA410 - MATA410.PRX(134) - Params: @XAUTOCAB:,@XAUTOITENS:,NOPCAUTO:3,LSIMULACAO:.F.,CROTINA:NIL,CCODCLI:NIL,CLOJA:NIL,XRATCTBPC:NIL,XADTPC:NIL,XPARAMAUTO:NIL,LSIGADPR:.F.,CFILDEF:,AADDFIL:,CVDEFAULT:,XAPOSESP:NIL )
{|X,Y,Z| MATA410(X,Y,Z)} - TESTEIMPPEDIDO.PRW(53) - Params: @X:,@Y:,Z:3 )
MSEXECAUTO - MATXFUNB.PRX(3003) - Params: BROTINA:{|X,Y,Z| MATA410(X,Y,Z)},@UPAR1:,@UPAR2:,UPAR3:3,UPAR4:NIL,UPAR5:NIL,UPAR6:NIL,UPAR7:NIL,UPAR8:NIL,UPAR9:NIL,UPAR10:NIL,UPAR11:NIL,UPAR12:NIL,UPAR13:NIL,UPAR14:NIL,UPAR15:NIL )
U_TESTEIMPPEDIDO - TESTEIMPPEDIDO.PRW(53)
SIGAIXB - APLIB190.PRW(231) - Params: CBLOCK:TESTEIMPPEDIDO )
__EXECUTE - APLIB090.PRW(654) - Params: CFUNCTION:TESTEIMPPEDIDO,CACCESS:xxxxxxxxxx,CDESCRI:Imp Pedido Teste,CMODEXEC:06,CPAI:Imp Pedido Teste,NTYPE:3,LONLOAD:.F.,NOLDMOD:NIL )
MDIEXECUTE - APLIB260.PRW(896) - Params: LEXECUTE:.T.,CMDIARQTAB



Postado Por: ELTON020
Data Postagem: quinta-feira, 15 de julho de 2021 at 09:12

Vai no configurador e veja se em algum desses campos, tem alguma configuração de variável de memória.



Postado Por: RTHEODORO
Data Postagem: sexta-feira, 16 de julho de 2021 at 14:17

Conferi todos os campos e as configurações de variável de memória estão todas corretas.




Imprimir Página | Fechar Janela