AS400 Assignment - Files
AS400 Assignment - Files
AS/400 Assignment-2B
In the command line, type the command WRKMBRPDM and take F4. Specify the Source
Physical file parameter as QDDSSRC. Create the following source members and compile
them.
1. Create a Physical file (PF) with the following definition:
Filename: ITMMST (Item Master)
Key: Item Number is Unique
Item Number
- 5,0 Numeric
Item Description
- 30 Char
Item Price
- 5,0 Numeric
Bulk Item (Y/N)
- 1 Char
2. Create a logical file (LF) on ITMMST which is keyed on Item number with selection
criteria Bulk Item = Y.
Filename: ITMMSTL1
3. Create a Physical File(PF) with the following definition:
Filename: SUPMST (Supplier Master)
Key: Supplier number is Unique
Supplier Number
- 6,0 Numeric
Supplier Name
- 30 Char
Supplier Address1
- 50 Char
Supplier Address2
- 50 Char
Zip Code
- 6,0 Numeric
Item Supplied
- 5,0 Numeric
4. Create a Join Logical File(LF) with the following definition:
Filename: SUPINFO (Supplier Information)
Supplier Number
- 6,0 Numeric
Supplier Name
- 30 Char
Item Supplied
- 5,0 Numeric
Item Description
- 30 Char
Item Price
- 5,0 Numeric
Bulk Item (Y/N)
- 1 Char
5. Create data in the above two PFs using UPDDTA command
6. Use RUNQRY command and SQL statements to view the data in ITMMSTL1 and
SUPINFO.