1 /* BEGIN INCLUDE FILE ... config_part_card.incl.pl1 ... 11/27/80 W. Olin Sibert */
 2 
 3 
 4 
 5 /****^  HISTORY COMMENTS:
 6   1) change(86-01-14,Fawcett), approve(86-05-13,MCR7383),
 7      audit(86-05-14,LJAdams), install(86-07-18,MR12.0-1098):
 8      Change the drive dcl from fixed bin to char (4) for subvolume support.
 9   2) change(87-05-07,Fawcett), approve(87-05-07,MCR7676),
10      audit(87-05-11,Beattie), install(87-07-15,MR12.1-1041):
11      Change drive element in cold_part_card from fixed bin to char (4), this
12      was an oversight in MCR7383.
13                                                    END HISTORY COMMENTS */
14 
15 
16 dcl  part_cardp pointer;                                    /* pointer to PART card */
17 
18 dcl 1 part_card aligned based (part_cardp),                 /* PART card declaration */
19     2 word char (4),                                        /* "part" */
20     2 name char (4),                                        /* Name of partition */
21     2 subsystem char (4),                                   /* Disk subsystem name */
22     2 drive char (4),                                       /* Drive number / subvol */
23     2 real_name char (4),                                   /* Real name of partition on volume (optional) */
24 
25     2 pad (10) bit (36) aligned,                            /* Pad to 15 fields */
26 
27     2 type_word aligned,
28       3 field_type (14) bit (2) unaligned,                  /* type of each field; see config_deck.incl.pl1 */
29       3 pad1 bit (4) unaligned,
30       3 n_fields fixed bin (4) unsigned unaligned;          /* number of fields used on card */
31 
32 dcl 1 cold_part_card aligned based (part_cardp),            /* PART card declaration for cold boot */
33     2 word char (4),                                        /* "part" */
34     2 name char (4),                                        /* Name of partition */
35     2 subsystem char (4),                                   /* Disk subsystem name */
36     2 drive char (4),                                       /* Drive number */
37     2 highlow char (4),                                     /* Where to put it: "high" or "low" */
38     2 nrec fixed bin,                                       /* Number of records to be allocated */
39 
40     2 pad (9) bit (36) aligned,                             /* Pad to 15 fields */
41 
42     2 type_word aligned,
43       3 field_type (14) bit (2) unaligned,                  /* type of each field; see config_deck.incl.pl1 */
44       3 pad1 bit (4) unaligned,
45       3 n_fields fixed bin (4) unsigned unaligned;          /* number of fields used on card */
46 
47 dcl  PART_CARD_WORD char (4) aligned internal static options (constant) init ("part");
48 
49 /* END INCLUDE FILE ... config_part_card.incl.pl1 */