Copy and Include copybook
Posted: Fri Jun 15, 2012 7:20 pm
Hi Friends,
I have a Copybook.
Now I have to write a several files with the same layout as that of the copybook. So I Copy it in my FD section.
For this I define Copybook with field names prefixed by say suppose :AC: and use
Copy <Copybook Name >
Replacing ==:AC:== by ==AC-== for each file.
Now I also want to use this copybook in my embedded SQL statements so for that I must Include this copybook in my Working storage section.
but the variables in Working storage section would be like :AC: Field name
is there anyway we can use replace while Incuding???
I have a Copybook.
Now I have to write a several files with the same layout as that of the copybook. So I Copy it in my FD section.
For this I define Copybook with field names prefixed by say suppose :AC: and use
Copy <Copybook Name >
Replacing ==:AC:== by ==AC-== for each file.
Now I also want to use this copybook in my embedded SQL statements so for that I must Include this copybook in my Working storage section.
but the variables in Working storage section would be like :AC: Field name
is there anyway we can use replace while Incuding???