How do you export a RAW type field from one table to a file?

nicolas

Member
How do you export a RAW type field from one table to a file?
The contents of RAW type field contains an XML file, so my output will be an XML file.

DEFINE VARIABLE FILENAME AS CHARACTER FORMAT "x(100)".

FILENAME = "ruta\file.xml".




FIND FIRST tabla WHERE condicion NO-LOCK NO-WAIT NO-ERROR.
IF AVAILABLE tabla THEN do:


OUTPUT TO VALUE(FILENAME) BINARY NO-MAP CONVERT TARGET "UTF-8".


??????????????????????????


OUTPUT CLOSE.

end.




thanks
 

nicolas

Member
I answer :)



DEFINE VARIABLE FILENAME AS CHARACTER FORMAT "x(100)".
DEFINE STREAM sOUt.


FILENAME = "ruta\file.xml".




FIND FIRST tabla WHERE condiciones NO-LOCK NO-WAIT NO-ERROR.
IF AVAILABLE tabla THEN do:



OUTPUT STREAM Sout TO VALUE(FILENAME).
PUT STREAM sOut CONTROL nombre.campo.tabla.
OUTPUT STREAM sOut CLOSE.


end.
 
Top