-----------------------------------------PTF 安装实例---------------------------------------------- 1.在CSI中查询你要安装的PTF是否存在 ---------------------- SMP/E PRIMARY OPTION MENU ---------------- SMP/E 35.11 ===> 3 More: + 0 SETTINGS - Configure settings for the SMP/E dialogs 1 ADMINISTRATION - Administer the SMPCSI contents 2 SYSMOD MANAGEMENT - Receive SYSMODs and HOLDDATA and install SYSMODs 3 QUERY - Display SMPCSI information 4 COMMAND GENERATION - Generate SMP/E commands 5 RECEIVE - Receive SYSMODs, HOLDDATA and support information 6 MIGRATION ASSISTANT- Generate Planning and Migration Reports 7 ORDER MANAGEMENT - Manage ORDER entries in the global zone D DESCRIBE - An overview of the dialogs T TUTORIAL - Details on using the dialogs W WHAT IS NEW - What is New in SMP/E Specify the name of the CSI that contains the global zone: SMPCSI DATA SET ===> 'ZOS1A.GLOBAL.CSI' F1=HELP F2=SPLIT F3=END F4=RETURN F5=RFIND F6=RCHANGE F7=UP F8=DOWN F9=SWAP F10=LEFT F11=RIGHT F12=RETRIEVE . . . . . . . . . . . . . . . . . . . . . . . . . . . ---------------------- SMP/E PRIMARY OPTION MENU ---------------- SMP/E 35.11 QUERY SELECTION MENU 1 CSI QUERY - Display SMPCSI entries 2 CROSS-ZONE QUERY - Display status of an entry in all zones 3 SOURCEID QUERY - Display SOURCEIDs for specified zone D DESCRIBE - Overview of using QUERY T TUTORIAL - Information on using QUERY To return to the SMP/E primary option menu, enter END . ===> 2 F1=HELP F2=SPLIT F3=END F4=RETURN F5=RFIND F6=RCHANGE F7=UP F8=DOWN F9=SWAP F10=LEFT F11=RIGHT F12=RETRIEVE . . . . . . . . . . . . . . . . . . . . . . . . . . . CROSS-ZONE QUERY Specify the entry type and name to be queried: ENTRY TYPE ===> SYSMOD Entry type to be queried. To display a selection list of all valid entry types, leave ENTRY TYPE and ENTRY NAME blank ENTRY NAME ===> UK51888 Entry name to be queried. To return to the Query selection menu enter the END command ===> F1=HELP F2=SPLIT F3=END F4=RETURN F5=RFIND F6=RCHANGE F7=UP F8=DOWN F9=SWAP F10=LEFT F11=RIGHT F12=RETRIEVE . . . . . . . . . . . . . . . . . . . . . . . . . . . CSI CROSS-ZONE QUERY - ENTRY SELECTION Row 1 to 3 of 3 Entry Type: SYSMOD Entry Name: UK51888 To return to the previous panel, enter END . To select an entry from a zone, enter S next to the zone. * - Entry not found in zone. ** - Zone could not be allocated or is not initialized. -------------------- Status ----------------------------------- ZONE TYPE FMID STATUS DATE TIME REWORK -------- -------- -------- -------- -------- -------- -------- -------- DZOS1A0 * GLOBAL PTF REC 10.153 16:07:10 TZOS1A0 PTF HIP61A0 APP 10.153 16:44:29 ******************************* Bottom of data ******************************** ===> SCROLL ===> PAGE F1=HELP F2=SPLIT F3=END F4=RETURN F5=RFIND F6=RCHANGE F7=UP F8=DOWN F9=SWAP F10=LEFT F11=RIGHT F12=RETRIEVE . . . . . . . . . . . . . . . . . . . . . . . . . . . 因为我的系统是刚刚打过PTF的,所以 可以看到UK48822已经在系统里面APPLY,但是还没有ACCEPT,这时我们可以使用RESTORE命令来还原。 //A0001RES JOB IBM,CLASS=A,MSGCLASS=H,MSGLEVEL=(1,1), // NOTIFY=&SYSUID,USER=IBMUSER //STEP1 EXEC PGM=GIMSMP,REGION=0M //SMPCSI DD DISP=SHR,DSN=ZOS1A.GLOBAL.CSI //SMPLOG DD SYSOUT=* //SMPWRK6 DD UNIT=SYSDA,SPACE=(CYL,(20,10,1000)) //SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(20,10)) //SYSUT2 DD UNIT=SYSDA,SPACE=(CYL,(10,5)) //SYSUT3 DD UNIT=SYSDA,SPACE=(CYL,(10,5)) //*MPPTFIN DD UNIT=SYSDA,DISP=SHR, //* DSN=TEST.PTF.APLTEST //SMPRPT DD SYSOUT=* //SMPCNTL DD * SET BOUNDARY(TZOS1A0). RESTORE SELECT( UK51888 ) GROUP <---GROUP是查看是否有相关联的PTF . /* 查看状态 CSI CROSS-ZONE QUERY - ENTRY SELECTION Row 1 to 3 of 3 Entry Type: SYSMOD Entry Name: UK51888 To return to the previous panel, enter END . To select an entry from a zone, enter S next to the zone. * - Entry not found in zone. ** - Zone could not be allocated or is not initialized. -------------------- Status ----------------------------------- ZONE TYPE FMID STATUS DATE TIME REWORK -------- -------- -------- -------- -------- -------- -------- -------- DZOS1A0 * GLOBAL PTF REC 10.153 16:07:11 TZOS1A0 * ******************************* Bottom of data ******************************** ===> SCROLL ===> PAGE F1=HELP F2=SPLIT F3=END F4=RETURN F5=RFIND F6=RCHANGE F7=UP F8=DOWN F9=SWAP F10=LEFT F11=RIGHT F12=RETRIEVE 使用REJECT把RECEIVE的状态干掉 //A0002REJ JOB CLASS=A,MSGCLASS=H,MSGLEVEL=(1,1), // NOTIFY=&SYSUID,USER=IBMUSER //STEP1 EXEC PGM=GIMSMP,REGION=0M //SMPCSI DD DISP=SHR,DSN=ZOS1A.GLOBAL.CSI //SMPLOG DD SYSOUT=* //SMPRPT DD SYSOUT=* //SMPWRK1 DD UNIT=SYSDA,SPACE=(CYL,(30,20,200)),DISP=(,DELETE), // DCB=BLKSIZE=6160 //SMPWRK2 DD UNIT=SYSDA,SPACE=(CYL,(30,20,110)),DISP=(,DELETE), // DCB=BLKSIZE=6160 //SMPWRK3 DD UNIT=SYSDA,SPACE=(CYL,(50,30,150)),DISP=(,DELETE), // DCB=BLKSIZE=3120 //SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(10,5)),DISP=(,DELETE) //SYSUT2 DD UNIT=SYSDA,SPACE=(CYL,(10,5)),DISP=(,DELETE) //SYSUT3 DD UNIT=SYSDA,SPACE=(CYL,(10,5)),DISP=(,DELETE) //SMPCNTL DD * SET BDY(GLOBAL). REJECT SELECT( UK51888 ) . /* 查看状态 CSI CROSS-ZONE QUERY - ENTRY SELECTION Row 1 to 3 of 3 Entry Type: SYSMOD Entry Name: UK51888 To return to the previous panel, enter END . To select an entry from a zone, enter S next to the zone. * - Entry not found in zone. ** - Zone could not be allocated or is not initialized. -------------------- Status ----------------------------------- ZONE TYPE FMID STATUS DATE TIME REWORK -------- -------- -------- -------- -------- -------- -------- -------- DZOS1A0 * GLOBAL * TZOS1A0 * ******************************* Bottom of data ******************************** ===> SCROLL ===> PAGE F1=HELP F2=SPLIT F3=END F4=RETURN F5=RFIND F6=RCHANGE F7=UP F8=DOWN F9=SWAP F10=LEFT F11=RIGHT F12=RETRIEVE . . . . . . . . . . . . . . . . . . . . . . . . . . . 时相当于重新为系统打UK51888这个补丁: 先下载UK51888,网站http://w3-950.ibm.com/wwqa/wwqa.nsf/wwqalogon?OpenForm&corp 确认UK51888在系统里面是否存在,上面已经确认过了。 把你download下来的bin文件床传到系统中。 unpack,使用JCL,不知道什么原因,这次下载下来的BIN需要unpack两次。 //A0003UPK JOB MSGCLASS=H,MSGLEVEL=(1,1),NOTIFY=&SYSUID //STEP1 EXEC PGM=TRSMAIN,PARM='UNPACK' //SYSPRINT DD SYSOUT=A //INFILE DD DSN=TEST.UK43912.SMP.BIN,DISP=SHR,UNIT=SYSDA //OUTFILE DD DISP=(NEW,CATLG),DSN=TEST.UK43912.SMP.BIN.UPK, // VOL=SER=COMUSR,UNIT=3390,SPACE=(CYL,(1,1)) //STEP2 EXEC PGM=TRSMAIN,PARM='UNPACK' //SYSPRINT DD SYSOUT=A //INFILE DD DSN=TEST.UK43912.SMP.BIN.UPK,DISP=SHR,UNIT=SYSDA //OUTFILE DD DISP=(NEW,CATLG),DSN=TEST.UK43912.SMP, // VOL=SER=COMUSR,UNIT=3390,SPACE=(CYL,(1,1)) UNPACK后的文件 ... ++ PTF (UK51888) /* //UK51888 JOB 5655-51888,HAL00,MSGLEVEL=(1,1),CLASS=A */ . ++ VER (Z038) FMID(HIP61A0) PRE (UK50683,UK50072,UK47990,UK44784) SUP (UK50080,UK38262,AK94784,AK87221,AK68879) . ++ IF FMID(HIP61B0) THEN REQ (UK51889) ... ​ 使用RECEIVE命令会GLOBAL ZONE里显示出REC这个状态 //A0004RCV JOB CLASS=A,MSGCLASS=H, // MSGLEVEL=(1,1),NOTIFY=&SYSUID,USER=IBMUSER //STEP1 EXEC PGM=GIMSMP,REGION=0M //SMPCSI DD DISP=SHR,DSN=ZOS1A.GLOBAL.CSI //SMPLOG DD SYSOUT=* //SMPWRK6 DD UNIT=SYSDA,SPACE=(CYL,(20,10,1000)) //SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(20,10)) //SYSUT2 DD UNIT=SYSDA,SPACE=(CYL,(10,5)) //SYSUT3 DD UNIT=SYSDA,SPACE=(CYL,(10,5)) //SYSUT4 DD UNIT=SYSDA,SPACE=(CYL,(10,5)) //SMPPTFIN DD UNIT=SYSDA,VOL=SER=COMUSR,DISP=SHR, // DSN=TEST.UK43912.SMP //SMPRPT DD SYSOUT=* //SMPCNTL DD * SET BDY(GLOBAL). RECEIVE SELECT( UK51888 ) SYSMODS LIST . CSI CROSS-ZONE QUERY - ENTRY SELECTION Row 1 to 3 of 3 Entry Type: SYSMOD Entry Name: UK51888 To return to the previous panel, enter END . To select an entry from a zone, enter S next to the zone. * - Entry not found in zone. ** - Zone could not be allocated or is not initialized. -------------------- Status ----------------------------------- ZONE TYPE FMID STATUS DATE TIME REWORK -------- -------- -------- -------- -------- -------- -------- -------- DZOS1A0 * GLOBAL PTF REC 10.174 16:45:45 TZOS1A0 * ******************************* Bottom of data ******************************** ===> SCROLL ===> PAGE F1=HELP F2=SPLIT F3=END F4=RETURN F5=RFIND F6=RCHANGE F7=UP F8=DOWN F9=SWAP F10=LEFT F11=RIGHT F12=RETRIEVE . . . . . . . . . . . . . . . . . . . . . . . . . . . 用APPLY命令会TARGET ZONE里显示出APP这个状态 //A0005APP JOB USER=IBMUSER,CLASS=A,MSGCLASS=H, // MSGLEVEL=(1,1),NOTIFY=&SYSUID //STEP1 EXEC PGM=GIMSMP,REGION=0M //SMPCSI DD DISP=SHR,DSN=ZOS1A.GLOBAL.CSI //SMPLOG DD SYSOUT=* //SMPRPT DD SYSOUT=* //SMPWRK1 DD UNIT=SYSDA,SPACE=(CYL,(30,20,200)),DISP=(,DELETE), // DCB=BLKSIZE=6160 //SMPWRK2 DD UNIT=SYSDA,SPACE=(CYL,(30,20,110)),DISP=(,DELETE), // DCB=BLKSIZE=6160 //SMPWRK3 DD UNIT=SYSDA,SPACE=(CYL,(50,30,150)),DISP=(,DELETE), // DCB=BLKSIZE=3120 //SMPWRK4 DD UNIT=SYSDA,SPACE=(CYL,(30,20,110)),DISP=(,DELETE), // DCB=BLKSIZE=3120 //SMPWRK6 DD UNIT=SYSDA,SPACE=(CYL,(30,20,10)),DISP=(,DELETE), // DCB=BLKSIZE=6160 //SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(10,5)),DISP=(,DELETE) //SYSUT2 DD UNIT=SYSDA,SPACE=(CYL,(10,5)),DISP=(,DELETE) //SYSUT3 DD UNIT=SYSDA,SPACE=(CYL,(10,5)),DISP=(,DELETE) //SYSUT4 DD UNIT=SYSDA,SPACE=(TRK,(10,5)),DISP=(,DELETE) //SMPCNTL DD * SET BDY(TZOS1A0). APPLY SELECT( UK51888 ) BYPASS(HOLDSYSTEM(DOC,ENH,DYNACT,IPL,ACTION)) CHECK <--check没问题后,把CHECK去掉在SUB JCL . /* // CSI CROSS-ZONE QUERY - ENTRY SELECTION Row 1 to 3 of 3 Entry Type: SYSMOD Entry Name: UK51888 To return to the previous panel, enter END . To select an entry from a zone, enter S next to the zone. * - Entry not found in zone. ** - Zone could not be allocated or is not initialized. -------------------- Status ----------------------------------- ZONE TYPE FMID STATUS DATE TIME REWORK -------- -------- -------- -------- -------- -------- -------- -------- DZOS1A0 * GLOBAL PTF REC 10.174 16:45:45 TZOS1A0 PTF HIP61A0 APP 10.174 16:53:04 ******************************* Bottom of data ******************************** ===> SCROLL ===> PAGE F1=HELP F2=SPLIT F3=END F4=RETURN F5=RFIND F6=RCHANGE F7=UP F8=DOWN F9=SWAP F10=LEFT F11=RIGHT F12=RETRIEVE . . . . . . . . . . . . . . . . . . . . . . . . . . . 时这个PTF已经完成了,重新系统看看测试下是否有异常,在系统运行一段时候后,可以使用ACCEPT做一个新的备份点。 使用ACCEPT命令会DISTRIBUTION ZONE里显示出ACC这个状态 //A0006ACC JOB USER=IBMUSER,CLASS=A,MSGCLASS=H, // MSGLEVEL=(1,1),NOTIFY=&SYSUID //STEP1 EXEC PGM=GIMSMP,REGION=0M //SMPCSI DD DISP=SHR,DSN=ZOS1A.GLOBAL.CSI //SMPLOG DD SYSOUT=* //SMPRPT DD SYSOUT=* //SMPWRK1 DD UNIT=SYSDA,SPACE=(CYL,(30,20,200)),DISP=(,DELETE), // DCB=BLKSIZE=6160 //SMPWRK2 DD UNIT=SYSDA,SPACE=(CYL,(30,20,110)),DISP=(,DELETE), // DCB=BLKSIZE=6160 //SMPWRK3 DD UNIT=SYSDA,SPACE=(CYL,(50,30,150)),DISP=(,DELETE), // DCB=BLKSIZE=3120 //SMPWRK4 DD UNIT=SYSDA,SPACE=(CYL,(30,20,110)),DISP=(,DELETE), // DCB=BLKSIZE=3120 //SMPWRK6 DD UNIT=SYSDA,SPACE=(CYL,(30,20,10)),DISP=(,DELETE), // DCB=BLKSIZE=6160 //SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(10,5)),DISP=(,DELETE) //SYSUT2 DD UNIT=SYSDA,SPACE=(CYL,(10,5)),DISP=(,DELETE) //SYSUT3 DD UNIT=SYSDA,SPACE=(CYL,(10,5)),DISP=(,DELETE) //SYSUT4 DD UNIT=SYSDA,SPACE=(TRK,(10,5)),DISP=(,DELETE) //SMPCNTL DD * SET BDY(DZOS1A0). ACCEPT SELECT( UK51888 ) BYPASS(HOLDSYSTEM(DOC,ENH,DYNACT,IPL,ACTION)) CHECK <--check没问题后,把CHECK去掉在SUB JCL . /* CSI CROSS-ZONE QUERY - ENTRY SELECTION Row 1 to 3 of 3 Entry Type: SYSMOD Entry Name: UK51888 To return to the previous panel, enter END . To select an entry from a zone, enter S next to the zone. * - Entry not found in zone. ** - Zone could not be allocated or is not initialized. -------------------- Status ----------------------------------- ZONE TYPE FMID STATUS DATE TIME REWORK -------- -------- -------- -------- -------- -------- -------- -------- DZOS1A0 PTF HIP61A0 ACC 10.174 17:00:16 GLOBAL * TZOS1A0 PTF HIP61A0 APP 10.174 16:53:04 ******************************* Bottom of data ******************************** ===> SCROLL ===> PAGE F1=HELP F2=SPLIT F3=END F4=RETURN F5=RFIND F6=RCHANGE F7=UP F8=DOWN F9=SWAP F10=LEFT F11=RIGHT F12=RETRIEVE . . . . . . . . . . . . . . . . . . . . . . . . . . . ​ 可以使用LIST列出PTF的状态 //A0007LST JOB CLASS=A,MSGCLASS=H,MSGLEVEL=(1,1), // NOTIFY=&SYSUID,USER=IBMUSER //STEP1 EXEC PGM=GIMSMP,REGION=0M //SMPCSI DD DISP=SHR,DSN=ZOS1A.GLOBAL.CSI //SMPRPT DD SYSOUT=* //SMPLOG DD SYSOUT=* //SMPCNTL DD * SET BDY(TZOS1A0). LIST SYSMOD(UK51888) . /* 可以在LOG中看到 UK51888 TYPE = PTF STATUS = REC APP FMID = HIP61A0 DATE/TIME REC = 10.174 16:45:45 INS = 10.174 16:53:04 SOURCEID = HIPER PUT0912 RSU1001 SMCCOR ​