At this point just curious if it can be done in DDL.
I chose to build a new PF with all the values from various files, but it seems that DDL comes so close to being able to accomplish this.
-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Alan Shore
Sent: Thursday, July 26, 2012 3:27 PM
To: Midrange Systems Technical Discussion
Subject: RE: can I set up a multi-format logical file in DDS with one key field having a default fixed value?
These are honest questions, no sarcasm or facetiousness intended.
I'm STILL trying to work out why you want to do this?
What do you gain?
Alan Shore
Programmer/Analyst, Direct Response
E:AShore@xxxxxxxx
P:(631) 200-5019
C:(631) 880-8640
"If you're going through Hell, keep going" - Winston Churchill
-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Stone, Joel
Sent: Thursday, July 26, 2012 4:17 PM
To: 'Midrange Systems Technical Discussion'
Subject: RE: can I set up a multi-format logical file in DDS with one key field having a default fixed value?
Problem is there are 20 different physical files that I would like to read as one LF.
Is this possible?
-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Roger Harman
Sent: Thursday, July 26, 2012 3:10 PM
To: 'Midrange Systems Technical Discussion'
Subject: RE: can I set up a multi-format logical file in DDS with one key field having a default fixed value?
We had a "code" file at my previous employer that served the same purpose as what you want. Sample fields & data below. Data is 128 free format.
TYPE Char(10) // "STATE"
VALUE CHAR(10) // "CA"
DATA CHAR(128) // "CALIFORNIA"
TYPE Char(10) // "CARRIER"
VALUE CHAR(10) // "UPS"
DATA CHAR(128) // "UNITED PARCEL SERVICE"
The only downside was you had to convert numeric values if needed but that easily worked around.
-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Stone, Joel
Sent: Thursday, July 26, 2012 12:50 PM
To: 'Midrange Systems Technical Discussion'
Subject: RE: can I set up a multi-format logical file in DDS with one key field having a default fixed value?
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.
midrange.com
