1 /*        BEGIN INCLUDE FILE tape_io_errors.incl.pl1  */
 2 
 3 dcl 1 error_control_table (56) aligned internal static options (constant), /* error messages */
 4     2 severity fixed bin (17) aligned initial (             /* severity codes */
 5       3, 3, 3, 1, 2, 2, 2, 2, 2, 2, 2, 1, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
 6       2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 3,
 7       3, 3, 2, 2),
 8     2 Soutput_stmt bit (1) unaligned initial (              /* write statement switch */
 9       "0"b, (55) (1) "1"b),
10     2 message char (252) varying initial (                  /* long message texts */
11 /* ERR 1 */ "The control file contains no statements.",
12 /* ERR 2 */ "The control file does not begin with a Volume statement.",
13 /* ERR 3 */ "The control file does not end with an End statement.",
14 /* ERR 4 */ "The Volume statement has prematurely terminated the previous volume-group.
15 An End statement has been supplied.;",
16 /* ERR 5 */ "A syntax error has occured in this statement.",
17 /* ERR 6 */ "Invalid volume specification.",
18 /* ERR 7 */ "Invalid density specification.",
19 /* ERR 8 */ "Invalid tape mode specification.",
20 /* ERR 9 */ "Invalid record format specification.",
21 /* ERR 10 */ "Invalid physical block length specification.",
22 /* ERR 11 */ "Invalid logical record length specification.",
23 /* ERR 12 */ "Invalid file format specified.",
24 /* ERR 13 */ "Invalid pathname.",
25 /* ERR 14 */ "Illegal Density statement.
26 A volume-group can contain only one Density statement.",
27 /* ERR 15 */ "The logical record length specified is not allowed.
28 For F, D, or V format, the logical record length must equal the physical block length.",
29 /* ERR 16 */ "The physical block length specified is not allowed.
30 For FB format, the physical block length must be an integral multiple of the logical record length.",
31 /* ERR 17 */ "An invalid combination of logical record length and physical block length has been specified.
32 For DB or VB format, the logical record length cannot exceed the physical block length.",
33 /* ERR 18 */ "A file-group must contain a File statement.",
34 /* ERR 19 */ "Generate output mode is not allowed for IBM tapes.",
35 /* ERR 20 */ "Illegal Tape statement.
36 A volume-group can contain only one Tape statement.",
37 /* ERR 21 */ "Invalid Tape specification.",
38 /* ERR 22 */ "Invalid expiration date.",
39 /* ERR 23 */ "The specified pathname is in conflict with previous statement(s).",
40 /* ERR 24 */ "A file-group must contain a path statement.",
41 /* ERR 25 */ "A volume-set may consist of at most 64 volume identifiers.",
42 /* ERR 26 */ "A logical record length cannot be specified for U format tapes.",
43 /* ERR 27 */ "The specified storage_extend statement is in conflict with previous statement(s).",
44 /* ERR 28 */ "Physical block length specifications must be a multiple of 4.",
45 /* ERR 29 */ "The file identifier must be * for unlabeled tapes.",
46 /* ERR 30 */ "The replace statement is not permitted with unlabeled tapes.",
47 /* ERR 31 */ "A numeric file number is required for unlabeled volume-sets.",
48 /* ERR 32 */ "The extend statement is not permitted with unlabeled tapes.",
49 /* ERR 33 */ "The specified Storage statement is in conflict with previous statement(s).",
50 /* ERR 34 */ "The specified Expires statement is in conflict with previous statement(s).",
51 /* ERR 35 */ "The -force control argument cannot be specified for unlabelled volume-sets.",
52 /* ERR 36 */ "A file identifier of * is not permitted for output volume-sets.",
53 /* ERR 37 */ "The file identifier specified is not valid.",
54 /* ERR 38 */ "The specified output mode is in conflict with previous statement(s).",
55 /* ERR 39 */ "The tape_extend and expiration statements may not be specified in the same file-group.",
56 /* ERR 40 */ "The modify and expiration statements may not be specified in the same file-group.",
57 /* ERR 41 */ "A file identifier or file number must be specified for each file-group.",
58 /* ERR 42 */ "<file-group> contains inconsistencies.",
59 /* ERR 43 */ "A physical block length must be specified for U format volume-sets.",
60 /* ERR 44 */ "The specified Mode statement is in conflict with previous statement(s).",
61 /* ERR 45 */ "The specified Format statement is in conflict with previous statement(s).",
62 /* ERR 46 */ "The specified Block statement is in conflict with previous statement(s).",
63 /* ERR 47 */ "The specified Record statement is in conflict with previous statement(s).",
64 /* ERR 48 */ "Invalid file number specified.  Valid values are ""*"" or a decimal integer from 1 to 9999.",
65 /* ERR 49 */ "A numeric file number must be specified with tape_extend, generate, or modify.",
66 /* ERR 50 */ "A local statement has been encountered outside a file-group.
67 Statement ignored.",
68 /* ERR 51 */ "The specified number statement is in conflict with previous statement(s).",
69 /* ERR 52 */ "No file group has been specified for the preceding volume-group.",
70 /* ERR 53 */ "Invalid file identifier.  A file identifier of * is only permitted for input or unlabeled volume-sets.",
71 /* ERR 54 */ "Missing file number.",
72 /* ERR 55 */ "The modify statement is not permitted with unlabeled tapes.",
73 /* ERR 56 */ "The expiration statement is not permitted with unlabeled tapes."),
74     2 brief_message char (4) varying initial ((56) (1) " ");
75 
76 /*        END INCLUDE FILE tape_io_errors.incl.pl1  */