DATA ECGRID;                                                                   
INFILE IN;                                                                     
INPUT ID 1-5 WHAVG 6-13 WHMAX 14-21 WHSD 22-29 ERAVG 30-37                     
      ERMAX 38-45 ERMIN 46-53 ERNUM 54-57 ELAVG 58-65                          
      ELMAX 66-73 ELMIN 74-81 ELNUM 82-85;                                     
INPUT GM 1-5 GL 6-10 TRMAX 11-18 TRAVG 19-26                                   
      TRLVL 27-34 TRNUM 35-38 SLR 39-46                                        
      SLG 47-54 SLC 55-62 SLS 63-70 SLYR 71-74;                                
PROC PRINT;                                                                    
RUN;