Consultor Eletrônico



Kbase P66024: How to receive an XML document from a WebService that returns a MEMPTR to the document.
Autor   Progress Software Corporation - Progress
Acesso   Público
Publicação   10/15/2008
Status: Unverified

GOAL:

How to receive an XML document from a WebService that returns a MEMPTR to the document.

FACT(s) (Environment):

OpenEdge 10.x

FIX:

Use code similar to the following:

hNode:GET-CHILD(hText,1).
lcInvoice = hText:NODE-VALUE.
CREATE ttblob.
COPY-LOB FROM lcInvoice TO FILE "temp.txt".
COPY-LOB FROM FILE "temp.txt" TO ttblob.BLOB CONVERT SOURCE BASE64.
COPY-LOB FROM ttblob.BLOB TO pInvoice.
hMyInvoice:LOAD("memptr",pInvoice,FALSE).