ILE COBOL Language Reference

+-------------------------------IBM Extension--------------------------------+


CONTROL-AREA Clause

This clause specifies device-dependent and system-dependent information used to control input/output operations for TRANSACTION files.

CONTROL-AREA Clause - Format
 
                (1)
>>-CONTROL-AREA-------+----+--data-name-7----------------------><
                      '-IS-'
 
 

Notes:

  1. IBM Extension

data-name-7
A data-item (2, 12, or 22 characters long) defined in the LINKAGE, LOCAL-STORAGE or WORKING-STORAGE SECTIONS, of the following format:
01    data-name-7
      05   function-key  PIC X(2)
      05   device-name   PIC X(10)
      05   record-format PIC X(10)

Where:

function-key
Is a 2-digit number inserted in the field by the workstation interface that identifies the function key the operator pressed to initiate the transaction.

Number
Meaning

00
Enter key

01-24
Function keys 1 through 24

90
Roll up / Page down key

91
Roll down / Page up key

92
Print key

93
Help key

94
Clear key

95
Home key

99
Undefined
device-name
The program device name
record-format
The DDS record format name that was referenced by the last input/output statement run.

+----------------------------End of IBM Extension----------------------------+


[ Top of Page | Previous Page | Next Page | Table of Contents | Index ]