Cobol prog to put an indicator on the primary key

Jouri · New User Joined: 17 Nov 2022 Posts: 1 Location: France

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

Robert Sample · Posted: Thu Nov 17, 2022 8:24 pm

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.