1 .* ***********************************************************
2 .* * *
3 .* * *
4 .* * Copyright, C Honeywell Information Systems Inc., 1981 *
5 .* * *
6 .* * *
7 .* ***********************************************************
8 .* PAGE LAYOUT
9 .* GLOBAL CONSTANTS
10 .ts "%section%" ^= "" ;.* set mark if section is given
11 .srv SECTION_MARK "-"
12 .srv COLWIDTH 65
13 .srv SECTION_INDENT 15
14 .fnt -reset
15 .*
16 .ifi set_page_header
17 .* ENTRY VECTOR
18 .ur .go %InputFileName%
19 .rt
20 .* MPM PROSE
21 .la mpm_prose_layout
22 .srv LAYOUT "mpmprose"
23 .vm 4,2,2,6
24 .srv TEXT_TYPE "prose"
25 .go MPM
26 .* MPM MODULE
27 .la mpm_module_layout
28 .srv LAYOUT "mpmmodule"
29 .vm 6,3,2,6
30 .srv TEXT_TYPE "module"
31 .*
32 .la MPM
33 .pd 84,80
34 .srv COLWIDTH 80
35 .srv SECTION_INDENT 24
36 .go INIT_FINI
37 .* PLM PROSE
38 .la plm_prose_layout
39 .srv LAYOUT "plmprose"
40 .vm 4,2,2,4
41 .srv TEXT_TYPE "prose"
42 .go PLM
43 .* PLM MODULE
44 .la plm_module_layout
45 .srv LAYOUT "plmmodule"
46 .vm 3,2,2,4
47 .srv TEXT_TYPE "module"
48 .rt
49 .*
50 .la PLM
51 .pd
52 .go INIT_FINI
53 .*
54 .la photo_prose_layout
55 .srv TEXT_TYPE "prose"
56 .srv LAYOUT "photoprose"
57 .go photo_common
58 .*
59 .la photo_module_layout
60 .srv TEXT_TYPE "module"
61 .srv LAYOUT "photomodule"
62 .*
63 .la photo_common
64 .hla ;.* cancel extra header for photo
65 .vm 3,2,2,4
66 .if "%DeviceClass%" = "bitmap"
67 .then .srv SECTION_INDENT 10
68 .ifi onecol
69 .endif
70 .go INIT_FINI
71 .* GENERAL PROSE
72 .la init_prose_layout
73 .srv LAYOUT "initprose"
74 .srv TEXT_TYPE "prose"
75 .go set_init
76 .* GENERAL MODULE
77 .la init_module_layout
78 .srv LAYOUT "initmodule"
79 .srv TEXT_TYPE "module"
80 .srv SECTION_INDENT 24
81 .*
82 .la set_init
83 .vm
84 .pd
85 .*
86 .la INIT_FINI
87 .bpf a
88 .fnt CSR 9
89 |%draft%%add_date%|%PageNo%|%draft_date% %ORDER_NUMBER%%add_letter%|
90 .fnt
91 .epf
92 .rt