Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
How to declare VSAM keys

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
View previous topic :: :: View next topic  
Author Message
dipanshu

New User


Joined: 16 Jan 2006
Posts: 53
Location: pune

PostPosted: Mon Feb 20, 2006 9:46 am    Post subject: How to declare VSAM keys
Reply with quote

Hi,


INPUT-OUTPUT SECTION.
FILE-CONTROL.
SELECT PPIMSTR
ASSIGN PPIMSTR
ORGANIZATION IS INDEXED
RECORD KEY IS M-ENO
ACCESS MODE IS SEQUENTIAL
STATUS X01-PPIMSTR-STATUS.

In the above code I given record key as ENO,
Confusion: If the vsam having two keys say EID and ENO then how to declare?

Thanks
Dipanshu
Back to top
View user's profile Send private message

ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2360
Location: Israel

PostPosted: Mon Feb 20, 2006 10:27 am    Post subject:
Reply with quote

As far as I know, you can have only one Prime Index in a KSDS file, and one Alternate Index.

The RECORD KEY clause specify only the Prime Index.

O.
Back to top
View user's profile Send private message
sbalajibe

New User


Joined: 15 Aug 2005
Posts: 62

PostPosted: Tue Feb 21, 2006 12:36 pm    Post subject:
Reply with quote

hi ofer71,

u can have 255 alternate index for a vsam file....

and the key is represented with ALTERNATE KEY IS caluse...


thanks
Balaji
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Where to get sample for processing RM... vice_versa PL/I & Assembler 2 Tue Jan 16, 2018 2:03 pm
No new posts VSAM dataset not found abdulrafi JCL & VSAM 5 Fri Jan 12, 2018 11:19 am
No new posts ISSUE IN copying Sequential file reco... thesumitk JCL & VSAM 2 Wed Dec 13, 2017 3:07 pm
No new posts Compare VSAM files using DFSORT pshongal DFSORT/ICETOOL 5 Thu Nov 23, 2017 10:24 am
No new posts VSAM RLS Wait time blayek JCL & VSAM 2 Mon Oct 02, 2017 9:05 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us