Re: [EXTERNAL] Re: Remove unprintable chars

I am obviously missing something in this thread. Xlate is going to touch
every byte of the input string and replace the characters, ScanRpl is going
to touch every byte of the modified input string and replace x'39' with a
blank. The proposed approach uses one touching of each byte vs two.
Admittedly a coded loop rather than a built-in implementing a loop, but it
doesn't strike me as "being right" (though perhaps easier to code), but
then I'm an old guy who's, as I said, probably missing something here.

On Thu, Nov 18, 2021 at 4:55 PM Kevin Bucknum <Kevin@xxxxxxxxxxxxxxxxxxx>
wrote:

I think what has been proposed before was to use %xlate to change
everything to one particular bad character, and then %scanrpl to swap them
all out.

So build a string with hex 00-39 and %xlate to for example x'39' Then
%scanrpl x'39' to a space.

On Thu, 2021-11-18 at 21:49 +0000, Francois Lavoie wrote:
Well, so that’s only one fast scan& replace instead of a slow do 1-char at
a time loop

-----Original Message-----
From: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxxxxxxxx<mailto:
rpg400-l-bounces@xxxxxxxxxxxxxxxxxx>> On Behalf Of Bruce Vining
Sent: Thursday, November 18, 2021 16:45
To: RPG programming on IBM i <rpg400-l@xxxxxxxxxxxxxxxxxx<mailto:
rpg400-l@xxxxxxxxxxxxxxxxxx>>
Subject: Re: [EXTERNAL] Re: Remove unprintable chars

Caution: This email originates from outside of Fresche | Attention: Ce
message provient de l'extérieur de Fresche


But the user doesn't know what bytes below x'40' are present, just that
x'12' is currently being encountered.

Confidentiality Warning/Avertissement de confidentialité:

This message is intended only for the named recipients. This message may
contain information that is privileged or confidential. If you are not the
named recipient, its employee or its agent, please notify us immediately
and permanently destroy this message and any copies you may have. Ce
message est destiné uniquement aux destinataires dûment nommés. Il peut
contenir de l'information privilégiée ou confidentielle. Si vous n'êtes pas
le destinataire dûment nommé, son employé ou son mandataire, veuillez nous
aviser sans tarder et supprimer ce message ainsi que toute copie qui peut
en avoir été faite.

[https://www.medtronsoftware.com/img/MedtronMinilogo.bmp]
Kevin Bucknum

Senior Programmer Analyst

MEDDATA / MEDTRON

120 Innwood Drive
Covington LA 70433
Local: 985-893-2550<tel:985-893-2550>
Toll Free: 877-893-2550<tel:877-893-2550>
https://www.medtronsoftware.com


CONFIDENTIALITY NOTICE

This document and any accompanying this email transmission contain
confidential information, belonging to the sender that is legally
privileged. This information is intended only for the use of the
individual or entity named above. The authorized recipient of this
information is prohibited from disclosing this information to any other
party and is required to destroy the information after its stated need has
been fulfilled. If you are not the intended recipient, or the employee of
agent responsible to deliver it to the intended recipient, you are hereby
notified that any disclosure, copying, distribution or action taken in
reliance on the contents of these documents is STRICTLY PROHIBITED. If you
have received this email in error, please notify the sender immediately to
arrange for return or destruction of these documents.
--
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,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: https://amazon.midrange.com