IBM Enterprise PL/I for z/OS V3.8 delivers performance improvements and usability enhancements

IBM United States Software Announcement 208-365
October 28, 2008

 ENUS208-365.PDF (100KB)

Table of contents   Document options  
Overview Overview Technical information Technical information
Key prerequisites Key prerequisites Ordering information Ordering information
Planned availability date Planned availability date Terms and conditions Terms and conditions
Description Description Prices Prices
Program number Program number Order now Order now
Printable version Printable version

Top rule
Bottom rule

With Enterprise PL/I for z/OS® V3.8, you can leverage more than 30 years of IBM® experience in application development to facilitate your new On Demand Business endeavors, helping integrate PL/I and Web-based business processes in Web services, XML, Javatm, and PL/I applications. This compiler's interoperability lets you capitalize on existing IT investment while smoothly incorporating new, Web-based applications as part of your organizations infrastructure.

Enterprise PL/I is a leading-edge, z/OS-based compiler that helps you create and maintain mission-critical, line-of-business PL/I applications to execute on your z/OS systems. It gives you access to DB2®, CICS®, and IBM IMStm systems, and other data and transaction systems.

New in V3.8

  • Hardware exploitation including support for z10 architecture
  • Performance improvements
  • Support for XML System Services
  • Improved SQL support
  • Numerous new built-in functions
  • Numerous user requirements

Back to topBack to top
Top rule
Key prerequisites
Bottom rule

z/OS V1.8 (5694-A01), or later

Depending on the function used, certain levels of other programs may be required. Refer to the Software requirements section for details.

Back to topBack to top
Top rule
Planned availability date
Bottom rule

October 31, 2008

Back to topBack to top
Top rule
Bottom rule

Performance and hardware improvements

  • ARCH(8)/TUNE(8) support
  • PFPO instruction exploitation (to inline conversions between hex, binary and decimal float)
  • HGPR option to allow more exploitation of 64-bit registers in 32-bit code
  • GOFF object support
  • DFP math built-in functions support
  • Exploit the MVCLE hardware instruction in code generated for the LEFT built-in function
  • Exploit the SRSTU hardware instruction in code generated for the INDEX built-in function when applied to the WIDECHAR
  • CMPAT(V3) and other support of 8-byte array bounds, structure sizes etc for stage 1 of 64-bit support

User requirements

Support for the XML System Services parser The new PLISAXC built-in subroutine uses the XML System Services parser. This will provide for namespaces and for parsing XML documents larger than 2 GB

Improved support for UTF-8 and UTF-16

The following new built-in functions will provide better support for UTF-8 and UTF-16:

  • ULENGTH -- Returns the number of UTF-8 or UTF-16 characters in a CHAR or WIDECHAR string, respectively.
  • ULENGTH8 -- Returns the CHAR length if the UTF-16 characters in a WIDECHAR string were converted to UTF-8.
  • ULENGTH16 -- Returns the WIDECHAR length if the UTF-8 characters in a CHAR string were converted to UTF-16.
  • UPOS -- Returns the position of the nth UTF-8 or UTF-16 character in a CHAR or WIDECHAR string, respectively.
  • USUBSTR -- Returns the substring starting with the i'th UTF-8 or UTF-16 character and of length j such characters in a CHAR or WIDECHAR string respectively.
  • UVAlID -- Tests if a CHAR or WIDECHAR string contains valid UTF-8 or UTF-16 data, respectively.
  • UWIDTH -- Returns the width of the nth UTF-8 or UTF-16 character in a CHAR or WIDECHAR string, respectively.

SQL improvements

  • DIMACROSS attribute -- The DIMACROSS option specifies a DIMENSION attribute on a structure but which be removed from the structure and propagated to its children. This attribute is particularly useful with SQL multi-row fetch.
  • DDSQL option -- The DDSQL option allows the user to specify a DDNAME that will be used instead of SYSLIB as the DDNAME to searched for files named in SQL INCLUDE statements. This eases the move from the SQL precompiler to the SQL preprocessor.
  • INCONLY support in the SQL preprocessor -- The SQL preprocessor will now support an INCONLY option. This option acts similar to the SQLONLY option in the MACRO preprocessor: under PP(SSQL('INCONLY')) only EXEC SQL INCLUDE statements will be processed and all other EXEC SQL statements will be left as is.
  • LISTVIEW option -- The SOURCE, AFTERMACRO, etc suboptions of the TEST option must now be specified as suboptions of the new LISTVIEW option. This will permit these suboptions to be used without incurring any of the overhead of the TEST option. LISTVIEW(AFTERSQL) is useful with some SQL tools.
  • DBCS -- DBCS is now supported by the integrated SQL preprocessor (as it had already been supported by the MACRO and CICS preprocessors).

