RPGLE File declaration

Question

I need to write a program that reads a file from library 1 and writes it to another file in another library. The problem is that both files have the same name and format. I've tried renaming the format, but the program still considers the two files to be identical and is unable to identify the second, which is in another library.

Have you any ideas pleause? thank you very much for your help

Answer 1

Assuming a supported version of the OS..

You need to use EXTNAME/EXTDESC

dcl-f myfile1 extdesc('LIB1/MYFILE') extfile(*EXTDESC) rename(MYFILEA:FORMAT1);
dcl-f myfile2 extdesc('LIB2/MYFILE') extfile(*EXTDESC) rename(MYFILEA:FORMAT2);