Phase V consists of executing CA-IDMS compilers against the object IDD using the output of Phases III and IV. In OS environments, LADAMU50 is utilized to bypass execution of those steps for which there is no input. In DOS environments, LADAMU40 is utilized to merge the various input files. DDDL1MG combines P5DDDL1, P5DDDL2, and P5DDDL3; UBSCMRG combines P5UBSC1, P5UBSC2, and P5UBSC3; MAP1MRG combines P5MAP1A and P5MAP1B; DDDL2MG combines P5DDDL5 and P5DDDL6.
If you are migrating a schema and application programs/dialogs in the same execution of the AMU, or if Phase II issued warnings for subschemas indicating the owning schema or DMCL does not exist in the object IDD, you will want to insert the schema and/or DMCL compilers after step 3 (where the records are added) and compile the appropriate schema(s) and DMCL(s).
In the event of an abend or system failure, this phase should not merely be restarted at the beginning. You may choose to restart at the step which abended if you are certain that IDMS has rolled back any updates which occurred during the step. It will always be safe to restart the migration at Phase II and let the AMU determine which updates have or have not been applied.
Upon completion, review the compiler listings. The following diagnostics may be expected.
Step 4: I-level diagnostics for copied load modules.
E-level diagnostics for DUPLICATE VALUE if initial or conditional values have
been assigned at the element level.
E-level diagnostics for ALREADY CONNECTED for certain entities being replaced.
Step 6: W-level diagnostics for disallowed functions.
Step 8: W-level diagnostics for unlinked tables.
Step 12: E-level diagnostics for ALREADY CONNECTED.
If you are executing under IDMS release 5.7, you may also expect W-level diagnostics for ADD CHANGED TO MODIFY.
If any other diagnostics (especially E-level) are issued by any step, they should be viewed as potential problems and investigated as such.
//jobname JOB site parameters //step1 EXEC PGM=LADAMU50 //STEPLIB DD DSN=loadlib,DISP=SHR //SYSIPT DD DSN=ph5map1d,DISP=SHR //step2 EXEC PGM=RHDCMAP1, // COND=(12,EQ,step1) include site standard RHDCMAP1 JCL for the object IDD SYSIDMS must be included if OBJDICT= was specified in Phase I //SYSIPT DD DSN=ph5map1d,DISP=SHR //step3 EXEC PGM=LADAMU50 //STEPLIB DD DSN=loadlib,DISP=SHR //SYSIPT DD DSN=ph5dddl1,DISP=SHR //step4 EXEC PGM=IDMSDDDL,COND=(12,EQ,step3) include site standard IDMSDDDL JCL for the object IDD //SYSIPT DD DSN=ph5dddl1,DISP=SHR // DD DSN=ph5dddl2,DISP=SHR // DD DSN=ph5dddl3,DISP=SHR //step5 EXEC PGM=LADAMU50 //STEPLIB DD DSN=loadlib,DISP=SHR //SYSIPT DD DSN=ph5ubsc1,DISP=SHR //step6 EXEC PGM=IDMSUBSC,COND=(12,EQ,step5) include site standard IDMSUBSC JCL for the object IDD //SYSIPT DD DSN=ph5ubsc1,DISP=SHR // DD DSN=ph5ubsc2,DISP=SHR // DD DSN=ph5ubsc3,DISP=SHR //step7 EXEC PGM=LADAMU50 //STEPLIB DD DSN=loadlib,DISP=SHR //SYSIPT DD DSN=ph5map1a,DISP=SHR //step8 EXEC PGM=RHDCMAP1,COND=(12,EQ,step7) include site standard RHDCMAP1 JCL for the object IDD SYSIDMS must be included if OBJDICT= was specified in Phase I //SYSIPT DD DSN=ph5map1a,DISP=SHR // DD DSN=ph5map1b,DISP=SHR //step9 EXEC PGM=LADAMU50 //STEPLIB DD DSN=loadlib,DISP=SHR //SYSIPT DD DSN=ph5map1d,DISP=SHR //step10 EXEC PGM=RHDCMPUT,COND=(12,EQ,step9) include site standard RHDCMPUT JCL for the object IDD SYSIDMS must be included if OBJDICT= was specified in Phase I //SYSIPT DD DSN=ph5mput,DISP=SHR //step11 EXEC PGM=LADAMU50 //STEPLIB DD DSN=loadlib,DISP=SHR //SYSIPT DD DSN=ph5dddl5,DISP=SHR //step12 EXEC PGM=IDMSDDDL,COND=(12,EQ,step11) include site standard IDMSDDDL JCL for the object IDD //SYSIPT DD DSN=ph5dddl5,DISP=SHR // DD DSN=ph5dddl6,DISP=SHR //step13 EXEC PGM=LADAMU50 //STEPLIB DD DSN=loadlib,DISP=SHR //SYSIPT DD DSN=ph5bgen,DISP=SHR //step14 EXEC PGM=ADSOBGEN, // COND=(12,EQ,step13) include site standard ADSOBGEN JCL for the object IDD //SYSIPT DD DSN=ph5bgen,DISP=SHR /* //
* $$ JOB JNM=jobname,site parameters // JOB site parameters // UPSI 1 * step 1a - LADAMU40, Place LIBDEFS here // ASSGN SYS005,SYSLST // ASSGN SYS031,DISK,VOL=volume,SHR // DLBL P5DDDL1,'ph5dddl1’,0 from Phase III // EXTENT SYS031,volume,,,space1 // ASSGN SYS032,DISK,VOL=volume,SHR // DLBL P5DDDL2,'ph5dddl2',0 from Phase IV // EXTENT SYS032,volume,,,space1 // ASSGN SYS033,DISK,VOL=volume,SHR // DLBL P5DDDL3,'ph5dddl3',0 from Phase III // EXTENT SYS033,volume,,,space1 // ASSGN SYS035,DISK,VOL=volume,SHR // DLBL P5DDDL5,'ph5dddl5',0 from Phase III // EXTENT SYS035,volume,,,space1 // ASSGN SYS036,DISK,VOL=volume,SHR // DLBL P5DDDL6,'ph5dddl6',0 from Phase IV // EXTENT SYS036,volume,,,space1 // ASSGN SYS037,DISK,VOL=volume,SHR // DLBL P5UBSC1,'ph5ubsc1',0 from Phase III // EXTENT SYS037,volume,,,space1 // ASSGN SYS038,DISK,VOL=volume,SHR // DLBL P5UBSC2,'ph5ubsc2',0 from Phase IV // EXTENT SYS038,volume,,,space1 // ASSGN SYS039,DISK,VOL=volume,SHR // DLBL P5UBSC3,'ph5ubsc3',0 from Phase III // EXTENT SYS039,volume,,,space1 // ASSGN SYS040,DISK,VOL=volume,SHR // DLBL P5MAP1A,'ph5map1a',0 from Phase III // EXTENT SYS040,volume,,,space2 // ASSGN SYS041,DISK,VOL=volume,SHR // DLBL P5MAP1B,'ph5map1b',0 from Phase IV // EXTENT SYS041,volume,,,space2 // ASSGN SYS042,DISK,VOL=volume,SHR // DLBL P4MPUT,'ph4mput',0 from Phase III // EXTENT SYS042,volume,,,space1 // ASSGN SYS043,DISK,VOL=volume,SHR // DLBL DDDL1MG,'dddl1 merge',0 // EXTENT SYS043,volume,,,space2 // ASSGN SYS044,DISK,VOL=volume,SHR // DLBL UBSCMRG,'ubsc merge',0 // EXTENT SYS044,volume,,,space2 // ASSGN SYS045,DISK,VOL=volume,SHR // DLBL MAP1MRG,'map1 merge',0 // EXTENT SYS045,volume,,,space2 // ASSGN SYS046,DISK,VOL=volume,SHR // DLBL DDDL2MG,'dddl2 merge',0 // EXTENT SYS046,volume,,,space2 // EXEC LADAMU40 * step 2 - RHDCMAP1 // UPSI 1 include site standard RHDCMAP1 JCL for the object IDD // DLBL IJSYSIN,'ph5map1d',0 // EXTENT SYSIPT,volume ASSGN SYSIPT,DISK,VOL=volume,SHR // EXEC RHDCMAP1,SIZE=512K /* * step 4 - IDMSDDDL include site standard IDMSDDDL JCL for the object IDD // DLBL IJSYSIN,'dddl1 merge',0 // EXTENT SYSIPT,volume ASSGN SYSIPT,DISK,VOL=volume,SHR // EXEC IDMSDDDL,SIZE=512K * step 6 - IDMSUBSC include site standard IDMSUBSC JCL for the object IDD // DLBL IJSYSIN,'ubsc merge',0 // EXTENT SYSIPT,volume ASSGN SYSIPT,DISK,VOL=volume,SHR // EXEC IDMSUBSC,SIZE=512K * step 8 - RHDCMAP1 include site standard RHDCMAP1 JCL for the object IDD // DLBL IJSYSIN,'map1 merge',0 // EXTENT SYSIPT,volume ASSGN SYSIPT,DISK,VOL=volume,SHR // EXEC RHDCMAP1,SIZE=512K * step 10 - RHDCMPUT include site standard RHDCMPUT JCL for the object IDD // DLBL IJSYSIN,'ph5mput',0 // EXTENT SYSIPT,volume ASSGN SYSIPT,DISK,VOL=volume,SHR // EXEC RHDCMPUT,SIZE=512K * step 12 - IDMSDDDL include site standard IDMSDDDL JCL for the object IDD // DLBL IJSYSIN,'dddl2 merge',0 // EXTENT SYSIPT,volume ASSGN SYSIPT,DISK,VOL=volume,SHR // EXEC IDMSDDDL,SIZE=512K * step 14 - ADSOBGEN include site standard ADSOBGEN JCL for the object IDD // DLBL IJSYSIN,'ph5bgen',0 // EXTENT SYSIPT,volume ASSGN SYSIPT,DISK,VOL=volume,SHR // EXEC ADSOBGEN,SIZE=512K /* /& * $$ EOJ space1 Same extent specified when file was created. space2 See Overview for contents of this file.
Many step numbers have intentionally been skipped so that step names coincide with OS step names.