Additional user control of built-in function behavior

  • USAGE(HEX) option -- The USAGE option -- Now accepts HEX as a suboption.
  • USAGE(SUBSTR) option -- The USAGE option now accepts SUBSTR as a suboption.
  • FOFLONMULT suboption to DECIMAL -- The DECIMAL option will be expanded to have a new suboption: (NO)FOFLONMULT.

New and improved built-in functions

  • ONLINE built-in function -- The ONLINE built-in function returns a FIXED BIN(31) value which is the user source line number where a condition was raised.
  • REG12 built-in function -- This built-in function returns the current value of register 12.
  • FLOATDEC, FLOATBIN, FIXEDDEC, FIXEDBIN built-ins -- These built-in functions are useful in specifying with one built-in function the attributes desired for a numerical result. They can be particularly useful in avoiding the 2 conversions that might result if, for example, the DECIMAL and then the FLOAT built-in function were used to convert a FIXED BIN to FLOAT DEC; They are also particularly useful with decimal float point (DFP).
  • REPATTERN improvements -- These 3 additional DB2 date-time formats will be supported:
  • YY-MM-DD
  • MM/DD/YY
  • DD.MM.YY

Miscellaneous other requirements

  • Remove calls to null procedures -- Some programming practices cause the production version of the code to contain calls to procedures consisting of only a PROCEDURE and an END statement (although their test version may have debugging or logging code, for example). The compiler will now detect if any internal procedures are null and then eliminate any calls to them.
  • Support INCDIR under batch -- This function allows hfs files to be included in batch compilations.
  • Support NOINIT on substructures -- The NOINIT attribute will now be allowed on substructures
  • Widen listing header to all of listing -- Instead of truncating the listing header to 25 bytes, the compiler will now place the first 43 bytes from line one in the header line of all pages after page one.
  • Allowance tor trailing OPTIONAL arguments to be omitted in calls to internal procedures -- The omission of trailing OPTIONAL arguments will now be permitted also for internal procedures.
  • NULLSTRADDR suboption to DEFAULT -- The DEFAULT option will be expanded to have a new suboption: (NO)NULLSTRADDR.

New and changed messages

  • Subdivide message IBM2610 -- Message IBM2610 flags built-in references where one argument is FIXED DEC and the other is FIXED BIN or FLOAT.
  • Suppress uninitialized warnings -- The new SUPPRESS attribute will allow a suboption of UNINIT and/or UNREF to be specified. When specified, these will cause the compiler to suppress any messages saying the associated variables are uninitialized or unreferenced, respectively.
  • NOLAXENTRY suboption to the RULES option -- The RULES option will be expanded to have a new suboption: (NO)LAXENTRY.
  • Operations producing FIXED(p,q) with q > p -- The compiler will now flag with a warning message code where the result of a FIXED operation has a scale factor greater than its precision (for example when multiplying two FIXED DEC(15,8) values).
  • LINESIZE - RECSIZE mismatches -- The compiler will now flag with an error message code where an OPEN specifies a LINESIZE that is too large for the LRECL etc specified in the file's declare.
  • POINTER / FIXED BIN overlays -- The compiler will now flag with a warning message code where a POINTER or an OFFSET is declared as BASED on the ADDR of a FIXED BIN (or vice versa). This will help identify code that will need to be changed before moving to 64-bit.
  • OR, NOT or QUOTE with no valid characters -- The compiler will now recognize and flag this error with a severe message.
  • INITIAL with PARAMETER -- The compiler will now flag this error with a unique error message.
  • INITIAL with DEFINED -- The compiler will now flag this error with a unique error message.
  • Allocations where an aggregate is mapped via a library call -- The compiler will now flag such code with an informational message.
Debug Tool for z/OS V9.1

