01. DADOS GERAIS

Produto:

Linha de Produto:

Segmento:

Módulo:INTEGRAÇÕES
Função:SOLICITAÇÃO DE INTERNAÇÃO
País:Brasil
Ticket:
Requisito/Story/Issue (informe o requisito relacionado) :DSAUBE-16470


02. SITUAÇÃO/REQUISITO

Necessidade de Alteração, Inclusão e Exclusão de atributos no JSON de envio de Aviso de Internação para a HealthMap.


03. SOLUÇÃO

Implementado Ponto de Entrada, ao final da montagem do JSON no padrão do sistema.


04. DEMAIS INFORMAÇÕES

Nome do Ponto de Entrada: PLMPJSIN

Parâmetros:
PARAMIXB[1] : cOpeInt (Código da Operadora da Guia de Internação)
PARAMIXB[2] : cAnoInt (Ano da Guia de Internação)
PARAMIXB[3] : cMesInt (Mês da Guia de Internação)
PARAMIXB[4] : cNumInt (Numero da Guia de Internação)
PARAMIXB[5] : aListaInternacao (Array com o JSON da Internação)

Retorno: String com o JSON final para comunicação.


#Include "PROTHEUS.CH"

User Function PLMPJSIN()
    
    Local cJson := ""
    Local cOpeInt := PARAMIXB[1]
    Local cAnoInt := PARAMIXB[2]
    Local cMesInt := PARAMIXB[3]
    Local cNumInt := PARAMIXB[4]
    Local aListaInternacao := PARAMIXB[5]

    // Tratamento para montagem do JSON

    cJson := FWJsonSerialize(aListaInternacao, .F., .F.)

Return cJson


Observação: Nessa Integração, o JSON enviado é no formato de Array com uma lista de Objetos. Exemplo:

[
  {
    "carteirinhaBeneficiario": "00011008000019017",
    "dataSaida": "05/11/2021 11:23:00",
    "dataInternacao": "26/10/2021 11:23:12",
    "especialidadeMedica": {
      "descricao": "CLINICA MEDICA",
      "codigo": "001"
    },
    "codigoExtInternacao": "000120211000000057",
    "codigoBeneficiario": "00011008000019017"
  }
]

05. ASSUNTOS RELACIONADOS