Marc's Place

 

FN_E$RPL - Replace a character

Inclusion in RPG source

C /COPY E$LIB/SRC(ILE),FN_E$RPL

Invocation

EXSR E$RPL

Input Parameters

@RPLFR (a1)
Character to find.
 
@RPLTO (a1)
Character to replace with.
 
@RPL (a150)
Text to search and replace in.

Output Parameters

@RPL (a150)
Changed text.

What it does

The routine searches for a character and replaces it with another character.

Examples

C                     ...
 *
C                     MOVEL'A'       @RPLFR           Find string
C                     MOVEL'B'       @RPLTO           Replace string
C                     MOVELTEXT      @RPL      P      String to modify
C                     EXSR E$RPL
C                     MOVEL@RPL      TEXT      P      Modified string
 *
C                     ...
 
Go to download page
© 1997- Marc Vos (and others)   -   Privacy Statement   -    Contact Me

On this website, Google Analytics is used to track visitor statistics. These are anonymised data about the number of visitors, which pages they visit on this site, from which regions they visit, which web browsers they use, etc.. You will also see non-personalised ads via Google AdSense. Cookies from Paddle or Paypal are placed when you click on a 'Buy now!' or 'Donate!' button, and possible cookies from Disqus when you use that system to comment on one or more blogposts.
Privacy Statement