HP 3000 Manuals HP 3000 Manuals
ANSI Standard Compliance
The standards for COBOL were originally developed and defined by a
national committee of computer manufacturers and users known as the
Conference On Data Systems Languages (CODASYL). In 1960, under the
guidance of this committee, the first official version of COBOL was
designed, called COBOL'60. Since then subsequent versions were developed
that significantly extended the power of the language. Later versions,
ANSI COBOL'68, ANSI COBOL'74, and ANSI COBOL'85, followed the standards
published and sanctioned by ANSI.[REV BEG] In 1989, ANSI published an
addendum that adds intrinsic functions to the language.[REV END]
ANSI COBOL'85 [REV BEG]and the functions addendum are organized on the
basis of one nucleus and 11[REV END] functional processing modules.
These elements are summarized in Table 1-1 . Each module contains
either two or three functional levels. In all cases, the lower levels
are proper subsets of the higher level within the same module. The
lowest levels supply elements needed for basic or elementary operations;
the higher levels supply more extensive or sophisticated capabilities.
The full ANSI[REV BEG] COBOL is composed of the highest level of the
nucleus and of each module.[REV END]
Table 1-1. ANSI COBOL'85 Organization
--------------------------------------------------------------------------------------------
| | |
| Module | Function |
| | |
--------------------------------------------------------------------------------------------
| | |
| Nucleus | Contains language elements necessary for internal processing. |
| | |
--------------------------------------------------------------------------------------------
| | |
| Sequential I/O Module | Provides language elements for definition and access of |
| | sequentially organized external files. |
| | |
--------------------------------------------------------------------------------------------
| | |
| Relative I/O Module | Provides capability for defining and accessing mass storage |
| | files in which records are identified by relative record number. |
| | |
--------------------------------------------------------------------------------------------
| | |
| Indexed I/O Module | Provides capability for defining and accessing mass storage |
| | files in which records are identified by the value of a key and |
| | accessed through an index. |
| | |
--------------------------------------------------------------------------------------------
| | |
| Sort/Merge Module | Provides sorting and merging operations in a COBOL program. |
| | |
--------------------------------------------------------------------------------------------
| | |
| Report Writer Module | Provides for semi-automatic production of printed reports. Not |
| | implemented in HP COBOL II. |
| | |
--------------------------------------------------------------------------------------------
| | |
| Segmentation Module | Provides overlaying of PROCEDURE DIVISION sections at object |
| | time. |
| | |
--------------------------------------------------------------------------------------------
| | |
| Source Text | Allows you to include predefined COBOL text into your program. |
| Manipulation | |
| | |
--------------------------------------------------------------------------------------------
| | |
| Debug Module | Offers a way to specify a debugging algorithm--the conditions |
| | under which data or procedure items are monitored during the |
| | execution of the program. |
| | |
--------------------------------------------------------------------------------------------
| | |
| Interprogram | Allows a program to communicate with other programs. |
| Communication Module | |
| | |
--------------------------------------------------------------------------------------------
| | |
| Communication Module | Provides ability to access, process, and create messages or |
| | portions of messages and to communicate through a message |
| | control system with local and remote communication devices. Not |
| | implemented in HP COBOL II.[REV BEG] |
| | |
--------------------------------------------------------------------------------------------
| | |
| Intrinsic Function | Provides 42 intrinsic or "built-in" COBOL functions including |
| Module | date and string functions, financial and statistical functions, |
| | trigonometric and other arithmetic functions. (These are not |
| | MPE intrinsics.)[REV END] |
| | |
--------------------------------------------------------------------------------------------
Hewlett-Packard's COBOL II compiler conforms to the high level of the
ANSI COBOL X3.23-1974 specification and to the high level[REV BEG] of the
ANSI COBOL X3.23a-1989 specification. It meets[REV END] the
corresponding level of the United States Government[REV BEG] Federal
Information Processing Standard as described in FIPS PUB 21-3.[REV END]
Some of the individual modules meet the high level requirements as
described in Table 1-2 .
Table 1-2. HP COBOL II Compiler Conformity Levels
----------------------------------------------------------------------------------------------
| | | |
| | | FIPS PUB 21-3 |
| | Level Supported by | Requirements for |
| ANSI COBOL'85 Module | HP COBOL II | High Level |
| | | |
----------------------------------------------------------------------------------------------
| | | |
| Nucleus | 2 | 2 |
| | | |
----------------------------------------------------------------------------------------------
| | | |
| Sequential I/O | 2 (1) | 2 |
| | | |
----------------------------------------------------------------------------------------------
| | | |
| Relative I/O | 2 | 2 |
| | | |
----------------------------------------------------------------------------------------------
| | | |
| Indexed I/O | 2 | 2 |
| | | |
----------------------------------------------------------------------------------------------
| | | |
| Source Text Manipulation | 2 | 2 |
| | | |
----------------------------------------------------------------------------------------------
| | | |
| Interprogram Communication | 2 | 2 |
| | | |
----------------------------------------------------------------------------------------------
| | | |
| Sort/Merge | 1 | 1 |
| | | |
----------------------------------------------------------------------------------------------
| | | |
| Debug | 1 | 2 (2) |
| | | |
----------------------------------------------------------------------------------------------
| | | |
| Segmentation | 2 | 2 (2) |
| | | |
----------------------------------------------------------------------------------------------
| | | |
| Report Writer | Not supported | 1 (2) |
| | | |
----------------------------------------------------------------------------------------------
| | | |
| Communication | Not supported | 2 (2) [REV BEG] |
| | | |
----------------------------------------------------------------------------------------------
| | | |
| Intrinsic Functions | 1 | 1[REV END] |
| | | |
----------------------------------------------------------------------------------------------
(1) Exceptions are PADDING CHARACTERS and RECORD DELIMITER.
(2) These are optional modules that are not required for high-level
implementation.
The HP COBOL II compiler is two compilers in one. That is, it contains
two entry points: ANSI74 and ANSI85. The ANSI74 entry point accepts
ANSI COBOL'74 syntax and semantics. The ANSI85 entry point provides an
ANSI COBOL'85 compiler. To use any of the ANSI COBOL'85 features, use
the ANSI85 entry point.
[REV BEG]
NOTE Use the option $CONTROL POST85 for intrinsic functions.
Hereafter in this manual, intrinsic functions will be referred to
as COBOL functions.
[REV END]
[REV
BEG]
Table 1-3 lists the terms used in this manual.[REV END][REV BEG]
Table 1-3. Terms Used in This Manual
--------------------------------------------------------------------------------------------
| | |
| This Term | Refers To |
| | |
--------------------------------------------------------------------------------------------
| | |
| ANSI COBOL'74 | The 1974 ANSI COBOL standard. |
| | |
--------------------------------------------------------------------------------------------
| | |
| ANSI COBOL'85 | The 1985 ANSI COBOL standard. |
| | |
--------------------------------------------------------------------------------------------
| | |
| ANSI74 | The compiler entry point used to invoke COBOL features of ANSI |
| | COBOL'74 plus HP extensions. |
| | |
--------------------------------------------------------------------------------------------
| | |
| ANSI85 | The compiler entry point used to invoke COBOL features of ANSI |
| | COBOL'85 plus COBOL functions and HP extensions. |
| | |
--------------------------------------------------------------------------------------------
| | |
| HP COBOLII | Refers to the HP compiler that implements ANSI COBOL'74, ANSI |
| | COBOL'85, and HP extensions on MPE systems. |
| | |
--------------------------------------------------------------------------------------------
[REV END]