COBOL Manual for TNS/E Programs (H06.08+, J06.03+)

• Index-Names
• Absent Linkage Section
Data Description Entries and Initializing Data Items
Data description entries and data initialization rules are the same in the Linkage Section as they
are in the Working-Storage Section, except that you can use the VALUE clause only for level-88
items. A BASED item declared in the Linkage Section has its implicit pointer initialized to NULL
every time the program is called. For information on using the VALUE clause in the Linkage Section,
see Descriptions of Condition-Names for Values (Level 88). For information on data description
entries and data initialization rules, see Data Description Entries, Initializing Data Items.
ACCESS MODE Clause
The ACCESS MODE clause describes the addressing method used to access parameters passed
to the program—STANDARD or EXTENDED-STORAGE. You can specify the ACCESS MODE clause
only in level-01 through level-49 and level-77 data description entries in the Linkage Section.
EXTENDED-STORAGE
specifies extended (32-bit) addressing. This is the default.
STANDARD
specifies standard (16-bit) addressing.
STANDARD cannot be specified for a program that is to be called with a CALL identifier
statement. The compiler cannot check for this, so the result of such a call is undefined.
NOTE: If you specify STANDARD in a TNS/E program, the ECOBOL compiler issues a
warning and uses 32-bit addressing.
Usage Considerations:
• STANDARD Access Mode and the CALL Statement
If a formal parameter (in the called program) has STANDARD access mode, the CALL statement
(in the calling program) cannot pass it an actual parameter that has EXTENDED-STORAGE
access mode (the default) and was declared in the calling program’s Extended-Storage Section
or Linkage Section. Also, the called program’s object must be available to the compiler when
the calling program is compiled (see CALL (page 293)).
The only advantage to STANDARD is slightly more efficient access in the called program.
• Extended Addressing and the CALL Statement
If a formal parameter (in the called program) has EXTENDED-STORAGE access mode (the
default), a CALL statement (in the calling program) can pass it any actual parameter defined
in the calling program’s Data Division.
• Access Mode Heritability
Subordinate items inherit the access mode of their parent. If a record has no ACCESS MODE
clause or has an ACCESS MODE EXTENDED-STORAGE clause, no element of that record
can have STANDARD access mode. If a record has an ACCESS MODE STANDARD clause
in its description, no element of that record can have EXTENDED-STORAGE access mode.
180 Data Division