1 /* Begin include file ..... print_syserr_msg_args.incl.pl1 */
 2 
 3 /* This include file defines a structure which is used as a parameter to call the
 4    subroutine print_syserr_msg_ */
 5 
 6 /* Written January 1976 by Larry Johnson */
 7 
 8 dcl  argp ptr;                                              /* Pointer to structure */
 9 
10 dcl 1 parg aligned based (argp),
11     2 msgp ptr,                                             /* Pointer to syserr message */
12     2 iocbp ptr,                                            /* Pointer to iocb to which data is written */
13     2 textp ptr,                                            /* Pointer to real text of message */
14     2 printp ptr,                                           /* Pointer to message to print */
15     2 textl fixed bin,                                      /* Length of real text of message */
16     2 printl fixed bin,                                     /* Length of message to print */
17     2 linelen fixed bin,                                    /* Length to terminal line */
18     2 prev_time char (24),                                  /* Time of last message */
19     2 bin_sw bit (1) unal,                                  /* Set if binary data should be printed */
20     2 octal_sw bit (1) unal,                                /* Set if binary data should be printed in octal */
21     2 pad bit (34) unal;
22 
23 
24 /* Notes:
25 
26    This include file defines 3 different  character string messages. The first is contained
27    in the syserr message pointed to by "msgp". The second is defined by "textp" and "textl".
28    The third is defined by "printp" and "printl". The print_syserr_msg_ subroutine never looks at
29    the text in the syserr message pointer to by "msgp". It always prints the message
30    defined by "printp" and "printl". This may be an "=". If bin_sw is "1"b and octal_sw is "0"b,
31    the subroutine requires the real text of the message which is defined by "textp" and
32    "textl" to determine how to interpret the binary data. These paramaters should
33    be set to the last non "=" message from the log. */
34 
35 /* End include file ..... print_syserr_msg_args.incl.pl1 */