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).