DIGITAL Software Product Description ___________________________________________________________________ PRODUCT NAME: DIGITAL COBOL Version 2.5 for OpenVMS Alpha Systems SPD 45.92.07 DESCRIPTION DIGITAL COBOL for OpenVMS Alpha Systems is a high-level language for business data processing that operates on the OpenVMS Alpha Operating System. DIGITAL COBOL (formerly named DEC COBOL) is based upon the 1985 ANSI COBOL Standard X3.23-1985 as modified by the X.23a-1989 amendment and is closely compatible with VAX COBOL, DIGITAL COBOL for DIGITAL UNIX and DIGITAL COBOL for Windows NT Alpha Systems. DIGITAL COBOL has been validated at the high level by the National Bureau of Standards for conformance to FIPS PUB 21-3, Federal Standard COBOL. DIGITAL COBOL includes various industry standard and DIGITAL extensions to COBOL, including screen handling at the source language level,file sharing, the ANSI Report Writer facility, and most X/Open features. The COPY FROM DICTIONARY statement, a DIGITAL COBOL extension, allows access to common record definitions stored in Oracle CDD/Repository[TM] for OpenVMS Alpha. Oracle CDD/Repository must be installed to use this feature. The Data Manipulation Language (DML), another DIGITAL COBOL extension, allows users to write programs that access DBMS databases using the Oracle DBMS database product. The optional DIGITAL COBOL DBMS program- ming license option as well as the Oracle CODAYSL DBMS[TM] product are February 1998 required to make use of these features. In addition, a separate manual, DIGITAL COBOL DBMS Database Programming, which describes the syntax and usage of the Oracle CODAYSL DBMS support, is available. For recent release specific technical information such as feature en- hancements, bug fixes, restrictions and compatibility charts, please refer to the DIGITAL COBOL V2.5 Release Notes. DIGITAL COBOL supports the industry-standard SCREEN SECTION (as specified in the X/Open[TM] Portability Guide, Release 3). The SCREEN SECTION makes it easier and more efficient to design user-interface screens and to accept and display a full screen of data with a single ACCEPT statement and a single DISPLAY statement, instead of multiple statements. For added flexibility and for compatibility with VAX COBOL, the following additional DIGITAL extensions to COBOL are implemented in DIGITAL COBOL: o Screen handling is implemented using the DISPLAY and ACCEPT statements. The DISPLAY statement enables a programmer to display information or prompts anywhere on a video screen. The ACCEPT statement takes information typed anywhere on the screen and returns the value to a running DIGITAL COBOL program. The DISPLAY statement converts data from internal numeric format to ASCII display format; and the ACCEPT WITH CONVERSION statement converts ASCII display input characters to internal numeric formats, as appropriate. The terminal-type is recognized at run time from information provided by the operating system. o RMS-STS and RMS-STV special registers may be examined to assist de- bugging. These registers contain status values from the Record Man- agement System (RMS) for OpenVMS. o File sharing and record locking features enable more than one user to access data at the same time. o Many file capabilities are available through RMS, including exten- sions for descending keys and duplicate primary keys. o Conditional compilation serves to make debugging easier. 2 o Access to Oracle CDD/Repository record and field definitions is avail- able. o Source program terminal format recognition is supported. o CIT3 (COBOL Intermediate Temp) for increased arithmetic compati- bility with the current release of VAX COBOL is now available. o ACCEPT support for 4-digit years. DIGITAL COBOL implements several statements designed to make program- ming easier in the OpenVMS environment: o CALL statement extensions: BY VALUE, BY DESCRIPTOR, OMITTED, and GIVING o VALUE IS EXTERNAL - Access to link time constants o USAGE IS POINTER - Address data type o VALUE IS REFERENCE - Compile time address evaluation o SET TO REFERENCE - Run-time address evaluation o SUCCESS/FAILURE - Class conditions Other extensions include: o Thirty-one-character user names o ACCEPT AT END statement o Single-quote-delimited, non-numeric literals o Hyphen/underscore equivalence in user names o Non-numeric literal argument passing o D-float, F-float, G-float, and IEEE floating point handling o X/Open SCREEN SECTION o X/Open specified RETURN-CODE special register o X/Open specified ASSIGN TO syntax o X/Open file sharing and record locking features 3 o X/Open command line and logical names support via ACCEPT and DISPLAY o X/Open LINE SEQUENTIAL o Enhanced support for "foreign" extensions with improved diagnos- tic messages The DIGITAL COBOL compiler produces an object module from a source pro- gram. The compiler is capable of producing a source listing with em- bedded diagnostics indicating the line and position of a source-code error, a machine language listing, a file-name map, a data-name map, a procedure-name map, an external program name map, and a cross-reference listing. The cross-reference listing and maps may be produced in ei- ther alphabetical order or in order of declaration. The cross-reference listing distinguishes destructive references to data from read-only references. DIGITAL COBOL provides support for error diagnostics and cross-reference information to DIGITAL Language-Sensitive Editor/Source Code Analyzer for OpenVMS Alpha. Object modules produced by the compiler can be linked with other ob- ject modules produced by many other languages, including DEC C and Dig- ital Fortran. DIGITAL COBOL is supported by both the OpenVMS Alpha Run- Time Libraries and the OpenVMS Debugger. The DIGITAL COBOL product includes a COBOL compiler and the REFORMAT utility. The REFORMAT utility converts source programs from DIGITAL terminal format to ANSI-standard COBOL format and vice versa. Run-Time Library Redistribution The DIGITAL COBOL kit includes updated Run-Time Library shareable im- ages. DIGITAL grants the user a nonexclusive, royalty-free, worldwide right to reproduce and distribute the executable version of the run- time libraries designated as DEC$COBRTL.EXE and LIBOTS2.EXE (the "RTLs") for DIGITAL COBOL on the OpenVMS Alpha platform, provided that the user: 4 o Distributes the RTLs only in conjunction with and as a part of the user's software application product that is designed to operate in the OpenVMS environment. o Does not use the DIGITAL name, logo, or trademarks to market the user's software application product. o Includes the DIGITAL copyright notice for DIGITAL COBOL on the user's product disk label and on the title page of the documentation for software application product. o Agrees to indemnify, hold harmless, and defend DIGITAL from and against any claims or lawsuits, including attorney's fees, that arise or result from the use or distribution of the software application prod- uct. Except as expressly provided herein, DIGITAL grants no implied or express license under any of its patents, copyrights, trade se- crets, trademarks, or any license or other proprietary interests and rights. HARDWARE REQUIREMENTS Alpha: AlphaServer 400 Products AlphaServer 1000 Products AlphaServer 2000 Products AlphaServer 2100 Products AlphaServer 8200 Products AlphaServer 8400 Products DIGITAL 2100 Server Products AlphaStation 200 Products AlphaStation 250 Products AlphaStation 400 Products AlphaStation 600 Products DEC 2000 Models 300/500 5 DEC 3000 Model 300, 300L, 300LX DEC 3000 Model 400, 400S DEC 3000 Model 500, 500S, 500X DEC 3000 Model 600, 600S DEC 3000 Model 700, 700LX DEC 3000 Model 800, 800S DEC 3000 Model 900, 900LX DEC 4000 Model 600 DEC 4000 Model 700 DEC 7000 Model 600 DEC 7000 Model 700 DEC 10000 Model 600 Disk Space Requirements (Block Cluster Size = 1) Disk space required for 18,000 blocks installation: (9 MB) Disk space required for 16,000 blocks permanent use: (8 MB) These block counts refer to the disk space required on the system disk. The sizes are approximate; actual sizes may vary depending on the user's system environment, configuration, and software options selected. OPTIONAL HARDWARE A VT100 family, VT200 family, VT300 family, or VT400 family terminal is required for the screen handling extensions to the ACCEPT and DIS- PLAY statements. 6 CLUSTER ENVIRONMENT This layered product is fully supported when installed on any valid and licensed VMScluster configuration without restrictions. The HARD- WARE REQUIREMENTS section of this product's Software Product Descrip- tion detail any special hardware required by this product. VMScluster configurations are fully described in the VMScluster Soft- ware Product Description (29.78.xx) and include CI, Ethernet, and Mixed Interconnect configurations. SOFTWARE REQUIREMENTS OpenVMS Alpha Operating System Version 6.1-Version 7.1 (SPD 25.01.xx) OpenVMS Tailoring The following OpenVMS classes are required for full use of features of this layered product: o OpenVMS Required Save Set o Programming Support o Utilities For more information on OpenVMS classes and tailoring, refer to the OpenVMS Operating System for VAX and Alpha Software Product Descrip- tion (SPD 25.01.xx). OPTIONAL SOFTWARE DIGITAL Language-Sensitive Editor/Source Code Analyzer (LSE/SCA) Ver- sion 4.5 (included in DECset Version 12.2) for OpenVMS Alpha Systems (SPD 42.29.xx). Required to use /ANALYSIS_DATA qualifier or Language-Sensitive Ed- itor Component. Oracle CDD/Repository 7 Required to use DIGITAL COBOL COPY FROM DICTIONARY Feature. Oracle CODASYL DBMS Required to use Data Manipulation Language (DML) extensions. GROWTH CONSIDERATIONS The minimum hardware/software requirements for any future version of this product may be different from the requirements for the current version. Note: A version update represents a complete distribution media replace- ment for the previous release of DIGITAL COBOL. All user-developed source modules that comprise an application must be recompiled and rebuilt using only DIGITAL COBOL software for that version update. Individ- ual components of DIGIGTAL COBOL software from the latest version up- date cannot be used in conjunction with components from a previous ver- sion. DISTRIBUTION MEDIA This product is distributed on the OpenVMS Alpha Software Library Pack- age (QA-03XAA-H8). Online only documentation is distributed on the Open- VMS Alpha Online Documentation Library (QA-4KM8A-G8), and binaries only are distributed on the OpenVMS Alpha Software Library Package (QA-4KL8A- A8). These CD-ROMs contain the DIGITAL COBOL for Alpha OpenVMS Sys- tems software binaries and online documentation in Bookreader[TM] and POSTSCRIPT[R] format. The DIGITAL COBOL for OpenVMS Alpha Systems Doc- umentation is also available in hard copy, which can be ordered sep- arately. ORDERING INFORMATION DIGITAL COBOL for OpenVMS Alpha Systems Software Licenses: Personal Use: QL-099AA-2B 8 Concurrent Use: QL-099A*-3* Unlimited System Use: QL-0JUA*-** Software Media/Documentation (CD-ROM): QA-0JUAA-H8 Software Documentation (Hard Copy): QA-0JUA*-GZ Software Product Services: QT-0JUA*-** DIGITAL COBOL DBMS Support Option for OpenVMS Alpha Systems Software Licenses: Concurrent Use: QL-355A*-3* Unlimited System Use: QL-355A*-** Software Documentation (Hard Copy): QA-355A*-GZ * Denotes variant fields. For additional information on available li- censes, services, and media, refer to the appropriate price book. SOFTWARE LICENSING This software is furnished only under a license. For more information about DIGITAL'S licensing terms and policies, contact your local DIG- ITAL office. License Management Facility Support This layered product supports the OpenVMS Alpha License Management Fa- cility. License units for this product are allocated on an Unlimited System Use plus Personal and Concurrent Use basis. Each Personal Use license allows one identified individual to use the layered product. Each Concurrent Use license allows any one individ- ual at a time to use the layered product. 9 For more information on the License Management Facility, refer to the OpenVMS Operating System for VAX and Alpha Software Product Descrip- tion (SPD 25.01.xx) or the OpenVMS Alpha Operating System documenta- tion. SOFTWARE PRODUCT SERVICES A variety of service options are available from DIGITAL. For more in- formation, contact your local DIGITAL office. SOFTWARE WARRANTY Warranty for this software product is provided by DIGITAL with the pur- chase of a license for the product. This means that DIGITAL will rem- edy any nonconformance when it is reported to DIGITAL by the customer during the warranty period. The warranty period is one year. It begins when the software is in- stalled or thirty days after delivery to the end user, whichever oc- curs first, and expires one year later. All warranty related support for this software will end one year after release of the subsequent versions. Warranty is provided in the country of purchase. DIGITAL will provide a service location that will accept reporting (in format prescribed by DIGITAL) of a nonconformance problem caused when using the licensed software under normal conditions as defined by this SPD. DIGITAL will remedy a nonconformance problem in the current unaltered release of the licensed software by issuing correction information such as: cor- rection documentation, corrected code, or a notice of availability of corrected code; a restriction; or a bypass. The customer will be re- sponsible for the preparation and submission of the problem report to the service location. 10 WARRANTY EXCLUSION DIGITAL does not warrant that the software licensed to customer shall be error free, that the software shall operate with any hardware and software other than as specified in this SPD, that the software shall satisfy customer's own specific requirements, or that copies of the software other than those provided or authorized by DIGITAL shall con- form to the SPD. DIGITAL makes no warranties with respect to the fitness and operabil- ity of modifications not made by DIGITAL. If the software fails to function for reasons stated previously, the customer's warranty will be invalidated and all service calls will be billable at the prevailing per call rates. This Software Warranty is effective for licensed software products or- dered in the United States after October 1988 and supersedes all prior versions. EXCLUSIVE REMEDY. DIGITAL's and its suppliers' entire liability and your exclusive remedy for Software which does not conform to DIGITAL's Limited Warranty shall be, at DIGITAL's option, either (1) repair or replacment of the nonconforming Software, or (2) refund of your pur- chase price. The previous information is valid at time of release. Please contact your local DIGITAL office for the most up-to-date information. [TM] AlphaServer, AlphaStation, Bookreader, CI, DEC, DEC C, DEC COBOL, Digital Fortran, DECset, DECwindows, DIGITAL, OpenVMS, VAX, VAXcluster, VAX COBOL, VT100, VT220, VT300, VT420, and the DIGITAL Logo are trademarks of Digital Equipment Corporation. [R] POSTSCRIPT is a registered trademark of Adobe Systems Incorporated. 11 [R] "X" device is a registered trademark and [TM] X/Open is a trademark of X/Open Company Limited. [R] Oracle is a registered trademark and [TM] Oracle CODASYL DBMS and Oracle CDD/Repository are trademarks of Oracle Corporation. © 1998 Digital Equipment Corporation. All rights reserved. 12