IBM Extension

CURSOR Clause

The CURSOR clause specifies the data item that will contain the cursor address used by the extended ACCEPT statement.

Read syntax diagramSkip visual syntax diagram
CURSOR Clause - Format

          (1)                        
>>-CURSOR------+----+--data-name-1-----------------------------><
               '-IS-'                

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