SQL to retrieve DB2 subsystem information – update for DB2 10 z/OS
-- V8:
SELECT GETVARIABLE('SYSIBM.DATA_SHARING_GROUP_NAME'),
GETVARIABLE('SYSIBM.PACKAGE_NAME'),
GETVARIABLE('SYSIBM.PACKAGE_SCHEMA'),
GETVARIABLE('SYSIBM.PACKAGE_VERSION'),
GETVARIABLE('SYSIBM.PLAN_NAME'),
GETVARIABLE('SYSIBM.SECLABEL'),
GETVARIABLE('SYSIBM.SYSTEM_NAME'),
GETVARIABLE('SYSIBM.SYSTEM_ASCII_CCSID'),
GETVARIABLE('SYSIBM.SYSTEM_EBCDIC_CCSID'),
GETVARIABLE('SYSIBM.SYSTEM_UNICODE_CCSID'),
GETVARIABLE('SYSIBM.VERSION')
FROM SYSIBM.SYSDUMMY1;
--
-- V9:
SELECT GETVARIABLE('SYSIBM.APPLICATION_ENCODING_SCHEME'),
GETVARIABLE('SYSIBM.COBOL_STRING_DELIMITER'),
GETVARIABLE('SYSIBM.DATA_SHARING_GROUP_NAME'),
GETVARIABLE('SYSIBM.DATE_FORMAT'),
GETVARIABLE('SYSIBM.DATE_LENGTH'),
GETVARIABLE('SYSIBM.DECIMAL_ARITHMETIC'),
GETVARIABLE('SYSIBM.DECIMAL_POINT'),
GETVARIABLE('SYSIBM.DEFAULT_DECFLOAT_ROUND_MODE'),
-- GETVARIABLE('SYSIBM.DEFAULT_DEFAULT_SSID'),
GETVARIABLE('SYSIBM.DEFAULT_LANGUAGE'),
GETVARIABLE('SYSIBM.DEFAULT_LOCALE_LC_CTYPE'),
GETVARIABLE('SYSIBM.DISTRIBUTED_SQL_STRING_DELIMITER'),
GETVARIABLE('SYSIBM.DSNHDECP_NAME'),
GETVARIABLE('SYSIBM.DYNAMIC_RULES'),
GETVARIABLE('SYSIBM.ENCODING_SCHEME'),
GETVARIABLE('SYSIBM.MIXED_DATA'),
GETVARIABLE('SYSIBM.NEWFUN'),
GETVARIABLE('SYSIBM.PACKAGE_NAME'),
GETVARIABLE('SYSIBM.PACKAGE_SCHEMA'),
GETVARIABLE('SYSIBM.PACKAGE_VERSION'),
GETVARIABLE('SYSIBM.PAD_NUL_TERMINATED'),
GETVARIABLE('SYSIBM.PLAN_NAME'),
GETVARIABLE('SYSIBM.SECLABEL'),
GETVARIABLE('SYSIBM.SQL_STRING_DELIMITER'),
GETVARIABLE('SYSIBM.SSID'),
GETVARIABLE('SYSIBM.STANDARD_SQL'),
GETVARIABLE('SYSIBM.SYSTEM_NAME'),
GETVARIABLE('SYSIBM.SYSTEM_ASCII_CCSID'),
GETVARIABLE('SYSIBM.SYSTEM_EBCDIC_CCSID'),
GETVARIABLE('SYSIBM.SYSTEM_UNICODE_CCSID'),
GETVARIABLE('SYSIBM.TIME_FORMAT'),
GETVARIABLE('SYSIBM.TIME_LENGTH'),
GETVARIABLE('SYSIBM.VERSION')
FROM SYSIBM.SYSDUMMY1;
--
-- V10: Get Session variables:
SELECT GETVARIABLE('SYSIBM.APPLICATION_ENCODING_SCHEME') AS APPLICATION_ENCODING_SCHEME,
GETVARIABLE('SYSIBM.COBOL_STRING_DELIMITER') AS COBOL_STRING_DELIMITER,
GETVARIABLE('SYSIBM.DATA_SHARING_GROUP_NAME') AS DATA_SHARING_GROUP_NAME,
GETVARIABLE('SYSIBM.DATE_FORMAT') AS DATE_FORMAT,
GETVARIABLE('SYSIBM.DATE_LENGTH') AS DATE_LENGTH,
GETVARIABLE('SYSIBM.DECIMAL_ARITHMETIC') AS DECIMAL_ARITHMETIC,
GETVARIABLE('SYSIBM.DECIMAL_POINT') AS DECIMAL_POINT,
GETVARIABLE('SYSIBM.DEFAULT_DECFLOAT_ROUND_MODE') AS DEFAULT_DECFLOAT_ROUND_MODE,
-- GETVARIABLE('SYSIBM.DEFAULT_DEFAULT_SSID') AS DEFAULT_DEFAULT_SSID,
GETVARIABLE('SYSIBM.DEFAULT_LANGUAGE') AS DEFAULT_LANGUAGE,
GETVARIABLE('SYSIBM.DEFAULT_LOCALE_LC_CTYPE') AS DEFAULT_LOCALE_LC_CTYPE,
GETVARIABLE('SYSIBM.DISTRIBUTED_SQL_STRING_DELIMITER') AS DISTRIBUTED_SQL_STRING_DELIMITER,
GETVARIABLE('SYSIBM.DSNHDECP_NAME') AS DSNHDECP_NAME,
GETVARIABLE('SYSIBM.DYNAMIC_RULES') AS DYNAMIC_RULES,
GETVARIABLE('SYSIBM.ENCODING_SCHEME') AS ENCODING_SCHEME,
GETVARIABLE('SYSIBM.MIXED_DATA') AS MIXED_DATA,
GETVARIABLE('SYSIBM.NEWFUN') AS NEWFUN,
GETVARIABLE('SYSIBM.PACKAGE_NAME') AS PACKAGE_NAME,
GETVARIABLE('SYSIBM.PACKAGE_SCHEMA') AS PACKAGE_SCHEMA,
GETVARIABLE('SYSIBM.PACKAGE_VERSION') AS PACKAGE_VERSION,
GETVARIABLE('SYSIBM.PAD_NUL_TERMINATED') AS PAD_NUL_TERMINATED,
GETVARIABLE('SYSIBM.PLAN_NAME') AS PLAN_NAME,
GETVARIABLE('SYSIBM.SECLABEL') AS SECLABEL,
GETVARIABLE('SYSIBM.SQL_STRING_DELIMITER') AS SQL_STRING_DELIMITER,
GETVARIABLE('SYSIBM.SSID') AS SSID,
GETVARIABLE('SYSIBM.STANDARD_SQL') AS STANDARD_SQL,
GETVARIABLE('SYSIBM.SYSTEM_NAME') AS SYSTEM_NAME,
GETVARIABLE('SYSIBM.SYSTEM_ASCII_CCSID') AS SYSTEM_ASCII_CCSID,
GETVARIABLE('SYSIBM.SYSTEM_EBCDIC_CCSID') AS SYSTEM_EBCDIC_CCSID,
GETVARIABLE('SYSIBM.SYSTEM_UNICODE_CCSID') AS SYSTEM_UNICODE_CCSID,
GETVARIABLE('SYSIBM.TIME_FORMAT') AS TIME_FORMAT,
GETVARIABLE('SYSIBM.TIME_LENGTH') AS TIME_LENGTH,
GETVARIABLE('SYSIBM.VERSION') AS VERSION,
CASE
WHEN SUBSTR(GETVARIABLE('SYSIBM.VERSION') ,8,1) IN ('0','1')
THEN 'CM8/CM8*/ENFM8/ENFM8*'
WHEN SUBSTR(GETVARIABLE('SYSIBM.VERSION') ,8,1) IN ('2','3')
THEN 'CM9/CM9*/ENFM9/ENFM9/'
WHEN SUBSTR(GETVARIABLE('SYSIBM.VERSION') ,8,1) IN ('5')
THEN 'NFM10/'
ELSE 'FUTURE USE'
END AS MODIFCATION_LEVEL
FROM SYSIBM.SYSDUMMY1;







Comments
Comments are closed.