ILE COBOL Language Reference

+-------------------------------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:

  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.


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