Disconnection from DBCTL

This table shows some examples of CICS® trace entries produced at disconnection from DBCTL.

Figure 1. CICS trace entries produced during disconnection from DBCTL
1    1CICS/ESA - AUXILIARY TRACE FROM 07/20/95 - APPLID CICSKPG1 - TIME OF FIRST ENTRY ON THIS PAGE 11:26:58.7144860002
                                                       .
2                                                      .
      00047 1 AP 00E1 EIP   ENTRY START                                                 0004,07301464 ....,08001008 ....
3     00047 1 XM 0401 XMLD  ENTRY LOCATE_AND_LOCK_TRANDEF CDBT
      00047 1 DD 0301 DDLO  ENTRY LOCATE                06D00040,07301820,TXD,CDBT
      00047 1 DD 0302 DDLO  EXIT  LOCATE/OK             06D86C10 , D7000000
                                                       .
                                                       .
4     00047 1 DU 0500 DUDT  ENTRY INQUIRE_SYSTEM_DUMPCODE DB8211
                                                       .
                                                       .
5     00047 1 DU 0500 DUDT  ENTRY INQUIRE_SYSTEM_DUMPCODE DB8294
                                                       .
                                                       .
6     00048 1 PG 0901 PGPG  ENTRY INITIAL_LINK          DFHDBDSC
                                                       .
                                                       .
7     00048 1 AP 00E1 EIP   ENTRY ADDRESS                                               0004,0005B010 ....,08000202 ....
                                                       .
                                                       .
8     00048 1 PG 0A01 PGLU  ENTRY LINK_URM              DFHDBUEX,0005B0C4 , 0000000B,NO
      00048 1 DD 0301 DDLO  ENTRY LOCATE                06D08F80,0005B3A4,PPT,DFHDBUEX
      00048 1 DD 0302 DDLO  EXIT  LOCATE/OK             D7D7E3C5 , 06D89A50
      00048 1 LD 0001 LDLD  ENTRY ACQUIRE_PROGRAM       0732B450
      00048 1 LD 0002 LDLD  EXIT  ACQUIRE_PROGRAM/OK    86D5B028,06D5B000,3A8,0,REUSABLE,ECDSA,OLD_COPY
9     00048 1 AP 1940 APLI  ENTRY START_PROGRAM         DFHDBUEX,NOCEDF,FULLAPI,URM,NO,07309828,0005B0C4 , 0000000B,2
                                                       .
                                                       .
      00048 1 AP 0065 USER  EVENT APPLICATION-PROGRAM-ENTRY DISCONN DBCTL HAS JUST BEEN DISCONNECTED
                                                       .
                                                       .
10    00048 1 LD 0001 LDLD  ENTRY RELEASE_PROGRAM       0732B450,86D5B028
      00048 1 LD 0002 LDLD  EXIT  RELEASE_PROGRAM/OK    06D5B000,3A8,ECDSA
      00048 1 PG 0A02 PGLU  EXIT  LINK_URM/OK
      00048 1 AP 2520 ERM   ENTRY APPLICATION-CALL-TO-TRUE(DBCTL   )
                                                       .
                                                       .
      00048 1 AP 2522 ERM   EVENT PASSING-CONTROL-TO-TRUE(DBCTL   )
      00048 1 AP 0310 DBAT  ENTRY APPLICATION           REQUEST
11    00048 1 AP 0315 DBAT  EVENT ABOUT-TO-INVOKE-DRA   FOR INTERFACE REQUEST , 0400
12    00048 1 AP 0304 DBSPX EVENT ABOUT-TO-ISSUE-WAIT   FOR DISCONNECTION REQUEST
      00048 1 DS 0004 DSSR  ENTRY WAIT_MVS              DLSUSPND,DBCTL,0005B444,NO,OTHER_PRODUCT
      00048 1 DS 0005 DSSR  EXIT  WAIT_MVS/OK
      00048 1 AP 0305 DBSPX EVENT POSTED                FOR DISCONNECTION REQUEST
13    00048 1 AP 0316 DBAT  EVENT RECEIVES-CONTROL-FROM-DRA FOR INTERFACE REQUEST , 00000000
                                                       .
                                                       .
14    00048 1 ST 0003 STST  ENTRY RECORD_STATISTICS     072F7618 , 00000054,USS
                                                       .
                                                       .
      00048 1 ST 0004 STST  EXIT  RECORD_STATISTICS/OK
      00048 1 AP 0313 DBAT  EXIT  DBAT-RESPONSE-CODE    (00000000)
      00048 1 AP 2523 ERM   EVENT REGAINING-CONTROL-FROM-TRUE(DBCTL   )
      00048 1 AP 2521 ERM   EXIT  APPLICATION-CALL-TO-TRUE(DBCTL   )
