Re: Scan and Replace

I am trying to understand scan and replace. I am looking at a string which
is found during my scanning of SRCDTA of a source file. I am trying to
find the spaces ' ' and replace them with no spaces ''. The HP code that I
am converting allowed both in a case of COPY EQUIPMNT, EQIPX for example.
The variables are different depending on which HP programs are being looked
at. I am wanting to find those spaces and turn the code into something like
this: COPYEQUIPMNT,EQIPX so that it will be consistant when writing the
AS400 equivilent.

I am working in RPGLE and do have the SRCDTA of that line into SUBDTA. I
cannot figure out the copy and replace from there. Please help me, I know
the COPY line is for sure wrong but I am at a loss on how to fix it and get
the correct line generated..

C ' ' SCAN SUBDTA
C EVAL SUBDTA=%REPLACE(' ':'')


--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.