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

how to disable function keys in IMS DC


IBM Mainframe Forums -> IMS DB/DC
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
rajatbagga

Active User


Joined: 11 Mar 2007
Posts: 199
Location: india

PostPosted: Tue May 15, 2007 2:35 pm
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
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: 1104
Location: The Netherlands at Hole 19

PostPosted: Wed May 16, 2007 3:37 pm
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: 199
Location: india

PostPosted: Wed May 16, 2007 5:36 pm
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
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: 199
Location: india

PostPosted: Wed May 16, 2007 8:56 pm
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
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: 199
Location: india

PostPosted: Thu May 17, 2007 4:40 pm
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
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: 1104
Location: The Netherlands at Hole 19

PostPosted: Thu May 17, 2007 6:15 pm
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: 199
Location: india

PostPosted: Fri May 18, 2007 7:13 pm
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: 1104
Location: The Netherlands at Hole 19

PostPosted: Fri May 18, 2007 7:18 pm
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
Reply with quote

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

Active User


Joined: 11 Mar 2007
Posts: 199
Location: india

PostPosted: Wed May 30, 2007 7:19 pm
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: 199
Location: india

PostPosted: Wed May 30, 2007 7:39 pm
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: 1104
Location: The Netherlands at Hole 19

PostPosted: Thu May 31, 2007 1:59 am
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: 199
Location: india

PostPosted: Thu May 31, 2007 4:22 pm
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: 1104
Location: The Netherlands at Hole 19

PostPosted: Thu May 31, 2007 11:35 pm
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 View Bookmarks
All times are GMT + 6 Hours
Forum Index -> IMS DB/DC

 


Similar Topics
Topic Forum Replies
No new posts Calling an Open C library function in... CICS 1
No new posts disable /*XEQ substitution in TWS IBM Tools 4
No new posts DATE2 function SYNCSORT 15
No new posts Use input file with OMIT rcd keys? DFSORT/ICETOOL 15
No new posts Help on PL/I jsonPutValue function PL/I & Assembler 8
Search our Forums:

Back to Top