Two Questions:

1)  Is there an API that can be used to retrieve the journal receivers
associated with a journal.

Currently we are doing...

WRKJRNA    JRN(&JRN) OUTPUT(*PRINT)
CPYSPLF    FILE(QPDSPJNA) TOFILE(RTPJRN01) SPLNBR(*LAST)

And then parsing the spool file information with a COBOL program.  I
would like to replace this with an API if possible.

2)  Is there an API that can be used to retrieve the first and last
sequence number from a journal receiver.

Currently we are doing....

DSPJRNRCVA JRNRCV(&RECEIVER) OUTPUT(*PRINT)
CPYSPLF    FILE(QPDSPRCV) TOFILE(RTPJRN02) SPLNBR(*LAST)

And then parsing the spool file information with a COBOL program.  I
would also like to replace this with an API if possible.

Any help or hints would be appreciated,
Todd


This thread ...

Follow-Ups:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2026 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.