1 /* BEGIN include file g115_attach_data.incl.pl1 */
 2 
 3 /* This structure describes all data which is defined per g115 switch attachment */
 4 
 5 /* Modified by J. C. Whitmore, 8/79, adding new fields and changing name from g115_data.incl.pl1 */
 6 
 7 dcl  adp ptr init (null);
 8 
 9 dcl 1 g115_attach_data aligned based (adp),
10     2 ttt_info like remote_ttt_info,
11     2 device_ptr ptr,                                       /* pointer to g115_device_data for this attachment */
12     2 media_code char (1) unal,                             /* current media code used for this attachment */
13     2 attach_description char (256) var,
14     2 open_description char (32) var,
15     2 device char (32),                                     /* name of the generic type of remote device */
16     2 device_type fixed bin;                                /* device type code in fixed bin form */
17                                                             /* 1 = reader       */
18                                                             /* 2 = printer      */
19                                                             /* 3 = teleprinter  */
20                                                             /* 4 = punch        */
21 
22 /* Constants which describe the defined device types */
23 
24 dcl  reader fixed bin static options (constant) init (1);
25 dcl  printer fixed bin static options (constant) init (2);
26 dcl  teleprinter fixed bin static options (constant) init (3);
27 dcl  punch fixed bin static options (constant) init (4);
28 
29 /* END include file g115_attach_data.incl.pl1 */