The CA APAS CICS link routine module, DBGLNCTS, provides several different options for determining what gets reported in the PROGRAM data field for CICS transactions. The default option is to report the name of the currently running program which is ADABAS for CICS environment that are running without ADATRUE and ADATRUE for those with the ADATRUE option implemented.
In the CA APAS CICS link routine module, DBGLNCTS, change the assembly option &PROGNM from SETC 'PROGRAM' to SETC 'INVOKING'. The INVOKING option provides the name of the program that Linked or XCTL to the currently executing program. Test this option to see if the correct program name is reported in the PROGRAM data field. If not, then try the INQPROG option. INQPROG returns the name of the program initiated by the current CICS transaction ID.
Use the following steps for modifying DBGLNCTS: