The ACCEPT TRANSACTION STATISTICS statement copies the contents of the transaction statistics block (TSB) to a specified location in program variable storage. Optionally, the statement can also write the TSB to the DC/UCF log file and you can define the length of the TSB.
►►─── ACCEPT TRANSACTION STATISTICS ─┬───────────┬────────────────────────────►
├─ WRITE ◄ ─┤
└─ NOWRITE ─┘
►─┬────────────────────────────────────┬─────────────────────────────────────►
└─ INTO (return-stat-data-location) ─┘
►─┬────────────────────────────┬──────── ; ──────────────────────────────────►◄
└─ LENGTH= ─┬─ 388 ◄───────┬─┘
└─ tsb-length ─┘
Specifies whether the TSB is written to the system log file.
Default: WRITE
Specifies the location to which the system copies the TSB. Return-stat-data-location is the symbolic name of a user-defined field. Return-stat-data-location is a fullword-aligned 388-byte field (you can customize the length using the LENGTH= parameter).
The data copied from the TSB to return-stat-data-location is formatted as follows:
01 RETURN_STAT_DATA_LOC_V
03 SYS_RES00 FIXED BIN (31) RESERVED
03 SYS_RES01 FIXED BIN (31) RESERVED
03 PROG_CALL FIXED BIN (31) # OF PROGRAMS CALLED
03 PROG_LOAD FIXED BIN (31) # OF PROGRAMS LOADED
03 TERM_READ FIXED BIN (31) # OF TERMINAL READS
03 TERM_WRITE FIXED BIN (31) # OF TERMINAL WRITES
03 TERM_ERROR FIXED BIN (31) # OF TERMINAL ERRORS
03 STORAGE_GET FIXED BIN (31) # OF STORAGE GETS
03 SCRATCH_GET FIXED BIN (31) # OF SCRATCH GETS
03 SCRATCH_PUT FIXED BIN (31) # OF SCRATCH PUTS
03 SCRATCH_DEL FIXED BIN (31) # OF SCRATCH DELETES
03 QUEUE_GET FIXED BIN (31) # OF QUEUE GETS
03 QUEUE_PUT FIXED BIN (31) # OF QUEUE PUTS
03 QUEUE_DEL FIXED BIN (31) # OF QUEUE DELETES
03 GET_TIME FIXED BIN (31) # OF GET TIMES
03 SET_TIME FIXED BIN (31) # OF SET TIMES
03 DB_CALLS FIXED BIN (31) # OF DATABASE CALLS
03 MAX_STACK FIXED BIN (31) MAX WORDS USED IN STACK
03 USER_TIME FIXED BIN (31) USER MODE TIME (10**-4 SEC)
03 SYS_TIME FIXED BIN (31) SYS MODE TIME (10**-4 SEC)
03 WAIT_TIME FIXED BIN (31) WAIT TIME (10**-4 SEC)
03 RCE_USED FIXED BIN (31) # OF RCE'S USED
03 RLE_USED FIXED BIN (31) # OF RLE'S USED
03 DPE_USED FIXED BIN (31) # OF DPE'S USED
03 STG_HI_MARK FIXED BIN (31) STORAGE HIGH WATER MARK
03 FREESTG_REQ FIXED BIN (31) # FREE STORAGE REQUESTS
03 SYS_SERV FIXED BIN (31) # SYSTEM SERVICE CALLS
03 SYS_RES10 FIXED BIN (31) RESERVED
03 SYS_RES11 FIXED BIN (31) RESERVED
03 PAGES_READ FIXED BIN (31) # OF PAGES READ
03 PAGES_WRIT FIXED BIN (31) # OF PAGES WRITTEN
03 PAGES_REQ FIXED BIN (31) # OF PAGES REQUESTED
03 CALC_NO FIXED BIN (31) # OF CALC RECS NO OFLOW
03 CALC_OF FIXED BIN (31) # OF CALC RECS OFLOW
03 VIA_NO FIXED BIN (31) # OF VIA RECS NO OFLOW
03 VIA_OF FIXED BIN (31) # OF VIA RECS OFLOW
03 RECS_REQ FIXED BIN (31) # OF RECS REQUESTED
03 RECS_CURR FIXED BIN (31) # OF RECS CURR OF RU
03 DBMS_CALLS FIXED BIN (31) # OF DBMS CALLS
03 FRAG_STORED FIXED BIN (31) # OF FRAGMENTS STORED
03 RECS_RELO FIXED BIN (31) # OF RECS RELOCATED
03 TOT_LOCKS FIXED BIN (31) TOTAL # OF LOCKS
03 SHR_LOCKS FIXED BIN (31) # OF SHARE LOCKS
03 NSH_LOCKS FIXED BIN (31) # OF NON-SHARE LOCKS
03 FREE_LOCKS FIXED BIN (31) # OF LOCKS FREE'D
03 SR8_SPLITS FIXED BIN (31) # OF SR8 SPLITS
03 SR8_SPAWNS FIXED BIN (31) # OF SR8 SPAWNS
03 SR8_STORED FIXED BIN (31) # OF SR8S STORED
03 SR8_ERASED FIXED BIN (31) # OF SR8S ERASED
03 SR7_STORED FIXED BIN (31) # OF SR7S STORED
03 SR7_ERASED FIXED BIN (31) # OF SR7S ERASED
03 BTREE_SRCH FIXED BIN (31) # OF BTREE SEARCHES
03 BTREE_LEVL FIXED BIN (31) # OF BTREE LEVELS SEARCHED
03 ORPHAN_ADOPT FIXED BIN (31) # OF ORPHANS ADOPTED
03 LVL_SRCH_BEST FIXED BIN (15) # LEVEL SEARCHES (BEST CASE)
03 LVL_SRCH_WORST FIXED BIN (15) # LEVEL SEARCHES (WORST CASE)
03 RECS_UPD FIXED BIN (31) # OF RECS UPDATED
03 PAGE_INCACHE FIXED BIN (31) # OF PAGES FOUND IN CACHE
03 PAGE_INPRFET FIXED BIN (31) # OF PAGES FOUND IN PREFETCH
03 SYS_RES12 FIXED BIN (31) RESERVED
03 SYS_RES13 FIXED BIN (31) RESERVED
03 SYS_RES20 FIXED BIN (31) RESERVED
03 SYS_RES21 FIXED BIN (31) RESERVED
03 USER_ID CHAR (32) DC USER ID
03 LTERM_ID CHAR (8) LOGICAL TERMINAL ID
03 USER_SUPP_ID CHAR (8) USER-SUPPLIED ID
03 BIND_DATE DEC FIXED (7) DATE BIND COMMAND ISSUED
03 BIND_TIME FIXED BIN (31) TIME BIND COMMAND ISSUED
03 TRANSTAT_FLGS FIXED BIN (31) FOUR 1-BYTE FLAGS
03 SYS_RES30 FIXED BIN (31) RESERVED
03 SYS_RES31 FIXED BIN (31) RESERVED
03 SQL_COMMAND FIXED BIN (31) # OF SQL COMMANDS EXECUTED
03 SQL_FETCH FIXED BIN (31) # OF SQL ROWS FETCHED
03 SQL_INSERT FIXED BIN (31) # OF SQL ROWS INSERTED
03 SQL_UPDATE FIXED BIN (31) # OF SQL ROWS UPDATED
03 SQL_DELETE FIXED BIN (31) # OF SQL ROWS DELETED
03 SQL_SORTS FIXED BIN (31) # OF SQL SORTS PERFORMED
03 SQL_ROW_SORT FIXED BIN (31) # OF SQL ROWS SORTED
03 SQL_MIN_RSORT FIXED BIN (31) MINIMUM ROWS SORTED
03 SQL_MAX_RSORT FIXED BIN (31) MAXIMUM ROWS SORTED
03 SQL_AM_RECOMP FIXED BIN (31) # OF AM RECOMPILES
03 SYS_RES32 FIXED BIN (31) RESERVED
03 SYS_RES33 FIXED BIN (31) RESERVED
03 SYS_RES34 FIXED BIN (31) RESERVED
03 SYS_RES35 FIXED BIN (31) RESERVED
03 SYS_RES36 FIXED BIN (31) RESERVED
03 SYS_RES37 FIXED BIN (31) RESERVED
03 SYS_RES38 FIXED BIN (31) RESERVED
03 SYS_RES39 FIXED BIN (31) RESERVED
If you extend the length to 560 bytes, the full TRANSACTION_STATISTICS are also included. The following block can be expanded using the
INCLUDE IDMS(TRANSACTION_STATISTICS) statement:
DECLARE 1 TRANSACTION_STATISTICS,
3 TSB_STATS_R18 CHARACTER (560);
DECLARE 1 TSB_STATS_R17 BASED(ADDR
(TRANSACTION_STATISTICS.TSB_STATS_R18)),
2 TSB_DC_STATS CHARACTER (108),
2 TSB_DB_STATS CHARACTER (72),
2 TSB_IX_STATS CHARACTER (40),
2 TSB_DB_STATS_EXTENDED CHARACTER (20),
2 TSB_HDR CHARACTER (68),
2 TSB_SQL_STATS CHARACTER (80),
2 TSB_STATS_DCX CHARACTER (168);
DECLARE 1 TSB_STATS_DCX1 BASED(ADDR(TSB_STATS_DCX)),
2 TSB_STATS_DCX_FILLER CHARACTER (8),
2 TSB_SYS_MODE_CPU_TOD FIXED BINARY (63),
2 TSB_SYS_ZIIP_ON_CP_TOD FIXED BINARY (63),
2 TSB_SYS_ZIIP_ON_ZIIP_TOD FIXED BINARY (63),
2 TSB_USER_MODE_CPU_TOD FIXED BINARY (63),
2 TSB_TCB_CPU_TIME_TOD FIXED BINARY (63),
2 TSB_SRB_CPU_TIME_TOD FIXED BINARY (63),
2 TSB_STATS_DCX_FILL01 CHARACTER (112);
DECLARE 1 TSB_SQL_STATS1 BASED(ADDR(TSB_SQL_STATS)),
2 SYS_INTERN4 CHARACTER (8),
2 SQL_COMMANDS FIXED BINARY (31),
2 SQL_FETCH FIXED BINARY (31),
2 SQL_INSERT FIXED BINARY (31),
2 SQL_UPDATE FIXED BINARY (31),
2 SQL_DELETE FIXED BINARY (31),
2 SQL_SORTS FIXED BINARY (31),
2 SQL_ROWSORT FIXED BINARY (31),
2 SQL_MINRSORT FIXED BINARY (31),
2 SQL_MAXRSORT FIXED BINARY (31),
2 SQL_AMCMPL FIXED BINARY (31),
2 SQL_RESERVED CHARACTER (32);
DECLARE 1 TSB_HDR1 BASED(ADDR(TSB_HDR)),
2 SYS_INTERN3 CHARACTER (8),
2 USER_ID CHARACTER (32),
2 LTERM_ID CHARACTER (8),
2 USER_SUPP_ID CHARACTER (8),
2 BIND_DATE FIXED DECIMAL(7,0),
2 BIND_TIME FIXED BINARY (31),
2 TRANSTAT_FLGS FIXED BINARY (31);
DECLARE 1 TSB_DB_STATS_EXTENDED1 BASED(ADDR(TSB_DB_STATS_EXTENDED)),
2 RECS_UPD FIXED BINARY (31),
2 PAGE_INCACHE FIXED BINARY (31),
2 PAGE_INPREFET FIXED BINARY (31),
2 RESERVED CHARACTER (8);
DECLARE 1 TSB_IX_STATS1 BASED(ADDR(TSB_IX_STATS)),
2 SR8_SPLITS FIXED BINARY (31),
2 SR8_SPAWN FIXED BINARY (31),
2 SR8_STORE FIXED BINARY (31),
2 SR8_ERASE FIXED BINARY (31),
2 SR7_STORE FIXED BINARY (31),
2 SR7_ERASE FIXED BINARY (31),
2 BTREE_SRCH FIXED BINARY (31),
2 BTREE_LEVEL FIXED BINARY (31),
2 ORPHANS FIXED BINARY (31),
2 BTREE_LEV_B FIXED BINARY (15),
2 BTREE_LEV_W FIXED BINARY (15);
DECLARE 1 TSB_DB_STATS1 BASED(ADDR(TSB_DB_STATS)),
2 SYS_INTERN2 CHARACTER (8),
2 PAGES_READ FIXED BINARY (31),
2 PAGES_WRIT FIXED BINARY (31),
2 PAGES_REQ FIXED BINARY (31),
2 CALC_NO FIXED BINARY (31),
2 CALC_OF FIXED BINARY (31),
2 VIA_NO FIXED BINARY (31),
2 VIA_OF FIXED BINARY (31),
2 RECS_REQ FIXED BINARY (31),
2 RECS_CURR FIXED BINARY (31),
2 DB_CALLS FIXED BINARY (31),
2 FRAG_STORED FIXED BINARY (31),
2 RECS_RELO FIXED BINARY (31),
2 TOT_LOCKS FIXED BINARY (31),
2 SHR_LOCKS FIXED BINARY (31),
2 NSH_LOCKS FIXED BINARY (31),
2 LOCKS_FREED FIXED BINARY (31);
DECLARE 1 TSB_DC_STATS1 BASED(ADDR(TSB_DC_STATS)),
2 SYS_INTERN1 CHARACTER (8),
2 PROG_CALL FIXED BINARY (31),
2 PROG_LOAD FIXED BINARY (31),
2 TERM_READ FIXED BINARY (31),
2 TERM_WRITE FIXED BINARY (31),
2 TERM_ERROR FIXED BINARY (31),
2 STORAGE_GET FIXED BINARY (31),
2 SCRATCH_GET FIXED BINARY (31),
2 SCRATCH_PUT FIXED BINARY (31),
2 SCRATCH_DEL FIXED BINARY (31),
2 QUEUE_GET FIXED BINARY (31),
2 QUEUE_PUT FIXED BINARY (31),
2 QUEUE_DEL FIXED BINARY (31),
2 GET_TIME FIXED BINARY (31),
2 SET_TIME FIXED BINARY (31),
2 DB_SRVREQ FIXED BINARY (31),
2 MAX_STACK FIXED BINARY (31),
2 USER_TIME FIXED BINARY (31),
2 SYS_TIME FIXED BINARY (31),
2 WAIT_TIME FIXED BINARY (31),
2 MAX_RCE_USED FIXED BINARY (31),
2 MAX_RLE_USED FIXED BINARY (31),
2 MAX_DPE_USED FIXED BINARY (31),
2 STG_HI_MARK FIXED BINARY (31),
2 FREESTG_REQ FIXED BINARY (31),
2 SYS_SERV FIXED BINARY (31);
Specifies the length of the returned TSB. To retrieve all statistics including the DC extended statistics section that records CPU times in the Time of Day (TOD) format, specify LENGTH=560.
Specifies either the symbolic name of a user-defined field that contains the length of the TSB, or the length expressed as a numeric constant.
Limits: Integer of 388 or greater
Default: If you do not specify a tsb-length, the first 388 bytes of the TSB are returned.
The following statement returns the contents of the TSB to STATISTICS_BLOCK and writes transaction statistics to the log file:
ACCEPT TRANSACTION STATISTICS WRITE INTO (STATISTICS_BLOCK);
Upon completion of the ACCEPT TRANSACTION STATISTICS function, the ERROR_STATUS field in the IDMS DC communications block indicates the outcome of the operation:
|
Status code |
Meaning |
|---|---|
|
0000 |
The request was serviced successfully. |
|
3801 |
The transaction statistics block has no storage available. Waiting would cause a deadlock. |
|
3813 |
No transaction statistics block exists. No BIND TRANSACTION STATISTICS request was issued. |
|
3831 |
Either the parameter list is invalid or no logical terminal element (LTE) is associated with the issuing task. |
|
3850 |
The collection of transaction statistics or task statistics was not enabled during system generation. |
|
Copyright © 2014 CA.
All rights reserved.
|
|