Re: %Scan and %Replace Multiple Hex Values

The %replace does only one instance, as the last solution showed. You can get all replaced in one swell foop using SQL

set :charvar = replace(:charvar, x'0D25', ' ')

That uses a host variable, charvar, that contains your character string, you might be able to use host variables for the other parts, have not checked.

HTH
Vern

Jon Paris wrote:

On 21-Nov-08, at 12:47 PM, rpg400-l-request@xxxxxxxxxxxx wrote:

For future documentation. This worked:

wjComment = %xlate(x'0D25':' ':retWordWrap(x));

I don't think it really does - not as a general case. It may have "worked" for you but it might also have caused you much grief.

Suppose that X'0D' exists in the string without the following X'25'? This will replace it - is that really what you want?

%xlate works on a character by character basis - it seems to me that you need to use %scan to find the whole pattern and then probably use %replace to replace the pair by a single space.

Jon Paris

www.Partner400.com
www.SystemiDeveloper.com