John,

Build the IXVTOC, then run the following:

//STEP1    EXEC PGM=ICKDSF,PARM='NOREPLYU'          
//SYSPRINT DD  SYSOUT=*                             
//VTOC     DD  UNIT=SYSDA,VOL=SER=HEST06,DISP=OLD,  
//             DSN=SYS1.VTOCIX.HEST06               
//SYSIN    DD  *                                    
 BUILDIX DDNAME(VTOC) OSVTOC                        

Then delete the indexed VTOC from 3.4

Bob

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf 
Of John Dawes
Sent: Wednesday, June 20, 2012 9:39 AM
To: [email protected]
Subject: ICKDSF QUESTION

G'Day,
 
I am trying to initialise a 3390-3 volume to house a page dataset.  The 
requester asked that there should be no VTOC INDEX on the volume.  I tried to 
run the init job using the following  jcl:
 
 INIT -                     
      UNITADDRESS(9B90) -   
      VOLID(HEST06) -       
      VTOC(0,1,08)         
/*                          
However for some reason a SYS1.VTOCIX.HEST06 of 2 tracks was inserted :      2  
100     1 
 
I tried again to bypass the problem by coding a 0 value.  However I go the 
error message:ICK30221I CONSTANT '0' NOT WITHIN VALUE 
RANGE                        
 
Here is the job I used:
 
INIT -                                                              
      UNITADDRESS(9B90) -                                            
      VOLID(HEST06) -                                                
      VTOC(0,1,08) -                                                 
      INDEX(1,9,0) -                                                 

Is there a way of having no SYS1.VTOCIX dsn?
 
I looked at other PAGE volumes in this environment and they all do not have the 
SYS1.VTOCIX dsn (below is an exampe):
 
SYS1.PAGE.LOCL.HEST05.DATA                                     HEST05
 SYS1.VVDS.VHEST05                                                 HEST05
 
Thanks in advance for your welcome suggestions.

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to