Using ACCEPT and DISPLAYStatements for Input/Output and Video Forms
11.2 Designing VideoForms with ACCEPT and DISPLAY Statement Extensions

Figure 11–12 Screen Display of Program SPECIAL

12345678901234567890123456789012345678901234567890123456789012345678901234567890
4123 5678
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
ZK6100GE
Press a directional arrow, PF, RETURN, TAB,
or auxiliary keypad key (CTRL/Z stops loop)
RIGHTARROW
11.2.7 Using the EDITING Phrase

Specifying the EDITING phrase of the ACCEPT statement enables field editing.

Table 11–3briefly describes the keys that the EDITING phrase enables. See the

ACCEPT section of Compaq COBOL Reference Manual for a complete list of field

editing keys.

Table11–3 Key Functions for the EDITING Phrase

Key Function Description
Left arrow Move-left Moves the cursor one space to the left. If the
cursor is at the first character position of the
field, the terminal bell rings.
Right arrow Move-right Moves the cursor one space to the right. If
the cursor is one space beyond the rightmost
character position of the field, the terminal bell
rings.
F12 (BS) Beginning-of-field Positions the cursor to the first character
position of the field.
Ctrl/E End-of-field Moves the cursor one position beyond the
rightmost character position in the field.
Ctrl/U Erase-field Erases the entire field and movesthe cursor to
the first character position of the field.
F14 Switch-mode Switchesthe editing mode between insert and
overstrike.

Example 11–11shows the sample code that produces the form in Figure 11–13.

(The Current Valuefield is provided for example purposes only.)

11–28 Using ACCEPT and DISPLAYStatements for Input/Output and Video Forms