1 /* ******* BEGIN INCLUDE FILE dm_bj_sub_error_flags.incl.pl1 ******** */
 2 
 3 /* format: style2,ind3 */
 4 
 5 /* HISTORY:
 6 Written by Matthew Pierret, 07/02/83.
 7 Modified:
 8 */
 9 
10      dcl     1 bj_error_flags       aligned based,
11                2 action             unal,
12                  3 cant_restart     bit (1) unal,
13                  3 default_restart  bit (1) unal,
14                  3 quiet_restart    bit (1) unal,
15                  3 support_signal   bit (1) unal,
16                  3 mbz_1            bit (14) unal,
17                2 log,
18                  3 system           bit (1) unal,
19                  3 mbz_2            bit (1) unal,
20                2 mbz_3              bit (16) unal;
21 
22      dcl     (
23              BJ_ACTION_CANT_RESTART init ("1000"b || (32)"0"b),
24              BJ_ACTION_CAN_RESTART  init ("0000"b || (32)"0"b),
25              BJ_ACTION_DEFAULT_RESTART
26                                     init ("0100"b || (32)"0"b),
27              BJ_ACTION_QUIET_RESTART
28                                     init ("0010"b || (32)"0"b),
29              BJ_ACTION_LOG          init ((18)"0"b || "10"b || (16)"0"b)
30              )                      bit (36) aligned internal static options (constant);
31 
32 /* ********* END INCLUDE FILE dm_bj_sub_error_flags.incl.pl1 ******** */