How to list BTACTTRS without Header
Article ID: 265065
Updated On:
Products
Issue/Introduction
Is it possible to output a list without the header part of the BTACTTRS report ?
Environment
Release : 20.0
Resolution
There are some ways to list BTACTTRS data without header.
1) Comment "COLHDG = " and/or "TITLE = " in CDBATREQ(BTACTTRS).
Example listing :
********************************* TOP OF DATA ****************************** ****
mm/dd/yy 11:16:59 <= Not able to delete
REQUEST: BTACTTRS <= Not able to delete
FIRST RECORD 02/01/16 14:48:30 <= Not able to delete
<= Not able to delete
SHORT TRACE OF ACCOUNTING INFOR<= Able to delete
<= Able to delete
***CUSTOMIZED FOR CUSTOMER*** CONN <= Able to delete
AUTHID PLANNAME TIMESTAMP NAME CORR-ID SSID THR<= Able to delete
-------- -------- ------------------------ -------- ------- ---- ---<= Able to delete
SYSDB2 IQPI1900 2016-02-01 14:48:30.5853 DB2CALL SYSDB2 DSNB <= Date statement
SYSDB2 IQPI1900 2016-02-01 14:48:41.8005 DB2CALL SYSDB2 DSNB <= Date statement
SYSDB2 RBPA1900 2016-02-01 14:48:45.4233 DB2CALL SYSDB2 DSNB <= Date statement
To delete the header data where it be able to delete, comment "COLHDG = " and/or "TITLE = " in prefix.CDBATREQ(BTACTTRS).
#ELSE
COLHDG = (' THREAD TERM ' -
' OPEN+ CTL+ THREAD ' -
' DB2 GET READ LOCK' ,
' AUTHID PLANNAME ENDED COND SEL I/U/D ' -
' PREP FETCH CLOSE DEF ELAPSED ' -
' CPU TIME PAGES I/OS SUSP' ,
'-------- -------- ----------- ------- ----- ----- ' -
'----- -------- ----- ----- ------------- ' -
'------------- ----- ----- -----' )
#IFEND
*
* WHERE PLAN-NAME = ' ' /* <== ADD SELECTION CRITERIA */
*
* TOP 50 ONLY THD-ELAPSED
* TOP 50 THD-ELAPSED, SUM(GET-PAGE(*))
TOP 50 THD-ELAPSED
*
TITLE = ('SHORT TRACE OF ACCOUNTING INFORMATION')
PRINT (BTACTTRS)
;
2) Change PRINT (BTACTTRS) to OUTFILE (BTACTTRS) in prefix.CDBATREQ(BTACTTRS).
PRINT (BTACTTRS)
;
PRINT (BTACTTRS) indicates that the listing data is written as a print image to DD BTACTTRS.
With OUTFILE (BTACTTRS), it will write just data statements to DD BTACTTRS for other programs to be able to use as input data.
When OUTFILE (BTACTTRS) is used, there are some considerations.
- A control field in prefix.CDBASKL0(OUTRECRD) is written at the beginning of each record, followed by the desired field; the start column, which was functional in the PRINT instruction, is ignored.
- The format of the numeric field was written as PF='YYYY-MM-DD~') for the PRINT instruction, but for the OUTFILE instruction, replace it with OF= instead of PF=.
Feedback
