Published on InterSystems Developer Community (https://community.intersystems.com)

Página Inicial > Como recuperar os dados de uma %Stream.GlobalCharacter

Pergunta
Luiz Henrique C... · Fev. 17, 2022

Como recuperar os dados de uma %Stream.GlobalCharacter

Boa Noite / Tarde / Dia

Estou tendo o trabalho para recuperar os dados (JSON) de campos de uma tabela no formato %Stream.GlobalCharacter, porem quando eu tento ler ele dentro do cache (ObjectScript) estou encontrando dificuldades. Estou recuperando as informações da tabela usando %SQL.Statement e quando eu tento acessar a informação geralmente vem: 2%Stream.GlobalCharacter^traducao.xYCONTIGENCIAWMSS

segue uma estrutura de como estou tentando recuperar esse dado:

Set tStatement = ##class(%SQL.Statement).%New()
 ;
 S SQL = ""
 S SQL = "SELECT CONT_JSONENVPEV,CONT_JSONENVAR,CONT_JSONENVROM FROM TRADUCAO.xYCONTIGENCIAWMS WHERE CONT_CODEMP = '"_CODEMP_"' AND CONT_CODCHAVE = '"_NUMKEY_"' AND CONT_TIPO = '"_TIPOCO_"'"
set status = tStatement.%Prepare(SQL)
set tResult = tStatement.%Execute()
 ;
D tResult.%Next()
set stream = ##class(%Stream.GlobalCharacter).%New()
 
S jsonPEV = "", jsonPEV = stream.Read(tResult.%GetData(1))
S jsonAR = "", jsonAR  = stream.Read(tResult.%GetData(2))
S jsonROM = "", jsonROM = stream.Read(tResult.%GetData(3))

Desde já agradeço qualquer ajuda ou orientação

#Caché
Product version: Caché 2018.1

URL de origem:https://pt.community.intersystems.com/post/como-recuperar-os-dados-de-uma-streamglobalcharacter