1 /* BEGIN INCLUDE FILE ... tp_output_queue.incl.pl1 */
 2 
 3 /* Written 9-Jan-79 by M. N. Davidoff */
 4 
 5 /* automatic */
 6 
 7      declare output_message_length  fixed binary (21);
 8      declare output_ptr             pointer;
 9 
10 /* based */
11 
12      declare 1 output               aligned based (output_ptr),
13                2 destination        char (32) unaligned,    /* tp_user_id or channel_name where output goes */
14                2 deadline           fixed binary (71),      /* deadline of transaction generating output */
15                2 transaction_no     fixed decimal (30),     /* transaction this output is from */
16                2 message_sequence_no
17                                     fixed decimal (30),     /* sequence number of the output message */
18                2 message_length     fixed binary (21),      /* length of output message */
19                2 message            char (output_message_length refer (output.message_length)) unaligned;
20                                                             /* message for the tp_user */
21 
22 /* internal static */
23 
24      declare OQ_KEY_SEPARATOR       char (1) internal static options (constant) initial ("$");
25      declare OUTPUT_QUEUE_IO_SWITCH_NAME
26                                     char (16) internal static options (constant) initial ("tp_output_queue_");
27      declare OUTPUT_QUEUE_NAME      char (9) internal static options (constant) initial ("tp.tpoutq");
28      declare OUTPUT_QUEUE_SUFFIX    char (6) internal static options (constant) initial ("tpoutq");
29 
30 /* END INCLUDE FILE ... tp_output_queue.incl.pl1 */