• Subject: Re: Non-Join Multi PF Logical File Format
  • From: "David Shea" <dshea@xxxxxxxxxxxx>
  • Date: Fri, 26 May 2000 09:32:55 -0400

You read my mind.  I was going to test this theory today, and now you've saved me the time.
 
This is _very_ helpful to me, since I sell purging and archiving software.  The biggest stumbling block is 'but the users wont let us', and then the next question is 'so how do I get at the data?'.  This makes it possible to have it _both_ ways - speed up the system by getting the data out of the way, but still get at it in those very few places where it's needed.
 
+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Purge and Archive your AS/400 Data Without Programming with ARCTOOLS (tm)
DCSoftware, Inc.
(508) 435-8243
(508) 435-4498 (fax)
http://www.arctools.com
mailto:info@arctools.com
+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
----- Original Message -----
Sent: Wednesday, May 24, 2000 10:55 AM
Subject: RE: Non-Join Multi PF Logical File Format

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                                

As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2021 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.