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

Read syntax diagramSkip visual syntax diagramCURSOR1 ISdata-name-1
Notes:
  • 1 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