MVSFORUMS.com

[haqshaik]

Hi All.

I am using COPY statement with replacing option in the working storage.
While I complie, the replace statement is not working. if i simply say copy the copy book is getting expanded properly in the complialtion listing.

Here is my copy statement.

I have tried the following three variations
Variaition1: COPY FNLREQCP REPLACING "CPY" BY "INP"
Varaition2: COPY FNLREQCP REPLACING 'CPY' BY 'INP'
Third varaition is using the pseudo text.
Variation3:COPY FNLREQCP REPLACING ==CPY== BY ==INP==

I am pasting down the copy book for reference.

01 CPY-ADDRESS-REQ-DATA.

05 CPY-ADDRESS-REQ.
10 CPY-ADDRESS-LINE1 PIC X(30).
10 CPY-ADDRESS-LINE2 PIC X(30).
10 CPY-CITY-ST-LINE PIC X(17).
10 CPY-ZIP-CD PIC X(05).
10 CPY-ZIP-EXT PIC X(04).

I have searched throuh the forum and found good info about copy statement. But I could not resolve what the problem is.
Do we need to specify some compiler option for the replace to be effective?
Am I missing something here? Please guide me.

Thanks,
Salauddin

[kolusu]

haqshaik,

The COPY statement with REPLACING phrase can be used to replace parts of words only by inserting a dummy operand delimited by colons into the variable names.

if your copy book was follows

[haqshaik]

Thanks Kolusu,
its working now. Thanks for your help.

Thanks,
Salauddin

[neilxt]