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
No new posts SORTJOIN - Copy Matched and Unmatched... Steve Ironmonger DFSORT/ICETOOL 5 Tue Jan 17, 2017 4:26 pm
No new posts Copy RECFM =VB TO FB file with RECL =... sahil41352 DFSORT/ICETOOL 3 Wed Dec 28, 2016 11:29 pm
No new posts Add PD field from 2nd file to PD in 1st Sushant Garje DFSORT/ICETOOL 6 Thu Dec 01, 2016 4:32 pm
No new posts File Aid to File Manager conversion murali3955 IBM Tools 4 Thu Nov 24, 2016 3:41 pm
No new posts How to convert the VBM file to VB or... Sulabh Agrawal JCL & VSAM 4 Fri Nov 18, 2016 1:04 pm


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