Histórico da Página
...
Parâmetros:
PARAMIXB[1] : cChaveInternacao (Código da Operadora + Ano + Mês + Numero)
PARAMIXB[2] : aListaInternacao cJson (Array com o JSON da InternaçãoJSON padrão para comunicar)
Retorno: String com o JSON final para comunicação.
...
| Bloco de código | ||||||||
|---|---|---|---|---|---|---|---|---|
| ||||||||
#Include "PROTHEUS.CH"
User Function PLMPJSIN()
Local cJson := ""
Local cOpeInt := Substr(PARAMIXB[1], 1, 4)
Local cAnoInt := Substr(PARAMIXB[1], 5, 4)
Local cMesInt := Substr(PARAMIXB[1], 9, 2)
Local cNumInt := Substr(PARAMIXB[1], 11, 8)
Local aListaInternacaocJsonPE := PARAMIXB[2]
Local oResponse := JsonObject():New()
oResponse:FromJson(cJsonPE)
// Tratamento para montagem do JSON
cJson := FWJsonSerialize(aListaInternacao, .F., .F.)
Return cJson |
...
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas