GuangXingLiu

一蓑一笠一孤舟,一丈丝纶一鱼钩,一曲高歌一樽酒,一人独钓一江秋.

ADCD z/OS 1.13 customization

     


Step 01: First IPL


Go to "ADCD.Z113.PARMLIB(CONSOL00)", Update "AREA" into "NONE". I like this:

INIT     CMDDELIM(")    
         MLIM(1500)     
         MONITOR(DSNAME)
         MPF(00)        
         PFK(00)        
         RLIM(10)       
         UEXIT(N)       
         CNGRP(00)      
DEFAULT ROUTCODE(ALL)   
CONSOLE                 
  DEVNUM(700)           
  AREA(NONE)            
  AUTH(MASTER)          
  CON(N)                
  DEL(R)                
  MFORM(J,T)            
  MONITOR(JOBNAMES-T)   
  NAME(L700)            
  PFKTAB(PFKTAB1)       
  RNUM(19)              
  ROUTCODE(ALL)         
  RTME(1)               
  SEG(14)               
  UNIT(3270-X)          
CONSOLE                 
  DEVNUM(908)                                                         
  AREA(NONE)                                                          
  AUTH(MASTER)                                                        
  CON(N)                                                              
  DEL(R)                                                              
  MFORM(J,T)                                                          
  MONITOR(JOBNAMES-T)                                                 
  NAME(C908)                                                          
  PFKTAB(PFKTAB1)                                                     
  RNUM(19)                                                            
  ROUTCODE(ALL)                                                       
  RTME(1)                                                             
  SEG(14)                                                             
  UNIT(3270-X)                                                        
CONSOLE   DEVNUM(SYSCONS) LEVEL(ALL)                                  
       NAME(HWCI) AUTH(MASTER) ROUTCODE(ALL)                          
CONSOLE                                                               
  DEVNUM(SUBSYSTEM)                                                   
  NAME(SUBS)                                                          
  AUTH(ALL)                                                           
CONSOLE                                                               
  DEVNUM(SUBSYSTEM)                                                   
  AUTH(ALL)                                                           
  NAME(S908)                                                          
HARDCOPY                                                              
  DEVNUM(SYSLOG)                                                      
  CMDLEVEL(CMDS)                                                      
  ROUTCODE(ALL)                                                       
/********************************************************************/
/*                                                                  */
/* END OF CONSOLE DEFINITIONS                                       */
/*                                                                  */
/********************************************************************/
/********************************************************************/
/*                                                                  */
/* END OF CONSOLE DEFINITIONS                                       */
/*                                                                  */
/********************************************************************/



Go to "ADCD.Z113.PARMLIB(CLOCK00)", update "TIMEZONE" as "E.08.00.00":

OPERATOR NOPROMPT    
TIMEZONE W.06.00.00  
ETRMODE  NO          
ETRZONE  NO          
ETRDELTA 10          
STPMODE  NO          
STPZONE  NO



Check system using IPL parameter:

D IPLINFO
IEE254I  02.23.40 IPLINFO DISPLAY 879                     
 SYSTEM IPLED AT 19.46.15 ON 04/21/2017                   
 RELEASE z/OS 01.13.00    LICENSE = z/OS                  
 USED LOADCS IN SYS1.IPLPARM ON 00A82                     
 ARCHLVL = 2   MTLSHARE = N                               
 IEASYM LIST = 00                                         
 IEASYS LIST = CS (OP)                                    
 IODF DEVICE: ORIGINAL(00A82) CURRENT(00A82)              
 IPL DEVICE: ORIGINAL(00A80) CURRENT(00A80) VOLUME(ZDRES1)



Check system applications be started up:

D A,L                                                                 
IEE114I 02.22.55 2017.112 ACTIVITY 877                                
 JOBS     M/S    TS USERS    SYSAS    INITS   ACTIVE/MAX VTAM     OAS 
00003    00013    00001      00031    00013    00001/00040       00011
 LLA      LLA      LLA      NSW  S  JES2     JES2     IEFPROC  NSW  S 
 VLF      VLF      VLF      NSW  S  VTAM     VTAM     VTAM     NSW  S 
 DLF      DLF      DLF      NSW  S  RACF     RACF     RACF     NSW  S 
 RRS      RRS      RRS      NSW  S  TSO      TSO      STEP1    OWT  S 
 SDSF     SDSF     SDSF     NSW  S  TCPIP    TCPIP    TCPIP    NSW  SO
 INETD4   STEP1    OMVSKERN OWT  AO TN3270   TN3270   TN3270   NSW  SO
 HTTPD1   HTTPD1   WEBSRV1  IN   SO PORTMAP  PORTMAP  PMAP     OWT  SO
 FTPD1    STEP1    FTPD     OWT  AO SSHD4    STEP1    START2   OWT  AO
IBMUSER IN










Step 02: Update system parameter


Based on system parameter, we using "LOADCS" in "SYS1.IPLPARM":

D IPLINFO
IEE254I  02.23.40 IPLINFO DISPLAY 879                     
 SYSTEM IPLED AT 19.46.15 ON 04/21/2017                   
 RELEASE z/OS 01.13.00    LICENSE = z/OS                  
 USED LOADCS IN SYS1.IPLPARM ON 00A82                     
 ARCHLVL = 2   MTLSHARE = N                               
 IEASYM LIST = 00                                         
 IEASYS LIST = CS (OP)                                    
 IODF DEVICE: ORIGINAL(00A82) CURRENT(00A82)              
 IPL DEVICE: ORIGINAL(00A80) CURRENT(00A80) VOLUME(ZDRES1)


So go to "SYS1.IPLPARM", create a new member "LOADNO" model from "LOADCS"for my system "NOVA"

ISREDDE2   SYS1.IPLPARM(LOADCS) - 01.00                            Columns 00001 00080 
Command ===>                                                          Scroll ===> CSR  
****** ********************************* Top of Data **********************************
000001 IODF     99 SYS1                                                                
000002 SYSCAT   ZDSYS1113CCATALOG.Z113.MASTER                                          
000003 SYSPARM  CS                                                                     
000004 IEASYM   00                                                                     
000005 NUCLST   00                                                                     
000006 PARMLIB  USER.PARMLIB                                 ZDSYS1                    
000007 PARMLIB  ADCD.Z113.PARMLIB                            ZDRES1                    
000008 PARMLIB  SYS1.PARMLIB                                 ZDRES1                    
000009 NUCLEUS  1                                                                      
000010 SYSPLEX  ADCDPL                                                                 
****** ******************************** Bottom of Data ********************************


ISREDDE2   SYS1.IPLPARM(LOADNO) - 01.00                            Columns 00001 00080 
Command ===>                                                          Scroll ===> CSR  
****** ********************************* Top of Data **********************************
000001 IODF     99 SYS1                                                                
000002 SYSCAT   ZDSYS1113CCATALOG.Z113.MASTER                                          
000003 SYSPARM  NO                                                                     
000004 IEASYM   NO                                                                     
000005 NUCLST   00                                                                     
000006 PARMLIB  USER.PARMLIB                                 ZDSYS1                    
000007 PARMLIB  NOVA.Z113.PARMLIB                            ZDRES1                    
000008 PARMLIB  SYS1.PARMLIB                                 ZDRES1                    
000009 NUCLEUS  1                                                                      
000010 SYSPLEX  ADCDPL                                                                 
****** ******************************** Bottom of Data ********************************


[precondition] SYS1.IPLPARM(LOADNO)

Allocate a new dataset "NOVA.Z113.PARMLIB" model from "ADCD.Z113.PARMLIB"(you can make it a little bigger, please keep the reside volume) with all members.

ISRUDSL0 Data Sets Matching **.Z113.PARMLIB                         Row 1 of 2 
Command ===>                                                  Scroll ===> CSR  
                                                                               
Command - Enter "/" to select action                        Tracks %Used   XT  
-------------------------------------------------------------------------------
         ADCD.Z113.PARMLIB                                      86   97     3  
         NOVA.Z113.PARMLIB                                     255   18     1  
***************************** End of Data Set list ****************************



[precondition] SYS1.IPLPARM(LOADNO)

Go to "NOVA.Z113.PARMLIB", create a new member "IEASYSNO" model from "IEASYSCS"for my system "NOVA"

ISREDDE2   NOVA.Z113.PARMLIB(IEASYSCS) - 01.00                     Columns 00001 00080 
Command ===>                                                          Scroll ===> CSR  
****** ********************************* Top of Data **********************************
000001 CLOCK=00,                     SELECT CLOCK00                                    
000002 CLPA,                                                                           
000003 CMB=(UNITR,COMM,GRAPH,CHRDR), ADDITIONAL CMB ENTRIES                            
000004 CMD=CS,                                                                         
000005 CON=(00,NOJES3),              SELECT CONSOL00                                   
000006 COUPLE=00,                       ALL LOCAL                                      
000007 CSA=(3000,200000),            CSA RANGE                                         
000008 DIAG=00,                      SELECT DIAG00, DIAGNOSTIC COMMANDS                
000009 DUMP=DASD,                    PLACE SVC DUMPS ON DASD DEVICES                   
000010 FIX=00,                       SELECT IEAFIX00, FIX MODULES SPECIFIED            
000011 GRS=NONE,                     NO COORDINATION OF GRS REQUESTS                   
000012 ILMMODE=NONE,                 EXPLICITLY DISABLE LICENSE MANAGER                
000013 LNKAUTH=LNKLST,               AUTHORIZE LNKLST00, APFTAB IS ALTERNATE           
000014 LOGCLS=L,                     WILL NOT BE PRINTED BY DEFAULT                    
000015 LOGLMT=999999,                MAX WTL MESSAGES QUEUED, MUST BE 6 DIGITS         
000016 LOGREC=SYS1.LOGREC,           ERROR RECORDING                                   
000017 LPA=01,                       SELECT LPALST                                     
000018 MAXUSER=250,                  SYS TASKS PLUS INITS PLUS TSOUSERS                
000019 MLPA=00,                      SELECT IEALPA00, MLPA PARAMETERS                  
000020 MSTRJCL=00,                   SELECT MSTJCLEX, MASTER JCL                       
000021 OMVS=CS,                      SELECT BPXPRMCS                                   
000022 OPI=YES,                      ALLOW OPERATOR OVERRIDE                           
000023 PAGE=(SYS1.PLPA.PAGE,                                                           
000024       SYS1.COMMON.PAGE,                                                         
000025       SYS1.LOCALA.PAGE,                                                         
000026       SYS1.LOCALB.PAGE,                                                         
000027       SYS1.LOCALC.PAGE,                                                         
000028       SYS1.LOCALD.PAGE,                                                         
000029       SYS1.LOCALE.PAGE,                                                         
000030       SYS1.LOCALF.PAGE,L),                                                      
000031 PAK=00,                       SELECT IEAPAK00                                   
000032 PLEXCFG=ANY,                                                                    
000033 PROG=01,                      SELECT PROG00, DYNAMIC APF LIST                   
000034 REAL=128,                     ALLOWS 2 64K OR 1 128K JOB TO RUN V=R             
000035 RSU=0,                        NO RECONFIG STORAGE UNITS                         
000036 RSVNONR=100,                  RESERVED ASVT ENTRIES                             
000037 RSVSTRT=5,                    RESERVED ASVT ENTRIES                             
000038 SCH=00,                       SELECT SCHED00                                    
000039 SMF=00,                       SELECT SMFPRM00, SMF PARAMETERS                   
000040 SQA=(15,64),                  SQA SIZE APPROX 640K                              
000041 SSN=00,                       SELECT IEFSSN00, SUBSYSTEM NAMES                  
000042 PROD=(00,01),                 PLEASE NOTE IFAPRD01                              
000043 SVC=00,                       SELECT IEASVC00, USER SVCS                        
000044 VAL=00,                       SELECT VATLST00                                   
000045 VIODSN=SYS1.STGINDEX,         VIO DS                                            
000046 VRREGN=64                     DEFAULT REAL-STORAGE REGION SIZE                  
****** ******************************** Bottom of Data ********************************


ISREDDE2   NOVA.Z113.PARMLIB(IEASYSNO) - 01.07                     Columns 00001 00080 
Command ===>                                                          Scroll ===> CSR  
****** ********************************* Top of Data **********************************
000001 CLOCK=NO,                     SELECT CLOCK00                                    
000002 CLPA,                                                                           
000003 CMB=(UNITR,COMM,GRAPH,CHRDR), ADDITIONAL CMB ENTRIES                            
000004 CMD=NO,                                                                         
000005 CON=(NO,NOJES3),              SELECT CONSOL00                                   
000006 COUPLE=00,                       ALL LOCAL                                      
000007 CSA=(3000,200000),            CSA RANGE                                         
000008 DIAG=00,                      SELECT DIAG00, DIAGNOSTIC COMMANDS                
000009 DUMP=DASD,                    PLACE SVC DUMPS ON DASD DEVICES                   
000010 FIX=00,                       SELECT IEAFIX00, FIX MODULES SPECIFIED            
000011 GRS=NONE,                     NO COORDINATION OF GRS REQUESTS                   
000012 ILMMODE=NONE,                 EXPLICITLY DISABLE LICENSE MANAGER                
000013 LNKAUTH=LNKLST,               AUTHORIZE LNKLST00, APFTAB IS ALTERNATE           
000014 LOGCLS=L,                     WILL NOT BE PRINTED BY DEFAULT                    
000015 LOGLMT=999999,                MAX WTL MESSAGES QUEUED, MUST BE 6 DIGITS         
000016 LOGREC=SYS1.LOGREC,           ERROR RECORDING                                   
000017 LPA=NO,                       SELECT LPALST                                     
000018 MAXUSER=250,                  SYS TASKS PLUS INITS PLUS TSOUSERS                
000019 MLPA=00,                      SELECT IEALPA00, MLPA PARAMETERS                  
000020 MSTRJCL=NO,                   SELECT MSTJCLEX, MASTER JCL                       
000021 OMVS=CS,                      SELECT BPXPRMCS                                   
000022 OPI=YES,                      ALLOW OPERATOR OVERRIDE                           
000023 PAGE=(SYS1.PLPA.PAGE,                                                           
000024       SYS1.COMMON.PAGE,                                                         
000025       SYS1.LOCALA.PAGE,                                                         
000026       SYS1.LOCALB.PAGE,                                                         
000027       SYS1.LOCALC.PAGE,                                                         
000028       SYS1.LOCALD.PAGE,                                                         
000029       SYS1.LOCALE.PAGE,                                                         
000030       SYS1.LOCALF.PAGE,L),                                                      
000031 PAK=00,                       SELECT IEAPAK00                                   
000032 PLEXCFG=ANY,                                                                    
000033 PROG=NO,                      SELECT PROG00, DYNAMIC APF LIST                   
000034 REAL=128,                     ALLOWS 2 64K OR 1 128K JOB TO RUN V=R             
000035 RSU=0,                        NO RECONFIG STORAGE UNITS                         
000036 RSVNONR=100,                  RESERVED ASVT ENTRIES                             
000037 RSVSTRT=5,                    RESERVED ASVT ENTRIES                             
000038 SCH=NO,                       SELECT SCHED00                                    
000039 SMF=00,                       SELECT SMFPRM00, SMF PARAMETERS                   
000040 SQA=(15,64),                  SQA SIZE APPROX 640K                              
000041 SSN=NO,                       SELECT IEFSSN00, SUBSYSTEM NAMES                  
000042 PROD=(00,01),                 PLEASE NOTE IFAPRD01                              
000043 SVC=00,                       SELECT IEASVC00, USER SVCS                        
000044 VAL=00,                       SELECT VATLST00                                   
000045 VIODSN=SYS1.STGINDEX,         VIO DS                                            
000046 VRREGN=64                     DEFAULT REAL-STORAGE REGION SIZE                  
****** ******************************** Bottom of Data ********************************


[precondition] SYS1.IPLPARM(LOADNO)

Go to "NOVA.Z113.PARMLIB", create a new member "IEASYMNO" model from "IEASYM00"for my system "NOVA"

ISREDDE2   NOVA.Z113.PARMLIB(IEASYM00) - 01.01                     Columns 00001 00080 
Command ===>                                                          Scroll ===> CSR  
****** ********************************* Top of Data **********************************
000001 SYSDEF  SYSNAME(ADCD113)                                                        
000002         SYSCLONE(1A)                                                            
000003         SYMDEF(&UNIXVER='Z113')                                                 
000004         SYMDEF(&SYSVER='Z113')                                                  
000005         SYMDEF(&SYSP1.='ZDPRD1')                                                
000006         SYMDEF(&SYSP2.='ZDPRD2')                                                
000007         SYMDEF(&SYSP3.='ZDPRD3')                                                
000008         SYMDEF(&SYSR2.='ZDRES2')                                                
000009         SYMDEF(&SYSS1.='ZDSYS1')                                                
000010                                                                                 
****** ******************************** Bottom of Data ********************************


ISREDDE2   NOVA.Z113.PARMLIB(IEASYMNO) - 01.00                     Columns 00001 00080 
Command ===>                                                          Scroll ===> CSR  
****** ********************************* Top of Data **********************************
000001 SYSDEF  SYSNAME(NOVA)                                                           
000002         SYSCLONE(1A)                                                            
000003         SYMDEF(&UNIXVER='Z113')                                                 
000004         SYMDEF(&SYSVER='Z113')                                                  
000005         SYMDEF(&SYSP1.='ZDPRD1')                                                
000006         SYMDEF(&SYSP2.='ZDPRD2')                                                
000007         SYMDEF(&SYSP3.='ZDPRD3')                                                
000008         SYMDEF(&SYSR2.='ZDRES2')                                                
000009         SYMDEF(&SYSS1.='ZDSYS1')                                                
000010                                                                                 
****** ******************************** Bottom of Data ********************************



[precondition] NOVA.Z113.PARMLIB(IEASYSNO)

So go to "NOVA.Z113.PARMLIB", create a new member "CLOCKNO" model from "CLOCK00"for my system "NOVA"

ISREDDE2   NOVA.Z113.PARMLIB(CLOCK00) - 01.01                      Columns 00001 00080 
Command ===>                                                          Scroll ===> CSR  
****** ********************************* Top of Data **********************************
000001 OPERATOR NOPROMPT                                                               
000002 TIMEZONE E.08.00.00                                                             
000003 ETRMODE  NO                                                                     
000004 ETRZONE  NO                                                                     
000005 ETRDELTA 10                                                                     
000006 STPMODE  NO                                                                     
000007 STPZONE  NO                                                                     
****** ******************************** Bottom of Data ********************************


ISREDDE2   NOVA.Z113.PARMLIB(CLOCKNO) - 01.00                      Columns 00001 00080 
Command ===>                                                          Scroll ===> CSR  
****** ********************************* Top of Data **********************************
000001 OPERATOR NOPROMPT                                                               
000002 TIMEZONE E.08.00.00                                                             
000003 ETRMODE  NO                                                                     
000004 ETRZONE  NO                                                                     
000005 ETRDELTA 10                                                                     
000006 STPMODE  NO                                                                     
000007 STPZONE  NO                                                                     
****** ******************************** Bottom of Data ********************************



[precondition] NOVA.Z113.PARMLIB(IEASYSNO)

So go to "NOVA.Z113.PARMLIB", create a new member "COMMNDNO" model from "COMMNDCS"for my system "NOVA"

ISREDDE2   NOVA.Z113.PARMLIB(COMMNDCS) - 01.00                     Columns 00001 00080 
Command ===>                                                          Scroll ===> CSR  
****** ********************************* Top of Data **********************************
000001 COM='S JES2,PARM='COLD,NOREQ''                                                  
000002 COM='S VLF,SUB=MSTR'                                                            
000003 COM='S VTAM'                                                                    
000004 COM='S VTAMAPPL'                                                                
000005 COM='S DLF,SUB=MSTR'                                                            
000006 COM='DD ADD,VOL=ZDSYS1'                                                         
000007 COM='DD NAME=SYS1.&SYSNAME..DMP&SEQ'                                            
000008 COM='DD ALLOC=ACTIVE'                                                           
****** ******************************** Bottom of Data ********************************
ISREDDE2   NOVA.Z113.PARMLIB(COMMNDNO) - 01.01                     Columns 00001 00080 
Command ===>                                                          Scroll ===> CSR  
****** ********************************* Top of Data **********************************
000001 COM='S JES2,PARM='COLD,NOREQ''                                                  
000002 COM='S VLF,SUB=MSTR'                                                            
000003 COM='S VTAM'                                                                    
000004 COM='S VTAMNOVA'                                                                
000005 COM='S DLF,SUB=MSTR'                                                            
000006 COM='DD ADD,VOL=ZDSYS1'                                                         
000007 COM='DD NAME=SYS1.&SYSNAME..DMP&SEQ'                                            
000008 COM='DD ALLOC=ACTIVE'                                                           
****** ******************************** Bottom of Data ********************************




[precondition] NOVA.Z113.PARMLIB(IEASYSNO)

So go to "NOVA.Z113.PARMLIB", create a new member "CONSOLNO" model from "CONSOL00"for my system "NOVA"

ISREDDE2   NOVA.Z113.PARMLIB(CONSOLNO) - 01.00                     Columns 00001 00080
Command ===>                                                          Scroll ===> CSR 
****** ********************************* Top of Data *********************************
000001 INIT     CMDDELIM(")                                                           
000002          MLIM(1500)                                                            
000003          MONITOR(DSNAME)                                                       
000004          MPF(00)                                                               
000005          PFK(00)                                                               
000006          RLIM(10)                                                              
000007          UEXIT(N)                                                              
000008          CNGRP(00)                                                             
000009 DEFAULT ROUTCODE(ALL)                                                          
000010 CONSOLE                                                                        
000011   DEVNUM(700)                                                                  
000012   AREA(NONE)                                                                   
000013   AUTH(MASTER)                                                                 
000014   CON(N)                                                                       
000015   DEL(R)                                                                       
000016   MFORM(J,T)                                                                   
000017   MONITOR(JOBNAMES-T)                                                          
000018   NAME(L700)                                                                   
000019   PFKTAB(PFKTAB1)                                                              
000020   RNUM(19)                                                                     
000021   ROUTCODE(ALL)                                                                
000022   RTME(1)                                                                      
000023   SEG(14)                                                                      
000024   UNIT(3270-X)                                                                 
000025 CONSOLE                                                                        
000026   DEVNUM(908)                                                                  
000027   AREA(NONE)                                                                   
000028   AUTH(MASTER)                                                                 
000029   CON(N)                                                                       
000030   DEL(R)                                                                       
000031   MFORM(J,T)                                                                   
000032   MONITOR(JOBNAMES-T)                                                          
000033   NAME(C908)                                                                   
000034   PFKTAB(PFKTAB1)                                                              
000035   RNUM(19)                                                                     
000036   ROUTCODE(ALL)                                                                
000037   RTME(1)                                                                      
000038   SEG(14)                                                                      
000039   UNIT(3270-X)                                                                 
000040 CONSOLE   DEVNUM(SYSCONS) LEVEL(ALL)                                           
000041        NAME(HWCI) AUTH(MASTER) ROUTCODE(ALL)                                   
000042 CONSOLE                                                                        
000043   DEVNUM(SUBSYSTEM)                                                            
000044   NAME(SUBS)                                                                   
000045   AUTH(ALL)                                                                    
000046 CONSOLE                                                                        
000047   DEVNUM(SUBSYSTEM)                                                            
000048   AUTH(ALL)                                                                    
000049   NAME(S908)                                                                   
000050 HARDCOPY                                                                       
000051   DEVNUM(SYSLOG)                                                               
000052   CMDLEVEL(CMDS)                                                               
000053   ROUTCODE(ALL)                                                                
000054 /********************************************************************/




[precondition] NOVA.Z113.PARMLIB(IEASYSNO)

So go to "NOVA.Z113.PARMLIB", create a new member "MSTJCLNO" model from "MSTJCL00"for my system "NOVA"

ISREDDE2   NOVA.Z113.PARMLIB(MSTJCL00) - 01.00                     Columns 00001 00080 
Command ===>                                                          Scroll ===> CSR  
****** ********************************* Top of Data **********************************
000001 //MSTJCL00 JOB MSGLEVEL=(1,1),TIME=1440                                         
000002 //         EXEC PGM=IEEMB860,DPRTY=(15,15)                                      
000003 //STCINRDR DD SYSOUT=(A,INTRDR)                                                 
000004 //TSOINRDR DD SYSOUT=(A,INTRDR)                                                 
000005 //IEFPDSI  DD DSN=ADCD.Z113.PROCLIB,DISP=SHR                                    
000006 //         DD DSN=SYS1.PROCLIB,DISP=SHR                                         
000007 //SYSUADS  DD DSN=SYS1.UADS,DISP=SHR                                            
000008 //SYSLBC   DD DSN=SYS1.BRODCAST,DISP=SHR                                        
****** ******************************** Bottom of Data ********************************
ISREDDE2   NOVA.Z113.PARMLIB(MSTJCLNO) - 01.02                     Columns 00001 00080 
Command ===>                                                          Scroll ===> CSR  
****** ********************************* Top of Data **********************************
000001 //MSTJCLNO JOB MSGLEVEL=(1,1),TIME=1440                                         
000002 //         EXEC PGM=IEEMB860,DPRTY=(15,15)                                      
000003 //STCINRDR DD SYSOUT=(A,INTRDR)                                                 
000004 //TSOINRDR DD SYSOUT=(A,INTRDR)                                                 
000005 //IEFPDSI  DD DSN=NOVA.Z113.PROCLIB,DISP=SHR                                    
000006 //         DD DSN=SYS1.PROCLIB,DISP=SHR                                         
000007 //SYSUADS  DD DSN=SYS1.UADS,DISP=SHR                                            
000008 //SYSLBC   DD DSN=SYS1.BRODCAST,DISP=SHR                                        
****** ******************************** Bottom of Data ********************************



[precondition] NOVA.Z113.PARMLIB(MSTJCLNO)

Allocate a new dataset "NOVA.Z113.PROCLIB" model from "ADCD.Z113.PROCLIB"(you can make it a little bigger, please keep the reside volume) with all members.

ISRUDSL0 Data Sets Matching **.Z113.PROCLIB                         Row 1 of 2 
Command ===>                                                  Scroll ===> CSR  
                                                                               
Command - Enter "/" to select action                        Tracks %Used   XT  
-------------------------------------------------------------------------------
         ADCD.Z113.PROCLIB                                      75   33     1  
         NOVA.Z113.PROCLIB                                     300    6     1  
***************************** End of Data Set list ****************************



[precondition] NOVA.Z113.PARMLIB(IEASYSNO)

Go to "NOVA.Z113.PARMLIB", create a new member "PROGNO" model from "PROG00"for my system "NOVA"

Go to "NOVA.Z113.PARMLIB", create a new member "SCHEDNO" model from "SCHED00"for my system "NOVA"

Go to "NOVA.Z113.PARMLIB", create a new member "IEFSSNNO" model from "IEFSSN00"for my system "NOVA"













Step 01: First IPL





Step 01: First IPL





Step 01: First IPL




Step 01: First IPL




Step 01: First IPL




Step 01: First IPL




Step 01: First IPL





Step 01: First IPL




Step 01: First IPL




Step 01: First IPL




Step 01: First IPL




Step 01: First IPL




















发表评论:

Powered By Z-BlogPHP 1.7.3