Cross Segmentos - Backoffice Protheus - SIGAFAT - Teste de ExecAuto com API (Web Services)

Tempo aproximado para leitura: 00:01:30 min

Dúvida
Como realizar um teste de ExecAuto com API (WS)?

Ambiente
Cross Segmentos - Backoffice Protheus - SIGAFAT - Todas as versões

Solução

No suporte, testamos o WebServices puro sem customizações:

#include "protheus.ch"
#include "totvs.ch"
#include "apwebsrv.ch"


// API para chamar execauto via WS

WSSERVICE wsteste01
WSDATA cumped AS string
WSDATA cRet AS string
WSDATA UserCode AS String

WSMETHOD wsteste
ENDWSSERVICE

WSMETHOD wsteste WSRECEIVE UserCode, cumped WSSEND cRet WSSERVICE wsteste01
U_MyMata410() //função a ser chamada

Return.T.

OBS: Note que a API chama a função do ExecAuto. No exemplo acima, é a rotina automática do pedido de vendas "U_MyMata410", ou seja, é necessário que a sua rotina automática esteja compilada.

No lugar do código onde está "U_MyMata410() //função a ser chamada" deve ser trocado para sua rotina automática desejada