Rational Developer for System z
Enterprise COBOL for z/OS, Version 4.1, Compiler and Runtime Migration Guide


Programs using BLL cells

The following steps summarize the conversion of an OS/VS COBOL CICS program to an Enterprise COBOL CICS program. For more information, see CICS Application Programming Guide.

  1. Remove all SERVICE RELOAD statements. The Enterprise COBOL compiler treats these statements as comments. (Although desirable, removal is not absolutely necessary.)
  2. Remove all operations dealing with addressing structures in the LINKAGE SECTION greater than 4K bytes in size. A typical statement is:
        ADD +4096 D-PTR1 GIVING D-PTR2.
  3. Remove all program code that assists in addressing COMMAREAs greater than 4K in size.
  4. Remove redundant assignments and labels that OS/VS COBOL uses to ensure that CICS programs are correctly optimized. (This is good programming practice, but it is not essential.)
    Redundant assignments and labels include:
    • Artificial paragraph names, ones that use BLL cells to address chained storage areas
    • Artificial assignments from the object of an OCCURS DEPENDING ON clause to itself
  5. Change every SET(P) option in the CICS commands to SET(ADDRESS OF L), where ā€œLā€ is the LINKAGE SECTION structure that corresponds to the ā€œPā€ BLL cell.
  6. Specify REDEFINES clauses in the LINKAGE SECTION, if multiple record formats are defined through the SET option.
  7. Review programs that use basic mapping support (BMS) data structures in their LINKAGE SECTION (check for maps that are not defined as STORAGE=AUTO). Move any maps that are not defined as STORAGE=AUTO to the WORKING-STORAGE section and remove any associated EXEC CICS GETMAIN commands.

Terms of use | Feedback

This information center is powered by Eclipse technology. (http://www.eclipse.org)