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

Accessing Alternate index


IBM Mainframe Forums -> COBOL Programming
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
Rameshs

New User


Joined: 15 Jun 2005
Posts: 53
Location: India, Chennai

PostPosted: Wed Jul 27, 2005 6:06 pm
Reply with quote

Hai friends,

I am having the following index-file

Field key type Type Length
=======================================
Video-Code Primary 9 5
Video-Title --- X 30
Supplier-Code Alt with Duplicates 9


The supplier codes are not in contigous, ihave to list video-codes by supplier wise

i have to access by alternate index key. it should access as
supplier codes - 01, 01, 01, 02, 02, 03,04, 04, 04


what i did !
========

move zero to supplier-code
start f1 key is greater than supplier-code invalid key imp-stmt.
--
perform read-para until eof='t'
--
--
read-para
read next record at end move 't' to eof .


but i am not getting result properly.
Back to top
View user's profile Send private message
Rameshs

New User


Joined: 15 Jun 2005
Posts: 53
Location: India, Chennai

PostPosted: Tue Aug 02, 2005 11:41 am
Reply with quote

what i did was correct

Now i got my result ! icon_biggrin.gif
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 -> COBOL Programming

 


Similar Topics
Topic Forum Replies
No new posts Cobol file using index COBOL Programming 2
No new posts Difference when accessing dataset in ... JCL & VSAM 7
No new posts Accessing ABENDCC in JCL JCL & VSAM 6
No new posts DL/I status code AK for GU call using... IMS DB/DC 1
No new posts Add column to existing records using ... JCL & VSAM 2
Search our Forums:

Back to Top