The previous releases of Enterprise PL/I were available with Alternate Function or Full Function offerings. The Alternate Function offering included the PL/I compiler. The Full Function offering included both the PL/I compiler and the debug capability found in Debug Tool for z/OS. Enterprise PL/I Version 3.8 provides the PL/I compiler only. It is not available with a Full Function offering. The latest version of that debug capability can be obtained in Debug Tool for z/OS V9.1, which can be ordered separately. For more information on Debug Tool for z/OS V9.1, refer to Software Announcement 208-264, dated September 23, 2008.

SmoothStart/installation services

IBM SmoothStarttm and Installation Services are not provided.

Back to topBack to top
Top rule
Program number
Bottom rule

Program                                    Program
Name                                       Number
IBM Enterprise PL/I for z/OS V3.8          5655-H31

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 topBack to top
Top rule
Technical information
Bottom rule

Specified operating environment

Hardware requirements

Enterprise PL/I for z/OS V3.8 will run on the following IBM servers:

  • z10 Enterprise Class, or follow-on
  • IBM System z9® Enterprise Class or z9tm Business Class, or follow-on
  • zSeries® z900 or z990, or follow-on
  • zSeries z800 or z890, or follow-on
Software requirements

Enterprise PL/I for z/OS V3 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 programs listed below that require program temporary fixes (PTFs), refer to the Program Directory and the preventive service planning (PSP) bucket.

z/OS V1.8 (5694-A01), or later is a required licensed program.

Optional licensed programs

  • CICS Transaction Server for z/OS V2 (5697-E93)
  • CICS Transaction Server for z/OS V3 (5655-M15)
  • COBOL for MVStm & VM V1.2 (5688-197)
  • COBOL for OS/390® & VM V2 (5648-A25)
  • Enterprise COBOL for z/OS and OS/390 V3 (5655-G53)
  • Enterprise COBOL for z/OS V4 (5655-S71)
  • DB2 UDB for z/OS V8 (5625-DB2)
  • DB2 UDB for z/OS V9 (5635-DB2)
  • Debug Tool for z/OS V6.1 (5655-P14)
  • Debug Tool Utilities and Advanced Functions for z/OS V6.1 (5655-P15)
  • Debug Tool for z/OS V7.1 (5655-R44)
  • Debug Tool Utilities and Advanced Functions for z/OS V7.1 (5655-R45)
  • Debug Tool for z/OS V8.1 (5655-S17)
  • Debug Tool Utilities and Advanced Functions for z/OS V8.1 (5655-S16)
  • Debug Tool for z/OS V9.1 (5655-U27)
  • DFSORTtm element of z/OS (5694-A01) or OS/390 (5647-A01)
  • High Level Assembler/MVS and VM and VSE (5696-234)
  • IMS V8 (5655-C56)
  • IMS V9 (5655-J38)
  • IMS V10 (5635-A01)
  • OS PL/I V2.3 (5668-909, 5668-910, 5668-911)
  • PL/I for MVS & VM V1.1 (5688-235)
  • VS FORTRAN V2 (5668-806, 5688-087)
User group requirements

This announcement satisfies or partially satisfies requirements from one or more of the worldwide user group communities. Groups include COMMON, COMMON Europe, Guide Share Europe (GSE), InterAction (Australia/New Zealand), Japan Guide Share (JGS), and SHARE Inc.

Planning information


The Enterprise PL/I for z/OS V3 package includes:

  • Basic machine-readable material on the customer-selected distribution medium
  • Program Directory (GI10-8426)
  • Licensed Program Specifications (GC27-1455)

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 topBack to top
Top rule
Ordering information
Bottom rule

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 U.S., 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 Web site at

New licensees

Orders for new licenses can be placed now.
Customers whose orders ship before the planned availability will receive IBM Enterprise PL/I for z/OS V3.7.
Customers whose orders ship after the planned availability date will receive IBM Enterprise PL/I for z/OS V3.8.
New users of IBM Enterprise PL/I for z/OS V3 should specify Type: 5655 Model: H31

For ordering information on IBM Enterprise PL/I for z/OS V3, refer to Software Announcement 201-344, dated November 27, 2001.

Based on the customer-requested arrival date (CRAD) and to allow for order processing, the first customer shipment will begin within seven business days after general availability.

