Physical and Logical Files: QDDSSRC

A                                      UNIQUE
A          R SMREC                     TEXT('SAMPLE FILE')     
A            SMSTS          1A         TEXT('STATUS')          
A            SMCUS#         6S 0       TEXT('CUSTOMER #')      
A            SMLNME        20A         TEXT('LAST NAME')       
A            SMFNME        15A         TEXT('FIRST NAME')      
A            SMADR         30A         TEXT('ADDRESS')         
A            SMCITY        20A         TEXT('CITY')            
A            SMST           2A         TEXT('STATE')           
A            SMZIP          9P 0       TEXT('ZIP')
A          K SMCUS#