All,
Given the following key definitions in an external logical file:
A UNIQUE
A R IOICITMR PFILE(VIOICITM)
*
A K ICIFCMP
A K ICIFLOC
A K ICITCMP
A K ICIFLOC <===== Note: This was a mistake - duplicate of key
#2
A K ICITITM
Spool file list from CRTLF:
Fi
SEQNBR
*...+....1....+....2....+....3....+....4....+....5....+....6....+....7....+....8
le
1800 UNIQUE
1900 R IOICITMR PFILE(VIOICITM)
2100 K ICIFCMP
2200 K ICIFLOC
2300 K ICITCMP
2400 K ICIFLOC
2500 K ICITITM
* * * * * E N D O F E X P A N D E D S O U R C E *
* * * *
5761SS1 V6R1M0 080215 Data Description
T37MODS/VIOICITM2
Message Summary
Total Informational Warning Error Severe
(0-9) (10-19) (20-29) (30-99)
0 0 0 0 0
Note: *NO* messages listed.
Key fields as shown in DSPFD *ACCPTH
Number of key fields . . . . . . . . . . . : 5
Record format . . . . . . . . . . . . . . . : IOICITMR
Key field . . . . . . . . . . . . . . . . : ICIFCMP
Sequence . . . . . . . . . . . . . . . : Ascending
Sign specified . . . . . . . . . . . . : SIGNED
Zone/digit specified . . . . . . . . . : *NONE
Alternative collating sequence . . . . : No
Key field . . . . . . . . . . . . . . . . : ICIFLOC
Sequence . . . . . . . . . . . . . . . : Ascending
Sign specified . . . . . . . . . . . . : UNSIGNED
Zone/digit specified . . . . . . . . . : *NONE
Alternative collating sequence . . . . : No
Key field . . . . . . . . . . . . . . . . : ICITCMP
Sequence . . . . . . . . . . . . . . . : Ascending
Sign specified . . . . . . . . . . . . : SIGNED
Zone/digit specified . . . . . . . . . : *NONE
Alternative collating sequence . . . . : No
Key field . . . . . . . . . . . . . . . . : ICIFLOC
Sequence . . . . . . . . . . . . . . . : Ascending
Sign specified . . . . . . . . . . . . : UNSIGNED
Zone/digit specified . . . . . . . . . : *NONE
Alternative collating sequence . . . . : No
Key field . . . . . . . . . . . . . . . . : ICITITM
Sequence . . . . . . . . . . . . . . . : Ascending
Sign specified . . . . . . . . . . . . : UNSIGNED
Zone/digit specified . . . . . . . . . : *NONE
Alternative collating sequence . . . . : No
Use DFU to check data:
WORK WITH DATA IN A FILE Mode . . . . : CHANGE
Format . . . . : IOICITMR File . . . . : VIOICITM2
From Company:
To Company:
From Location:
To Item Number:
Note: Keys are *not* in the order shown in the file.
Shouldn't the CRTLF failed?
Or at least issued a warning?
V6R1.
TIA
Jeff Young
Sr. Programmer Analyst
As an Amazon Associate we earn from qualifying purchases.