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
 

 

Page up/page down logic in CICS

 
Post new topic   This topic is locked: you cannot edit posts or make replies.    IBMMAINFRAMES.com Support Forums -> CICS
View previous topic :: :: View next topic  
Author Message
sreelekshmi

New User


Joined: 16 Jan 2007
Posts: 9
Location: Bangalore

PostPosted: Tue Jul 03, 2007 1:28 pm    Post subject: Page up/page down logic in CICS
Reply with quote

Hi,
I have one requiremtn like this :
After entering the account number and when enter key is pressed,the screen should display the details of the next 6 account numbers starting from the one I entered.
Also when there is more data in the file,while pressing the PF8 i shpuld be able to browse the next six records.Also when PF7 is pressed I have to get the previous 6 records.

I neeed to implement this using the queue.But I am not able to code the steps in the proper way.Do I need to declared the repeteting map fields in an array and move each value from the queue to the map filed?
Can anyone guide me on this ?

Thanks in advance.
sree
Back to top
View user's profile Send private message

Mickeydusaor

Active User


Joined: 24 May 2006
Posts: 258
Location: Salem, Oregon

PostPosted: Tue Jul 03, 2007 7:48 pm    Post subject:
Reply with quote

There are many ways to do this, first what type of file are you
reading to obtain the infromation from, VSAM, DB2 .....??
Back to top
View user's profile Send private message
sreelekshmi

New User


Joined: 16 Jan 2007
Posts: 9
Location: Bangalore

PostPosted: Tue Jul 03, 2007 10:34 pm    Post subject:
Reply with quote

i am using the VSAM files....i need to use the queues.....

Thanks
Sree..
Back to top
View user's profile Send private message
Mickeydusaor

Active User


Joined: 24 May 2006
Posts: 258
Location: Salem, Oregon

PostPosted: Wed Jul 04, 2007 12:53 am    Post subject:
Reply with quote

I would not waste my time with queues, I would keep the top
record key and the bottom record keys in the commarea
and just do a startbr, with a readnext or readprev, depending
on weather I was paging forward or backward.
Back to top
View user's profile Send private message
TG Murphy

Active User


Joined: 23 Mar 2007
Posts: 149
Location: Ottawa Canada

PostPosted: Thu Jul 05, 2007 1:15 am    Post subject:
Reply with quote

Our shop has a standard that paging screens MUST cache their result set in TS queues to 1) minimize the number of hits on DB2 and 2) avoid the need to define additional DESCENDING indexes. So perhaps you are in the same boat as us, eh? You have no choice but to use TS queues.

Our systems programmer tells me that data in TS queues is actually stored in memory - so access to this data would be extremely fast. And I can vouch that it is.

Here is how it is done here. Let's say your screen contains 10 repeating rows. The data for an entire screen is stored in a single TS queue item. Thus, all the data for page 1 is stored in TS queue item 1. All the data for page 2 is stored in item 2. And so on.

When the user starts working on one of these screens, our business layer will be invoked to retrieve X number of rows - let's say X is 50. The entire result set may contain 300 rows. The screen displays showing the following up near the top: Page 001 of 005 +

The + sign means that there is more data. Only when the user attempts to scroll to page 6 will the presentation layer program invoke the business layer program to obtain pages 6 thru 10.

The screen will now show: Page 006 of 010 +

When the user hits PF7-Scroll Back, the page will be retrieved from the TS queue. And most PF8-Scroll Forward requests will also be satisified from the TS queue.

The + sign will only disappear when the entire result set has been loaded into the TS queue.

The user can overtype the Page number to go directly to a specific page (something I don't think they need to do often).
Back to top
View user's profile Send private message
Mickeydusaor

Active User


Joined: 24 May 2006
Posts: 258
Location: Salem, Oregon

PostPosted: Fri Jul 06, 2007 7:25 pm    Post subject:
Reply with quote

Now times that plus 1000 users and see if you system will still
be running. There are know other indexs you have to worry
about, as your key to the top and bottom record is your is
your index.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   This topic is locked: you cannot edit posts or make replies.    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 CICS transaction slow response time vasanthz All Other Mainframe Topics 1 Thu Jan 19, 2017 1:31 am
No new posts INDEPENDENT CICS TS 4.1 MRO REGION UP... Kyle Carroll CICS 0 Wed Dec 14, 2016 6:55 pm
No new posts CICS START AND CANCEL blayek CICS 1 Wed Dec 07, 2016 3:27 am
No new posts How does a called pgm know if its cal... Graeme Westerman COBOL Programming 4 Tue Nov 29, 2016 9:25 pm
No new posts CICS Roll back partially - Need to re... dwijadas CICS 4 Wed Nov 16, 2016 4:30 pm


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