A Program Directory (GI10-8426) and Licensed Program Specifications (GC27-1455) are supplied automatically with the basic machine-readable material. No other hardcopy publications are shipped with the product.

Displayable Softcopy Publications

All IBM Enterprise PL/I for z/OS V3 publications are available free of charge in displayable softcopy format (BookManager®, PDF) from the IBM PL/I Web site

Subsequent updates (technical newsletters or revisions between releases) to the publications shipped with the product will be distributed to the user of record for as long as a license for this software remains in effect. A separate publication order or subscription is not needed.

Customized offerings

Product deliverables are shipped only via Customized Offerings (for example, CBPDO, ServerPac, SystemPac®).

CBPDO and ServerPac are offered for Internet delivery, where ShopzSeries product ordering is available. Internet delivery of ServerPac may help improve automation and software delivery time. For more details on Internet delivery, refer to the ShopzSeries help information at

Media type for this software product is chosen during the customized offerings ordering process. Based on your customer environment, it is recommended that the highest possible density tape media is selected. Currently offered media types are:

  • CBPDOs - 3480, 3480 Compressed, 3490E, 3590, 3592*
  • ServerPacs - 3480, 3480 Compressed, 3490E, 3590, 3592*
  • SystemPacs - 3480, 3480 Compressed, 3490E, 3590, 3592*

*3592 is highest density media. Selecting 3592 will ship the fewest number of media.

Once a product becomes generally available, it will be included in the next ServerPac and SystemPac monthly update.

Production of software product orders will begin on the planned general availability date.

  • CBPDO shipments will begin one week after general availability.
  • ServerPac shipments will begin two weeks after inclusion in ServerPac.
  • SystemPac shipments will begin four weeks after inclusion in SystemPac due to additional customization,and data input verification.

Back to topBack to top
Top rule
Terms and conditions
Bottom rule

The terms for Enterprise PL/I for z/OS V3 as previously announced in Software Announcement 201-344 (RFA35828), dated November 27, 2001, licensed under the IBM Customer Agreement are unaffected by this announcement.

IBM operational support services - SupportLine


Back to topBack to top
Top rule
Bottom rule

The pricing information for IBM Enterprise PL/I for z/OS V3, as previously announced in Software Announcement 201-344, dated November 27, 2001, remains unaffected by this announcement.

Contact your IBM representative for information on the current prices for this program.

IBM Global Financing

IBM Global Financing offers competitive financing to credit-qualified customers to assist them in acquiring IT solutions. Offerings include financing for IT acquisition, including hardware, software, and services, from both IBM and other manufacturers or vendors. Offerings (for all customer segments: small, medium, and large enterprise), rates, terms, and availability can vary by country. Contact your local IBM Global Financing organization or visit

IBM Global Financing offerings are provided through IBM Credit LLC in the United States, and other IBM subsidiaries and divisions worldwide to qualified commercial and government customers. Rates are based on a customer's credit rating, financing terms, offering type, equipment type, and options, and may vary by country. Other restrictions may apply. Rates and offerings are subject to change, extension, or withdrawal without notice. For more financing information, visit

Back to topBack to top
Top rule
Order now
Bottom rule

To order, contact the Americas Call Centers, your local IBM representative, or your IBM Business Partner.

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)
Mail:       IBM Teleweb Customer Support
  ® Sales Execution Center, Americas North
            3500 Steeles Ave. East, Tower 3/4
            Markham, Ontario
            L3R 2Z1

Reference: LE001

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, SmoothStart, z9, MVS and DFSORT are trademarks of IBM Corporation in the United States, other countries, or both.

z/OS, IBM, DB2, CICS, System z9, zSeries, OS/390, BookManager, SystemPac and are registered trademarks of IBM Corporation in the United States, other countries, or both.

Java and all Java-based trademarks are trademarks of Sun Microsystems, Inc. in the United States, other countries, or both.

Other company, product, and service names may be trademarks or service marks of others.

Terms of use

IBM products and services which are announced and available in your country can be ordered under the applicable standard agreements, terms, conditions, and prices in effect at the time. IBM reserves the right to modify or withdraw this announcement at any time without notice. This announcement is provided for your information only. Additional terms of use are located at:

For the most current information regarding IBM products, consult your IBM representative or reseller, or visit the IBM worldwide contacts page


Back to topBack to top
Bottom grey rule
Printable version Printable version