Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist 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 File Aid tool to compare numeric data balaji81_k Compuware & Other Tools 0 Tue Sep 26, 2017 3:35 am
No new posts Compare yesterday's date to the one o... migusd SYNCSORT 8 Fri Sep 22, 2017 11:35 pm
No new posts Split 1 file into 10 output Files - S... Prasanth Kumar SYNCSORT 5 Sat Sep 16, 2017 12:02 am
No new posts BUILD OUTFIL based on condition other... balaji81_k DFSORT/ICETOOL 13 Fri Sep 08, 2017 11:06 pm
This topic is locked: you cannot edit posts or make replies. Extract all "IF" Statements... Adarsh Damodaran CLIST & REXX 1 Wed Sep 06, 2017 9:28 am

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us