Re: Can a PF have >1 record format?

[Jim Langston <jimlangston@xxxxxxxxxxxxxxxx>]

Alister,

If there is a way to define 2 different data definitions to one physical
file that are both kept in the DDS for that file, I would be VERY interested
in seeing how you are doing this.

I have looked for this solution for years from classes I took, asking on
this group, etc... and never found a way to do it.  Which is why I am doing
it the way I am (external definitions kept in 2 different files that are
imported and pointers used).

I have read the DDS book so many times looking for this solution the pages
started to curl.

Regards,

Jim Langston

> Date: Tue, 9 Jan 2001 17:42:39 EST
> From: MacWheel99@aol.com
> Subject: Re: Can a PF have >1 record format?
>  
> I may or may not be able to help here.
> 
> Yes a PF can have >1 record format.
> I know because we have a few files that way, but not very many.
> Most of them are legacy from S/36 not re-engineered on AS/400,
> but we also have a few that BPCS did that way.
> 
> We have some programs that used to be S/36 internally described but got 
> converted to run on OS/400 & we used DDS to externally describe the files & 
> the logic runs pretty much the same as before, except better logical & using 
> some RPG/400 constructs that were not available on RPG/36.
> 
> Multiple format PFs work.
> The RECORD statement in DDS says what the layout is for each format
> The method of RPG access to the file basically says CHAIN or READ this format 
> or that format.

<SNIP>

> Jim Langston's post implies that I cannot be doing what I am doing, so after 
> I go into the office (I am taking a vacation day today) I may be inspired to 
> look up programs I recall that I thought had this in them.
> 
> MacWheel99@aol.com (Alister Wm Macintyre) (Al Mac)
> AS/400 Data Manager & Programmer for BPCS 405 CD Rel-02 mixed mode (twinax 
> interactive & batch) @ http://www.cen-elec.com Central Industries of 
> Indiana--->Quality manufacturer of wire harnesses and electrical 
> sub-assemblies - fax # 812-424-6838
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---