         SYSTEM   SIG7FDP
************************************************************************
DCB1     CNAME
         PROC
LF       DATA     AF(1)
         DATA     AF(2)
         GEN,8,24 AF(3),0
         DO       19
         DATA     0
         FIN
         PEND
************************************************************************
************************************************************************
         REF      ERRABN0
************************************************************************
         PAGE
************************************************************************
M:C      DSECT    2
         DCB1     3,1,10
M:LL     DSECT    2
         DCB1     3,4,10
M:BI     DSECT    2
         DATA     3,10
         GEN,8,24 10,0
         DATA     ERRABN0,ERRABN0,0
         DATA     BIXF
         DATA     0,0,0
         GEN,15,17 0,KBUFB
         DO       11
         DATA     0
         FIN
BIXF     DATA     X'01000010'
         TEXTC    'FIRST FILE'
         RES      13
         DATA     X'02000002'
         RES      2
         DATA     X'03000002'
         RES      2
         DATA     X'04000002'
         RES      2
         DATA     X'05000010'
         RES      16
         DATA     X'06000010'
         RES      16
         DATA     X'07000008'
         RES      8
         DATA     X'08000008'
         RES      8
         DATA     X'0B010008'
         RES      8
KBUFB    RES      16                BUFFER FOR KEY
M:TM     DSECT    2
         DATA     0,0
         GEN,8,24 10,0
         DATA     ERRABN0,ERRABN0,0
         DATA     TMXF
         DATA     0,0,0
         GEN,15,17 0,KBUF
         DO       11
         DATA     0
         FIN
TMXF     DATA     X'01000010',0
         RES      15
         DATA     X'02000002'
         RES      2
         DATA     X'03000002'
         RES      2
         DATA     X'04000002'
         RES      2
         DATA     X'05000010'
         RES      16
         DATA     X'06000010'
         RES      16
         DATA     X'07000008'
         RES      8
         DATA     X'08000008'
         RES      8
         DATA     X'0B000008'
         RES      8
         DATA     X'11010101'
         DATA     X'F00'            FOR BACKUP
KBUF     RES      16                BUFFER FOR KEY
************************************************************************
         END

