CREATE EVENT MONITOR SYS_DR FOR STATEMENTS
WRITE TO TABLE
  CONNHEADER (TABLE DB2ADMIN.TEST_SDRC,  IN USR_TBSPC_4K)
, STMT (TABLE DB2ADMIN.TEST_SDRS,  IN USR_TBSPC_4K);
-- ЗАПУСК
SET EVENT MONITOR SYS_DR STATE 1;

values('Привет Медвед!')

select * from TEST_SDRS

values('Привет Медвед!')
values('Привет Медвед!')
values('Привет Медвед!')

  CREATE EVENT MONITOR DB2ACTIVITIES
       FOR ACTIVITIES
       WRITE TO TABLE
       ACTIVITY (TABLE DB2ADMIN.ACTIVITY
                 IN USR_TBSPC_4K
                 PCTDEACTIVATE 100),
       ACTIVITYMETRICS (TABLE DB2ADMIN.ACTIVITYMETRICS
                 IN USR_TBSPC_4K
                 PCTDEACTIVATE 100),
       ACTIVITYSTMT (TABLE DB2ADMIN.ACTIVITYSTMT
                 IN USR_TBSPC_4K
                 PCTDEACTIVATE 100),
       ACTIVITYVALS (TABLE DB2ADMIN.ACTIVITYVALS
                 IN USR_TBSPC_4K
                 PCTDEACTIVATE 100),
       CONTROL (TABLE DB2ADMIN.CONTROL
                IN USR_TBSPC_4K
                PCTDEACTIVATE 100)
       AUTOSTART;
       
SET EVENT MONITOR  DB2ACTIVITIES STATE 1;

VALUES('Привет Медвед!');

select * from  DB2ADMIN.ACTIVITYSTMT

--Чтобы начать сбор информации по текущему соединению, можно:
CALL WLM_SET_CONN_ENV(mon_get_application_handle(), '<collectactdata>WITH DETAILS AND VALUES</collectactdata>');
-- если надо по другому, то в 1-ом параметре указывается его handle.
...
-- Для останова сбора:
CALL WLM_SET_CONN_ENV(mon_get_application_handle(), '<collectactdata>NONE</collectactdata>');

-- Смотрим, например, что получилось:
-- На всякий можно сделать сначала FLUSH EVENT MONITOR DB2ACTIVITIES
SELECT 
  A.TIME_STARTED, A.TIME_COMPLETED, TIMESTAMPDIFF(2, CHAR(A.TIME_COMPLETED-A.TIME_STARTED)) TIME_S
, A.UOW_ID, A.ACTIVITY_ID
--, A.PARENT_UOW_ID, A.PARENT_ACTIVITY_ID
, V.STMT_VALUE_INDEX, V.STMT_VALUE_ISREOPT
, V.STMT_VALUE_INDEX, VARCHAR(V.STMT_VALUE_DATA, 50) STMT_VALUE_DATA
, VARCHAR(S.STMT_TEXT, 256) stmt_text
FROM DB2ADMIN.ACTIVITY A
JOIN DB2ADMIN.ACTIVITYSTMT S ON S.APPL_ID=A.APPL_ID AND S.UOW_ID=A.UOW_ID AND S.ACTIVITY_ID=A.ACTIVITY_ID
LEFT JOIN DB2ADMIN.ACTIVITYVALS V ON V.APPL_ID=S.APPL_ID AND V.UOW_ID=S.UOW_ID AND V.ACTIVITY_ID=S.ACTIVITY_ID
WHERE 
-- здесь можете указать условие, например, по определённому приложению:
S.APPL_ID='<APPLICATION_ID>'
ORDER BY A.TIME_STARTED, A.APPL_ID, A.UOW_ID, A.ACTIVITY_ID;

 ALTER WORKLOAD  SYSDEFAULTUSERWORKLOAD COLLECT ACTIVITY DATA ...

select 
CAST (T.STMT_TEXT as VARCHAR(400))      as STMT_TEXT,
T.STMT_EXEC_TIME,
T.*
FROM TABLE(MON_GET_PKG_CACHE_STMT ( 'D', NULL, NULL, -2)) as T 

MON_REQ_METRICS = BASE
MON_ACT_METRICS = BASE
MON_OBJ_METRICS = BASE

select 
INSERT_TIMESTAMP,
cast(cast(STMT_EXEC_TIME as decimal(18,3))/1000 as decimal(18,3)) as exec_time ,
CAST (STMT_TEXT as VARCHAR(400))      as STMT_TEXT,
QUERY_COST_ESTIMATE,
TOTAL_CPU_TIME
FROM TABLE(MON_GET_PKG_CACHE_STMT ( 'D', NULL, NULL, -2)) as T
order by STMT_EXEC_TIME desc,INSERT_TIMESTAMP

    select 
        APL.agent_id                                     as AGENT_ID,
        CAST(STMT_TEXT    as varchar(8000)) as STMT, 
        APL.TPMON_ACC_STR                         as PAR_CON_CLIENT,
        APL.APPL_NAME                                 as APPL_NAME,
        APL.SNAPSHOT_TIMESTAMP                 as SNAPSHOT_TIMESTAMP,
        current server                                    as base
        from 
              table (SNAP_GET_APPL_INFO_V95('DAT',-2) )  as APL,
              table(SNAP_GET_STMT('DAT',-2))             as STMT 
        where  STMT.AGENT_ID = APL.AGENT_ID 
        and CAST(STMT_TEXT as varchar(2000)) is not null;

MON_REQ_METRICS = BASE
MON_ACT_METRICS = BASE
MON_OBJ_METRICS = BASE

> db2 get dbm cfg | grep DFT_MON

> db2 get dbm cfg | grep DFT_MON