Re: Journal Receiver automating aged deletion -- MIDRANGE-L

× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.

Thanks Matt, Paul, will check out these solutions.

Also am playing with example of Retrieve Journal Receiver Information
(QjoRtvJrnReceiverInformation) API
<https://www.mcpressonline.com/forum/forum/x-archive-threads-started-before-01-01-2002/analysis/3056-journal-information>
which I found.

On Tue, Aug 17, 2021 at 1:20 PM Tyler, Matt <matt.tyler@xxxxxxxxxxxxxx>
wrote:

Try this
-- category: Custom
-- description: SYS - Find and remove Journal Receivers older than 2.9
SELECT Objlongname , Objlongschema , Restore_Timestamp , (
X.Restore_Timestamp +3 days ) as RestorePlus3, Current_Timestamp as
Current_Timestamp, ObjText
-- , cmdexc('DLTJRNRCV JRNRCV(' concat trim(ObjlongSchema) concat '/'
concat trim(Objlongname) concat ')')
, varchar('DLTJRNRCV JRNRCV(' concat trim(ObjlongSchema) concat '/' concat
trim(Objlongname) concat ')', 1024) as CleanUpCommand
FROM TABLE (QSYS2.OBJECT_STATISTICS('[jrnlib] ','JRNRCV') ) AS X
where ( X.Restore_Timestamp +3 days ) < Current_timestamp
;

On Tue, Aug 17, 2021 at 1:23 PM Steinmetz, Paul <PSteinmetz@xxxxxxxxxx>
wrote:

Jack,

Would setting the journal to automatically delete receivers work for you.

Delete receivers . . : *YES

This mailing list archive is Copyright 1997-2024 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.