Cacher is the code snippet organizer for pro developers

SELECT
    COORD_MEMBER
    ,APPLICATION_HANDLE
    ,substr(APPLICATION_NAME,1,30) as APPLICATION_NAME
    ,substr(SESSION_AUTH_ID,1,30) as SESSION_AUTH_ID
    ,ELAPSED_TIME_SEC/60 as ELAPSED_TIME_MIN
    ,ACTIVITY_STATE
    ,ACTIVITY_TYPE
    ,TOTAL_CPU_TIME
    ,ROWS_READ/(ROWS_RETURNED+1) as STMT_IXREF
    ,QUERY_COST_ESTIMATE
    ,substr(STMT_TEXT,1,300) as STMT_TEXT
    FROM SYSIBMADM.MON_CURRENT_SQL

SELECT
	UOW.MEMBER
	,UOW.APPLICATION_HANDLE
	,UOW.UOW_ID
	,substr(UOW.CLIENT_USERID,1,10) AS OS_USER
	,substr(UOW.SESSION_AUTH_ID,1,10) AS DB_USER
	,CON.CONNECTION_START_TIME
	,UOW.UOW_START_TIME
	,SUBSTR(REPLACE(PKG.STMT_TEXT,X'0A',' '),1,250) AS STMT_TEXT
		FROM table(MON_GET_UNIT_OF_WORK(NULL,-2,1)) AS UOW
			JOIN table(MON_GET_CONNECTION(NULL,-2)) AS CON
				ON UOW.MEMBER = CON.MEMBER AND UOW.APPLICATION_HANDLE = CON.APPLICATION_HANDLE
			JOIN table(MON_GET_PKG_CACHE_STMT(NULL,NULL,NULL,-2)) AS PKG
				ON UOW.MEMBER = PKG.MEMBER AND UOW.LAST_EXECUTABLE_ID = PKG.EXECUTABLE_ID
		WHERE UOW.workload_occurrence_state = 'UOWEXEC'
				AND CURRENT TIMESTAMP - UOW.UOW_START_TIME > 0.09

SELECT
	ACT.MEMBER
	,substr(con.SESSION_AUTH_ID,1,10) AS USER
	,ACT.APPLICATION_HANDLE
	,ACT.ACTIVITY_ID
	,ACT.UOW_ID
	,ACT.QUERY_COST_ESTIMATE as COST
	,ACT.QUERY_CARD_ESTIMATE as CARD
	,CON.CONNECTION_START_TIME
	,ACT.local_start_time as ACT_START_TIME
	,SUBSTR(rtrim(REPLACE(ACT.STMT_TEXT,X'0A',' ')),1,150) || ' (...)' AS STMT_TEXT
		FROM table(MON_GET_ACTIVITY(NULL,-2)) AS ACT
			JOIN table(MON_GET_CONNECTION(NULL,-2)) AS CON
				ON ACT.MEMBER = CON.MEMBER AND ACT.APPLICATION_HANDLE = CON.APPLICATION_HANDLE
		WHERE ACT.STMT_TEXT NOT LIKE '%PYROEXECPRO%'
		order by member