15    00048 1 GC 2010 CCCC  ENTRY WRITE                 0005B0BC , 00000008,DBCTL,STATUS
16                                                     .
                                                       .
      00048 1 DS 0004 DSSR  ENTRY WAIT_MVS              ASYNRESP,CCVSAMWT,06C8D5C0,NO,IO
      00038 1 DS 0005 DSSR  EXIT  WAIT_MVS/OK
17    00038 1 AP 0306 DBCT  *EXC* EVENT                 POSTED FOR DFHDBCT SHOULD TERMINATE
      00038 1 AP 00E1 EIP   ENTRY START                                                 0004,001087C4 ..gD,08001008 ....
                                                       .
                                                       .
      00038 1 XM 0401 XMLD  ENTRY LOCATE_AND_LOCK_TRANDEF CDBD
      00038 1 DD 0301 DDLO  ENTRY LOCATE                06D00040,0730C078,TXD,CDBD
      00038 1 DD 0302 DDLO  EXIT  LOCATE/OK             06D86918 , D7000000
                                                       .
                                                       .
      00038 1 AP 00F3 ICP   ENTRY INITIATE              CDBD                            4003,0000000C ....,00000000 ....,CDBD
                                                       .
                                                       .
18    00049 1 LD 0001 LDLD  ENTRY RELEASE_PROGRAM       DFHDBSSX,8711A910
      00049 1 LD 0002 LDLD  EXIT  RELEASE_PROGRAM/OK
                                                       .
                                                       .
      00049 1 ME 0502 MEIN  EXIT  INQUIRE_MESSAGE_DATA/OK 06BB5D7C,06BC56B8,06BC56CE,06BC5710,,I,100011,20071995,M,CIA1,CICSKPG1
19    00049 1 DU 0500 DUDT  ENTRY INQUIRE_SYSTEM_DUMPCODE DB8102
Note:
  1. Timestamp, as mentioned in Connection to DBCTL.
  2. Phase 1 of disconnection begins at this stage.
  3. The CICS-DBCTL interface disconnection transaction, CDBT, is attached.
  4. Message DFHDB8211 is issued to confirm that orderly disconnection is proceeding. This message is issued in response to the user pressing PF5 on the CDBC screen. (For an immediate disconnection, message DFHDB8212 is issued.)
  5. Message DFHDB8294 is issued confirming that orderly disconnection is in progress. (If immediate disconnection had been requested, message DFHDB8295 would have been issued.)
  6. CDBT invokes CICS-DBCTL interface disconnection program, DFHDBDSC. A wait is entered (task number changes, from 00034 to 00035).
  7. The EXEC interface program, DFHEIP, links to the CICS-DBCTL user-replaceable program, DFHDBUEX.
  8. DFHDBUEX is loaded.
  9. Trace entries at this point depend on what, if anything, you have coded in your own version of DFHDBUEX. (See DFHDBUEX.) In this example, DFHDBUEX has been coded to issue a trace entry stating that DBCTL has just been disconnected.
  10. DFHDBUEX is released and control is passed back to DFHDBDSC.
  11. The DRA is invoked for an interface request. (PAPL request type 0400 indicates the request is a DISCONNECT. See PAPL request and return codes.)

    If there is DL/I activity at the time of the disconnect, and the disconnect is orderly (not immediate) DFHDBAT links to DFHDBSPX (the CICS-DBCTL suspend exit) to wait for all DL/I activity to complete. In this example, there was no DL/I activity at the time the disconnect was issued.

  12. The DRA links to DFHDBSPX to cause the CICS task to wait while the DRA processes the disconnect request.
  13. DBCTL return code (00000000). (See Return codes in DBCTL.)
  14. Statistics for this session are recorded. (See DBCTL statistics.)
  15. DFHDBDSC writes a record to the CICS global catalog, to indicate that CICS is no longer connected to DBCTL.
  16. Phase 2 of disconnection begins.
  17. DFHDBDI’s associated transaction, CDBD, runs and disables DFHDBAT to make it unavailable. (The transaction number changes from 00035 to 00032.)
  18. Programs loaded at startup are disabled. This example shows DFHDBSPX. A complete trace should also include similar entries for other programs loaded at startup, as listed in Connection to DBCTL.
  19. Message DFHDB8102 is issued confirming that disconnection from DBCTL is complete.