1 /* BEGIN INCLUDE FILE laser_sheet_template.incl.pl1.  */
 2 
 3 /* ********************************************************************
 4    *  LASER SHEET TEMPLATE                                            *
 5    *                                                                  *
 6    *  This include file contains the character sequences that make up *
 7    *  the head and tail sheet artwork for the laser printer.  It      *
 8    *  also contains the positioning strings for the various text      *
 9    *  lines that appear on the sheets.                                *
10    *                                                                  *
11    *  Created November, 1986 by Warren Johnson.                       *
12    *  Modified May, 1987 by Warren Johnson for new head sheet format. *
13    ******************************************************************** */
14 
15 /* format: style3,dclind5,idind25,linecom,tree,indcomtxt,indproc */
16 
17 dcl  laser_sheet_template_ptr ptr;
18 
19 dcl  1 laser_sheet_template   based (laser_sheet_template_ptr),
20        2 head_sheet,
21          3 hs_length          fixed bin (21),
22          3 hs_string          char (4092),
23        2 tail_sheet,
24          3 ts_length          fixed bin (21),
25          3 ts_string          char (4092),
26        2 access_class_head_sheet,
27          3 hs_length          fixed bin (21),
28          3 hs_string          char (4092),
29        2 access_class_tail_sheet,
30          3 ts_length          fixed bin (21),
31          3 ts_string          char (4092),
32        2 position,
33          3 head               (16),
34            4 horizontal       char (4),
35            4 vertical         char (4),
36          3 tail               (16),
37            4 horizontal       char (4),
38            4 vertical         char (4);
39 
40 dcl  TOP_RQT_LINE             fixed bin internal static options (constant) init (1);
41 dcl  BOTTOM_RQT_LINE          fixed bin internal static options (constant) init (2);
42 dcl  TOP_SHORT_PATH           fixed bin internal static options (constant) init (3);
43 dcl  BOTTOM_SHORT_PATH        fixed bin internal static options (constant) init (4);
44 dcl  TOP_LONG_PATH            fixed bin internal static options (constant) init (5);
45 dcl  BOTTOM_LONG_PATH         fixed bin internal static options (constant) init (6);
46 dcl  ACCESS_CLASS             fixed bin internal static options (constant) init (7);
47 dcl  BIG_ACCESS_CLASS         fixed bin internal static options (constant) init (8);
48 dcl  HS_DATE_INSTALLATION     fixed bin internal static options (constant) init (9);
49 dcl  HS_BIG_DESTINATION       fixed bin internal static options (constant) init (10);
50 dcl  HS_BIG_HEADER            fixed bin internal static options (constant) init (11);
51 dcl  HS_HEAD_DESTINATION      fixed bin internal static options (constant) init (12);
52 dcl  HS_LANDSCAPE_DEST        fixed bin internal static options (constant) init (13);
53 dcl  HS_LANDSCAPE_HEAD        fixed bin internal static options (constant) init (14);
54 
55 dcl  TS_TIME_REQUESTED        fixed bin internal static options (constant) init (9);
56 dcl  TS_TIME_OUTPUT           fixed bin internal static options (constant) init (10);
57 dcl  TS_OUTPUT_MODE           fixed bin internal static options (constant) init (11);
58 dcl  TS_FORMS_CONTROL         fixed bin internal static options (constant) init (12);
59 dcl  TS_RQT_QUEUE             fixed bin internal static options (constant) init (13);
60 dcl  TS_HEAD_DESTINATION      fixed bin internal static options (constant) init (14);
61 
62 /* END INCLUDE FILE laser_sheet_template.incl.pl1.  */