Application Clone Utility

The Application Clone Utility is used to clone an application. It will load the tasks and copy all PDS/PDSE source and generated objects to the new target. The clone source and target applications can be in different Code Pipeline installations but both applications must be defined with the same M.AD Types and Associations.

Enabling the Application Clone utility for individual usage

To enable this utility for your use only, perform the following steps:

Use Add Special Functions from the primary menu, as displayed in the following figure.
22.01                    CODE PIPELINE PROD ALLOCATIONS
OPTION ===>

U   USER              - User Preferences                USERID - USER003
                                                         PREFIX - USER003
A   ANALYSIS          - Cross Reference Analysis        TIME   - 13:11
P   CONTAINERS        - Container List                  DATE   - 2022/05/24
W   WORK              - Work List                              - 2022.144
R   REPOSITORY        - Repository List                 PROC   - ATSOISPW
DP DEPLOY            - Deploy Requests                 CONFIG - PROD
GI GENERATE IMPACTS - Generate Impacts                SERVER - PROD
M   MAINTENANCE       - Maintenance Functions
Z   FUNCTIONS         - Add Special Functions (Z1 - Z8)

Z1   WRPT              WRPT REPORTING
Z2   CLONE             CLONE COMMAND
Z3
Z4
Z5
Z6
Z7
Z8
Enter END command to return to the Primary Menu.
Select the Z option. The following panel is displayed. (The panel has been truncated for clarity.)
Z ---------------   USER COMMANDS (PROD) ------------------- Row 1 to 26 of 50
COMMAND ===>                                                 SCROLL ===> CSR

A - Add a command to your list             C - Change an existing command
D - Delete a command from your list        S - Execute a displayed command

    ALIAS    DESCRIPTION                   ALIAS    DESCRIPTION
    -------- ------------------------      -------- -------------------------
Z1                                     Z5
  Z2                                     Z6
  Z3                                     Z7
  Z4                                     Z8

                     COMMAND SELECTION TABLE
ALIAS    DESCRIPTION                    INVOCATION
-------- ------------------------------ ----------------------------------
B        BROWSE ENTRY PANEL             PGM(ISRBRO)
  BG       BACKGROUND SELECTION MENU      PANEL(ISRJPA)
Enter C (Change an existing command) next to an available Zn, where n is 1 to 8, and press Enter. The following panel is displayed.
Z ---------------   USER COMMANDS (PROD) --------------------------------------
COMMAND ===>                                                 SCROLL ===> CSR_

Cmd Abbr==>
Title   ==>
Execute ==>


------------- Hit enter to change, or END/RETURN to cancel change --------------
Add the abbreviated command name, descriptive title, and the code to implement the command, as shown in the following figure.
Z ---------------   USER COMMANDS (PROD) --------------------------------------
COMMAND ===>                                                 SCROLL ===> CSR_

