1 /* ***********************************************************
2 * *
3 * Copyright, C Honeywell Information Systems Inc., 1983 *
4 * *
5 *********************************************************** */
6
7 /* This is the argument processing definition source language for the
8 close description of the mtape_ ANSI Per-Format module. This may be
9 compiled with the mtape_$mtape_cv_apd command and the binary result
10 will be stored in the specified value segment data space with the
11 name of mtape_.close.ansi. The syntax of the command line to perform
12 this task would be:
13
14 mtape_$mtape_cv_apd mtape_.close.ansi.mapd -target <value_seg_path>
15
16 where <value_seg_path> is the pathname of the desired value segment
17 which will be created if it does not exist. If no "-target" control
18 arg is given, then the binary definition is stored in the users
19 default value segment home_dir>user name.value.
20
21 Modification history:
22
23 Created by J. A. Bush 03/31/83
24 */
25
26 Program_name: mtape_.close.ansi;
27
28 Default_linear_form: "-close_position leave -no_display";
29
30 Option: close_position;
31 Option_name: -close_position, -cls_pos;
32 First_argument: close_position;
33 Argument: close_position;
34 Presence: required;
35 Validate: "or equal lowercase &r1 bof eof leave";
36 Validate_explanation: "Acceptable values for the ""-close_position""",
37 " control argument are ""bof"", ""eof"", or",
38 " ""leave"".";
39
40 Option: comment;
41 Option_name: -comment, -com;
42 First_argument: comment;
43 Argument: comment;
44 Presence: required;
45 Validate: "nless length &r1 81";
46 Validate_explanation: "The comment text may not exceed 80 characters",
47 " in length.";
48
49 Option: display;
50 Option_name: -display, -ds;
51 Antonym: -no_display, -nds;
52 Argument: flag;
53 Default_value: "true";
54 Antonym_value: "false";
55
56 End;