 ILE COBOL V6R1 The ILE COBOL compiler is part of the IBM WebSphere® Development Studio for System i ILE Compilers feature. The ILE Compiler feature also includes the ILE C, ILE C++ and ILE RPG compilers, and the Application Development ToolSet. Bringing the power and flexibility of the Integrated Language Environment (ILE) to the iSeries COBOL environment, the ILE COBOL for iSeries compiler gives you powerful functions to enhance your programming tasks. Businesses Can Depend on ILE COBOL. The next generation of the COBOL programming language for System i is here: Integrated Language Environment (ILE) COBOL.. ANSI-85 functions of ILE COBOL let you easily port code from other platforms to the iSeries system. Your investment in applications is protected, and you can move confidently into the future. We can help you increase your productivity with interlingual calls, interactive syntax checking, debugging facilities and lots more. Enhancements for V6R1 The following list describes the enhancements made to ILE COBOL in V6R1: - National UCS-2 CCSID Support
- Debugging complex OCCURS DEPENDING ON (ODO) arrays
- Improved support for large programs
- Program Call Markup language (PCML) can now be stored in the module
Enhancements for V5R4 The following list describes the enhancements made to ILE COBOL in V5R4: - XML support has been enhanced. A new statement, XML GENERATE, converts the content of COBOL data records to XML format. XML GENERATE creates XML documents encoded in Unicode UCS-2 or in one of several single-byte EBCDIC or ASCII CCSIDs.
- Nonnumeric literals can be null-terminated. They can be used anywhere a nonnumeric literal can be specified except that null-terminated literals are not supported in "ALL literal" figurative constants.
- New CRTBNDCBL/CRTCBLMOD option *NOCOMPRESSDBG/*COMPRESSDBG specifies whether listing view compression should be performed by the compiler when DBGVIEW option *LIST or *ALL is specified.
- New intrinsic functions:
- DISPLAY-OF
- NATIONAL-OF
- TRIM
- TRIML
- TRIMR
Enhancements for V5R3 The following list describes the enhancements made to ILE COBOL in V5R3: - Large VALUE clause support When the *NOSTDTRUNC compiler option is in effect, data items described with usage BINARY, or COMP-4 that do not have a picture symbol P in their PICTURE clause can have a value up to the capacity of the native binary representation.
- CONSTANT data type A CONSTANT data type is defined by specifying a level-01 entry containing the CONSTANT clause for a literal. The CONSTANT data item can then be used in place of the literal.
- XML support XML PARSE statement provides the interface to a high-speed XML parser that is part of the COBOL run time. The XML PARSE statement parses an XML document into its individual pieces and passes each piece, one at a time, to a user-written processing procedure. These XML special registers are used to communicate information between the XML parser and the user-written processing procedure:
- XML-CODE
- XML-EVENT
- XML-NTEXT
- XML-TEXT
- Alternate Record Key support
The ALTERNATE RECORD KEY clause lets you define alternate record keys associated with indexed files. These alternate keys allow you to access the file using a different logical ordering of the file records. - DBCS data item names (DBCS word support)
- 63 digit support
- The maximum length of packed decimal, zoned decimal, and numeric-edited items has been extended from 31 to 63 digits.
- The ARITHMETIC parameter on the CRTCBLMOD and CRTBNDCBL commands and on the PROCESS statement has a new EXTEND63 option.
- 7 new ANSI Intrinsic functions:
- INTEGER
- REM
- ANNUITY
- INTEGER-PART
- MOD
- FACTORIAL
- RANDOM
- New CRTBNDCBL / CRTCBLMOD options:
- *NOCRTARKIDX / *CRTARKIDX Specifies whether or not to create temporary alternate record key indexes if permanent ones cannot be found.
- *STDINZHEX00 Specifies that data items without a value clause are initialized with hexadecimal zero.
- *EXTEND63 option for the ARITHMETIC parameter increases the precision of intermediate results for fixed-point arithmetic up to 63 digits.
- New PROCESS statement options:
- PROCESS statement option NOCOMPRESSDBG/COMPRESSDBG indicates whether listing view compression should be performed by the compiler when DBGVIEW option *LIST or *ALL is specified
- NOCRTARKIDX/CRTARKIDX
- STDINZHEX00
- EXTEND63 option for the ARITHMETIC parameter
- Program Status Structure
The program status structure is a predefined structure that contains error information when the COBOL program receives an error. The PROGRAM STATUS clause is used to specify the error information that is received.
Enhancements for V5R2
The following list describes the enhancements made to ILE COBOL in V5R2: - Recursive program support
An optional RECURSIVE clause has been added to provide support for recursive programs. These are COBOL programs that can be recursively re-entered. - Local Storage Section support
A new data section that defines storage allocated and freed on a per-invocation basis has been added. You can specify the Local-Storage Section in both recursive and non-recursive programs. - Java interoperability
Two new features have been added to enhance Java interoperability. These include: - UTF8String intrinsic function
This function provides the ability to convert strings to UTF-8 format. - PCML support
New parameters have been added to the CRTCBLMOD and CRTBNDCBL commands to give users the ability to tell the compiler to generate PCML source for their COBOL program. When the user specifies PGMINFO(*PCML) and the name of a streamfile on the INFOSTMF parameter, the compiler will generate PCML into the specified streamfile. The generated PCML makes it easier for Java programs to call this COBOL program, with less Java code.
- Additional intrinsic functions
Several new intrinsic functions have been added to this release. These include: - Max
- Median
- Midrange
- Min
- ORD-Max
- ORD-Min
- Present Value
- Range
- Standard Deviation
- Sum
- Variance
- IFS
ILE COBOL source stored in IFS stream files can be compiled. The SRCSTMF and INCDIR parameters have been added to the CRTCBLMOD and CRTBNDCBL commands to give users the ability to tell the compiler to compile from source stored in IFS stream files.
Enhancements for V5R1
The following list describes the enhancements made to ILE COBOL in V5R1: - UCS-2 (Unicode) support National data, a new type of data item, has been added to provide support for the coded character set specified in ISO/IEC 10646-1 as UCS-2. The code set is the basic set defined in the Unicode standard.
- UCS-2 character set
This coded character set provides a unique code for each character appearing in the principal scripts in use around the world. Each character is represented by a 16-bit (2-byte) code. - National data
This new type of data item specifies that the item contains data coded using the UCS-2 code set. An elementary data item whose description contains a USAGE NATIONAL clause, or an elementary data item subordinate to a group item whose description contains a USAGE NATIONAL clause, is a national data item. - NTLPADCHAR compiler option and PROCESS statement option
This option allows you to specify three values: the SBCS padding character, DBCS padding character, and national padding character. The appropriate padding character is used when a value is moved into a national datatype item and does not fill the national datatype item completely. - ALL national literal
Allows the word ALL wherever a national hexadecimal literal is allowed, so that for example you could move all UCS-2 blanks into a national data item. - PROCESS statement option NATIONAL
When this option is specified, elementary data items defined using the picture symbol N will have an implied USAGE NATIONAL clause. A USAGE DISPLAY-1 clause will be implied for these items if the compiler option is not used. - National hexadecimal literals
Literals containing national data values may be specified using the syntax: NX"hexadecimal-character-sequence..." - Figurative constants
The figurative constant SPACE/SPACES represents one or more UCS-2 single byte space characters (U+0020) when used with national data items.
- JAVA interoperability support
- QCBLLESRC.JNI file
This file provides the same definitions and prototypes that are provided in the JNI.h file, but written in COBOL rather than C. - Data mapping between Java and COBOL datatypes
- Mainframe portability support
- NOCOMPASBIN/COMPASBIN PROCESS statement option indicates whether USAGE COMPUTATIONAL or COMP has the same meaning as USAGE COMP-3 or USAGE COMP-4.
- NOLSPTRALIGN/LSPTRALIGN PROCESS statement option indicates whether data items with USAGE POINTER or PROCEDURE-POINTER are aligned at multiples of 16 bytes relative to the beginning of the record in the linkage section.
- NOADJFILLER/ADJFILLER PROCESS statement option indicates whether any implicit fillers inserted by the compiler to align a pointer data item should be inserted before or after a group that has a pointer data item as the first member of the group.
- Complex OCCURS DEPENDING ON (ODO) support
The following constitute complex ODO: - Entries subordinate to the subject of an OCCURS or an ODO clause can contain ODO clauses (table with variable length elements).
- A data item described by an ODO can be followed by a non-subordinate data item described with ODO clause (variably located table).
- Entries containing an ODO clause can be followed by non-subordinate items (variably located fields). These non-subordinate items, however, cannot be the object of an ODO clause.
- The location of any subordinate or non-subordinate item, following an item containing an ODO clause, is affected by the value of the ODO object.
- The INDEXED BY phrase can be specified for a table that has a subordinate item that contains an ODO clause.
- The LICOPT parameter has been added to the CRTCBLMOD and CRTBNDCBL commands to allow advanced users to specify Licensed Internal Code options.
- The OPTVALUE PROCESS statement option indicates whether the generation of code to initialize data items containing a VALUE clause in the working-storage section should be optimized.
| 