Cmd Abbr==> CLONE
Title   ==> Application Clone Utility
Execute ==> CMD(%WZZCLO#)


------------- Hit enter to change, or END/RETURN to cancel change --------------
When successfully completed, the new command appears in the User Commands list and the primary menu, as shown in the following figure.
22.01                    CODE PIPELINE PROD ALLOCATIONS
OPTION ===>

U   USER              - User Preferences                USERID – USER003
                                                         PREFIX – USER003
A   ANALYSIS          - Cross Reference Analysis        TIME   - 14:31
P   CONTAINERS        - Container List                  DATE   - 2022/05/24
W   WORK              - Work List                              - 2022.144
R   REPOSITORY        - Repository List                 PROC   - ISPFPROC
DP DEPLOY            - Deploy Requests                 CONFIG - PROD
GI GENERATE IMPACTS - Generate Impacts                SERVER - PROD
M   MAINTENANCE       - Maintenance Functions
Z   FUNCTIONS         - Add Special Functions (Z1 - Z8)

Z1   CLONE             Application Clone Utility
Z2
Z3
Z4
Z5
Z6
Z7
Z8

Enter END command to return to the Primary Menu.
Perform the steps to execute the command.

Enabling the Application Clone utility for all users

To make this utility available to all users in a Code Pipeline instance, you must first have proper authority to go into the Update mode. Perform the following steps:

Go into any Maintenance function, such as AD.
Enter Update on the command line.
Exit and go back to the main Code Pipeline panel.
Enter Z, Functions, on the command line. A dialog box as illustrated in the following figure is displayed. (This has been truncated for clarity.)
Z ---------------   USER COMMANDS (PROD) ------------------- Row 1 to 26 of 50
COMMAND ===>                                                 SCROLL ===> CSR

A - Add a command to your list             C - Change an existing command
D - Delete a command from your list        S - Execute a displayed command

    ALIAS    DESCRIPTION                   ALIAS    DESCRIPTION
    -------- ------------------------      -------- -------------------------
Z1 CLONE    CLONE COMMAND              Z5
  Z2                                     Z6
  Z3                                     Z7
  Z4                                     Z8

                     COMMAND SELECTION TABLE
ALIAS    DESCRIPTION                    INVOCATION
-------- ------------------------------ ----------------------------------
B        BROWSE ENTRY PANEL             PGM(ISRBRO)
  BG       BACKGROUND SELECTION MENU      PANEL(ISRJPA)
  CA11     CA11 SYSTEM                    CMD(%WZTCA11)
  DD       PREDICT DATA DICTIONARY        CMD(%WZZDPRED)
  DT       DIALOG TEST PRIMARY MENU       PGM(ISRYXDR) NOCHECK
You can add this new command by changing an existing command. Enter C next to any command and press Enter. Depending on the command you selected for change, a dialog box as illustrated in the following figure is displayed.
Z ---------------   USER COMMANDS (PROD) --------------------------------------
COMMAND ===>                                                 SCROLL ===> CSR_

Cmd Abbr==> BG
Title   ==> BACKGROUND SELECTION MENU
Execute ==> PANEL(ISRJPA)


------------- Hit enter to change, or END/RETURN to cancel change --------------
Modify the required values as shown in the following figure.
Z ---------------   USER COMMANDS (PROD) --------------------------------------
COMMAND ===>                                                 SCROLL ===> CSR_

Cmd Abbr==> CLONE
Title   ==> Application Clone Utility
Execute ==> CMD(%WZZCLO#)


------------- Hit enter to change, or END/RETURN to cancel change --------------
You will see the new command in the Command Selection Table list.
Z ---------------   USER COMMANDS (PROD) ------------------- Row 1 to 26 of 51
COMMAND ===>                                                 SCROLL ===> CSR

A - Add a command to your list             C - Change an existing command
D - Delete a command from your list        S - Execute a displayed command

    ALIAS    DESCRIPTION                   ALIAS    DESCRIPTION
    -------- ------------------------      -------- -------------------------
Z1                                     Z5
  Z2                                     Z6
  Z3                                     Z7
  Z4                                     Z8

                     COMMAND SELECTION TABLE
ALIAS    DESCRIPTION                    INVOCATION
-------- ------------------------------ ----------------------------------
B        BROWSE ENTRY PANEL             PGM(ISRBRO)
  BG       BACKGROUND SELECTION MENU      PANEL(ISRJPA)
  CA11     CA11 SYSTEM                    CMD(%WZTCA11)
  DD       PREDICT DATA DICTIONARY        CMD(%WZZDPRED)
  DT       DIALOG TEST PRIMARY MENU       PGM(ISRYXDR) NOCHECK
  E        EDIT ENTRY PANEL               PGM(ISREDIT)
  FG       FOREGROUND SELECTION MENU      PANEL(ISRFPA)
  FOC      EXECUTE ISPWFOC CLIST          CMD(%ISPWFOC)
  FOCUS    EXECUTE MASFOC CLIST           CMD(%MASFOC)
  FTP      FILE TRANSFER                  CMD(%FTP000)
  CLONE    Application Clone Utility      CMD(%WZZCLO#)
Go back to the main Code Pipeline menu screen and enter Z on the command line. A dialog box as illustrated in the following figure is displayed.
Note that the new command, CLONE, is in the list.
Z ---------------   USER COMMANDS (PROD) ------------------- Row 1 to 26 of 51
COMMAND ===>                                                 SCROLL ===> CSR

A - Add a command to your list             C - Change an existing command
D - Delete a command from your list        S - Execute a displayed command

    ALIAS    DESCRIPTION                   ALIAS    DESCRIPTION
    -------- ------------------------      -------- -------------------------
Z1 CLONE    CLONE COMMAND              Z5
  Z2                                     Z6
  Z3                                     Z7
  Z4                                     Z8

                     COMMAND SELECTION TABLE
ALIAS    DESCRIPTION                    INVOCATION
-------- ------------------------------ ----------------------------------
B        BROWSE ENTRY PANEL             PGM(ISRBRO)
  BG       BACKGROUND SELECTION MENU      PANEL(ISRJPA)
  CA11     CA11 SYSTEM                    CMD(%WZTCA11)
  DD       PREDICT DATA DICTIONARY        CMD(%WZZDPRED)
  DT       DIALOG TEST PRIMARY MENU       PGM(ISRYXDR) NOCHECK
  E        EDIT ENTRY PANEL               PGM(ISREDIT)
  FG       FOREGROUND SELECTION MENU      PANEL(ISRFPA)
  FOC      EXECUTE ISPWFOC CLIST          CMD(%ISPWFOC)
  FOCUS    EXECUTE MASFOC CLIST           CMD(%MASFOC)
  FTP      FILE TRANSFER                  CMD(%FTP000)
  CLONE    Application Clone Utility      CMD(%WZZCLO#)
  H        HSM                            PGM(DFQFMD01) NEWAPPL(HSM)
You can now select this command for execution.

How it Works

The Application Clone utility will generate a batch job with several steps. The Utility runs through JCL steps to create a clone report, create ECI commands, and run the generated ECI commands.

Executing the Command

Executing the utility depends on how you enable it. Perform the corresponding steps:

Based on your scenario:
1. If you set it up for your use only, enter Z3 in the Option line on the primary menu.
2. If you enabled it for all users, select it by entering S next to the command name in the Command Selection Table list.
3. Executing TSO WZZCLO# on Command line.
  
  In all cases, the following dialog box is displayed.
                      Application Clone Driver
  Command ===>
  
  Prefix ==> DSN.PREFIX
  
  Source Details               Target Details
  
  Config     ==> DV5DEV5P      Config      ==> DV5DEV5P
  Appl       ==> PLAY          Appl        ==> PLAY
  SubAppl    ==> APPL1         SubAppl     ==> APPL2
  Stream     ==> PLAY          Stream      ==> PLAY
  Level      ==> DEV1          Level       ==> DEV1
  Assignment ==>               Start Level ==> DEV1
  Release    ==>               Release     ==>
  CT Server ==> WZCTDV5       CT Server   ==> WZCTDV5
  
  Edit Generated JCL ==>        (Y-Edit JCL before Submit, N-Auto Submit        )
  
  Press Enter to continue or END to terminate.
  JOBCARD Information:
  ==> //*
  ==> //*
  ==> //*
  ==> //*