RE: Non-Join Multi PF Logical File Format

["Stone, Joel" <StoneJ@xxxxxxxxxxxxxxxx>]

Actually, RPG programs CAN reference such a file.  There are a few different methods to accomplish this. 

 

One is to compile the RPG program over a single format file.  When the program is actually called, you can OVRDBF to a multi PF logical.

 

Another method is to do the over-ride at compile time, so the RPG compile doesnt error out.  When calling the program, no over-ride is required.

 

-----Original Message-----
From: David Keck [mailto:dkeck@idt.net]
Sent: Wednesday, May 24, 2000 11:07 AM
To: cobol400-l@midrange.com
Subject: Non-Join Multi PF Logical File Format

Can a COBOL program work with a non-join logical file record format which references more than one PF (more than one PF in the DDS PFILE entry) ?  I know RPG programs can NOT compile if they reference such a file.  For example ...

 

Physical File named "A"

     A          R AREC              
     A            FLD1           1A 

Physical File named "B"  (In this case the entire record format for file AA is identical to that of file A)

     A          R BREC             
     A            FLD1           1A 

Logical File named ABLF

Non-Join Multi-PF Logical File Format (in this case the only format in the LF)

     A          R AREC                      PFILE(A B)
     A          K FLD1