Using CA InterTest for CICS with DB2 and SQL/DS Programs › Preliminary Steps › Check That the Attach Facility or Resource Adapter Is Active

Check That the Attach Facility or Resource Adapter Is Active

You must ensure that the CICS/DB2 Attach facility is active in the CICS region in which you are testing DB2 programs.

To test whether the attach facility is active, follow these steps:

1. Type FILE on a clear screen.
2. Change the DATATYPE to DB and press Enter.

If the attach facility is active, CA InterTest for CICS displays the following message:

CAIN1701

ENTER THE SQL COMMAND TO BE EXECUTED.

If the attach facility is not active, CA InterTest for CICS displays the following message:

CAIN1712

DSNC NOT ACTIVE OR DB2 NOT AVAILABLE.

If the Resource Adapter is active, it displays the following message:

ARI0401I

SQL/DS ONLINE RESOURCE ADAPTER IS ALREADY ACTIVE IN THIS PARTITION.

If the Resource Adapter is not active when SQL/DS is in multi-partition mode, the following messages display:

ARI0418A

SQL/DS IS NOT READY. RETRY THE ENABLE TRANSACTION CIRB AFTER SQL/DS STARTS.

ARI0413I

RESOURCE ADAPTER ARI0OLRM IS DISABLED.

If the Resource Adapter is active in the non‑CICS partition but not yet active in the CICS partition, the following messages display:

ARI407E

ERROR ATTEMPTING TO EXEC SQL.

ARI407E

SQLCODE = ‑560 SQLERRD1 = ‑180 SQLERRD2 = 0.

ARI413I

RESOURCE MANAGER ARI0OLRM IS DISABLED.

If the CICS DB2 Attach Facility Is Not Active

If the attach facility is not active and you execute a DB2 program, the transaction fails with an AEY9 abend code. If you are monitoring the program with CA InterTest for CICS and you do not have a Handle Condition for this error, your program is halted at an automatic breakpoint at a call to DB2 (CALL 'DSHNLI') or SQL (CALL 'ARIPRDI'). In this case, follow these steps:

1. Call your system programmer or console operator and request that the CICS/DB2 attach facility be started.
2. Continue program execution by re-executing the call. In COBOL, this means paging back to the statement prior to the call:

   PERFORM SQL‑INITIAL UNTIL SQL‑INIT‑DONE
   

3. Type G to the left of this statement and press PF5.