sriedmue79

-- !!IMPORTANT!! This query assumes that the temporary addresses were reset to 0% at the last IPL.
--               This assumption is only safe in i 7.4 and later releases.
--               Refer to this IBM doc for full details: https://www.ibm.com/support/pages/temporary-addresses
--               This query also assumes that the timestamp of the QCTL subsystem startup is an accurate representation of the last IPL.
--
-- Description: When temporary address usage reaches 100% in an LPAR, the LPAR will end abnormally.
--              This query estimates the date when this LPAR will reach 100% temp address usage, based on the temp address usage 
--              that has occurred since the last IPL date (using the start date of QCTL subsystem) and the current temp address 
--              percentage.  It calculates the average temp address percentage increase per day since the last IPL, and uses that
--              to project the number of days before 100% will be reached.

sriedmue79

-------------------------------------------------------------------------
-- Description: queries related to subsystem autostart job entries (AJEs)
-------------------------------------------------------------------------

--Description: list the autostart job entries that are defined for a given subsystem description
SELECT *
    FROM QSYS2.AUTOSTART_JOB_INFO
    WHERE SUBSYSTEM_DESCRIPTION_LIBRARY = :SBSD_Library AND
          SUBSYSTEM_DESCRIPTION         = :SBSD_Name;

sriedmue79

---------------------------------------------------------------------
-- Description: Various uses for the ACTIVE_JOB_INFO() table function
---------------------------------------------------------------------

--Description: check whether a job (by job name) is currently active in a particular subsystem
SELECT JOB_NAME
    FROM TABLE ( QSYS2.ACTIVE_JOB_INFO( JOB_NAME_FILTER       => :JobName, 
                                        SUBSYSTEM_LIST_FILTER => :SubsystemName ) );

--Description: Jobs in a subsystem that are in a specific status