System supplied outfile for DSPJRN command.

BoTTom |    Changer de couleur
     A          R QJORDJE2                  TEXT('Journal Entries')
     A            JOENTL     00005S00       TEXT('Length of entry')
     A                                      COLHDG('ENTRY' 'LENGTH')
     A            JOSEQN     00010S00       TEXT('Numéro de séquence')
     A                                      COLHDG('SEQUENCE' 'NUMBER')
     A            JOCODE     00001A         TEXT('Journal Code')
     A                                      COLHDG('CODE')
     A            JOENTT     00002A         TEXT('Entry Type')
     A                                      COLHDG('OBJET')
     A            JODATE     00006A         TEXT('Date of entry: Job date forma-
     A                                      t')
     A                                      COLHDG('DATE DE')
     A            JOTIME     00006S00       TEXT('Time of entry: hour/minute/se-
     A                                      cond')
     A                                      COLHDG('TIME')
     A            JOJOB      00010A         TEXT('Name of Job')
     A                                      COLHDG('JOB' 'NAME')
     A            JOUSER     00010A         TEXT('Name of User')
     A                                      COLHDG('USER' 'NAME')
     A            JONBR      00006S00       TEXT('Number of Job')
     A                                      COLHDG('JOB' 'NUMBER')
     A            JOPGM      00010A         TEXT('Name of Program')


|    Changer de couleur
     A                                      COLHDG('PROGRAM' 'NAME')
     A            JOOBJ      00010A         TEXT('Name of Object')
     A                                      COLHDG('OBJECT' 'NAME')
     A            JOLIB      00010A         TEXT('Objects Library')
     A                                      COLHDG('LIBRARY' 'NAME')
     A            JOMBR      00010A         TEXT('Name of Member')
     A                                      COLHDG('MEMBER' 'NAME')
     A            JOCTRR     00010S00       TEXT('Count or relative record numb-
     A                                      er changed')
     A                                      COLHDG('COUNT/' 'RRN')
     A            JOFLAG     00001A         TEXT('Flag: 1 or 0')
     A                                      COLHDG('FLAG')
     A            JOCCID     00010S00       TEXT('Commit cycle identifier')
     A                                      COLHDG('COMMIT' 'CYCLE ID')
     A            JOUSPF     00010A         TEXT('User Profile')
     A                                      COLHDG('USER' 'PROFILE')
     A            JOSYNM     00008A         TEXT('System Name')
     A                                      COLHDG('SYSTEM' 'NAME')
     A            JORES      00020A         TEXT('Not used')
     A                                      COLHDG('RESERVED')
     A            JOESD      00100A         TEXT('Entry Specific Data - Variabl-
     A                                      e contents')


|    Changer de couleur
     A                                      COLHDG('SPECIFIC' 'DATA')




©AF400