Typeically these monsters are made for a case where the variaous physicals have
similar keys
IE: the order header, order detail, order comments, etc.
Then reading should give the order header, followed by order comments, and then each order detail followed by it’s comment.

If you have an option, multi-formats would not be the prefered way to go. So why do they exist — to simulate a system with one punched card reader. The cards would all be sorted in the order described using a card sorter and then loaded in the reader. Voila you have all the records you need in just the right order. .

Try specifying that the file is Keyed on the F spec.

Regards,

Martin Gilbert.

Code i have tried

PF1

A R PF1R
A NAME 20A

PF2

A R PF2R
A NUMBER 10A

Multi Format Logical File – LF1

A R PF1R PFILE(PF1)
A K Name

A R PF2R PFILE(PF2)
A K Number

Program
FLF1 IF E DISK
C Read lf1
C Name Dsply
C Eval *Inlr = *On

While Executing the above code, i am getting the Error CPF4247
Can you help me to correct the code
I tried the above example using USROPN also

The F spec keywords IGNORE or INCLUDE can be used if you want data from some but not all of the files mapped in the multirecord fiel

The F spec keyword INFDS(data_structure_name) can be used to identify a data structure
the file information data structure can provide the record name whenever a record is accessed so you can tell which file it comes from — positions 38-45 or keyword *RECORD

You can do SETLL, CHAIN, ReAD etc on the file – also updates and deletes (you will need the record name from the INFDS to do these.

If you have no interest in which file the data is coming from this is the code.
It will look just like a physical file to the program.

*LOVAL SETLL MyLF
Read MyLF
dow not(%EOF(MyLOC))
do something
ReadMyLF
ENDDO

Phil

Now I see that the formats point to different physicals. So you can just refer to the format names instead of the file names.

Regards,

Martin Gilbert.

Why do you have 2 formats in your logical file which are identical? If it’s not necessary, then you have your solution.

If the 2 record formats are necessary, you should be able to chain, read, etc by using the record format name instead of the file name.

Regards,

Martin Gilbert.

A R FMT1 PFILE(FILE1)
A K EMPNO

A R FMT2 PFILE(FILE2)
A K EMPNO

I want to use the multi format logical file in my rpgle program. How to use this. Can you please give me the example

It’s the word “the” in your question that got me wondering if you were refering to:

a. having F specs and operations on more than one logical file, perhaps over the same physical file.
(answered above by Martin)
or
b. having an F spec and operations on a multi-format logical file, which allows access to records from more than one physical file.
or
c. having an F spec and operations on a logical over a physical file having more than one member.

the asnwers to all three are yes. I don’t think you were asking about ‘c’ but probably a or b. The reasons and methods are different for each of these questions.

Phil