1 /* BEGIN INCLUDE FILE mtape_detach_info.incl.pl1. Created by J. A. Bush 06/13/83 */
 2 /* format: style4 */
 3 
 4 dcl  mdip ptr;
 5 
 6 dcl  mtape_detach_info_version_1 char (8) int static options (constant) init ("mdiv0001");
 7 
 8 dcl  1 mtape_detach_info aligned based (mdip),
 9        2 version char (8),                                  /* Current structure version */
10        2 comment char (64),                                 /* To display on operators console at volume detach time */
11        2 display bit (1),                                   /* Display detach description on user_output */
12        2 unload bit (1);                                    /* "1"b => unload volume on detach; "0"b => rewind on detach */
13 
14 /* END INCLUDE FILE mtape_detach_info.incl.pl1 */