View previous topic :: View next topic
|
Author |
Message |
tushar_study
New User
Joined: 01 Feb 2007 Posts: 30 Location: Mumbai
|
|
|
|
Hello,
I have a KSDS file which can be used to add,update and delete records using CICS transaction.
the file looks like :
11111 654
22222 987
44444 543
this program has come for maintenance ,it uses STARTBR and READPREV and READNEXT commands.
the first 6 characters are the KSDS keys(index).
the program works fine if say i want to enter a record which is less than the last record(say i want to enter 33333) but if i want to enter a record greater than 44444 the program abends.
the conditions which have been used in the program are ENDFILE and NOTFND.
Can you please suggest a way to modify the program so as to avoid the abend.
Thanks in advance.
Regards,
Tushar |
|
Back to top |
|
|
tushar_study
New User
Joined: 01 Feb 2007 Posts: 30 Location: Mumbai
|
|
|
|
Can someone please provide me a solution |
|
Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6250 Location: Mumbai, India
|
|
|
|
Have patience -- CICS Guy is on leave and other CICS users (Robert for one) work in other time zone. |
|
Back to top |
|
|
Robert Sample
Global Moderator
Joined: 06 Jun 2008 Posts: 8696 Location: Dubuque, Iowa, USA
|
|
|
|
Your best bet is to write a record with a key of HIGH-VALUES (all x'FF') into the file. This allows the STARTBR to always locate a record. Your application program must recognize the HIGH-VALUES key and not treat it as a data record, and end the browse when this record is hit. |
|
Back to top |
|
|
|