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

Follow-Ups:
Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

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.