Re: Checking whether a library contains anything that has changed?

On 4/9/21 4:18 AM, Rob Berendt wrote:

You took the first good step by abandoning trying to do it all with CL.
Since you decided on RPG then I suggest you add some derivatives of

Select objname, objtype, objcreated, change_timestamp
FROM TABLE(QSYS2.OBJECT_STATISTICS('mylib', '*ALL'))
Where change_timestamp>parm_timestamp

Select system_table_schema, system_table_name, system_table_member,
Last_change_timestamp
From qsys2.syspartitionstat
Where last_change_timestamp>parm_timestamp

This would greatly simplify your code and increase it's maintainability

Actually, it wouldn't: from RPGLE, we're only set up to do SQL via the CLI (which can be a pain in the butt), and this has to work on both a V4R4 box and a V6R1 box.

The API calls I used, on the other hand, come with the iron, and they're in the V2R3 API manual, so I would hazard a guess that they're going to be good indefinitely.

And besides, 135 lines of traditional RPGLE is hardly an unmaintainable monster (try working with a 25706-line MI source member sometime). :-P

--
JHHL