RE: Non-Join Multi PF Logical File Format

["rajan tangri" <rajantangri@xxxxxxxxxxx>]

Hey David,

I missed the original question.So I am taking a guess that you need  multi 
format LF .We do something similar.

PF1 -- Order Header

REC1        ---
Fld1
Fld2

K Fld1

PF2      --- Order Detail
REC2
FLD3
FLD4
K FLD4


LF--

REC1        PFILE(PF1)
K FLD1

REC2        PFILE(PF2)
K FLD3


FLD1 AND FLD3 have the same attributes and in the program you read by the 
file name and not the RECORD name but you can record name to
update records to individual PF.we differentiate between them by Flags so 
update the corresponding PF.

Hope that helps,


Rajan




>-----Original Message-----
>From: David Shea [mailto:dshea@arctools.com]
>Sent: Wednesday, May 24, 2000 11:42 AM
>To: Stone, Joel; COBOL400-L@midrange.com; RPG400-L@midrange.com
>Subject: Re: Non-Join Multi PF Logical File Format
>
>
>OH MY GOD IT @#$@!$%^ WORKS!  Almost.
>
>When I attempt to compile an RPG program with a logical file using this
>approach, the compile fails on a severity 40 - it doesn't like the 
>duplicate
>record format.  I tried this before and gave up after the compile failed.
>
>BUT...  When I tell the compile that it's OK to create the program at a
>level 40 error, the program actually works!
>
>So.... how do I get RPG to stop complaining about the LF?
>
>----- Original Message -----
>

________________________________________________________________________
Get Your Private, Free E-mail from MSN Hotmail at http://www.hotmail.com

+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---