Delete Journal Receivers after x-days


Question:
I would be interested in checking out the code.  I just found out recently
that we journal some data in certain libraries and so far I have just
manually delete the old journal receivers.  Anything to automate it would be
great.


Answer:
I just wrote a program to do this.

Actually it got to be quite a chore to bust up enough for others to use.  
Semi infinite number of nested copies in there.  Here's the stuff.  


But read my notes:

The more I look at this, the more it would be a challenge to "open source".  

But here goes... 

Much of the error reporting is "for future use" kind of stuff. 
Focus on cmd PRGJRNRCV and on rpgle PRGJRNRCV. 

You may be missing numerous /copy modules from SRVPGMCPY and/or SRVPGM.  

If they are needed, let me know.  But first, see if you can just delete 
the particular requirement.  At one time I had this multi subprocedure 
service program, and this huge SRVPGMCPY include module.  Some people 
rebelled at SRVPGMCPY so I started to bust it up so they might only include 
what is needed.  Hence the reason for the nested /includes. 

Rob Berendt