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

Data Division
HP COBOL Manual for TNS/E Programs520347-003
7-38
Data Description Entries and Initializing Data Items
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. 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.
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).
The only advantage to STANDARD is slightly more efficient access in the called
program.
Note. If you specify STANDARD in a TNS/E program, the ECOBOL compiler issues a
warning and uses 32-bit addressing.
ACCESS MODE IS EXTENDED-STORAGE
STANDARD
VST097.vsd