The INQUIRE_SHORT_ON_STORAGE call

INQUIRE_SHORT_ON_STORAGE enables you to determine whether CICS® is short on 64-bit (above-the-bar) storage, short on storage above 16 MB but below 2 GB (above the line), or short on storage below 16 MB (below the line).

INQUIRE_SHORT_ON_STORAGE

DFHSMSRX  [CALL,]
       [CLEAR,]
       [IN,
       FUNCTION(INQUIRE_SHORT_ON_STORAGE),]
       [OUT,
       SOS_ABOVE_THE_BAR(NO|YES),
       SOS_ABOVE_THE_LINE(NO|YES),
       SOS_BELOW_THE_LINE(NO|YES),
       RESPONSE (name1 | *),
       REASON (name1 | *)]

This command is threadsafe.

SOS_ABOVE_THE_BAR(NO|YES),: Returns YES if CICS is currently short on 64-bit (above-the-bar) storage, and NO if not.
SOS_ABOVE_THE_LINE(NO|YES),: Returns YES if CICS is currently short on storage above 16 MB but below 2 GB, and NO if not.
SOS_BELOW_THE_LINE(NO|YES),: returns YES if CICS is currently short on storage below 16 MB, and NO if not.

RESPONSE and REASON values for INQUIRE_SHORT_ON_STORAGE

RESPONSE	REASON
OK	None
DISASTER	None
KERNERROR	None