To retrieve all the physical file descriptions of files whose names begin with "C" and reside in library QGPL, removing field prefixes from the DDS fields:
YRTVPFMDL FILE(QGPL/C*)
For example, if you have three files to retrieve:
|
Company |
CMPDTAP |
XCOCD XXCONM |
Company code Company name |
4 50 |
|
Customer |
CUSDTAP |
PPCOCD PPCUCD PCUNM PPCULM PPCUCD |
Company code Customer code Customer name Credit limit Customer type cd |
4 4 50 7.2 P 1 |
|
Customer type |
CUSTYPP |
QQCUCD QQCUNM |
Customer type cd Customer type nm |
1 50 |
They will be retrieved as follows:
|
FIL FIL |
Company Company |
REF REF |
Has Has |
FLD FLD |
Company code Company name |
CDE TXT |
|
FIL FIL FIL FIL FIL |
Customer Customer Customer Customer Customer |
REF REF REF REF REF |
Has Has Has Has Has |
FLD FLD FLD FLD FLD |
Company code Customer code Customer name Credit limit Customer type cd |
CDE CDE TXT NBR STS |
|
FIL FIL |
Customer type Customer type |
REF REF |
Has Has |
FLD FLD |
Customer type cd Customer type nm |
STS TXT |
You will probably want to change them to the following set of statements:
|
FIL FIL |
Company Company |
REF REF |
Known by Has |
FLD FLD |
Company code Company name |
CDE TXT |
|
FIL FIL FIL FIL FIL |
Customer Customer Customer Customer Customer |
REF REF REF REF REF |
Owned by Known by Has Has Refers to |
FIL FLD FLD FLD FIL |
Company Customer code Customer name Credit limit Customer type |
REF CDE TXT VAL REF |
|
FIL FIL |
Customer type Customer type |
REF REF |
Known by Has |
FLD FLD |
Customer type Customer type nm |
CDE TXT |
Note: For more information about this example, see the YRTVPFMDL command in this guide.
|
Copyright © 2014 CA.
All rights reserved.
|
|