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]
In addition to the fixed indicators that can be specified in the indicator area of the source reference format, there is a new floating comment indicator (*>) introduced by COBOL for AIX, V4.1. You can use the floating comment indicator in both the extended format and in the fixed format.
A comment indicator indicates a comment line when specified as the first character-string in the program text area (Area A plus Area B). It can also indicate an inline comment when specified following one or more character-strings in the program text... [More]
Though it has been half century that COBOL has been around, it is still the most dominant language for running business-critical applications, and it is the backbone for organizations everywhere. Among them, a majority of the business transactions processed by COBOL run on IBM System z hardware. Given this , IBM is making a latest refresh to this venerable language on z/OS, the V5.1 release will go alive on June 21!
Generally speaking, IBM says the Enterprise COBOL for z/OS, V5.1 compiler will give applications a 15-20... [More]
The Fix Central website provides fixes and updates for system's software, hardware, and operating system. You can search, select, order and download fixes to your system with a choice of delivery options. To help you locate and obtain fixes in an efficient way, Fix Central is designed to provide multiple search and ordering options. You can select your favorate search criteria that include the following:
Search by APAR or SPR identifier (search by the unique string)
Search by Fix... [More]
Thank you for joining our webcast today
Here is the link to the presentation deck used in the session:
You can listen to or download a replay of the webcast at this link .
Attending Innovate ? Want to learn about, and gain experience with, the recently announced Enterprise COBOL for z/OS, V5.1 ? Enroll in hands-on technical workshop WKS-2280.
The workshop will offer an overview of the new Enterprise COBOL for z/OS V5.1 compiler. The format of the workshop will be a combination of lecture, demonstration and hands-on exercises. As a participant in the workshop you will have the opportunity to use Rational Developer for z to complete the hands-on portion of the workshop.
In earlier versions of COBOL for AIX, WSCLEAR cleared all of a program's WORKING-STORAGE data items. Beginning with Version 4, WSCLEAR clears a program's non-EXTERNAL data items in WORKING-STORAGE to binary zeros at initialization.
With COBOL for AIX, V4.1.1, you can use WSCLEAR with a new suboption, nnn (an integer between 0 and 255), to initialize each byte of WORKING-STORAGE data to a specific value. The storage is initialized before any VALUE clauses are applied.
See the syntax of WSCLEAR... [More]
z/OS supports simplified processing of multiple versions of related data. The sequences of different generations of data or updates to the data are known as generation data groups (GDGs). Each data set in the group is called a generate data set (GDS) or simply generation.
On AIX, “file” is the equivalent term for “data set” on z/OS. Grouping related files offers the following advantages:
All of the files in the group can be referred to by a common name
The files in the group are kept in... [More]
In IBM mainframes, the queued sequential access method (QSAM) is widely used as an access method for files, or more properly data sets. But it has not been implemented in AIX systems. In COBOL for AIX, V4.1.1, a new file system, QSAM file system , is introduced to improve the file input-output performance. You can transfer QSAM files from the mainframe to AIX without the need to compile with -qhost . Simply use the FTP commands binary and quote site rdw . An exception here: If the file contains EBCDIC character data, compile the AIX COBOL... [More]
Extended source format is introduced in COBOL for AIX, V4.1. The new extended source format is divided into distinct areas as before, but permits lines varying in length from a minimum of 0 bytes to a maximum of 252 bytes. The following figures illustrate the key difference between the two formats: Fixed source format: Extended source format: For both formats, lines shorter than the maximum length are logically extended with space to the maximum length. You can use the SRCFORMAT option to indicate whether your COBOL source... [More]
We are pleased to announce the Managed Beta Program for IBM® Enterprise COBOL VNext, which will focus on new features, quality and performance. The enrollment deadline is 15 January 2013. The benefits of participating in this Beta include: Opportunity to influence the product and future product direction. Ability to test code and documentation, and ensure compatibility in their environment. Free education, code, and documentation during the Beta. Free support by development during the Beta for their questions and problems Competitive... [More]
COBOL Compilers are now live on the
Request for Enhancement (RFE) Community. It is a great place where you
can collaborate with development teams and other product users. Our development
team will review your RFE and provide status updates throughout its lifecycle.
Here is the link to the Community: COBOL RFE Looking forward to hearing from you.
Check out this webinar by IBM Systems Magazine about Smart Tools on IBM
i, AIX, and Linux for Faster Time to Market
Get an early look at
the next version of Rational's offerings for Power Systems. New advancements in
compilers and significantly enhanced development tools will give your
organization a competitive advantage!
Listen to the replay .