The BASED Clause (Siemens BS2000 COBOL)

The BASED clause identifies a record as being a simple template to which no storage space is allocated.

Format

BASED

Syntax Rules:

  1. Only specify the BASED clause on a level 01 or 77 item from the LINKAGE SECTION.
  2. The BASED and REDEFINES phrases are mutually exclusive.

General Rules:

The start address of this record is set to the predefined address NULL. An address is not assigned until it is explicitly set.