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

Cobol prog to put an indicator on the primary key


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

New User


Joined: 17 Nov 2022
Posts: 1
Location: France

PostPosted: Thu Nov 17, 2022 7:44 pm
Reply with quote

Hi im new to mainframe i have an exercice that im trying to do
Input : seq file
I-o to put an indicator on the existing key in the seq file
The key formate is 18 char: 11 char + 7
If the prog find a complete key he put x on the 19 char
If he find first 11 char and spaces in the 7 next char, it must put the x to all keys who start with those 11 char
I write a prog but at some point it loop and i dont know why can any one help me.
Photo in attachment
The loop is in read-next
Thank you
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8661
Location: Dubuque, Iowa, USA

PostPosted: Thu Nov 17, 2022 8:24 pm
Reply with quote

Learn how to use the Code button so you don't post screen shots as you did.

Also, your post specifically states "seq file" multiple times -- you do NOT use START or a key with a sequential data set. And VSAM data sets are not sequential data sets.

Hint: START is typically used once and READ NEXT thereafter. So your program loop logic is completely wrong.
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 Can EATTR be coded in an IMS COBOL pgm? IMS DB/DC 1
No new posts Cobol transactions in SYSVIEW COBOL Programming 0
No new posts executing XCTL command in COBOL witho... CICS 4
No new posts Capturing COBOL job and program names... All Other Mainframe Topics 2
No new posts COBOL Ascending and descending sort n... COBOL Programming 5
Search our Forums:

Back to Top