IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

How to use CICS paging command for multipage mesage in maps


IBM Mainframe Forums -> CICS
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
Ajay Gautam

New User


Joined: 20 Jan 2009
Posts: 4
Location: india

PostPosted: Wed Dec 14, 2011 12:30 pm
Reply with quote

Hi All,

I have searched in various links about CICS paging commands. But none of them able to convey me how to use commands in BMS maps.
Presently I have designed a single map panel for multipage messages, where there is one unprotected field of 10 bytes for the paging command to be typed. But when I am typing paging command for example "PGRET=P/N" ( as defined in SIT) in unprotected field(10-Bytes) and pressing CTRL , no next page is getting displayed.

I read about CSPG transaction also but I don't know how to use in map coding.

Please guide me in resolving the issue.

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

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix

PostPosted: Thu Dec 15, 2011 10:45 am
Reply with quote

Hello,

Suggest you find a process similar to what you want that is successfully running on your system. Then look at the differences between your process and the one that works.

Even more direct would be to ask a co-worker with this experience.
Back to top
View user's profile Send private message
Nic Clouston

Global Moderator


Joined: 10 May 2007
Posts: 2455
Location: Hampshire, UK

PostPosted: Thu Dec 15, 2011 11:47 am
Reply with quote

I do not know if 'CICS paging' is the same as 'scrolling' the data on the screen if it is then search for 'scrolling' in the forum because this comes up every so often. If 'CICS paging' is to do with CICS manipulating its paging in storage (swapping in/out) then you are looking in completely the wrong place.
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2481
Location: Netherlands, Amstelveen

PostPosted: Thu Dec 15, 2011 3:54 pm
Reply with quote

publib.boulder.ibm.com/infocenter/cicsts/v3r2/index.jsp?topic=%2Fcom.ibm.cics.ts.doc%2Fdfha7%2Ftransactions%2Fcspg%2Fdfha724.html
Back to top
View user's profile Send private message
Ajay Gautam

New User


Joined: 20 Jan 2009
Posts: 4
Location: india

PostPosted: Thu Dec 15, 2011 9:08 pm
Reply with quote

Hi,

Thanks to all for your replies and suggestion.

My query about CICS paging command is not about scrolling logic (with the help of TSQ or VSAM).

It is about to know how CICS paging "PGRET=P/N" and others can be used in Maps without scrolling logic (coding subroutines for PF7 or PF8 logic).

Is there any way CICS handle paging commands internally and if any then how to execute it in maps, so that we can reduce coding effort (Screenshots and code view will be helpful).
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix

PostPosted: Thu Dec 15, 2011 9:27 pm
Reply with quote

Hello,

Quote:
My query about CICS paging command is not about scrolling logic (with the help of TSQ or VSAM).

It is about to know how CICS paging "PGRET=P/N" and others can be used in Maps without scrolling logic (coding subroutines for PF7 or PF8 logic).
Possibly i am reading this incorrectly, but do these 2 stataments say exactly opposite?

What is the difference between your "paging" and the normal "scrolling"?

Also, screen shots should not be posted - they just waste space and introduce clutter. To show the content of a screen, use Copy/Paste and the "Code" tag.
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8697
Location: Dubuque, Iowa, USA

PostPosted: Thu Dec 15, 2011 9:34 pm
Reply with quote

From the CICS Application Programming Guide manual, section 3.1.3:
Quote:
If full BMS support is present, the terminal is of a type supported by BMS terminal paging, and the input is a paging command, the CICS-supplied transaction CSPG is initiated to process the request. BMS support levels are explained in "BMS support levels" in topic 6.1.1, and the same section contains a list of the terminals that BMS supports. The PGRET, SKRxxxx, PGCHAIN, PGCOPY, and PGPURGE options in the system initialization table define the paging commands. As paging requires full BMS, this step is skipped if the CICS system contains less than that level.
So the first requirement is to talk to your site support group and find out how your CICS region is set up. You also need to read the CICS Supplied Transactions manual on CSPG.

I don't think PGRET is useful for what you think it is; your site may be set up for it -- but only someone working at your site can determine that for sure.
Back to top
View user's profile Send private message
Ajay Gautam

New User


Joined: 20 Jan 2009
Posts: 4
Location: india

PostPosted: Mon Dec 19, 2011 3:37 pm
Reply with quote

Hi All,

Let me take this opportunity to put my query in a more clear way.

