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 to disable function keys in IMS DC

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> IMS DB/DC
View previous topic :: :: View next topic  
Author Message
rajatbagga

Active User


Joined: 11 Mar 2007
Posts: 188
Location: india

PostPosted: Tue May 15, 2007 2:35 pm    Post subject: how to disable function keys in IMS DC
Reply with quote

hi,
Is there any process to diable the function keys in IMS DC as we have in CICS....

Please give me some examples of how to disable the function keys in IMS DC
Back to top
View user's profile Send private message

Devzee

Active Member


Joined: 20 Jan 2007
Posts: 684
Location: Hollywood

PostPosted: Tue May 15, 2007 7:39 pm    Post subject:
Reply with quote

Quote:
Is there any process to diable the function keys in IMS DC as we have in CICS....


This is not clear, do you want to handle or dont want to handle the PF Keys in IMS DC.
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1105
Location: The Netherlands at Hole 19

PostPosted: Wed May 16, 2007 3:37 pm    Post subject:
Reply with quote

PF key handling in IMS DC is done by the user application. If you don't want your application to handle them simply don't program them.
Back to top
View user's profile Send private message
rajatbagga

Active User


Joined: 11 Mar 2007
Posts: 188
Location: india

PostPosted: Wed May 16, 2007 5:36 pm    Post subject:
Reply with quote

In my online PL/I program i have implimented scroll down(PF-8) and scroll up(PF-7) logic whenever there is end of table i want to disable PF-8 since there are no more records to display. how should i do that?
Back to top
View user's profile Send private message
Devzee

Active Member


Joined: 20 Jan 2007
Posts: 684
Location: Hollywood

PostPosted: Wed May 16, 2007 5:44 pm    Post subject:
Reply with quote

In the program check if PF8 key pressed and also end of table reached then display message " LAST PAGE" or "NO MORE DATA" some message onto screen.

If you want to dynamically display PF8 ON and OFF in the screen then you need to do this differently.

Let us know what you want to do
Back to top
View user's profile Send private message
rajatbagga

Active User


Joined: 11 Mar 2007
Posts: 188
Location: india

PostPosted: Wed May 16, 2007 8:56 pm    Post subject:
Reply with quote

Presently i am displaying "END OF TABLE" on the screen when there is end of table i.e. SQLCODE = 100 my logic is perfect but problem here is whenever he is pressing F-8 (three to four times) after end of table conditon the program is abending so i want to disable F-8 key at end of table, so that even after he pressess F-8 after the reaching end of table the program should not abend........
Back to top
View user's profile Send private message
Devzee

Active Member


Joined: 20 Jan 2007
Posts: 684
Location: Hollywood

PostPosted: Wed May 16, 2007 11:10 pm    Post subject:
Reply with quote

Whenever you reached End of Table and displayed screen with END OF TABLE message you can use SPA or some hidden field on screen or on temp db2 tables to store an indicator indicating that already END OF TABLE reached.

If PF8 is pressed again then in program check what is the indicator value if its set then display some message 'NO MORE TO DISPLAY' some kind of message.

The scenario which you explained should be handled within program.
Back to top
View user's profile Send private message
rajatbagga

Active User


Joined: 11 Mar 2007
Posts: 188
Location: india

PostPosted: Thu May 17, 2007 4:40 pm    Post subject:
Reply with quote

which will be efficient SPA or hidden field for indicating that END OF TABLE is reached
Back to top
View user's profile Send private message
Devzee

Active Member


Joined: 20 Jan 2007
Posts: 684
Location: Hollywood

PostPosted: Thu May 17, 2007 4:45 pm    Post subject:
Reply with quote

What technique is efficient really depends on how exactly you can do and also what is allowed in your shop. like hidden field may not be used in many shops, SPA will be ideal choice. Again any method requires coding and testing effort to make sure what u expected is working.
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1105
Location: The Netherlands at Hole 19

PostPosted: Thu May 17, 2007 6:15 pm    Post subject:
Reply with quote

If you already use a SPA in your MPP you will always read it at entry of your application and insert it before leaving it so why not store it there.
Back to top
View user's profile Send private message
rajatbagga

Active User


Joined: 11 Mar 2007
Posts: 188
Location: india

PostPosted: Fri May 18, 2007 7:13 pm    Post subject:
Reply with quote

Well you are right . thank you very much , i will use SPA area, i think this would solve my problem.
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1105
Location: The Netherlands at Hole 19

PostPosted: Fri May 18, 2007 7:18 pm    Post subject:
Reply with quote

rajatbagga wrote:
Well you are right . thank you very much , i will use SPA area, i think this would solve my problem.


I'm sure it will solve your problem icon_wink.gif
Back to top
View user's profile Send private message
Libu Thomas

New User


Joined: 01 Jan 2007
Posts: 6
Location: India

PostPosted: Wed May 30, 2007 1:47 pm    Post subject:
Reply with quote

put
FEAT=NOPFK
Back to top
View user's profile Send private message
rajatbagga

Active User


Joined: 11 Mar 2007
Posts: 188
Location: india

PostPosted: Wed May 30, 2007 7:19 pm    Post subject: Re: how to disable function keys in IMS DC
Reply with quote

where and how to put : FEAT=NOPFK
Back to top
View user's profile Send private message
rajatbagga

Active User


Joined: 11 Mar 2007
Posts: 188
Location: india

PostPosted: Wed May 30, 2007 7:39 pm    Post subject:
Reply with quote

I do not want to disable the function key in FORMAT but i want this to be done through APPLICATION PROGRAM (PL/I) based on END OF TABLE conditon.
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1105
Location: The Netherlands at Hole 19

PostPosted: Thu May 31, 2007 1:59 am    Post subject:
Reply with quote

Libu Thomas wrote:
put
FEAT=NOPFK


Advise: read the topic and posts carefully icon_wink.gif
Back to top
View user's profile Send private message
rajatbagga

Active User


Joined: 11 Mar 2007
Posts: 188
Location: india

PostPosted: Thu May 31, 2007 4:22 pm    Post subject:
Reply with quote

rajatbagga wrote:
I do not want to disable the function key in FORMAT but i want this to be done through APPLICATION PROGRAM (PL/I) based on END OF TABLE conditon.


and in addition to that i only want to disable one function key not ALL
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1105
Location: The Netherlands at Hole 19

PostPosted: Thu May 31, 2007 11:35 pm    Post subject:
Reply with quote

So..........this discussion could be closed; program it and use the SPA like you told us.
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 -> IMS DB/DC All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
This topic is locked: you cannot edit posts or make replies. RANDOM Function in COBOL swapnil781 COBOL Programming 2 Tue Nov 15, 2016 6:17 pm
No new posts Check System time(Minute) Using TIME1... balaji81_k DFSORT/ICETOOL 5 Fri Nov 11, 2016 10:53 am
No new posts Strange EXEC function call in z/VM Willy Jensen CLIST & REXX 3 Wed Oct 05, 2016 2:07 pm
No new posts Joinkeys with duplicated keys juares castro SYNCSORT 19 Fri Sep 23, 2016 5:58 am
No new posts Replace function abdulrafi COBOL Programming 13 Mon Sep 12, 2016 10:12 am


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