Sample database programs

Sample database programs in the installation library demonstrate how to implement DCSUI support for non‑IBM databases. Members provide exit routines with start and stop clock calls for ADABAS, CA‑DATACOM/DB, SUPRA, and SYSTEM 2000. Programs must be assembled with NOALIGN and link‑edited with AMODE=31.

The interfaces for different releases of each database product listed in this table are described in members in the installation library. See the appropriate member (indicated in the table) for instructions on fully implementing the interface for each database.

Unless otherwise specified, you must assemble the exits listed in the table with the NOALIGN parameter and link-edit them with the AMODE=31 parameter.

Table 1. Database product interfaces

Database

Version

Member

Description

ADABAS

6.2.3

DBADASP

User exit program with DCSUI call that stops a clock. This member cannot be used without member DBADAST.

ADABAS

6.2.3

DBADAST

User exit program with DCSUI call that starts a clock. This member cannot be used without member DBADASP.
CA-DATACOM/DB 2.5 and later DBDATACZ

Thread-safe version of the sample copybook code fragment derived from DBDATACY. Incorporate this code into the DATACOM DCCTXPR user exit, which contains DCSUI calls that start and stop clocks.

DBDATACZ supports CA-DATACOM/DB 2.5 and all later versions.

This member is not a complete source program; it contains implementation instructions only.

DBDATACY

Sample copybook code fragment derived from DBDATACX. Incorporate this code into the DATACOM DCCTXPR user exit, which contains DCSUI calls that start and stop clocks.

DBDATACY supports CA-DATACOM/DB Version 2.5 up to (but not including) Version 14 or later.

This member is not a complete source program; it contains implementation instructions only.
SUPRA 2.4 and later DBTIS24 DCSUI calls that start and stop clocks are placed in vendor exits CSTK0001 and CSTK0002. No other member is required for this interface.
2.6 and later DBTIS26 DCSUI calls that start and stop clocks are placed in vendor exit CSTXUSRX. No other member is required for this interface.
SYSTEM 2000 DBTIS24 DCSUI calls that start and stop clocks are placed in vendor exits CSTK0001 and CSTK0002. No other member is required for this interface.
2.6 and later DBTIS26 DCSUI calls that start and stop clocks are placed in vendor exit CSTXUSRX. No other member is required for this interface.
11.6-03 and later DBS2KST User exit program with DCSUI call that starts clock. This member cannot be used without member DBS2KSP.