zOs/SQL/IMSFRE5
SELECT JN.DB_NAME, JN.DD_NAME,
(JN.ALLOC) AS ALLOC,
(MAX_SPC) AS MAX_SPC, (JN.HIGHWATER) AS HIGHWATER,
(JN.THRESHOLD) AS THRESHOLD,
(JN.HI_ALLOC), (JN.HI_ALLOC2),
JN.SW_FREE, JN.SP_FREE, JN.SP_IFREE,
JN.DB_TYP, (JN.TRK_SEC), 'DB-SPEZ',
JN.HI_ALCSPC, JN.CAPACITY
FROM (SELECT SP.DB_NAME, SP.DD_NAME,
real(SP.HI_ALLOC-SP.FREESPC) AS ALLOC,
CASE
WHEN SP.TRK_SEC = 0 THEN
real(SP.HI_ALLOC2)
WHEN SP.DB_TYP = 'HDAM'
AND SP.TRK_SEC > 0 THEN
8589934590
WHEN SP.DB_TYP = 'PHDAM'
AND SP.TRK_SEC > 0 THEN
4294967295
ELSE 0
END AS MAX_SPC,
CASE
WHEN SP.DB_TYP = 'HDAM' THEN
(real(8589934590)- (real(SW.FREESPCP)
))-- ?? * 8589934590 / 100))
WHEN SP.DB_TYP = 'PHDAM' THEN
(Real(4294967295)- (real(SW.FREESPCP)
))-- ?? * 4294967295 / 100))
ELSE 0
END AS HIGHWATER,
CASE
WHEN SP.TRK_SEC = 0
AND SP.HI_ALLOC2 > 0
AND SW.FREESPCP > 0 THEN
real(SP.HI_ALLOC2) * SW.FREESPCP / 100
WHEN SP.DB_TYP = 'HDAM'
AND SW.FREESPCP > 0
AND SP.TRK_SEC > 0 THEN
real(8589934590) * SW.FREESPCP / 100
WHEN SP.DB_TYP = 'PHDAM'
AND SW.FREESPCP > 0
AND SP.TRK_SEC > 0 THEN
real(4294967295) * SW.FREESPCP / 100
ELSE 0
END AS THRESHOLD, SW.FREESPCP AS SW_FREE,
real(SP.HI_ALLOC) hi_alloc,
real(SP.HI_ALLOC2) hi_alloc2,
real(SP.FREESPCP) AS SP_FREE,
real(SP.IFREESPCP) AS SP_IFREE, SP.DB_TYP,
real(SP.TRK_SEC) * CAPACITY AS TRK_SEC,
real(SP.EXTENTS) extents,
real(SP.HI_ALCSPC) hi_alcspc,
real(sp.CAPACITY) capacity
FROM oa1a.TADM31A1 SP,
oa1a.TADM32A1 SW
WHERE SP.DB_ACCESS = 'OSAM'
AND SP.DB_TYP IN ('HDAM','PHDAM')
AND SP.FREESPCP < SW.FREESPCP
AND SW.DB_NAME = SP.DB_NAME
AND (SW.DD_NAME = SP.DD_NAME
OR SW.DD_NAME = 'ALL')
AND SW.EXCLUDE = 'N'
AND SW.END_DATUM >= CURRENT TIMESTAMP
AND SP.RUNTIME = (SELECT MAX(RUNTIME)
FROM oa1a.TADM31A1
WHERE DB_NAME = SP.DB_NAME
AND DD_NAME = SP.DD_NAME)
AND SP.RUNTIME >= CURRENT TIMESTAMP - 7 DAYS) AS JN
WHERE ((JN.TRK_SEC > 0
AND real(JN.HIGHWATER-JN.ALLOC) / JN.TRK_SEC < 1)
OR (JN.TRK_SEC = 0
AND JN.SP_FREE < JN.SW_FREE))
WITH UR