1 /* BEGIN INCLUDE FILE dm_tm_shutdown_info.incl.pl1 */
 2 
 3 /* DESCRIPTION:
 4 
 5           This contains the structure used to pass information from
 6      the DM ring to the user ring about a process' transactions that
 7      existed when the process terminated its usage of a Data
 8      Management System.
 9 */
10 
11 /* HISTORY:
12 Written by Steve Herbst, 11/22/83.
13 Modified:
14 04/27/84 by L. A. Newcomb:  Renamed structure shutdown_info to
15             tm_shutdown_info to prevent collision with system shutdown info
16             structure.
17 05/16/84 by Steve Herbst:  Added ABANDONED constant.
18 09/20/84 by Lee A. Newcomb:  Added an abandoned entry to the OP_NAME array,
19             aligned the version, and init'd tm_shutdown_info_ptr to null.
20 */
21 
22 /* format: style4,indattr,^indcomtxt,idind33 */
23 
24 dcl  1 tm_shutdown_info               aligned based (tm_shutdown_info_ptr),
25        2 version                      char (8) aligned,     /* = "TMSHUT 1" */
26        2 count                        fixed bin,
27        2 transaction                  (tm_shutdown_alloc_count refer (tm_shutdown_info.count)),
28          3 txn_id                     bit (36) aligned,
29          3 op_completed               fixed bin,
30          3 state                      fixed bin,
31          3 error_code                 fixed bin (35);
32 
33 dcl  tm_shutdown_info_ptr             ptr init (null ());
34 dcl  tm_shutdown_alloc_count          fixed bin;
35 
36 dcl  (                                                      /* constants */
37      TM_SHUTDOWN_INFO_VERSION_1       char (8) aligned init ("TMSHUT 1"),
38      (ABORTED                         init (1),
39      FINISHED_ABORT                   init (2),
40      FINISHED_COMMIT                  init (3),
41      ABANDONED                        init (4)) fixed bin,
42      OP_NAME                          (4) char (32) init
43                                       ("Aborted", "Finished aborting", "Finished committing", "Abandoned")
44      )                                int static options (constant);
45 
46 /* END INCLUDE FILE - dm_tm_shutdown_info.incl.pl1 */