I agree with this solution. I don't understand the point of xlating
all bad characters to x'39', and then using %scanrpl on x'39'... just
use %xlate to translate them all to x'40'.
That way any control codes will be replaced by blanks.
converting all of x'00' - x'39' might be overkill, though... you
probably only need to convert those that would be interpreted as 5250
On 11/18/2021 4:12 PM, Francois Lavoie wrote:
%Xlate(X'00010203...up to 39':*Blank:string);
This is the RPG programming on IBM i (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
Help support midrange.com by shopping at amazon.com with our affiliate
As an Amazon Associate we earn from qualifying purchases.
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.