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
 

 

Clear screen on PF4

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

New User


Joined: 02 Jul 2010
Posts: 5
Location: India

PostPosted: Tue Feb 15, 2011 1:19 pm    Post subject: Clear screen on PF4
Reply with quote

Hi all,

On one of the screens I am working, PF4 has a return functionality. On pressing the PF4 key (displayed with label 'RETURN' on the map) the user should go back to the transaction from which this transaction was invoked. If however this transaction was started directly (by entering the transaction on a blank CICS screen) then pressing PF4 should clear the screen and return the control to CICS. The user can always press the clear key to do the same but this is what they want. Any pointers on how this can be done would be of great help.

Right now this is what i am planning to do:
Do a send text with message 'Function XXXX terminated. Clear screen before entering the a new function'. Then do a EXEC CICS RETURN.

TIA! GB
Back to top
View user's profile Send private message

Garry Carroll

Active Member


Joined: 08 May 2006
Posts: 992
Location: Dublin, Ireland / Edinburgh, Scotland

PostPosted: Tue Feb 15, 2011 4:20 pm    Post subject:
Reply with quote

How about EXEC CICS SEND CONTROL ERASE followed by EXEC CICS RETURN ??

Garry.
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne

PostPosted: Tue Feb 15, 2011 5:18 pm    Post subject:
Reply with quote

if there is no transaction expecting a return, just invoke the clear logic that is already in your program,
after performing the send erase that Garry suggested.
Back to top
View user's profile Send private message
kratos

New User


Joined: 02 Jul 2010
Posts: 5
Location: India

PostPosted: Tue Feb 22, 2011 9:05 am    Post subject:
Reply with quote

Thank you Garry, what you suggested did the job icon_smile.gif.
Back to top
View user's profile Send private message
Garry Carroll

Active Member


Joined: 08 May 2006
Posts: 992
Location: Dublin, Ireland / Edinburgh, Scotland

PostPosted: Tue Feb 22, 2011 1:19 pm    Post subject:
Reply with quote

Thanks for letting us know it worked.

Glad to have been of help.

Garry.
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 how to send just 10 rows in a CICS sc... Megha Gupta CICS 5 Thu Feb 23, 2017 6:57 pm
No new posts IMS DC screen Access sivasaras IMS DB/DC 3 Fri Nov 18, 2016 6:38 pm
No new posts Increase the screen size after split mistah kurtz TSO/ISPF 2 Fri Sep 02, 2016 6:39 pm
No new posts Automation of data entry using Rexx i... zingy.rajeev CLIST & REXX 4 Mon Aug 22, 2016 4:13 pm
This topic is locked: you cannot edit posts or make replies. Automation of data entry using Rexx i... zingy.rajeev CICS 0 Mon Aug 22, 2016 4:11 pm


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