Histórico da Página
...
Nome do Ponto de Entrada: PLMPJSIN
Parâmetros:
PARAMIXB[1] : cOpeInt cChaveInternacao (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+ Ano + Mês + Numero)
PARAMIXB[52] : aListaInternacao (Array com o JSON da Internação)
...
| Bloco de código | ||||||
|---|---|---|---|---|---|---|
| ||||||
#Include "PROTHEUS.CH"
User Function PLMPJSIN()
Local cJson := ""
Local cOpeInt := Substr(PARAMIXB[1], 1, 4)
Local cAnoInt := Substr(PARAMIXB[2]1], 5, 4)
Local cMesInt := Substr(PARAMIXB[3]1], 9, 2)
Local cNumInt := Substr(PARAMIXB[4]1], 11, 8)
Local aListaInternacao := PARAMIXB[52]
// Tratamento para montagem do JSON
cJson := FWJsonSerialize(aListaInternacao, .F., .F.)
Return cJson |
...
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas