IBM COBOL and CICS Command Level Conversion Aid for OS/390 & MVS & VM Version 2 Simplifies Migration

Software Announcement
June 9, 1998
Announcement Letter Number: 298-186


Table of Contents:



At a Glance

CCCA for OS/390 & MVS & VM Version 2 can:

  • Simplify and shorten the COBOL migration process.

  • Ease the upgrade to new COBOL technology.

  • Convert old COBOL source code and copy modules to new versions of COBOL.

  • Convert COBOL applications to use the Millennium Language Extensions.
-----------------------------------------
For ordering, contact:
  Your IBM representative, an IBM
  Business Partner, or IBM North America
  Sales Centers at
    800-IBM-CALL  Reference: LE010

EXTRA! EXTRA! . . .

Subscribe to IBM iSource, your electronic source for customized IBM information! Go to our web site at http://www.ibm.com/isource or send an e-mail to info@isource.ibm.com with the word SUBSCRIBE in the body.



Overview

COBOL migration is easier than you think with the new Version 2 of IBM COBOL and CICS (R) Command Level Conversion Aid (CCCA) for OS/390 (TM) & MVS (TM) & VM.

CCCA for OS/390 & MVS & VM Version 2, now a program product, is designed to help you convert old COBOL source code and copy modules to new versions of COBOL. Also new in Version 2 is the capability to convert your COBOL applications to use the new IBM Millennium Language Extensions.

CCCA can shorten and simplify the COBOL migration process, easing the upgrade to new COBOL technology. This is accomplished by:

  • Automating the identification and conversion of source code.

  • Reducing the effort to convert programs.

  • Minimizing conversion errors.



Intended Customers

COBOL developers



Key Prerequisites

Unless otherwise announced by IBM, CCCA for OS/390 & MVS & VM Version 2 runs under the control of, or in conjunction with, the required IBM licensed programs and their subsequent releases or their equivalents listed in the Software Requirements section.



Planned Availability Dates

  • On OS/390 and MVS/ESA -- June 12, 1998

  • On VM/ESA -- Third Quarter 1998

------------------------------

This announcement is provided for your information only. For additional information, contact your IBM representative, call 800-IBM-4YOU, or visit the IBM home page at: http://www.ibm.com



DESCRIPTION

Migrating to New Versions of COBOL: CCCA for OS/390 & MVS & VM Version 2 converts OS/VS COBOL, DOS/VS COBOL, and ANSI 74 Standard VS COBOL II source code to ANSI 85 Standard VS COBOL II, IBM COBOL for MVS & VM, and IBM COBOL for OS/390 & VM. CCCA can enhance programmer productivity during COBOL migration from old COBOL versions to new COBOL versions by automatically converting most COBOL syntax, and by generating conversion management reports. By using the automated tool, hours of manual programming are saved. Manual programming errors can also be reduced. Use of the conversion management reports records the conversion process, thus providing a historical trace of the migration. You can also customize this conversion process to meet your unique needs.

CCCA is designed to provide facilities to:

  • Convert most COBOL syntax differences from old to new versions of COBOL.

  • Convert EXEC CICS commands.

  • Remove and/or convert the base locator for linkage (BLL) section mechanism and references.

  • Eliminate conflicts between user-defined names and words reserved for new versions of COBOL.

  • Convert both source programs and copy modules.

  • Create conversion management reports.

  • Produce a statement-by-statement diagnostic listing showing the result of the conversion process for each program.

  • Perform conversion from various levels of COBOL into other COBOL levels through an open converter design.
Converting to Use the Millennium Language Extensions: The IBM Millennium Language Extensions (MLE) are an extension to the COBOL language that are intended to help the year 2000 problem by utilizing the technique of windowing two-digit date fields. This technique removes the common assumption in many programs that all two-digit year fields with values from 0 to 99 represent years from 1900 to 1999. For example, if a two-digit date field contains the value "17", many current systems would interpret the year as 1917. The windowing technique simply moves the window from 0 to 99 (implying 1900 to 1999) to another set of values, like 60 to 59 (implying 1960 to 2059). With this window, the value "17" would be interpreted as the year 2017.

MLE has been implemented for use with IBM COBOL for OS/390 & VM via the product IBM VisualAge (R) COBOL Millennium Language Extensions for OS/390 & VM. For more information about VisualAge COBOL Millennium Language Extensions for OS/390 & VM, refer to Software Announcement 298-105 dated April 7, 1998. MLE has been implemented for use with IBM COBOL for MVS & VM via the product IBM VisualAge COBOL Millennium Language Extensions for MVS & VM. For more information about VisualAge COBOL Millennium Language Extensions for MVS & VM, refer to Software Announcement 298-098 dated April 7, 1998.

CCCA for OS/390 & MVS & VM Version 2 supports conversion of COBOL applications to use MLE. CCCA will automatically add the MLE DATE FORMAT clause to the data description entries for date items (specified to CCCA in a date identification file) within the program to be converted.

Other Enhancements: Version 2 also provides the following enhancements:

  • Support for DBCS literals and DBCS user-defined words

  • Support for hexadecimal nonnumeric literals

  • Improved tokenization of COBOL words and literals continued over multiple lines

  • Improved tokenization of numeric literals

  • Improved nonnumeric literal delimiter determination



Year 2000

This product is Year 2000 ready. When used in accordance with its associated documentation, it is capable of correctly processing, providing, and/or receiving date data within and between the 20th and 21st centuries, provided all other products (for example, software, hardware, and firmware) used with the product properly exchange accurate date data with it.



PRODUCT POSITIONING

As your business navigates through the Year 2000, IBM can provide you with an approach that will help you get there with confidence. Called VisualAge 2000, this offering comprises an end-to-end range of products, services, methods, education, and strategies all designed to help make your transition to the next century smooth and successful.

Many steps are necessary to resolve your Year 2000 issues. You can use tools in VisualAge 2000 to let your systems resources, not your human resources, do much of the work.

The VisualAge 2000 MLE Solution provides a means to help find and fix Year 2000 problems in your applications. This is done in three steps:

  • For each application, you will need to identify your potential date fields. This can be done using your choice of date finding tools, such as the Program Understanding Year 2000 Analysis Tool of IBM VisualAge COBOL Enterprise or the analysis function of IBM Maintenance 2000. For more information on IBM VisualAge COBOL Enterprise, refer to Software Announcement 298-099 dated April 7, 1998. For more information on IBM Maintenance 2000, refer to Software Announcement 298-079 dated March 10, 1998.

  • Once date fields are identified, CCCA can be used to add the new MLE DATE FORMAT clause to your data definitions.

  • Once the data definitions are updated, the IBM COBOL compiler in conjunction with the IBM VisualAge COBOL Millennium Language Extensions then automatically performs windowing in the logic of your application. This helps you achieve a faster conversion by eliminating the need to manually add logic for each occurrence of date variables within each application. Additionally, if you plan to expand your date fields for your long-term Year 2000 solution, MLE offers you the flexibility to use a mixture of windowed and expanded dates, thus extending the useful life of your applications.
VisualAge 2000 can help your company navigate through the new millennium with confidence. The VisualAge 2000 application development tools can also help enable you to re-energize existing applications, without sacrificing new development projects, allowing you to move forward into the twenty-first century and beyond. For a complete overview of VisualAge 2000, see the WWW site at:



HARDWARE AND SOFTWARE SUPPORT SERVICES



SmoothStart (TM)/Installation Services

IBM SmoothStart or Installation Services will not be provided.

Trademarks

      MVS, OS/390, MVS/ESA, and SmoothStart are trademarks of
      International Business Machines Corporation in the United
      States or other countries or both.
      CICS, VM/ESA, and VisualAge are registered trademarks of
      International Business Machines Corporation in the United
      States or other countries or both.
      Other company, product, and service names may be trademarks or
      service marks of others.



SUPPLEMENTAL INFORMATION



TECHNICAL INFORMATION



Specified Operating Environment

Hardware Requirements: CCCA for OS/390 (TM) & MVS (TM) & VM Version 2 will run on any hardware configuration supported by the licensed programs specified below.

Software Requirements: Unless otherwise announced by IBM, CCCA for OS/390 & MVS & VM Version 2 runs under the control of, or in conjunction with, the following required IBM licensed programs and their subsequent releases or their equivalents.

When the target language is COBOL for OS/390 & VM:

  • IBM COBOL for OS/390 & VM Version 2 (5648-A25) with PTFs

  • A sort program capable of being used with the COBOL SORT verb

  • If running on OS/390:
    • OS/390 Version 2 Release 4 or later (5647-A01)
    • OS/390 Version 1 Release 3 (5645-001)
    • Language Environment element of OS/390
    • ISPF element of OS/390
  • If running on VM/ESA (R):
    • VM/ESA Version 2 (5654-030)

    • Language Environment for MVS & VM Release 5 (5688-198)

    • ISPF for VM Version 3 (5684-043)

    • ISPF/PDF for VM Version 3 (5684-123)
When the target language is COBOL for MVS & VM:
  • IBM COBOL for MVS & VM Release 2 (5688-197) with PTFs

  • A sort program capable of being used with the COBOL SORT verb

  • If running on OS/390:
    • OS/390 Version 2 Release 4 or later (5647-A01) or OS/390 Version 1 Release 1 or later (5645-001)

    • Language Environment element of OS/390

    • ISPF element of OS/390
  • If running on MVS/ESA (TM):
    • MVS/ESA Version 5 (5655-068, 5655-069)

    • Language Environment for MVS & VM Release 5 (5688-198)

    • ISPF for MVS Version 4 (5655-042) or later

    • ISPF/PDF for MVS Version 3 Release 5 (5665-402) or later
  • If running on VM/ESA:
    • VM/ESA Version 2 (5654-030)

    • Language Environment for MVS & VM Release 5 (5688-198)

    • ISPF for VM Version 3 (5684-043)

    • ISPF/PDF for VM Version 3 (5684-123)
When the target language is VS COBOL II (note that VS COBOL II does not support MLE):
  • VS COBOL II Release 4 (5668-958, 5688-023) or later

  • A sort program capable of being used with the COBOL SORT verb

  • If running on OS/390:
    • OS/390 Version 2 Release 4 or later (5647-A01) or OS/390 Version 1 Release 1 or later (5645-001)

    • ISPF element of OS/390
  • If running on MVS/ESA:
    • MVS/ESA Version 5 (5655-068, 5655-069)

    • ISPF for MVS Version 4 (5655-042) or later

    • ISPF/PDF for MVS Version 3 Release 5 (5665-402) or later
  • If running on VM/ESA:
    • VM/ESA Version 2 (5654-030)
    • ISPF for VM Version 3 (5684-043)
    • ISPF/PDF for VM Version 3 (5684-123)



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.



ORDERING INFORMATION



New Licensees

Orders for new licenses will be accepted now.

Shipment will begin on the planned availability date.

New users of CCCA for OS/390 & MVS & VM Version 2 should specify:

          Type        Model

5648 B05

Basic License: To order a basic license, specify the program number and feature number 9001 for asset registration. Specify feature number 2101 for a one-time charge (OTC).

Specify the feature number of the desired distribution medium shown below.

Single Version Charging: To elect single version charging, the customer must notify and identify to IBM the prior program and replacement program and the designated machine the programs are operating on.

Version-to-Version Upgrade Credit: To upgrade from a prior program acquired for a one-time charge to a replacement program using a version-to-version upgrade credit, the customer must notify and identify to IBM the applicable prior program and replacement program participating in the upgrade credit.

Basic Machine-Readable Material: To order, select the feature number of the desired distribution medium:

                         Feature
Environment              Number              Distribution Medium

MVS or OS/390 5801 9/6250 tape MVS or OS/390 5802 3480 tape cartridge MVS or OS/390 6200 4-mm DAT cartridge VM 5821 9/6250 tape VM 5822 3480 tape cartridge VM 6202 4-mm DAT cartridge

Customization Options: Select the appropriate feature numbers to customize your order to specify the delivery options desired. These features can be specified on the initial or MES orders.

Example: If publications are not desired for the initial order, specify feature number 3470 to ship media only. For future updates, specify feature number 3480 to ship media updates only. If, in the future, publication updates are required, order an MES to remove feature number 3480; then, the publications will ship with the next release of the program.

                                                    Feature
Description                                         Number

Initial Shipments

Serial Number Only (suppresses shipment 3444 of media and documentation)

Ship Media Only (suppresses initial 3470 shipment of documentation)

Ship Documentation Only (suppresses 3471 initial shipment of media)

Update Shipments

Ship Media Updates Only (suppresses 3480 update shipment of documentation)

Ship Documentation Only (suppresses 3481 update shipment of media)

Suppress Updates (suppresses update 3482 shipment of media and documentation) Feature Description Number

Expedite Shipments

Local IBM Office Expedite 3445 (for IBM use only)

Customer Expedite Process Charge 3446 ($30 charge for each product)

Expedite shipments will be processed to receive 72-hour delivery from the time IBM Software Manufacturing Solutions (SMS) receives the order. SMS will then ship the order via overnight air transportation.

DSLO License: To order a DSLO license specify the program number, feature number 9901 for asset registration, and feature number 2103 for a one-time charge. Ordering a DSLO feature will result in IBM maintaining a record of this customer location as a DSLO user only. All material for the DSLO license will be provided through the basic license location. If a user selects DSLO, no other feature numbers are valid for this order and no program materials or updates will be shipped.

Unlicensed Documentation: A memo to users, program directory, and one copy of the following publications are supplied automatically with the basic machine-readable material:

                                                       Order
Title                                                  Number

CCCA for OS/390 & MVS & VM Version 2 GC26-9407 Licensed Program Specifications

CCCA for OS/390 & MVS & VM Version 2 SC26-9400 User's Guide

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.



TERMS AND CONDITIONS

Licensing: IBM Customer Agreement

Variable Charges Apply: No

Parallel Sysplex (R) License Charge (PSLC) Applies: No

Indexed Monthly License Charge (IMLC) Applies: No

Installation License or Location License Applies: No

Usage Restriction Applies: No

Entry End User/390 Attachment (ESL) Applies: No

Educational Allowance: Yes, to qualified education customers.

Volume Discount: Not applicable.

Version-To-Version Upgrade Credits Apply: Yes

                                                        Version
Program   Program           Program   Program           Charging
Number    Name              Number    Name              Applies

5785-ABJ IBM CCCA 5648-B05 IBM CCCA Yes for MVS for OS/390 and VM V1 & MVS & VM V2

5648-B05 IBM CCCA To a follow-on if any N/A for OS/390 & MVS & VM V2

Warranted: Yes

Licensed Program Materials Availability

  • Restricted Materials of IBM: None
  • Non-Restricted Source Materials: None
  • Object Code Only (OCO): All
Testing Period: Two months (Basic License only)

Program Services

Support Center applies:              Yes

Access is available through the IBM Support Center

Available until discontinued: 12 months' written notice

APAR Mailing Address: IBM Corporation APAR Processing P.O. Box 49023 San Jose, CA 95161-9023

Services for DSLO Licenses: Provided through Basic License location

Support Line: S/390 (R)



CHARGES

The charges provided in this announcement are suggested retail prices for the U.S. only and are provided for your information only. Dealer prices may vary, and prices may also vary by country. Prices are subject to change without notice. For additional information and current prices, contact your local IBM representative.

                               Basic                    DSLO
                               One-Time                 One-Time
Program Number                 Charge                   Charge

5648-B05 $30,000 $27,000

One-Time Charge: Customers who pay a one-time charge for a licensed program receive enhancements and future releases, if any, at no additional charge. Significant new function may be offered as an optional feature and charged for separately. If a replacement program is announced and the customer elects to license the replacement program, a time-based upgrade credit may apply.



CALL NOW TO ORDER

To order, contact the IBM North America Sales Centers, your local IBM representative, or your IBM Business Partner.

IBM North America Sales Centers, our national direct marketing organization, can add your name to the mailing list for catalogs of IBM products.

 Phone:     800-IBM-CALL (TM)
 Fax:       800-2IBM-FAX
 Internet:  ibm_direct@vnet.ibm.com
 Mail:      IBM North America Sales Centers
            Dept. LE010
            P.O. Box 16848
            Atlanta, GA  30321-0848
 Reference: LE010

To identify your local IBM Business Partner or IBM representative, call 800-IBM-4YOU.

Note: Shipments will begin after the planned availability date.

Trademarks

      MVS, OS/390, MVS/ESA, and 800-IBM-CALL are trademarks of
      International Business Machines Corporation in the United
      States or other countries or both.
      VM/ESA, Parallel Sysplex, and S/390 are registered trademarks
      of International Business Machines Corporation in the United
      States or other countries or both.
      Other company, product, and service names may be trademarks or
      service marks of others.