Histórico da Página

Permite que o cliente realize o controle orçamentário de forma própria no processo de integração do Reserve com o SIGAPCO.

User Function PCOXRESPRCWSRGProc()

Local aDados oDadosRQ := ParamIxb[1] //Objeto contendo os dados do Request enviados pelo ReserveGET

Local cEvento oDadosRS := ParamIxb[2] //Objeto contendo os dados do Response que serão enviados para o ReserveGET

Local aRet := Array(2)
// aDados: Dados do webservice no formato [Campo,Conteudo]
// Retorno
aRet[1] := .F.
aRet[2] := "Bloquear Lançamento!"
cErro := ""

//A estrutura de dados esta contida no manual ReserveGet, fornecido pela empresa Reserve.

//-----------------------------------------------------------------------------

// Exemplo de obtenção de dados fornecidos pelo ReserveGET

//-----------------------------------------------------------------------------

oDadosRQ:cAcao //Tipo de processamento a ser executado

oDadosRQ:Pedido:IDPedido //Identificação do pedido de viagem

oDadosRQ:Pedido:CCusto //Centro de Custo da viagem

//-------------------------------------------------------------------------------------

//Exemplo de dados que devem ser retornados para o ReserveGET

 //-------------------------------------------------------------------------------------

oDadosRS:PedidoRS:Acao := "ConfirmarOperacao"
oDadosRS:IDPedido := oDadosRQ:Pedido:IDPedido
oDadosRS:Valor := ""
oDadosRS:Mensagem := ""
oDadosRS:CodErro := If(!Empty(cErro),'Erro Ponto de Entrada WSRGProc','')
oDadosRS:Erro:Mensagem := cErro

ReturnReturn aRet

Português(Brasil)

Microsiga_Protheus12

Todos

Todas

PARAMIXB[1] //Array Variável do tipo objeto com os dados do webservice no formato [Campo,Conteúdo] recebidos do ReserveGET (Request).
PARAMIXB[2] //Variável do tipo caractere que indica o evento que está ocorrendo no Reserve (1-PedidoIniciouNotificacao;2-PedidoNotificado;3-PedidoIniciouAutorizacao;4-PedidoAutorizado;5-PedidoNegado;6-PedidoEmitido;7-PedidoCancelado;8-PedidoIniciouEmissao)objeto para informar os dados que serão enviados para o ReserveGET (Response).

O retorno é efetuado ao preencher o objeto recebido no PARAMIXB[2], não necessitando retornar uma variável na instrução "Return"

Array com 2 posições:
- Na primeira posição retornar uma variável do tipo lógica, indicando se o processo no Reserve deve ou não continuar.
- Na segunda posição retornar uma variável do tipo caractere com o motivo do bloqueio, caso o faça.

PCOXRESWSResGET.PRW