IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

cobol jcl (ALTERNATE INDEX)


IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
annanagarlt

New User


Joined: 31 Oct 2003
Posts: 5

PostPosted: Fri Oct 31, 2003 8:01 pm
Reply with quote

DEAR ALL

I WOULD LIKE TO KNOW HOW ALTERNATE INDEX WORKS. I WOULD BE HAPPY IF SOMEONE CAN GIVE ME A OPEN SOURCE FOR THE SAME.

HURRY
Back to top
View user's profile Send private message
franclin

New User


Joined: 23 May 2003
Posts: 11
Location: Chennai, India

PostPosted: Thu Nov 06, 2003 9:39 am
Reply with quote

Hi ANNANAGARLT,

Apart from access through primary key,VSAM provides use of upto 255 alternate keys per dataset.

With in the KSDS (or) ESDS retriving a data other than the unique key,with in alternate index key duplicate data are allowed.

creation of alternate index using the IDCAMS utility there will be three steps

1.DEFINE AIX --> is used to create an alternate index for the field.
2.DEFINE PATH --> it is used to create a path between your main index and AIX.
3.BUILD INDEX -->Once an AIX has defined, records can be loaded into it using the BLDINDEX command.


EXAMPLE.
/* IDCAMS COMMAND */
DEFINE ALTERNATEINDEX (NAME(SUMAN.KANNAN.AIXVSAM) -
RELATE(SUMAN.KANNAN.VSAM) -
TRACKS(2 2) -
VOLUMES(LMR001 -
) -
CONTROLINTERVALSIZE(4096) -
FREESPACE(10 20) -
RECORDSIZE(20 80) -
KEYS(20 5) -
NONUNIQUEKEY -
UPGRADE -
) -
DATA (NAME(SUMAN.KANNAN.AIXVSAM.DATA) -
) -
INDEX (NAME(SUMAN.KANNAN.AIXVSAM.INDEX) -
)


/* IDCAMS COMMAND */
DEFINE PATH (NAME(SUMAN.KANNAN.PATH) -
PATHENTRY(SUMAN.KANNAN.AIXVSAM) -
UPDATE -
OWNER(LTR040) -
)

/*IDCAMS COMMAND*/
//SYSIN DD *
BLDINDEX INFILE(SUMAN.KANNAN.VSAM)-
OUTFILE(SUMAN.KANNAN.AIXVSAM)

/*
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> JCL & VSAM

 


Similar Topics
Topic Forum Replies
No new posts Replace each space in cobol string wi... COBOL Programming 3
No new posts COBOL -Linkage Section-Case Sensitive COBOL Programming 1
No new posts COBOL ZOS Web Enablement Toolkit HTTP... COBOL Programming 0
No new posts Calling DFSORT from Cobol, using OUTF... DFSORT/ICETOOL 5
No new posts Generate random number from range of ... COBOL Programming 3
Search our Forums:

Back to Top