PE M040OEAI - Inclusão de campos customizados no EAI Seller via Json

CONTEÚDO

Dados Gerais
Descrição
Sintaxe
Parâmetros
Retorno
Exemplo

01. DADOS GERAIS

Produto:	TOTVS Backoffice
Linha de Produto:	Linha Protheus
Segmento:	Backoffice
Módulo:	SIGAFAT - Faturamento
Função:	MATI040O - Mensagem Única Vendedor (Seller) via JSON
Abrangências:	Microsiga Protheus 12
Versões:	Microsiga Protheus 12
Compatível Países:	Todos
Sistemas Operacionais:	Todos
Compatível com as Bases de Dados:	Todos
Nível de Acesso:	Nível 1 (Acesso Clientes)
Idiomas:	Todos

02. DESCRIÇÃO

Ponto de Entrada utilizado para alterar o array com os dados que serão usados no processamento da rotina de Vendedores.

Com o PE compilado é possível realizar a inclusão de campos customizados no processo de EAI Seller, quando o formato utilizado no envio é JSON.

O tratamento para edição do array de campos da SA3 pode ser feita com base no JSON enviado para a mensagem única. O JSON enviado na requisição é encaminhado ao Ponto de Entrada através do parâmetro (array) "paramixb" na posição [3], e pode ser feito um tratamento dentro do PE para que o dado customizado contido no JSON seja adicionado no array de retorno.

Importante

Não é permitida a alteração de informações como Filial e Código do vendedor através do Ponto de Entrada. Caso isso ocorra o sistema irá retornar uma mensagem de erro e abortará o processo.

03. SINTAXE

M040OEAI() ---> aRet

04. PARÂMETROS

Nome	Tipo	Descrição	Default	Obrigatório	Referência
aParamIXB	Vetor	Vetor com os dados do vendedor que está sendo executado na mensagem única Seller, sendo: [ 01 ] - aDadosSA3 - Tipo: Array - Relação de campos e seus respectivos conteúdos que serão processados. [ 02 ] - nOpcx - Tipo: Numérico - Identificador da operação que esta sendo realizada (3 - Inclusão, 4 - Alteração e 5 - Exclusão) [ 03 ] - cJson - Tipo: Caracter - String contendo o json recebido na requisição da mensagem única

05. RETORNO

Retorno	Tipo	Descrição	Obrigatório
aRet	Array	Array contendo os dados dos campos que serão processados na gravação do cadastro do vendedor (SA3)	Sim

06. EXEMPLO

Exemplo:

#INCLUDE 'PROTHEUS.CH'
#INCLUDE "FWMVCDEF.CH"
  
User Function M040OEAI()
 
   Local aArea       := GetArea()
 
   Local aParam      := PARAMIXB
 
   Local aDadosSA3   := aParam[1]
   Local nOpcx       := aParam[2]
   Local cJson       := aParam[3]
   Local oJson       := JsonObject():New()

   Local cCampo1     := "XCampo1"
   Local cCampo2     := "XCampo2"
   Local cCampo3     := "XCampo3"

   Local cValCampo1  := ""
   Local nValCampo2  := 0
   Local dValCampo3  := CToD("  /  /    ")

   oJson:fromJson(cJson)

   If oJson["Content"]:HasProperty(cCampo1)
      cValCampo1 := oJson["Content"][cCampo1]
      AAdd(aDadosSA3, {"A3_XCAMPO1", cValCampo1, Nil})
   EndIf

   If oJson["Content"]:HasProperty(cCampo2)
      nValCampo2 := oJson["Content"][cCampo2]
      AAdd(aDadosSA3, {"A3_XCAMPO2", nValCampo2, Nil})
   EndIf

   If oJson["Content"]:HasProperty(cCampo3)
      dValCampo3 := CToD(oJson["Content"][cCampo3])
      AAdd(aDadosSA3, {"A3_XCAMPO3", dValCampo3, Nil})
   EndIf

   RestArea(aArea)
 
Return aDadosSA3

Árvore de páginas