RE: Non-Join multi-PF logical file format

I do agree.  The example I used was out of one of our multi logical files.
I should have deleted the lines with omit and select because we only use
that for EDI purposes.....they really weren't meant to be used in the
example.
As for the weather, well, it has rained here in Pennsylvania for seven days.
Today we have a break, but it looks like the weekend is not going to be a
good one!!!
Ciao     

-----Original Message-----
From: Finucci Domenico [mailto:finucci@Fiditalia.it]
Sent: Thursday, May 25, 2000 3:35 AM
To: 'COBOL400-L@midrange.com'
Subject: R: Non-Join multi-PF logical file format


Hi, Heater, how are you? The sun is shining in Italy now. 
May be i'm wrong, but 
" record format can use only the fields common to all the physical files" 
is true for the Key definition of the Logical file only, and it's true
because 
of logical reasons only ( i  mean not for technical ones). 

The logical file will contain and show all the fields from the original PFs.
There is no need to use OMIT and INCLUDE statement, because the system is
able to recognize the record format which is reading from. 
Try using a DFU session and watch the result.
Do you agree ? 

Yours sincerely. Ciao
Domenico Finucci


-----Messaggio originale-----
Da: SELTZER, Heather (Reading) [mailto:HSeltzer@Exideworld.com]
Inviato: mercoledì 24 maggio 2000 17.11
A: 'COBOL400-L@midrange.com'
Oggetto: RE: Non-Join multi-PF logical file format

In a multiple format logical file, a record format can use only the fields
common to all the physical files on the PFile keyword for that record
format.  
ex:
R A856HDR                   PFILE(EDI856HDR)
K LONO
K BONO
O STSCD                     COMP(NE 'OK')
S TRDPNRID                  COMP(EQ 'ACE')
S TRDPNRID                  COMP(EQ 'MEIJER')


R A85657SC                  PFILE(EDI85657SC)
K LONO
K BONO
K SHPSQ
O STSCD                     COMP(NE 'OK')
S TRDPNRID                  COMP(EQ 'ACE')
S TRDPNRID                  COMP(EQ 'MEIJER')
+---
| This is the COBOL/400 Mailing List!
| To submit a new message, send your mail to COBOL400-L@midrange.com.
| To subscribe to this list send email to COBOL400-L-SUB@midrange.com.
| To unsubscribe from this list send email to COBOL400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator:
david@midrange.com
+---END
+---
| This is the COBOL/400 Mailing List!
| To submit a new message, send your mail to COBOL400-L@midrange.com.
| To subscribe to this list send email to COBOL400-L-SUB@midrange.com.
| To unsubscribe from this list send email to COBOL400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---END