The EVJRNSEND program may be used to collect an individual journal entry or a range of entries and send them through the Ironstream formatting process to deliver them to a destination platform, filling in any journal gaps that are created if the EVJRNPROC journal monitoring program is down.
Call syntax from the iSeries command line:
where:
jrnlib Library of the journal to be read
jrnname Name of the journal to be read
jrnprmname
Member of EVIEW/MONJRNLPRM to specify how the journal entries should be formatted
firstnum First sequence number of the journal to be collected
lastnum Last sequence number of the journal to be collected
yyyy.mm.dd.hh.mm.ss.uuuuuu
Date/time of the starting/ending interval to be collected. Date yyyy.mm.dd is required, but time is optional. If not specified, the hh.mm.ss.uuuuuu values are set to 0 (midnight)
strtlib/strtrecv Starting receiver of the journal to read
endlib/endrecv Ending receiver of the journal to read
SEQ and DATTIM are mutually exclusive parameters, but one is required. If no receivers are specified, the default is *CURCHAIN.
If no ending timestamp is specified and the starting timestamp has a microsecond value of 0 (or is not specified), then the entire span of that second from microsecond 000000 to 999999 is searched.
Example calls:
Collect journal records from journal BRYANLIB/BLUEJRN with sequence numbers 1-1000 that have format specifications in the JRNPRM003 parameter file. Check only the current journal receiver.
CALL PGM(EVIEW/EVJRNSEND) PARM('JRN=BRYANLIB/BLUEJRN PRM=JRNPRM003 SEQ=1-1000 RECV=*CURRENT')
Collect the one journal record from journal QGPL/PERFJRN with sequence number 1234. We are not sure which journal receiver this record is stored in, so we will scan the entire receiver chain. The format for this record is in our JRNPRM008 file.
CALL PGM(EVIEW/EVJRNSEND) PARM('JRN=QGPL/PERFJRN PRM=JRNPRM008 SEQ=1234 RECV=*CURCHAIN')
The sequence numbers for journal BIGLIB/SECRECY were reset to 1 during the switch from receiver SECREC0014 to SECREC0015. Collect the journal records with sequence numbers 300-400 from the journal BEFORE the reset was done, assuming that the original receiver was named SECREC0001 and it is still available on the system. The journal receivers are in the BIGLIB library. Our format for these records is in JRNPRM001.
CALL PGM(EVIEW/EVJRNSEND) PARM('JRN=BIGLIB/SECRECY PRM=JRNPRM001 SEQ=300-400 RECV=BIGLIB/SECREC0001-BIGLIB/SECREC0014')
Collect the one journal record that was written to the QGPL/TAXES journal on 12/31/2021 at 23:59:59. The format for this record is in JRNPRM007. We do not know which receiver holds this record, but we know it is in the current receiver chain.
CALL PGM(EVIEW/EVJRNSEND) PARM('JRN=QGPL/TAXES PRM=JRNPRM007 DATTIM=2021.12.31.23.59.59 RECV=*CURCHAIN')