A          R TAPEREC                   PFILE(V02)                  
      A            TTCODE                                                
      A            TAPTTL        20          TEXT('TAPE TITEL')          
      A            NUMTAP                                                
      A            NUMAVA                                                
      A          K TTCODE                                                




   back to Logical files page