RE: can I set up a multi-format logical file in DDS with one key field having a default fixed value?

["Carel Teijgeler" <coteijgeler@xxxxxxxxx>]

Joel,

This might be possible, but all key fields should be the same length (can
be done in LF IIRC). Compiler may have issues then.

Then you chain with your key value to the LF

In the I-specs you have defined the different RCDFMT with an indicator
assigned to it. The indicator is turned on for the RCDFMT read based on the
CHAIN.
(based on my fading memory).

But as others has stated, you have to individualy chain for each data set.

Regards,
Carel Teijgeler


*********** REPLY SEPARATOR  ***********

On 26-7-2012 at 19:50 Stone, Joel wrote:

> Yes I understand that LF's don't contain data.  But I would like a "read"
> to return data, and some of the data I would like to be fixed by its
> format name.
>
> I have 20 files, but lets say 2 files for discussion.
>
> STATEFL
> StateCode		stateDesc
> CA			CALIFORNIA
> FL	            FLORIDA
> TX			TEXAS
>
> CARRIERFL
> CarrierCode		CarrierDesc
> FEXED			FEDERAL EXPRESS
> UPS			UNITED PARCEL SERVICE
> USPS			US POSTAL SERVICE
>
>
>
> I would like to build a multi-format LF so that I can load the 2 keys
> "CARRIER" and "UPS" and return the description "UNITED PARCEL SERVICE".
>
> Using the same LF, I would also like to be able to load the keys "STATE"
> and "FL" and return the description "FLORIDA".
>
> Is this possible to accomplish?
>
>
> Something like:
>
> R STATEFLr                  PFILE(STATEFL)
>  GROUP                     DFT('STATE')
>  StateCode     10          COLHDG('KEY')
>  StateDesc     50          COLHDG('DESC')
> K GROUP
> K StateCode
>
> R CarrierCode		    PFILE(CARRIERFL)
>  GROUP			    DFT('CARRIER')
>  CarrierCode	          COLHDG('KEY')
>  CarrierDesc	          COLHDG('DESC')
> K GROUP
> K CarrierCode
>
>
>
> -----Original Message-----
> From: midrange-l-bounces@xxxxxxxxxxxx
> [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Carel Teijgeler
> Sent: Thursday, July 26, 2012 2:13 PM
> To: midrange-l@xxxxxxxxxxxx
> Subject: Re: can I set up a multi-format logical file in DDS with one key
> field having a default fixed value?
>
> Joel,
>
> LF do not contain data, they have sequenced referrences to RRNs in the PF
> based on the key. So, what is the use to give a field in the selected
lists
> of fields a value?
>
> Regards,
> Carel Teijgeler
>
> *********** REPLY SEPARATOR  ***********
>
> On 26-7-2012 at 18:43 Stone, Joel wrote:
>
> > The fixed key value would be different for each records format.
> >
> >
> > R ADMNOFFR                  PFILE(ADMNOFF)
> >  GROUP                     DFT('ADMNOFF')
> >  ADMNOFC       10          COLHDG('KEY')
> >  ADMNOFC1      50          COLHDG('DESC')
> > K ADMNOFC
> > K ADMNOFC1
> >
> >
> > This attempt returns error "Keyword 'DFT' not valid for this file type."
> >
> >
> >
> > ______________________________________________________________________
> > This outbound email has been scanned for all viruses by the MessageLabs
> > Skyscan service.
> > For more information please visit http://www.symanteccloud.com
> > ______________________________________________________________________
> > -- 
> > This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
> list
> > To post a message email: MIDRANGE-L@xxxxxxxxxxxx
> > To subscribe, unsubscribe, or change list options,
> > visit: http://lists.midrange.com/mailman/listinfo/midrange-l
> > or email: MIDRANGE-L-request@xxxxxxxxxxxx
> > Before posting, please take a moment to review the archives
> > at http://archive.midrange.com/midrange-l.
> >
> >
> >
> > -----
> > Geen virus gevonden in dit bericht.
> > Gecontroleerd door AVG - www.avg.com
> > Versie: 10.0.1382 / Virusdatabase: 2437/5156 - datum van uitgifte:
> 07/26/12
>
>
>
> -- 
> This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list
> To post a message email: MIDRANGE-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/midrange-l
> or email: MIDRANGE-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/midrange-l.
>
>
> ________________________________________________________________________
> This inbound email has been scanned for all viruses by the MessageLabs
> SkyScan
> service. 
> ________________________________________________________________________
>
> ______________________________________________________________________
> This outbound email has been scanned for all viruses by the MessageLabs
> Skyscan service.
> For more information please visit http://www.symanteccloud.com
> ______________________________________________________________________
> -- 
> This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list
> To post a message email: MIDRANGE-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/midrange-l
> or email: MIDRANGE-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/midrange-l.
>
>
>
> -----
> Geen virus gevonden in dit bericht.
> Gecontroleerd door AVG - www.avg.com
> Versie: 10.0.1382 / Virusdatabase: 2437/5156 - datum van uitgifte:
07/26/12