Physical and Logical Files: QDDSSRC



Logical File with Key Last Name and First Name, Selecting Only Customers in Texas, Oklahoma or New Mexico(File Name is SMP04)

A* NOTE THAT RECORD NAME AGREES WITH PHYSICAL FILE
A          R SMREC                  PFILE(SMP)               
A          K SMLNME                                           
A          K SMFNME
A* Select only records with state = "TX"
A          S SMST                   COMP(EQ 'TX')
A          S SMST                   COMP(EQ 'OK')
A          S SMST                   COMP(EQ 'NM')


Back to Source Code Page   |   Basic 400 Skills   |   Main Page