Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

pls help- Regarding CICS KSDS files

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CICS
View previous topic :: :: View next topic  
Author Message
tushar_study

New User


Joined: 01 Feb 2007
Posts: 30
Location: Mumbai

PostPosted: Wed Sep 02, 2009 11:29 am    Post subject: pls help- Regarding CICS KSDS files
Reply with quote

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
View user's profile Send private message

tushar_study

New User


Joined: 01 Feb 2007
Posts: 30
Location: Mumbai

PostPosted: Wed Sep 02, 2009 12:47 pm    Post subject:
Reply with quote

Can someone please provide me a solution
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Wed Sep 02, 2009 12:55 pm    Post subject:
Reply with quote

Have patience -- CICS Guy is on leave and other CICS users (Robert for one) work in other time zone.
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 7993
Location: Bellevue, IA

PostPosted: Wed Sep 02, 2009 3:08 pm    Post subject:
Reply with quote

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
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CICS All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Date and time format in CICS Chandru3183 CICS 2 Sat Mar 18, 2017 12:46 pm
No new posts Append data from two files into a sin... Praveen04 DFSORT/ICETOOL 5 Thu Mar 16, 2017 7:29 pm
No new posts Asynchronous CICS Processing Question moezbud CICS 0 Mon Mar 06, 2017 6:13 pm
No new posts CICS Question RE: Browse, Readnext an... moezbud CICS 7 Sun Mar 05, 2017 5:45 am
No new posts how to send just 10 rows in a CICS sc... Megha Gupta CICS 5 Thu Feb 23, 2017 6:57 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us