|
Well the first thing I checked was the QSYS2/SYS* class of files but no
luck this time.
We have a custom command called PRGJRNRCV
Purge Journal Receivers (PRGJRNRCV)
Type choices, press Enter.
Journal Receiver . . . . . . . . Name, generic*, *ALL
Library . . . . . . . . . . . *LIBL Name, *LIBL, *ALL,
*ALLUSR...
Days since detached . . . . . . 45 Days
Which executes an RPGLE program.
***************************************************************************
* Program: Purge journal recievers that have been detached for
longer *
* than the number of days as passed in. They must have also been
saved. *
* *
* Modification log: *
* 01/23/06 by R.Berendt, CCP Group Dekko Services, LLC *
* Created. *
* 12/15/06 by C.Strong. *
* Modified some includes for qualification, etc. *
* 12/26/06 by R.Berendt, CCP Group Dekko Services, LLC *
* 1. Error on QCMD needed to be checked with %error because
psds *
* was not being cleared on success. *
* 2. Getting CPF705F-Unable to delete journal receiver,
Receiver *
* not replicated to 1 remote journal. *
* *
* *
* Compilation instructions: *
* (no special instructions this time.) *
* *
***************************************************************************
Rob Berendt
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2025 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.