Re: unprintable or non-visible characters

create or replace alias qtemp.src for MYLIB/QRPGLESRC (MYPGM);

update qtemp.src
set srcdta
= translate(SRCDTA

,x'404040404040404040404040404040404040404040404040404040404040404040'


,x'202122232425262728292A2B2C2D2E2F303132333435363738393A3B3C3D3E3F41'

);

Charles

On Thu, Jan 6, 2022 at 12:59 PM a4g atl <a4ginatl2@xxxxxxxxx> wrote:

I received a source program by email. It has a bunch of TAB and other
non-visible characters that will not allow the code to compile..

What is the easiest way to scan and replace these characters?

I tried in SEU, but it appears SEU does not search for x'05'.

TIA, DArryl Freinkel.
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/midrange-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