M
mallen
Guest
Complete frig, do a double conversion assuming an "feff" BOM. Probably not one for the purist in you. define variable char1 as longchar no-undo. define variable char2 as longchar no-undo. define variable int1 as integer no-undo. int1 = 256. /* \u0100 = feff0100 = 100(hex) = 256(dec) */ fix-codepage(char1) = "utf-8". fix-codepage(char2) = session:charset. char1 = CHR(int1, "utf-8", "utf-16"). copy-lob from object char1 to object char2. /* see the result */ copy-lob from object char2 to file "char.txt" no-convert.
Continue reading...
Continue reading...