Introduction
ChangeMan ZMF IMS Option components are delivered in the files and libraries that are delivered for the base ZMF product. When you follow the instructions in the ChangeMan ZMF Installation Guide to install ZMF base product components, IMS Option components are also installed.
To use the ChangeMan ZMF IMS Option, you must make entries in these areas of ZMF administration:
-
ZMF Global Administration
-
ZMF Application Administration
-
IMS Option Global Administration
-
IMS Option Application Administration
For information about the general administration of ChangeMan ZMF, see the ChangeMan ZMF Administrator’s Guide.
Tip
If you are installing ChangeMan ZMF for the first time, you can defer configuring the IMS Option until after your IMS administrator and application developers agree on how they want to manage IMS components with ChangeMan ZMF. The configuration described in this chapter does not play any part in the processing of non-IMS components through the ChangeMan ZMF package life cycle.
IMS Component Types in ZMF
There are no reserved library types in ChangeMan ZMF for IMS components. IMS component processing is determined by these attributes in library type definitions:
-
Selectable Option I specified in the ZMF library type definition.
-
IMS Sub-Type specified in the IMS Option library type definitions.
This table shows you what IMS components are supported by ChangeMan ZMF. When you define IMS library types in ZMF administration and in IMS Option administration, use this table to specify the like-type, Selectable Option, and IMS Sub-type.
| IMS Component | Like | Target Type | Lang | Compile Procedure | Sel Opt | Sub Typ |
|---|---|---|---|---|---|---|
| PSB Source | S | PSB Load | ASM | CMNPSBGN | I | P |
| PSB Load | L | I | S | |||
| DBD Source | S | DBD Load | ASM | CMNDBDGN | I | D |
| DBD Load | L | I | B | |||
| MFS Source | S | MFS Format | ASM | CMNMFSGN | I | M |
| MFS Format | L | I | F | |||
| MFS Referal | P | I | R |
Apply An IMS Option License
To enable ChangeMan ZMF IMS Option functions, you must apply an IMS Option license.
If you license the IMS Option at the same time that you license ChangeMan ZMF, the license for the option is applied when you apply the license for the base product. You do not have to take further action to enable the IMS Option.
If you license the IMS Option after you apply licenses for ChangeMan ZMF and other selectable options, use the SER10TY™ License Manager to add the IMS Option license. See the SER10TY User Guide for instructions on how to apply a license. The load modules, JCL, and other components that you need to run SER10TY are included in the SERCOMC libraries that you installed from the ZMF installer.
After you have applied the license, shut down the SERNET started task where ChangeMan ZMF runs and restart the task.
Then, follow these steps to verify that the IMS Option is activated.
-
Connect to ChangeMan ZMF through ISPF.
-
From the Primary Option Menu type =A.G.O on the Option line to display the Global Selectable Options panel (CMNGBSOP):
CMNGBSOP GLOBAL Selectable Options
Option ===>__________________________________
2 Db2 Maintain Db2 information
3 INFO Specify Info/Management change rule
4 OFM Configure Online Forms Manager
5 IMS Control Region IDs and Library Sub-Type information
If option 5 IMS is highlighted, the activation is successful.
Update ChangeMan ZMF Global Administration
Follow the instructions in the ChangeMan ZMF Administrator’s Guide to update global administration with the following for IMS components:
-
Library types
-
Language names
-
Compile procedures
...
-
Add global library types for IMS components.
-
Use command =A.G.2 to display the Global Library Types Part 1 of 2 panel (CMNCGLT0).
-
Insert lines and create a library type for each kind of IMS component that you will manage with ChangeMan ZMF.
The IMS component library types on the sample panel below correspond to the table of supported IMS components in topic IMS Component Types in ZMF
CMNCLLT0 IMSA - Library Types Part 1 of 2 Row 1 to 37 of 50 Command ===>_______________________________________________ Scroll ===> CSR Lib Order Lke Seq Defer Target Sel type Description + type Opt ... ____ DBD IMS DBD Source S Y DBL I ____ DBL IMS DBD Load L Y I ____ FMT IMS MFS Load L Y I ____ MFR IMS MFS Referal P Y I ____ MFS IMS MFS Source S Y FMT I ____ PSB IMS PSB Source S Y PSL I ____ PSL IMS PSB Load L Y I...
Note
Library types for IMS components must specify I in the Sel. Opt. field. There are no reserved library types for the IMS Option. The Sel. Opt. on this panel and the IMS Sub Type on a subsequent panel invoke special IMS processing for a library type.
-
On the Global Library Types Part 2 of 2 panel (CMNCGLT1), use these DCB parameters for the new library types.
Like DCB Parameters Like-L Record Format U Record Length 0 Like-P Record Format FB and Record Length 80 Like-S
-
-
Add global language ASM.
-
Use command =A.G.3 to display the Global Language Names panel (CMNGGLNG).
-
Add language ASM for assembler if it is not already defined.
-
-
Add global procedures for IMS component builds.
-
Use command =A.G.4 to display the Compile Procedure List panel (CMNPRCNM).
-
Insert lines and create a language/procedure for each kind of IMS like-source component.
The IMS compile procedures on the sample panel below correspond to the entries in the Compile Procedures column in the table of supported IMS components in topic IMS Component Types in ZMF.
CMNPRCNM Compile Procedure List Row 1 to 21 of 21 Command ===>______________________________________ Scroll ===> CSR Language Procedure Description Order ... ASM CMNDBDGN IMS DBD Gen ASM CMNPSBGN IMS PSB Gen ASM CMNMFSGN IMS MFS Gen ......
-
Update ChangeMan ZMF Application Administration
Follow the instructions in the ChangeMan ZMF Administrator Guide to update application administration with the following for IMS components:
-
Library types
-
Language names
-
Compile procedures
-
Baseline libraries
-
Production libraries
-
Promotion libraries
...
-
Add application library types for IMS components.
-
Use command =A.A.2 to display the application - Library Types Part 1 of 2 panel (CMNCLLT0).
-
Insert lines and copy down global IMS library types.
The IMS component library types on the sample panel below correspond to the table of supported IMS components in topic IMS Component Types in ZMF.
CMNCLLT0 IMSA - Library Types Part 1 of 2 Row 1 to 37 of 50 Command ===>___________________________________________ Scroll ===> CSR Lib Order Lke Seq Defer Target Sel type Description + type Opt ... DBD IMS DBD Source S Y DBL I DBL IMS DBD Load L Y I FMT IMS MFS Load L Y I MFR IMS MFS Referal P Y I MFS IMS MFS Source S Y FMT I PSB IMS PSB Source S Y PSL I PSL IMS PSB Load L Y I...
Notes
-
Library types for IMS components must specify I in the Sel. Opt. field.
-
There are no reserved library types for the IMS Option. The Sel. Opt. on this panel and the IMS Sub Type on a subsequent panel invoke special IMS processing for a library type.
...
-
-
If necessary, adjust the staging library attributes and options for each new library type using the application - Library Types Part 2 Of 2 panel (CMNCLLT1).
-
-
Add application language ASM.
-
Use command =A.A.3 to display the application - Language Names panel (CMNCLLNG).
-
Insert a line and copy down the global language ASM for assembler if it is not already defined.
-
-
Add application procedures for IMS component builds.
-
Use command =A.A.4 to display the application - Compile Procedures panel (CMNCLPRC).
-
Insert new lines and copy down global IMS gen procedures.
The IMS compile procedures on the sample panel below correspond to the entries in the Compile Procedures column in the table of supported IMS components in topic IMS Component Types in ZMF.
CMNCLPRC IMSA - Compile Procedures Row 1 to 21 of 21 Command ===>_______________________________________________ Scroll ===> CSR Language Procedure Description Order ... ASM CMNDBDGN IMS DBD Gen 0 ASM CMNMFSGN IMS MFS Gen 0 ASM CMNPSBGN IMS PSB Gen 0
-
-
Update promotion levels for IMS components.
To populate IMS test libraries with package components, add or modify promotion level definitions and add IMS promotion libraries.
-
Use command =A.A.7 to display the application Promotion Site List panel (CMNLRPMS).
-
Select an existing Site Name, or insert a line, copy an application site name, complete the site definition, and select the new Site Name.
-
On the application/level - Promotion Levels (CMNLRPM2) panel, code one of the following in the Procedure field for any promotion level that will contain IMS components.
-
CMNIMPRM - Local promotion sites (same LPAR or shared DASD)
-
CMNIMRPM - Remote promotion sites
CMNLRPM2 IMSA/S001 - Promotion Levels Row 1 to 1 of 1 Command ===>_______________________________________________ Scroll ===> CSR Nickname Entity Level Procedure ____ SYST10 CMNLCADM 10 CMNIMPRM ____ SYST20 CMNLCADM 20 CMNIMPRM ****************************** Bottom of data ******************************* -
-
On the application/level - Promotion Levels (CMNLRPM2) panel, select a Site Nickname, and on the application/level - Promotion Libraries panel (CMNLRPM3), add application IMS library types and IMS test target libraries.
Important
Define promotion libraries for IMS like-source library types. IMS like-source components must be available at promotion sites to apply templates and execute IMS gens.
-
-
Add baseline definitions and libraries for IMS components.
-
Use command =A.A.2 to display the application - Baseline Configuration Part 1 of 2 panel.
-
Insert lines, copy application IMS library types, and specify a baseline library definition for each.
The IMS baseline configuration on the sample panel below correspond to the table of supported IMS components in topic IMS Component Types in ZMF.
CMNCBAS1 IMSA - Baseline Configuration Part 1 of 2 Row 1 to 21 of 21 Command ===>_______________________________________________ Scroll ===> CSR Baseline Install storage Type Levels in prod means ... ___ DBD 10 Y SD ___ DBL 3 Y P ___ FMT 3 Y P ___ MFR 10 Y SD ___ MFS 10 Y SD ___ PSB 10 Y SD ___ PSL 3 Y P ...Important
Set the Install In Prod indicator to Y for IMS like-source library types. IMS like-source components must be available at production sites to apply templates and execute IMS gens.
-
On the Baseline Configuration Part 2 Of 2 panel, allocate new baseline libraries for IMS components, or verify existing libraries that you will use as baseline libraries.
-
-
Add production libraries for IMS components.
-
Use command =A.A.2 to display the on the application - Baseline Configuration Part 1 of 2 panel.
-
On the application - Production Libraries panel, insert application IMS production library types, and specify a set of production libraries for each type.
-
Configure IMS Option Global Administration
Global Administration for the ChangeMan ZMF IMS Option defines:
-
IMS subsystems that are available to the IMS Option.
-
IMS sub-types for global library types used for IMS components. IMS sub-types control automated processing for IMS components at stage, promotion, and install.
-
DBD Overrides that can modify DBD at stage, promotion, and install.
-
PSB Overrides that can modify PSB at stage, promotion, and install.
Type =A.G.O.5 on any Command or Option line and press Enter to display the Global IMS Administration menu.
CMNIGGEN Global IMS Administration
Option ===> _______________________________________
1 Control Reg. Generate IMS control region information
2 Library Types Generate IMS library sub-types
3 DBD Overrides Generate DBD override statements
4 PSB Overrides Generate PSB override statements
Define Global Control Regions
IMS control region information is configured from Option 1 (Control Region); this is where you set up global control region information.
From the Global IMS Administration panel, select Option 1. The Global Definitions of IMS System Information Part 1 of 2 panel (CMNIGSLB) appears.
CMNIGSLB Global IMS System Information Part 1 of 2 Row 1 to 2 of 2
Command ===>___________________________________________ Scroll ===> CSR
IMS Site Devchar
id name Active Suffix MFSGEN PSBGEN DBDGEN ACB
___IMSA SERT6P1 Y A Y Y Y Y
___IMSA SERT6P2 Y A Y Y Y Y
******************************* Bottom of data *******************************
The following table presents a summary of the fields on the Global Definitions of IMS System Information Part 1 of 2 panel (CMNIGSLB).
| Fields | Meaning** |
|---|---|
| Line Command | Type one of these line commands: |
| I - Insert a new line. | |
| R - Repeat an existing line, repeating retains the information that had been previously keyed in. Use this command for modeling of IMS control regions. | |
| D - Delete an existing line or IMS system. | |
| S - Select an IMS control region to add the associated system libraries. This command displays. | |
| IMS ID | A four-character ID assigned to the control region by the system programmer at system generation. |
| SITE | Enter the site name as defined in ChangeMan ZMF where the IMS subsystem is running. A blank entry to this field defaults to the local ChangeMan ZMF subsystem. You may enter a mask of ‘*’ to display a selection list of the sites defined in this ChangeMan ZMF instance. |
| ACTIVE (Y/N) | Type Y if this IMS region is active and can be defined at the application level. Type N if this IMS region is not active and cannot be defined at the application administration level. |
| DEVCHAR Suffix | Type a character or numeric value. This value is appended to an IMS module name DFSUDTOx for the device characteristics of 3270 or SLU2 terminals. This module is invoke when generating MFS source code. |
| MFSGEN (Y/N) | Type Y to always GEN MFSs when promoting or installing to this IMS region. Type N if you want the system to determine if an MFS GEN is required. If the DEVCHAR is different from that of the defined production IMS region for this ChangeMan ZMF instance then a GEN is required. |
| PSBGEN (Y/N) | Type Y if you want to always GEN PSBs when promoting or installing to this IMS region. Type N if you want the system to determine if a PSB GEN is required. If it is different than that of the defined production IMS region for this ChangeMan ZMF subsystem then a GEN is required. |
| DBDGEN (Y/N) | Type Y if you want to always GEN DBDs when promoting or installing to this IMS region. Type N if you want the system to determine if a DBD GEN is required. If it is different than that of the defined production IMS control region for this ChangeMan ZMF subsystem then a GEN is required. |
| ACB (Y/N) | Type Y to always create ACB build statements for PSBs during staging. Type N to have the system determine if an ACB build statement is required for a PSB. ACB build statements are always determined for DBDs. |
You can identify the IMS control regions, and (in Part 2 of this panel) define the DD and data set names for the IMS system libraries (such as RESLIB, PSBLIB, DBDLIB, and IMSACB) assigned to that region.
To get to Part 2 of this panel, select a control region with the S line command. This panel is very similar to the Definitions of IMS System Information under Application Administration. There is one basic difference: in addition to the SITE shown above, you specify a LOGICAL SITE as well. See Configure IMS Option.
You can also specify whether to default to running GENs for MFS screens, PSBs and DBDs. For instance, if you do not update a PSB (and/or all of your IMS control regions are at the same IMS software level), it is much faster to just copy, rather than GEN it.
Note
IMS control regions are logically related to ChangeMan ZMF promotion levels and/ or production or baseline environment.
When an end-user updates an IMS package, this information can also be modified, with optional restrictions through ChangeMan ZMF exit routines. Specifically, ChangeMan ZMF User Exits 1 and 41 are likely to be of interest; this exit allows you to specify select users who can change package information.
For more information on this and other ChangeMan ZMF exit routines, see the ChangeMan ZMF Administrator‘s Guide.
When defining an IMS environment, you must identify the IMS control regions, and define the data set names under that region. The table below defines the purpose of the different choices here.
In general, you will want to automatically GEN if you are going to update a PSB or DBD, but not GEN (and merely copy) if you are not going to do an override. (This assumes that the target control region is at the same IMS software release level as the source control region.)
Note
If you typed Y to any of the GEN options in IMS System information, the IMS Option will reassemble or generate those components into the IMS control region library whenever those component types are promoted, installed or baseline-rippled. The executable module is then synchronized with the promotion, install or baseline library.
For each IMS ID selected, you must enter global definition information on the Global Definitions of IMS System Information Part 2 of 2 panel (CMNIGSL2).
Note
Although Hi-lev Node Bkup (high-level node backup), IMSGEN Macro Def, and Member Name appear on the panel, presently, they cannot be used.
CMNIGSL2 Global IMS System Information Part 2 of 2
Command ===>______________________________________________________
IMS id: IMSA Site: SERT6P1 Active: Y
Hi-lev Node Bkup . . . CMNTP.IMS.BKUP
IMSGEN Macro Def . . . CMNTP.IMS.MACLIB
Member Name . . . . . IMSGEN
DDNAME IMS System Libraries
RESLIB . . . . . . . . CMNTP.IMS.RESLIB
MODSTAT . . . . . . . CMNTP.IMS.MODSTAT
MACLIB . . . . . . . . CMNTP.IMS.MACLIB
PSBLIB . . . . . . . . CMNTP.IMS.PSBLIB
DBDLIB . . . . . . . . CMNTP.IMS.DBDLIB
IMSACB . . . . . . . . CMNTP.IMS.ACBLIB
FORMAT . . . . . . . . CMNTP.IMS.FORMAT
REFERRAL . . . . . . . CMNTP.IMS.REFERAL
The following table describes the information you need to provide on this panel.
| Field | Description |
|---|---|
| Hi-lev Node Bkup | High-level node backup is a variable for the IMS Option ISPF skeletons that are delivered as samples for backing up IMS control region libraries. There are samples for backups; these are provided for promoting, installing and performing a baseline ripple. The high-level node backup is the first node used for backups of the IMS system libraries for PSBs, DBDs, ACBs, format, and referal libraries. The rest of the backup data set name contains: |
| xxx.application.remote.imsid where | |
| xxx - Library type (PSB, DBD, ACB, FMT or REF) | |
| application - 4 character application name as defined in ChangeMan ZMF | |
| remote - Remote site as defined in ChangeMan ZMF | |
| imsid - IMSID assigned to the subsystem | |
| IMSGEN Macro Def | This is the data set that contains the IMS system generation member name. |
| Member Name | This is the member name that is in the IMSGEN data set. This contains the source code used to generate the IMS control region, databases, programs and terminals. The following table describes the DDNAMEs on the Global Definitions of IMS System Information Part 2 of 2 panel (CMNIGSL2) |
| RESLIB | This is where you enter the APF authorized IMS system library. |
| MODSTAT | This is a sequential data set that contains information regarding the active libraries for MODBLKS, IMSACB and FORMAT. |
| MACLIB | This is a PDS that contains all IMS MACROs used for system, PSB, DBD, ACB, and MFS generations. |
| PSBLIB | This is the data set that contains all the PSBs and whose DD name is defined to IMS. |
| DBDLIB | This is the data set that contains all the DBDs and whose DD name is defined to IMS. This data set is normally concatenated with the library for PSBs. |
| IMSACB | This is the library that contains all pre-built control blocks used by the control region. This must be the IMS Staging Library which is input to the Online Change Utility. |
| FORMAT | This is the library that contains all DIF/DOF and MID/MOD control blocks used by the control region. This must be the IMS Staging Library that is input to the Online Change Utility. |
| REFERAL | This is the library that contains the intermediate text block that is output to step I of the MFS GEN Utility and input to step II. |
The next step, after setting up the control region information, is to define the global library types for IMS. For this, you would first return to the Global IMS Administration menu (CMNIGGEN).
IMS Library Subtypes
From the Global IMS Administration menu (CMNIGGEN), select Option 2 to display the
Global Ims Library Subtypes panel (CMNIGLT0):
CMNIGLT0 Global IMS Library Subtypes Row 1 to 7 of 7
Command ===>___________________________________________ Scroll ===> CSR
Lib Sub
type Description type
DBD IMS DBD Source D
DBL IMS DBD Load B
FMT IMS MFS Load F
MFR IMS MFS Referal R
MFS IMS MFS Source M
PSB IMS PSB Source P
PSL IMS PSB Load S
******************************* Bottom of data *******************************
The IMS SUB TYPE field designates that additional processing is done for these library types during staging, promotion, and installation. This allows you to use any naming convention for library types, but still allows ChangeMan ZMF to handle the special processing required for these types. Press END and the short message should be UPDATE SUCCESSFUL, the long message should be CMN3621I - Global IMS library subtypes updated successfully.
The following tables describes the IMS library types.
| Sub Type | Meaning |
|---|---|
| P | PSB source library type |
| S | PSB load library type |
| D | DBD source library type |
| B | DBD load library type |
| M | MFS source library type |
| F | MFS format library type |
| R | MFS referal library type |
DBD Overrides
From the Global IMS Administration menu, select Option 3 to display the Global DBD Override Control Statements panel (CMNIGDBD).
CMNIGDBD Global DBD Override Control Statements Row 1 to 2 of 2
Command ===>_______________________________________________ Scroll ===> CSR
DBD Library IMS Control
name type id Site Statement
___ IMSDBD01 DBD IMSA SERT6P1 DATASET
Orig DEVICE=3380
New DEVICE=3390
___ IMSDBD01 DBD IMSA SERT6P2 DATASET
Orig DEVICE=3380
New DEVICE=3390
******************************* Bottom of data *******************************
This table describes the fields on the Global Dbd Override Control Statements panel.
| Field | Description |
|---|---|
| Line Command | Type one of these line commands: |
| I Insert | |
| R Repeat | |
| D Delete | |
| * Select | |
| DBD name | Enter the source name of the DBD you want to modify. |
| Library type | Enter the library type that the DBD source was staged as. This library type must be an IMS DBD source sub-type. Enter an asterisk ‘*’ for a list of valid IMS DBD source sub-types. |
| IMS id | Enter the four-character ID that is assigned to the package. |
| Site | Enter the remote site as defined in ChangeMan ZMF where the IMS subsystem is running. A blank entry to this field defaults to the local ChangeMan ZMF subsystem. |
| Control Statement | Enter the type of DBD control statement that is to have the override. Valid DBD control statements are: |
| DATASET | |
| AREA | |
| SEGM | |
| FIELD | |
| LCHILD | |
| XDFLD | |
| DBD | |
| DBDGEN | |
| Orig | Enter the original DBD source statements that are to be replaced. |
| New | Enter the new DBD source statements that are to replace the original DBD source statements. |
From the Global DBD Override Control Statements panel (CMNIGDBD), you can modify your DBD control statements (this same capability exists for PSB control statements).
From this panel, you can add or delete Global IMS DBD override control statements. Global DBD and PSB overrides can be overridden at the application level. Application level overrides can be overridden at the package level.
Global overrides can only be used at installation time; this is due to the fact that there is no logical level assigned to an IMS region until the application level.
PSB Overrides
From the Global IMS Administration menu, select Option 4 (PSB Overrides) to display the Global PSB Override Control Statements panel (CMNIGPSB).
CMNIGPSB Global PSB Override Control Statements Row 1 to 2 of 2
Command ===>_______________________________________________ Scroll ===> CSR
PSB Library IMS Control
name type id Site Statement
___ IMSPSB01 PSB IMSA SERT6P1 PCB
Orig DBDNAME= IMSPSB01
New DBDNAME= IMSGBL01
___ IMSPSB01 PSB IMSA SERT6P2 PCB
Orig DBDNAME= IMSPSB01
New DBDNAME= IMSGBL01
******************************* Bottom of data *******************************
This table describes the fields on the Global PSB Override Control Statements panel.
| Field | Description |
|---|---|
| Line Command | Type one of these line commands: |
| I Insert | |
| R Repeat - Use this line command to model a PSB control statement. | |
| D Delete | |
| * Selectto an IMS region from the Global IMS region list. | |
| PSB name | Type the source name of the PSB for which you want to have the override. |
| Library type | Type the library type for which the PSB source was staged. This library type must be an IMS PSB source sub-type. Type an asterisk ‘*’ for a list of valid IMS PSB source sub-types. |
| IMS id | Type the four-character ID assigned to the IMS system. |
| Site | Type the remote site as defined in ChangeMan ZMF where the IMS subsystem is running. A blank entry to this field defaults to the local ChangeMan ZMF subsystem. |
| Control Statement | Type the type of PSB control statement that is to have the override. Valid PSB control statements are: |
| PSBGEN | |
| PCB | |
| SENSEG | |
| SENFLD | |
| Orig | Type the original PSB source statements that are to be replaced. |
| New | Type the new PSB source statements that are to replace the original PSB source statements. |
The Global PSB Override Control Statements panel (CMNIGPSB) is where the PSB overrides are entered.
Use the R (Repeat) line command to model a PSB control statement. Use the * (Select) line command to select an IMS region to be added from the Global IMS region list.
From the Global PSB Override Control Statements panel, add or delete Global IMS PSB override control statements. Global IMS PSB control will only be used for package installation not for promotion.
Global DBD and PSB overrides can be overridden at the application level. Application level overrides can be overridden at the package level.
Global overrides can only be used at installation time because there is no logical level assigned to an IMS region until the application level.
Configure IMS Option Application Administration
Application Administration for the ChangeMan ZMF IMS Option defines:
-
IMS subsystems that are available to each application that manages IMS components.
-
IMS sub-types for application library types used for IMS components. IMS sub-types control automated processing for IMS components at stage, promotion, and install.
-
DBD Overrides that can modify DBD at stage, promotion, and install in each application that manages IMS components.
-
PSB Overrides that can modify PSB at stage, promotion, and install in each application that manages IMS components.
Type =A.A.O.5 on any Command or Option line and press Enter to display the application - IMS Administration menu.
CMNILGEN IMSA - IMS Administration
Option ===>_________________________________________________
1 Control Reg. Generate IMS control region information
2 Library Types Generate IMS library sub-types
3 DBD Overrides Generate DBD override statements
4 PSB Overrides Generate PSB override statements
Application Control Regions
Same as the Global Control Region Definitions. We’ve customized the IMSQ definitions:
CMNILSLB IMSA - IMS System Information Part 1 of 2 Row 1 to 2 of 2
Command ===>___________________________________________ Scroll ===> CSR
IMS Site Logical Devchar
id name site name Active suffix MFSGEN PSBGEN DBDGEN ACB
____ IMSA SERT6P1 S6P1UT Y A Y Y Y Y
____ IMSA SERT6P2 S6P1AT Y A Y Y Y Y
******************************* Bottom of data *******************************
Application Library Types for IMS
To obtain an application library types selection panel (Application IMS Library Types panel), from the Application IMS Administration panel (CMNILGEN), select 2. The Application IMS Library Types Part 1 of 2 panel (CMNILLTO) appears.
CMNILLT0 IMSA - IMS Library Subtypes Row 1 to 7 of 7
Command ===>___________________________________________ Scroll ===> CSR
Lib Sub
type Description type
DBD IMS DBD Source D
DBL IMS DBD Load B
FMT IMS MFS Load F
MFR IMS MFS Referal R
MFS IMS MFS Source M
PSB IMS PSB Source P
PSL IMS PSB Load S
******************************* Bottom of data *******************************
Application DBD Overrides
This works the same as Global DBD Overrides, except at the Application level. You can get to the application DBD Overrides selection panel (Application DBD Override Control Statements panel), from the Application IMS Administration panel (CMNILGEN), select 3. The Application DBD Override Control Statements panel (CMNILDBD) appears
Application PSB Overrides
This works the same as Global PSB Overrides, except at the application level. You can display the Application PSB Overrides Selection panel (Application PSB Override Control Statements panel) by selecting 4 from the Application IMS Administration panel (CMNILGEN)
Customize Exits for the IMS Option
CMNEX026 for Referal Library
When you stage an MFS like-source component, two components are created:
-
MFS load
-
MFS Referal
An MFS load staging library is automatically allocated when you specify its library type as the Target Type for the MFS like-source library type in application library type definitions. There are two ways to make an MFR staging library available when you stage an MFS like- source component:
-
In the library type definition for MFS referal in application administration, set the Defer flag to N so that an MFS referal staging library is always allocated when you create a package.
-
In the MFS referal library type definition, leave the Defer flag set to Y and customize exit program CMNEX026 to allocate an MFS staging library when the first MFS like- source component is staged in a package.
Follow these instructions to customize exit program CMNEX026.
-
If you have not already customized exit program CMNEX026:
-
Copy member CMNEX026 from the delivered CMNZMF ASMSRC library to your custom CMNSRC library.
-
Edit the program source to activate the exit according to instruction in the program comments.
ID SOURCE LINES ----+----1----+----2----+----3----+----4----+----5----+----6----+----7----+----8 *********************************************************************** * * Comment (or delete) the following 2 lines to activate this exit. * I - *MNEX026 CSECT I - * DC Y(2046) inactive module D - CMNEX026 CSECT D - DC Y(2046) inactive module *********************************************************************** -
-
Add an entry to table X26@LTYP to allocate a staging library for your IMS referal library type when you stage a component in your MFS like-source library type.
In this code fragment, a new entry is added to table X26@LTYP to allocate an MFR staging library type when an MFS component is staged in any application.
ID SOURCE LINES ----+----1----+----2----+----3----+----4----+----5----+----6----+----7----+----8 X26@LTYP DS 0CL37 library type description table * Begining of first entry DC CL4'* ' application DC CL3'JAV' staged library type DC CL3'LSH' library type DC CL27' ' the rest * Begining of second entry I - DC CL4'* ' application SERA only I - DC CL3'MFS' staged library type (MFS) I - DC CL3'MFR' library type 1 (MFR) I - DC CL27' ' the rest of them (CL30 - 3) I - * Begining of second entry DC CL4'SERA' application SERA only DC CL3'JCL' staged library type (JCL) DC CL3'LSJ' library type 1 (LSJ) DC CL27' ' the rest of them (CL30 - 3) -
Follow the instructions in the ChangeMan ZMF Customization Guide to assemble the program source into a custom LOAD library.
CMNEX041 IMS Package Update Security
When a change package is created in an application that is configured for the IMS Option, IMS control region information is copied from application administration records into the package records. You can use exit program CMNEX041 to restrict the TSO IDs that are allowed to update the IMS control information stored in the package records.
CMNEX041 is disabled as delivered. If you want to restrict who can update IMS control information at the package level, follow these instructions to customize exit program CMNEX041.
-
If you have not already customized exit program CMNEX041:
-
Copy member CMNEX041 from the delivered CMNZMF ASMSRC library to your custom CMNSRC library.
-
Edit the program source to activate the exit according to instruction in the program comments.
ID SOURCE LINES ----+----1----+----2----+----3----+----4----+----5----+----6----+----7----+----8 *********************************************************************** * * Comment (or delete) the following 2 lines to activate this exit. * I - *MNEX026 CSECT I - * DC Y(2046) inactive module D - CMNEX041 CSECT D - DC Y(2046) inactive module ***********************************************************************
-
-
Read the program comments that explain how CMNEX041 works, and study the model rules and the sample code that implements those rules.
-
Make your own rules, customize the sample code, or write new code to support your business processes.
-
Follow the instructions in the ChangeMan ZMF Customization Guide to assemble the program source into a custom LOAD library.
Customize Skeletons for IMS
IMS-Related Skeletons lists all of the skeletons that are file tailored to execute IMS-specific functions in ChangeMan ZMF batch jobs. IMS-related file tailoring variables are listed in member #VARLIST in the ChangeMan ZMF skeleton library.
Note
When you customize IMS option skeletons, remember to preserve the delivered skeletons. Copy skeleton members from the delivered CMNZMF SKELS library into your CUSTOM SKELS library and edit the skeleton in the CUSTOM library.
IMS Library Names In Skeletons
Before you can run the IMS Option you must update some IMS library names in skeletons.
This table lists the skeletons you must customize, the DD name where the change must be made, and the low level nodes of the data set name that must be updated.
| Skeleton | Function | DDNAME | Library or File |
|---|---|---|---|
| CMN$$ACB | Build | COMPCTL | somnode.IMS.PROCLIB(DFSACBCP) |
| CMN$$MFS | Build | STEPLIB REFIN REFRD DUMMY STEPLIB DUMMY |
somnode.IMS.RESLIB somnode.IMS.REFERAL somnode.IMS.REFERAL somnode.IMS.PROCLIB(REFCPY) somnode.IMS.RESLIB somnode.IMS.PROCLIB(FMTCPY) |
| CMN$$SYL | Build | &FIRSTDD | somnode.IMS.RESLIB |
| CMNINACB | Build | COMPCTL | somnode.IMS.PROCLIB(DFSACBCP) |
| CMNMFSIG | Install | DUMMY DUMMY |
somenode.IMS.PROCLIB(REFCPY) somenode.IMS.PROCLIB(FMTCPY) |
| CMNMFSPG | Promote | DUMMY DUMMY |
somnode.IMS.PROCLIB(REFCPY) somnode.IMS.PROCLIB(FMTCPY) |
| CMNMFSRG | Promote | DUMMY DUMMY |
somnode.IMS.PROCLIB(REFCPY) somnode.IMS.PROCLIB(FMTCPY) |
You must also add the IMS SDFSMAC library to the assembler SYSLIB concatenation.
ID SOURCE LINES TYPE LEN N-LN# O-LN#
----+----1----+----2----+----3----+----4----+----5----+----6----+----7----+----8
// '&COMPOPT') 00014 00014
//SYSPRINT DD DISP=(,PASS),DSN=&&&&LIST30C&C#C, 00015 00015
// UNIT=&DEFNVUN,SPACE=(CYL,(5,5),RLSE), 00016 00016
// DCB=(RECFM=FBM,LRECL=121,BLKSIZE=23474) 00017 00017
)IM CMN$$SYC 00018 00018
)SEL &IMSLCNS EQ Y 00019 00019
)SEL &CMPSUBT EQ P OR &CMPSUBT EQ D 00020 00020
// DD DISP=SHR,DSN=&IMMACLB 00021 00021
)ENDSEL &CMPSUBT EQ P OR &CMPSUBT EQ D 00022 00022
)ENDSEL &IMSLCNS EQ Y 00023 00023
I - // DD DISP=SHR,DSN=somnode.IMS.SDFSMAC 00026
// DD DISP=SHR,DSN=SYS1.MACLIB MAT= 25 00027 00024
// DD DISP=SHR,DSN=SYS1.MODGEN 00028 00025
//SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(5,5)) 00029 00026
//SYSUT2 DD UNIT=SYSDA,SPACE=(CYL,(5,5)) 00030 00027
//SYSPUNCH DD DUMMY,DCB=BLKSIZE=80 00031 00028
IMS Installation Skeletons
When ChangeMan ZMF detects a license for the IMS Option, it automatically substitutes certain IMS Option skeletons to file tailor installation and backout JCL for all packages, even packages in applications that are not set up for IMS components. If there are no IMS components in a package, the generated installation and backout JCL is exactly the same as if no IMS Option license had been applied.
If you want to customize installation and backout jobs, this table shows you the top level skeletons that are used for file tailoring when the IMS Option is enabled.
| Standard Skeleton | IMS Option Skeleton | Description |
|---|---|---|
| CMN20 | CMN20I | Install a package into production libraries |
| CMN20T | CMN20TI | Install a temporary package |
| CMN30 | CMN30I | Perform baseline ripple of a package |
| CMN31T | CMN31TI | Cycle (de-install) a temporary package |
| CMN50 | CMN50I | Backout a package from production libraries |
| CMN50T | CMN50TI | Backout a package from temporary libraries |
| CMN55 | CMN55I | Perform baseline reverse ripple of a package |
| CMN55T | CMN55TI | Backout a package from temporary libraries |
For example, if you license the IMS Option and if you want to modify the baseline ripple process, you must customize skeleton CMN30I instead of CMN30.