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.
- Remove all SERVICE RELOAD statements.
The Enterprise COBOL compiler
treats these statements as comments. (Although desirable, removal is not absolutely
necessary.)
- 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.
- Remove all program code
that assists in addressing COMMAREAs greater than 4K in size.
- 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
- 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.
- Specify
REDEFINES clauses in the LINKAGE SECTION, if multiple record formats are defined
through the SET option.
- 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.