Designing Video Forms With Screen Section Accept And Display; Form With Accept With Editing Phrase - Compaq COBOL AAQ2G1FTK User Manual

Using ACCEPT and DISPLAY Statements for Input/Output and Video Forms

11.3 Designing Video Forms with Screen Section ACCEPT and DISPLAY

Figure 11–13 Form with ACCEPT WITH EDITING Phrase
1
12345678901234567890123456789012345678901234567890123456789012345678901234567890
1
MODIFY EMPLOYEE INFORMATION FORM
2
3
Enter Employee Number : 1221 Current Value : 1221
4
5
Date of Hire : 11−22−88
6
7
Department : UB40
8
9
First Name : HENRY
10
11
Last Name : JAMES
12
13
14
15
16
17
18
19
20
21
22
23
24
11.3 Designing Video Forms with Screen Section ACCEPT and
DISPLAY
The Screen Section feature provides an efficient alternative to the ACCEPT and
DISPLAY extensions for designing video forms. Screen Section, which is based
on the X/Open CAE Specification for COBOL, is also a Compaq extension to the
ANSI Standard. It enables you to design video forms in a single section of your
Compaq COBOL program. Then, in the Procedure Division, you can accept or
display an entire screen of data with a single ACCEPT or DISPLAY statement,
instead of multiple statements.
You can design your form as follows:
1. In the SPECIAL-NAMES paragraph in the Environment Division, you can
optionally do the following:
• Specify the cursor position with the CURSOR IS option.
• Set up an indicator to discover the cause of termination of an ACCEPT
statement, with the CRT STATUS IS option.
For example:
SPECIAL-NAMES.
2. You can use the Screen Section in the Data Division to define a screen
description entry to describe each input and output item within the video
form. Do this for each screen in your application.
2 3 4
Current Value : 11−22−88
Current Value : UB40
Current Value : HENRY
Current Value : JAMES
CURSOR IS CURSOR-POSITION
CRT STATUS IS CRT-STATUS.
Using ACCEPT and DISPLAY Statements for Input/Output and Video Forms 11–31
5 6 7
ZK−1516A−GE
8