I want to display multipage message using single map screen.
My screen is about "Loan Inquiry Screen" where user has to enter loan type and loan status as input and accordingly ID, ISIN and its Nomenclature will be displayed as output.
In Loan Inquiry Screen at a time only 10 rows can be displayed.
For displaying remaining records(if records > 10) we can allow user to enter "PAGING COMMANDS"(as defined in SIT) for scrolling to further pages or we can write "USER-DEFINED subroutine"(PF7 or PF8) for scrolling to further pages.


*****************************************************************************
DATE : 19-12-2011 TRANSACTION NAME : INQ3
INSTRUMENT/LOAN INQUIRY SCREEN
*****************************************************************************
ENTER LOAN TYPE - CG(01),SG(02),TB(03),RB(04),SB(11) : __

ENTER LOAN STATUS - ACTIVE(02), MATURED(04) : __

LOAN-ID LOAN-ISIN LOAN-NOMENCLATURE
__________ _______________ ________________________________
__________ _______________ ________________________________
__________ _______________ ________________________________
__________ _______________ ________________________________
__________ _______________ ________________________________
__________ _______________ ________________________________
__________ _______________ ________________________________
__________ _______________ ________________________________
__________ _______________ ________________________________
__________ _______________ ________________________________
PRESS: PAGING COMMAND __________ (10-bytes)
*****************************************************************************
NOTE : _________________________________________________________________
__________________________________________________________________________
*******************************************************************************

I have successfully tested my map using "USER-DEFINED subroutine" approach (which I referred as normal scrolling logic in my previous posts).

Now I want to test the same using PAGING COMMANDS.

I have checked my terminal characteristic for type supported by BMS terminal paging (Using CEOT command), which shows terminal type 3270 supports paging.

Ter(BC47) Tra(CEOT) Pri(000) Pag Ins Ati Tti Net(TCPABC47) Acq Uct

Presently I am working on Z/os v1.11 with CICS v 3.2 installed. I guess this configuration supports Full BMS features, if not plz let me know.

Now I hope my query will be clear ... " how to display multipage messages using paging command method ".
Back to top
View user's profile Send private message
prino

Senior Member


Joined: 07 Feb 2009
Posts: 1306
Location: Vilnius, Lithuania

PostPosted: Mon Dec 19, 2011 4:25 pm
Reply with quote

KISS! (*)

Why bother with something that is obviously not used at your site, when you've already got a working solution.






(*)Keep it Simple, Stupid!
Back to top
View user's profile Send private message
Ajay Gautam

New User


Joined: 20 Jan 2009
Posts: 4
Location: india

PostPosted: Mon Dec 19, 2011 6:00 pm
Reply with quote

prino wrote:
KISS! (*)

Why bother with something that is obviously not used at your site, when you've already got a working solution.


(*)Keep it Simple, Stupid!


Hi Prino,

icon_razz.gif icon_razz.gif ... that's why i am planning not to implement this approach in production.

But Sometimes for R&D or Information or Idea or to know different aspects of features, you have to try those in testing... icon_razz.gif
Back to top
View user's profile Send private message
Bill O'Boyle

CICS Moderator


Joined: 14 Jan 2008
Posts: 2501
Location: Atlanta, Georgia, USA

PostPosted: Mon Dec 19, 2011 6:15 pm
Reply with quote

I understand that you won't be implementing this, but BMS paging via CSPG, is an antiquated method.

It would be best to concentrate on the BWD/FWD in-house logic, using PF7 and PF8, respectively, incorporated into more modern CICS programs.

Mr. Bill
Back to top
View user's profile Send private message
daveporcelan

Active Member


Joined: 01 Dec 2006
Posts: 792
Location: Pennsylvania

PostPosted: Mon Dec 19, 2011 7:33 pm
Reply with quote

Dick, I think you misunderstood.

Quote:
so that we can reduce coding effort (Screenshots and code view will be helpful).


The Screenshots is not by the TS but for the TS to reduce the coding effort (i.e. do the work for them).

Furthermore,

Quote:
that's why i am planning not to implement this approach in production.

But Sometimes for R&D or Information or Idea or to know different aspects of features, you have to try those in testing...


This is only for R&D purposes. The work done for them is only for their information.

Nice.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> CICS

 


Similar Topics
Topic Forum Replies
No new posts RACF - Rebuild SETROPTS command which... All Other Mainframe Topics 3
No new posts Using API Gateway from CICS program CICS 0
No new posts Routing command Address SDSF to other... TSO/ISPF 2
No new posts DTL - how to define key with stacked ... TSO/ISPF 3
No new posts LTJ command CA Products 4
Search our Forums:

Back to Top