You need to know what encoding the encoded in base64 was originally in.
then try to declare retDecoded with that CCSID
On Wednesday, April 1, 2026 at 06:11:40 PM GMT+2, Justin Taylor <jtaylor.0ab@xxxxxxxxx> wrote:
I'm trying to decode a base64 string. It's giving me the results as *UTF-8
when I need *JOB CCSID. Can someone point out what I'm missing?
Thanks
Dcl-proc DecodeTest ;
Dcl-pi *n like(retDecoded) ;
encoded varchar(1000) ccsid(*UTF8) const ;
End-pi ;
Dcl-s retDecoded varChar(1000) ;
EXEC SQL
set :retDecoded = QSYS2.BASE64_DECODE(:encoded);
Return retDecoded;
End-proc ;
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2026 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact
[javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.