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: 8117
Location: East Dubuque, Illinois, USA

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 How to Clear all TSQs during CICS sta... Hooman24 CICS 10 Mon Jun 26, 2017 9:46 pm
No new posts CICS Transaction attach count of supp... lind sh CICS 1 Wed Jun 21, 2017 1:33 pm
No new posts getting three output files out of JOI... migusd SYNCSORT 7 Mon Jun 05, 2017 11:30 pm
No new posts Unable to create multiple files using... mbattu COBOL Programming 3 Fri May 05, 2017 5:35 pm
This topic is locked: you cannot edit posts or make replies. Merge two files and update Trailer re... Yashashri JCL & VSAM 1 Thu May 04, 2017 12:54 pm


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