This procedure dynamically activates XES list structures when COMMUNICATION=XCF or CTCONLY. The CA MIM system names are GK03, GK13, and GK62.
Note: Be sure that your COMPATLEVEL is set to 12.0 or higher.
The following steps create a primary and a secondary list structure. The primary list structure is the size of the largest DISPLAY CFSIZE command. The secondary list structure is about 20 percent larger.
Follow these steps:
@D CFSIZE MIM0067I Command DISPLAY 726 MIM1154I GDIF CFSIZE Display:
The recommended primary GDIF control file size is 10240 KB.
@ALLOC XESFILEID=00 STRNAME=KERGL01#TABLE00 IXL014I IXLCONN REQUEST FOR STRUCTURE KERGL01#TABLE00 920 WAS SUCCESSFUL. JOBNAME: MIM12MIM ASID: 0088 CONNECTOR NAME: MIM12MIMGK62 CFNAME: CFCCMIM2 MIM0472I 2049 blocks formatted on KERGL01#TABLE00 MIM0067I Command ALLOCATE 922 MIM0153I ALLOCATION successful @ALLOC XESFILEID=01 STRNAME=KERGL01#TABLE01 IXL014I IXLCONN REQUEST FOR STRUCTURE KERGL01#TABLE01 925 WAS SUCCESSFUL. JOBNAME: MIM12MIM ASID: 0088 CONNECTOR NAME: MIM12MIMGK62 CFNAME: CFCCMIM1 MIM0067I Command ALLOCATE 926 MIM0153I ALLOCATION successful
@D FILES
MIM0067I Command DISPLAY 937
MIM0102I Control File Display:
File Unit Status Volser Data Set
00 USABLE CFCCMIM2 KERGL01#TABLE00
01 USABLE CFCCMIM1 KERGL01#TABLE01
@MIG CF=00 MIM0067I Command MIGRATE 767 MIM0227I Migration initiated to control file 00 MIM0088I migration to file 00 IN PROGRESS MIM0242I system GK62 VCF deactivation COMPLETE MIM0080I migration to file 00 COMPLETE MIM0638I Global Copy Received
The migration is now complete.
@D FILES
MIM0067I Command DISPLAY 780
MIM0102I Control File Display:
File Unit Status Volser Data Set
00 IN-USE CFCCMIM2 KERGL01#TABLE00
01 USABLE CFCCMIM1 KERGL01#TABLE01
MIM0104I Checkpoint File Display:
File Unit Status Volser Data Set
00 2064 IN-USE TSO23C KERGL01.XE62.CKPT00
01 2064 USABLE TSO23C KERGL01.XE62.CKPT01
The list structures are activated and file 00 is being used, which is correct.
|
Copyright © 2014 CA.
All rights reserved.
|
|