IBM Enterprise COBOL for z/OS, V5.2 delivers support for the latest IBM z13 processor architectureIBM United States Software Announcement 215-027
January 14, 2015
|Table of contents|
|At a glance|
IBM® Enterprise COBOL for z/OS®, V5.2 exploits the capabilities of the z/Architecture® while adding a number of new features and enhancements:
For ordering, contact your IBM representative, an IBM Business Partner, or IBM Americas Call Centers at 800-IBM-CALL (Reference: LE001 ).
Back to top
IBM Enterprise COBOL for z/OS is a leading-edge, z/OS-based compiler that helps you create and maintain mission-critical, line-of-business COBOL applications to execute on your z/OS systems. Enterprise COBOL for z/OS gives you access to CICS, DB2, IMS, and other transactional and data systems.
Over the course of multiple releases, Enterprise COBOL for z/OS offered new and enhanced functions to provide you with the tools needed to modernize and maintain applications to meet your critical business needs. The following are some of the new and improved features within Version 5.2:
In addition, for COBOL applications in mobile and web solutions, the z/OS Client Web Enablement Toolkit provides JSON document parsing and generation. Install the PTF for APAR OA46575 to enable z/OS Client Web Enablement Toolkit support on z/OS, V2.1,
Enterprise COBOL for z/OS, V5.2 continues the IBM commitment to the COBOL programming language on the z/OS platform through investment in new compiler technology and the delivery of new features, many of them client requested. With Enterprise COBOL for z/OS, V5.2, you gain the benefit of new investment combined with more than 50 years of IBM experience in compiler development.
Back to top
Enterprise COBOL for z/OS, V5.2 requires:
For details, refer to the Software requirements section.
Back to top
|Planned availability date|
February 27, 2015
Back to top
Harness the power of z/Architecture advancements
New technology was delivered in Enterprise COBOL for z/OS, V5.1 to improve delivery of z/Architecture exploitation, maximize hardware utilization, and help improve application performance. The ARCH option was introduced to allow you to select the optimization and processor architecture level that the compiler generates code for. A new ARCH(11) now produces your application code that uses the instructions available on the latest z13 servers. Specifying ARCH(11) will instruct the compiler to include exploitation of the new z13 instructions. Specifying ARCH(11) may improve the performance for INSPECT Tallying or INSPECT REPLACING and for performing COMP-3 arithmetic in decimal floating point (DFP) in your COBOL application.
With the ARCH option set to ARCH(11), you can harness the power of the latest advancement in z/Architecture.
Enterprise COBOL for z/OS, V5.2 is introducing new, restored, and enhanced compiler options for more flexibility.
The RULES option helps identify code that you might want to change to improve your programs, such as opportunities for improved runtime performance, improved use of memory, and conformance to standard COBOL coding practices.
Qualify (EXTEND|COMPAT) option
The QUALIFY option allows users to control the behavior of name resolution and can enable references to data items that the COBOL would not allow, name references that the standard would describe as ambiguous.
The default of QUALIFY(COMPAT) indicates that normal COBOL name resolution rules apply.
QUALITY(EXTEND) allows some references that would be considered ambiguous under the current name resolution rules to be considered unique and therefore legal. In particular, if a reference is ambiguous because there is more than one match of qualifiers to identifiers, and if the reference is complete (i.e. every parent is specified) and there is only one data item with exactly that complete set of qualifiers, then it will result in a valid reference with QUALIFY(EXTEND).
Varying Length Record (VRL) option
The VRL option allows COBOL programmers to indicate the desired behavior for 'wrong length read' conditions either File Status=4 or File Status=0. For ease of migration File Status=0 is compatible with previous IBM COBOL compilers.
For VLR(STANDARD), programs get status value 04 when READ statements encounter a record length conflict or when the record is shorter than the minimum length or larger than the maximum length indicated in the record description. This behavior is consistent with the COBOL 85 standard, as well as the behavior of COBOL VS II, COBOL/370 and COBOL for MVS and VM.
For VRL(COMPAT), programs get status value 00 when READ statements encounter a record length conflict, or 'wrong length record'. This is consistent with the behavior of Enterprise COBOL since Version 3.
VRL(COMPAT) is also available in the previous release through the Enterprise COBOL for z/OS, V5.1.1 PTF (APAR PI22094).
The COPYRIGHT option places a string in the object module, if generated. This string is loaded into memory with any load module into which this object is linked.
The SERVICE option places a string in the object module, if generated. This string is loaded into memory with any program object into which this object is linked, and if the LE dump includes a traceback, this string will be included in that traceback.
The XMLPARSE option allows COBOL programmers to indicate which XML PARSE is used. For ease of migration, XMLPARSE(COMPAT) provides compatibility with the Enterprise COBOL V3 parser.
XMLPARSE selects the parser to be used for XML processing in your program.
XMLPARSE(XMLSS) option indicates use of the z/OS XML System Service parser with the following XML parsing capabilities:
XMLPARSE(COMPAT) option indicates use of the XML parser that is a built-in component of the COBOL runtime.
XMLPARSE(COMPAT) is also available in the previous release through the Enterprise COBOL for z/OS, V5.1.1 PTF (APAR PI22094).
MAP with new suboptions HEX and DEC
The MAP option causes the compiler to produce a listing of the items defined in the DATA DIVISION. New suboptions for the MAP compiler option allow users to choose hexadecimal or decimal offsets for MAP output in the compiler listing. For ease of migration, MAP(HEX) provides compatibility with earlier COBOL compilers.
New suboptions of MAP:
If MAP is specified with no suboptions, MAP(HEX) is assumed. This restores the default behavior of the MAP option of the Enterprise COBOL Version 4 behavior.
The new suboptions of MAP are also available in the previous release through the Enterprise COBOL for z/OS, V5.1.1 PTF (APAR PI19678).
The SIZE option affected the amount of virtual storage to be made available to the compiler during compilation. The Enterprise COBOL compiler front-end now acquires storage dynamically, as it needs it, from the Language Environment® (LE) heap. As a result, the SIZE option is no longer required to ensure that enough memory is available to compile large programs.
An informational message now appears in the listing whenever this option is used.
COBOL language enhancements
Conformance to ISO COBOL 2002
IBM extensions to COBOL
Additional compiler enhancements
XML GENERATE statement
The XML GENERATE statement is again improved, with more powerful SUPPRESS capabilities. The WHEN phrase of the XML GENERATE statement can be omitted to allow unconditional suppression of a named identifier when generating XML output.
In addition, the generic-suppression-phrase of the XML GENERATE statement behavior is changed to be more flexible by deferring the decision about what gets excluded until runtime.
AMODE 24 execution of COBOL programs is restored into version 5. Many programs compiled by Enterprise COBOL V5 will now execute in either AMODE 24 or AMODE 31.
AMODE 24 is also available in the previous release through the Enterprise COBOL for z/OS, V5.1.1 PTF (APARs PM93583 and PI12151).
IMS SQL coprocessor
A new coprocessor, IMS SQL coprocessor (called SQL statement coprocessor by IMS), handles source programs that contain embedded SQLIMS statements. The new SQLIMS compiler option enables the IMS SQL coprocessor.
IMS SQL coprocessor is also available in the previous release through the Enterprise COBOL for z/OS, V5.1.1 PTF (APAR PM92523).
COBOL Runtime enhancements
COBOL support for Extended VSAM addressability
COBOL product-related enhancements
Accessibility by people with disabilities
A US Section 508 Voluntary Product Accessibility Template (VPAT) containing details on accessibility compliance can be requested at
Section 508 of the US Rehabilitation Act
IBM Enterprise COBOL for z/OS, V5.2 is capable as of February 27, 2015, when used in accordance with associated IBM documentation, of satisfying the applicable requirements of Section 508 of the Rehabilitation Act, provided that any assistive technology used with the product properly interoperates with it. A US Section 508 Voluntary Product Accessibility Template (VPAT) can be requested on the following Web site
Back to top
Enterprise COBOL is a premier enterprise class COBOL compiler for the z/OS system. It is a proven and reliable program. It delivers innovation for modernizing business-critical applications, programming features to increase programmer productivity, and bolsters the overall benefits of transactional and data systems such as CICS, IMS, and DB2.
New z Systems hardware is becoming increasing complex. Enterprise COBOL for z/OS, V5.2 delivers advanced compiler support to allow you to fully benefit from hardware advancements. With the introduction of the new ARCH and enhanced OPTIMIZE compiler options, the Enterprise COBOL for z/OS compiler is now capable of unleashing the full power of IBM processors delivered in the various models of z Systems hardware. COBOL programmers no longer need a deep understanding of z architecture to exploit leading-edge performance of new z Systems hardware. Developers only need to focus on the logic of the applications and let the compiler determine the best way to transform and optimize the code generation for the z Systems hardware on which the application will run. With Enterprise COBOL for z/OS, V5.2 you increase the return on your hardware and middleware investments. With the implementation of advanced code generation and optimization technology, Enterprise COBOL for z/OS, V5.2 establishes a foundation for delivery of additional optimization features and exploitation of future z/Architecture.
With its enhanced capabilities, simplified programming, and increased programmer productivity, you can continue to use Enterprise COBOL for z/OS to modernize existing business-critical applications. Modernization enables the reuse of your proven business logic. You can deliver new enhancements quicker and with less cost and lower risk. You can add modern graphical user interfaces to business-critical COBOL applications or extend them to work with web, cloud, or mobile infrastructures. Built on proven applications, there is no need for you to write from scratch.
With the investment in new compiler technology and the continued delivery of new features, many of them client requested, Enterprise COBOL for z/OS, V5.2 reaffirms the IBM commitment to COBOL on z/OS. You gain the benefit of new investment combined with more than 50 years of IBM experience in compiler development.
Business Partner information
If you are a Direct Reseller - System Reseller acquiring products from IBM, you may link directly to Business Partner information for this announcement. A PartnerWorld® ID and password are required (use IBM ID).
Back to top
|Hardware and software support services|
IBM SmoothStart Services and Installation Services are not provided.
Back to top
Program Program name number IBM Enterprise COBOL for z/OS, V5.2 5655-W32
Back to top
Specified operating environment
Enterprise COBOL for z/OS, V5.2 will run on the following IBM z Systems servers:
Enterprise COBOL for z/OS, V5.2 runs under the control of, or in conjunction with, the currently supported releases of the following programs and their subsequent releases or their equivalents. For more information on the following programs listed that require program temporary fixes (PTFs), refer to the Program Directory and the preventive service planning (PSP) bucket.
z/OS V1.13 (5694-A01), or later
z/OS V2.1 (5650-ZOS), or later
Optional licensed programs
Depending on the functions used, one or more of the following programs may be required:
Enterprise COBOL for z/OS, V5.2 in this announcement is supported for use only with the announced and currently supported levels of IBM software listed above. Enterprise COBOL for z/OS, V5.2 should continue to work with certain earlier, unsupported IBM software products.
IBM will undertake to fix problems found by using Enterprise COBOL for z/OS, V5.2 in this announcement with the above mentioned earlier, unsupported product levels. IBM must be able to reproduce the problem using a supported level of the same product. If the problem can be reproduced and fixed, the fix will be developed and tested using supported levels of IBM software. If a fix is made available, it is likely to work on the unsupported product level; however, IBM can not guarantee that the fix will work with the unsupported product.
Enterprise COBOL for z/OS, V5 provides a high level of source compatibility, object compatibility, and runtime compatibility with prior versions of IBM COBOL.
Enterprise COBOL V5 is source compatible with earlier versions of IBM COBOL, in that the compiler will compile correct COBOL source programs that were developed using Enterprise COBOL V4 or earlier, with the exception of obsolete functions that were removed and the addition of new reserved words. The removed functions include obsolete COBOL language syntax and obsolete compiler options. Complete details on removed obsolete functions are documented in the Enterprise COBOL for z/OS, V5 Migration Guide. IBM does not expect that many applications will be affected by the removed functions, which in practice are no longer heavily used. To assist in migration, a new compiler option FLAGMIG is added to Enterprise COBOL V4.2 through the service stream. This option provides warning diagnostics to flag use of obsolete syntax and options in existing COBOL programs.
Enterprise COBOL V5 is object compatible with prior versions of IBM COBOL, in that applications can be constructed using a mixture of object modules compiled with Version 5 and those compiled with prior versions. Both static calls (calls within a link-edited module) and dynamic calls (calls between programs link-edited as separate modules) can be used. The following are exceptions:
Enterprise COBOL V5 is run time compatible with prior versions of IBM COBOL in that correct COBOL programs will continue to produce the same run time results after being recompiled with Version 5. A small number of exception cases are documented in the Enterprise COBOL for z/OS, V5 Migration Guide.
The Enterprise COBOL for z/OS, V5.2 package includes:
Security, auditability, and control
The announced program uses the security and auditability features of the host operating system software. The customer is responsible for evaluation, selection, and implementation of security features, administrative procedures, and appropriate controls in application systems and communication facilities.
Back to top
Ordering z/OS through the Internet
ShopzSeries provides an easy way to plan and order your z/OS ServerPac or CBPDO. It will analyze your current installation, determine the correct product migration, and present your new configuration based on z/OS. Additional products can also be added to your order (including determination of whether all product requisites are satisfied). ShopzSeries is available in the US, Canada, and several countries in Europe. In countries where ShopzSeries is not available yet, contact your IBM representative (or IBM Business Partner) to handle your order via the traditional IBM ordering process. For more details and availability, visit the ShopzSeries website at
Current licensees of IBM Enterprise COBOL for z/OS, V5.2 must order this release via MES.
- Orders for new licenses can be placed now.
- Customers whose orders ship before the planned availability will receive Enterprise COBOL for z/OS, V5.1.
- Customers whose orders ship after the planned availability date will receive Enterprise COBOL for z/OS, V5.2.
- New users of Enterprise COBOL for z/OS, V5 should specify Type: 5655 Model: W32. New Users will receive Enterprise COBOL for z/OS, V5.2.
- The previous release, Enterprise COBOL for z/OS, V5.1, is therefore withdrawn from marketing and replaced with Enterprise COBOL for z/OS, V5.2.
For ordering information on Enterprise COBOL for z/OS, V5, refer to Software Announcement 213-144, dated April 23, 2013.
Product deliverabless are shipped only via CBPDO and ServerPac. These customized offerings are offered for Internet delivery in countries where ShopzSeries product ordering is available. Internet delivery reduces software delivery time and allows you to install software without the need to handle tapes. For more details on Internet delivery, refer to the Shopz help information at
You choose the delivery method when you order the software. IBM recommends Internet delivery. In addition to Internet and DVD, the supported tape delivery options include:
Most products can be ordered in ServerPac the month following their availability in CBPDO. z/OS can be ordered via CBPDO and ServerPac at general availability. Many products will also be orderable in a Product ServerPac without also having to order the z/OS operating system or subsystem.
Shopz and CFSW will determine the eligibility based on product requisite checking. For more details on the product ServerPac, visit the Help section on the Shopz website at
For additional information on the Product ServerPac option, refer to Software Announcement 212-272, dated July 31, 2012.
Production of software product orders will begin on the planned general availability date.
Back to top
|Terms and conditions|
The terms for Enterprise COBOL for z/OS, V5, as previously announced in Software Announcement 213-144, dated April 23, 2013, licensed in the IBM Customer Agreement, are unaffected by this announcement.
Back to top
The pricing information for Enterprise COBOL for z/OS, V5, as previously announced in Software Announcement 213-144, dated April 23, 2013, remains unaffected by this announcement.
Contact your IBM representative for information on the current prices for this program.
Back to top
To order, contact the Americas Call Centers or your local IBM representative, or your IBM Business Partner.
To identify your local IBM representative or IBM Business Partner, call 800-IBM-4YOU (426-4968).
Phone: 800-IBM-CALL (426-2255) Fax: 800-2IBM-FAX (242-6329) Email: firstname.lastname@example.org Mail: IBM Teleweb Customer Support ibm.com® Sales Execution Center, Americas North 3500 Steeles Ave. East, Tower 3/4 Markham, Ontario Canada L3R 2Z1
The Americas Call Centers, our national direct marketing organization, can add your name to the mailing list for catalogs of IBM products.
Note: Shipments will begin after the planned availability date.
IMS, z13, MVS, z Systems and z10 are trademarks of IBM Corporation in the United States, other countries, or both.
IBM, z/OS, z/Architecture, CICS, DB2, System z, Language Environment, PartnerWorld, zEnterprise, z9, Rational, OS/390 and ibm.com are registered trademarks of IBM Corporation in the United States, other countries, or both.
Oracle and Java are trademarks of Oracle and/or its affiliates in the United States, other countries, or both.
Other company, product, and service names may be trademarks or service marks of others.
For the most current information regarding IBM products, consult your IBM representative or reseller, or visit the IBM worldwide contacts page