IBM Extension
IBM Extension
CURSOR Clause
The CURSOR clause specifies the data item that will contain the cursor address used by the extended ACCEPT statement.
CURSOR Clause - Format (1) >>-CURSOR------+----+--data-name-1----------------------------->< '-IS-'
Notes:
- IBM® Extension
Related Information:
- data-name-1
- Must be a 4- or 6-byte alphanumeric field or a 4- or 6-byte unsigned
zoned integer field. If data-name-1 is 4 characters in length, the
first two characters are interpreted as line number, and the second
two as column number. If data-name-1 is 6 characters in length, the
first three characters are interpreted as line number, and the second
three as column number.
The clause has no effect if data-name-1 contains an invalid position value (such as zeros, a nonnumeric value, or a value that is beyond the range of the screen).
Data-name-1 must be described in the WORKING-STORAGE or LOCAL-STORAGE SECTIONS. If data-name-1 is referenced from a nested program, it must be defined as global in the outermost program.
End of IBM Extension
