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
 

 

how can we "browse" from a file

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

New User


Joined: 25 May 2006
Posts: 7
Location: Mumbai, India

PostPosted: Fri May 26, 2006 5:41 pm    Post subject: how can we "browse" from a file
Reply with quote

hi all,

we are actually facing a problem in browsing.....
we had written a program in "CA Realia" .
This program is suppose to retrive the records from a indexed file and display on the cics screen one by one by pressing PF10 key.

we have used STARTBR,READNEXT,ENDBR as given in the books but still we are not getting the solution.........

plz guide us......
thanks in advance...
Back to top
View user's profile Send private message

sankargn

New User


Joined: 27 May 2006
Posts: 5

PostPosted: Sun May 28, 2006 3:25 pm    Post subject:
Reply with quote

Joshua,

As mentioned by you, whenever u r pressing PF10, it should display the next record.

Try this,

1. Issue a STARTBR command, at the starting of the program.
2. With the use of HANDLE-AID receive the PF10 Key, and while processing PF10 key, issue READ-NEXT command.
The command should be like this.

EXEC CICS HANDLE AID PF10 (Issue-Readnext) END-EXEC.

Issue-Readnext PARA:

EXEC CICS READNEXT (xxxxx) END-EXEC.

EXEC CICS SEND MAP(xxxx) END-EXEC.

3. Display the map.

4. Af the end-of the processing Issue ENDBR command.

Hope this wil suffice the requirement. If you face any problems, let me know.
Back to top
View user's profile Send private message
karthick sivakumar

New User


Joined: 16 Mar 2006
Posts: 16
Location: india

PostPosted: Mon Jun 05, 2006 10:28 pm    Post subject:
Reply with quote

Hi,

if u are using alternate indices then you might have to handle dup key condition. if not try incrementing the key value at the end of every read and use it in a loop until end of file is reached.


u can also use TSQs to save the data in the first place and display them one by one using item number

if some other method works let me know of that one too.


regards,
karthick
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
This topic is locked: you cannot edit posts or make replies. Fetching data from BAI File arunsoods JCL & VSAM 1 Wed Jul 19, 2017 4:28 pm
No new posts Browse dataset cvnlynn CLIST & REXX 4 Tue Jul 18, 2017 3:52 am
No new posts Changeman get multiple "Browse C... elixir1986 Compuware & Other Tools 4 Fri Jul 14, 2017 1:48 am
No new posts Write out NODUPS but just from one file Jay Villaverde DFSORT/ICETOOL 8 Fri Jul 14, 2017 12:44 am
No new posts How to add header with Date(YYMMDD) i... Rajan Moorthy DFSORT/ICETOOL 2 Thu Jul 06, 2017 11:44 pm


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