Standard COBOL 85 requires that program-name be specified as a user-defined word. IBM COBOL compilers extends the standard rule and allow program-name to be a user-defined word or alphanumeric literal, but not a figurative constant, that identifies your program. It must follow the following rules of formation, depending on the setting of the PGMNAME compiler option:
PGMNAME(COMPAT) If program-name is an alphanumeric literal, the rules for the name are the same except that the extension characters $, #, and @ can be included in the... [More]
With COBOL for z/OS, V5.1, you can use the ARCH option to specify the machine architecture for which your executable program instructions are to be generated.
The syntax is ARCH( n ). Parameter n is an integer between 6 and 10 inclusive, specifying the machine architecture for which instructions are to be generated. ARCH(6) is default.
If you specify a higher ARCH level, the compiler generates code that uses newer and faster instructions. Your application might abend if it runs on a processor with an architecture level lower than... [More]
End markers are a combination of words followed by a separator period that indicates the end of a COBOL program, method, class, factory, or object definition. The following end marks are IBM extensions for both AIX and Enterprise. Please pay attention to the conventions when you use them:
For programs - program-name must be identical to the program-name of the corresponding PROGRAM-ID paragraph. Every COBOL program, except an outermost program that contains no nested programs and is not followed by another batch program, must end... [More]
Enterprise COBOL Developer Trial for z/OS, V5.1 is now available. The Trial lets you assess the value that could be gained from migrating to Enterprise COBOL for z/OS , V5.1, before making a formal, upgrade decision. This trial enables the evaluation of the latest IBM COBOL capabilities, in a non-production environment, without the prerequisite time and resources commitments required for a full, production migration project.
For more information please visit the following URL:
Watch as James Governor, Principal Analyst and Founder, RedMonk, and Kevin Stoodley, IBM Fellow and CTO, IBM Rational, discuss the benefits of the new IBM Enterprise COBOL compiler for z/OS. Jeff Heath, Development Manager, IBM Rational, demonstrates some of the benefits of this new version.
As mentioned in the video, please ask any followup questions in our COBOL Cafe forum .
In COBOL for z/OS, V5,1, when compiling your source files that are too complex or in a relatively large size, and if you have specified the OPTIMIZE level, it may take excessive amount of time or storage. Thus a new compiler option, MAXPCF , is introduced to allow you to control the amount of time and storage used when optimizing a program. You can specify the maximum program complexity factor with this option. The new term, Program Complexity Factor (PCF), is a value calculated by the compiler, and represents the complexity of the program... [More]
COBOL for AIX version 4.1 introduces a new utility, the source conversion utility (scu), to assist the conversion of programs in non-IBM COBOL source formats.
The main function for utility is to “normalize” COBOL source input text so that the resulting output source text can be compiled by IBM COBOL for AIX V4.1. The input formats that are specifically addressed are some non-IBM fixed-format source and COBOL standard free-format source.
The individual transformations done by scu includes the following:
The COBOL for AIX compiler supports the extended source format as an IBM extension.
Fixed source format consists of the following areas in a 72-character line. Extended source format consists of the following areas in a 252-character line.
Sequence number area
Columns 1 through 6
Columns 8 through 11
Columns 12 through 72 in fixed source format
Columns 12 through 252 in extended source format
Note that... [More]
To define variable length tables in COBOL, we usually specify the OCCURS ... DEPENDING ON clause in the data description entry for an item contained within a group structure. While this defines an item with a variable number of occurrences at run time, in earlier versions before Enterprise COBOL V5.1, we also need to specify a maximum number of occurrences in the syntax , and hence a maximum size for the table and the containing group, which causes usability problems in some contexts.
In particular, this problem occurs when... [More]
IBM® extensions are features, syntax rules, or behavior defined by IBM rather than by the COBOL standards.
In the Appendix of COBOL Language Reference, a table lists IBM extensions with a brief description. If an item is listed as an extension, all related rules are also extensions. For example, USAGE DISPLAY-1 for DBCS characters is listed as an extension; its many uses in statements and clauses are also extensions, but are not listed separately.
This blog entry and the folloing ones aim to introduce these IBM extensions... [More]
Enterprise COBOL for z/OS V5.1 was announced on April 23, 2013 and became generally available on June 21, 2013. This new compiler was re-architected to include an advanced technology framework for optimizing COBOL applications and exploiting z/Architecture, including the latest zBC12 hardware, providing significant performance improvements over Enterprise COBOL V4. These performance improvements will reduce CPU utilization and lower operating costs for customers running business critical applications. Enterprise COBOL... [More]
SHARE in Boston is being held August 11-16 at the Hynes Convention Center. IBM’s own “Captain COBOL”, Tom Ross, will be presenting two highly informative sessions on IBM Enterprise COBOL for z/OS, V5.1.
Session 13792: ZOMG The Next COBOL Compiler Has Arrived! will discuss all of the new features that IBM’s developers have added to Enterprise COBOL for z/OS, V5.1 such as the exploitation of the latest zArchitecture, improved XML PARSE and XML GENERATE, the ability to improve the performance of your... [More]
At Innovate 2013 right now? Want to learn about, and gain experience with, the recently announced Enterprise COBOL for z/OS, V5.1 in a workshop run by two members of the compiler development team? It's not too late to enroll in hands-on technical workshop WKS-2280 (Wednesday at 8am).
This workshop offers first-hand experience on new optimization, debugging, and programming features (e.g XML, UTF-8) shipped in this product and will be a combination of lecture, demonstration, and hands-on exercises. As a... [More]