Appendix B - ADISCTRL Settings for RM2VCOB

This is a complete list of the Adis options and settings for the RM2VCOB configuration used in the tutorial. The settings in bold are the ones that differ from the default Adis configuration.

Setting no. Description Value
1 User function keys enable/disable - function keys are enabled. 2
2 Range of data keys accepted. 3
3 Prompt character. [_] x'5F'
4 Prompt character used in PIC G fields. [ iQ] x'8151'
5 Pre-display of fields before an accept - enables the predisplay of numeric-edited fields with numeric editing when the cursor moves into them. No other predisplay occurs. 1
6 Accept in a SECURE field. 2
7 Auto-skip between fields. 2
8 Termination of an accept - keying or retyping a data character in the last available character position of an ACCEPT operation, provided auto-skip between fields is enabled. 3
9 Validation control if accept is terminated by a function key. 1
10 End of field effects - the cursor stays at the end of field, and overtyping is rejected. 2
11 Filed overflow buffers enable/disable - displaced data is not saved in an overflow buffer. 2
12 Auto-restore during backspace in replacement editing mode - RM backspace. Deleted characters are removed and characters to the right are shifted left, same as when in insertion editing mode. 3
13 Accepts into numeric edited fields - input is accepted as for alphanumeric fields and is normalized to remove illegal characters on exit from the field. 1
14 Accepts in non-edited numeric fields - all non-edited numeric fields are treated as alphanumeric fields. 3
15 Enable/disable auto-clear or pre-clear - pre-clear mode: the field is cleared to spaces or zeroes. Pressing the Undo key does not restore the original contents of the field. 4
16 Force field to be updated if it is not altered - the data item is always updated even if the field is not altered. This setting has effect only if the field is numeric or numeric-edited and the original data item did not contain any numeric data, or if the field is right justified and the original contents of the field were not. 2
17 Remembering where the end of field is - the enhanced ACCEPT/DISPLAY syntax notes the position of the last character entered into a field during an ACCEPT operation. This setting provides justification of RM-style numeric fields. 2
18 Rm style numeric data entry - the RM/COBOL 85 style of numeric and numeric-edited data entry is enabled. 3
19 Restricting maximum field size to one line. 1
20 Control of cursor positioning after an accept - the cursor is left at its current position. 2
21 Control of whether UPDATE clauses perform implicit CONVERTs - the CONVERT clause is implied. 2
22 Selection of the function key list to be used. 1
23 Select of the action for COLUMN + n clauses - a 'COLUMN + 1' clause leaves a one-character gap between the two fields. 2
24 Selection of the default action if no color specified. 1
25 Control of whether cursor left/right keys can exit a field - the keys cannot exit a field. 2
26 left justification of free-format edited numerics - the field is left-justified, provided RM-numeric handling is switched off. This is controlled by ACCEPT/DISPLAY option 18. 2
27 Validation control on FULL/REQUIRED fields. 1
28 Control of Adis keys defined as function keys. 2
29 Control of the read screen option for an accept. 1
30 Control of whether protected fields are skipped. 1
31 Control of special action for Kanji modifier characters. 1
32 Selection of the units used when calculating timeout. 1
33 Control of whether timeout is reset on each keystroke - the timer is reset each time a character is entered. 2
34 Control of line feed before first DISPLAY on a screen. 2