MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Help in Alternate index JCL on VSAM

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Utilities
View previous topic :: View next topic  
Author Message
mangsk
Beginner


Joined: 05 Jun 2004
Posts: 46
Topics: 18

PostPosted: Sat Jun 05, 2004 2:48 am    Post subject: Help in Alternate index JCL on VSAM Reply with quote

I've a VSAM file and want to create alternate index on the same.I've written following JCL for this-

Code:

//GLS43D19 JOB REGION=8M,NOTIFY=GLS44D,MSGCLASS=J                       
//****************************************************************     
//JOBLIB   DD DSN=NDV00F.OPMDEVT.LOADLIB,DISP=SHR                       
//         DD DSN=SYS2.FDWLIB,DISP=SHR                                 
//**********************************************************************
//*    DEL/DEF AIX AND PATH                                      *     
//**********************************************************************
//DDAIX00  EXEC PGM=IDCAMS                                             
//*                                                                     
//SYSPRINT DD  SYSOUT=*                                                 
//SYSUDUMP DD  SYSOUT=*                                                 
//SYSIN    DD  *                                                       
 DELETE GLS43D.DAILY.CUST.AIX             ALTERNATEINDEX
//*SET LASTCC = 0                                       
//*SET MAXCC  = 0                                       
 DEFINE ALTERNATEINDEX-                                 
       (NAME(GLS43D.DAILY.CUST.AIX)-                   
        RELATE(GLS43D.DAILY.CUST)-                     
        CYL(15 2)-                                     
        CISZ(4096)-                                     
        UNIQUE-                                         
        KEYS(05 16)-                                   
        FREESPACE(20 10)           -                   
        RECORDSIZE(00000101 8181)  -                   
        SHR(2 3)-                                       
        SPEED-                                         
        UPGRADE-                                       
        NONUNIQUEKEY)                                   
//*                                                     
//*****************************************************
//*    BUILDS AIX                                     
//*****************************************************
//DDAIX01  EXEC PGM=IDCAMS                             
//*                                                   
//SYSPRINT DD  SYSOUT=*                               
//SYSUDUMP DD  SYSOUT=*                               
//PRIMEI   DD DSN=GLS43D.DAILY.CUST,DISP=SHR           
//ALTERI   DD DSN=GLS43D.DAILY.CUST.AIX,DISP=SHR       
//SYSIN    DD *                                       
    BLDINDEX INFILE (PRIMEI) OUTFILE (ALTERI)         
//*                                                   
//*****************************************************
//*    DEFINES A PATH FOR THE ALTERNATE INDEX         
//*****************************************************
//DDAIX02  EXEC PGM=IDCAMS                             
//*                                                   
//SYSPRINT DD  SYSOUT=*                               
//SYSUDUMP DD  SYSOUT=*                       
//SYSIN    DD *                               
    DEFINE PATH (NAME(GLS43D.DAILY.CUST.PATH) -
    PATHENTRY (GLS43D.DAILY.CUST.AIX) )       
//*                                           

But the job fails and describes error as - ALTERI DATASET NOT FOUND
Can anybody tell me the cause of the error? Or another specimen JCL to build alternate index on VSAM file wud also be of great help. Thanks.
Back to top
View user's profile Send private message Yahoo Messenger MSN Messenger
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12375
Topics: 75
Location: San Jose

PostPosted: Sat Jun 05, 2004 8:06 am    Post subject: Reply with quote

mangsk,

Check the following links

Define an Alternate Index Syntax

Define an Alternate Index Example

Define Path Syntax

Define Path Example

BLDINDEX Syntax

Build an Alternate Index Over a Key-Sequenced Data Set

Hope this helps...

Cheers

Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
mangsk
Beginner


Joined: 05 Jun 2004
Posts: 46
Topics: 18

PostPosted: Mon Jun 07, 2004 10:39 pm    Post subject: Reply with quote

Thanks Kolusu for the reply.
Actually,after posting this I tried out creating alternate index thru FILEAID. It gave me error saying 'INVALID RELATED OBJECT - The base cluster must be an existing NON-REUSABLE ESDS or KSDS object'. The problem was you cannot create an alternate index on a VSAM dataset which has REUSE option as 'YES' in properties. Then I recreated another VSAM KSDS with REUSE as 'NO' and was able to run the same JCL with MAXCC=0 and AIX created.
_________________
Regards,
Mangsk
Back to top
View user's profile Send private message Yahoo Messenger MSN Messenger
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Utilities All times are GMT - 5 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group