ContentsIndex PreviousNext

ACTUAL KEY Clause and SEEK

Important note: Because the ACTUAL KEY clause in the FILE-CONTROL paragraph, and its companion SEEK statement in the PROCEDURE division, are not supported by ACUCOBOL-GT, even in the IBM DOS/VS COBOL compatibility mode, they must be removed before a program written for IBM DOS/VS COBOL can be ported to ACUCOBOL-GT.
IBM DOS/VS COBOL recognizes a clause of the following kind in the FILE-CONTROL paragraph: 

     ACTUAL  KEY  IS  data-item

The data-item defines a track identifier and a record identifier of a logical record. It is hardware-dependent and not portable. ACUCOBOL-GT cannot support ACTUAL KEY and reports an "Unsupported Operation" error if the clause is present.

The ACTUAL KEY clause is used by a SEEK operation in the PROCEDURE division:

     SEEK  file-name  RECORD

ACUCOBOL-GT does not support SEEK either, and reports an "Unsupported Operation" error if it is present.