System supplied outfile for DSPJRN command.

BoTTom |    Changer de couleur
     A          R QJORDJE3                  TEXT('Journal Entries')
     A            JOENTL     00005S00       TEXT('Length of entry')
     A                                      COLHDG('ENTRY' 'LENGTH')
     A            JOSEQN     00010S00       TEXT('Sequence number')
     A                                      COLHDG('SEQUENCE' 'NUMBER')
     A            JOCODE     00001A         TEXT('Journal Code')
     A                                      COLHDG('CODE')
     A            JOENTT     00002A         TEXT('Entry Type')
     A                                      COLHDG('TYPE')
     A            JOTSTP     00026Z00       TEXT('Timestamp of Entry')
     A                                      COLHDG('TIMESTAMP')
     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')
     A                                      COLHDG('PROGRAM' 'NAME')
     A            JOOBJ      00010A         TEXT('Name of Object')
     A                                      COLHDG('OBJECT' 'NAME')
     A            JOLIB      00010A         TEXT('Objects Library')


|    Changer de couleur
     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            JONVI      00052A         TEXT('Null Value Indicators - Varia-
     A                                      ble contents')
     A                                      COLHDG('NULL VALUE' 'INDICATORS')
     A            JOESD      00102A         TEXT('Entry Specific Data - Variabl-
     A                                      e contents')
     A                                      COLHDG('SPECIFIC' 'DATA')





©AF400