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
 

 

Wants to create menu based on input

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> TSO/ISPF
View previous topic :: :: View next topic  
Author Message
nkothako

Active User


Joined: 26 Nov 2008
Posts: 125
Location: chennai

PostPosted: Mon Feb 16, 2009 2:36 pm    Post subject: Wants to create menu based on input
Reply with quote

I want display the first screen based on my input, when ever user invoke my tool

ex : if user enters TSO BMC then this should be first screen after few seconds my menu panel has to display automatically. is it possible


Code:
**C*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*B**
***BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BM**
**BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC**
**MC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC***
**C*B              *BMC*BM     *BMC*BMC*B     C*BMC*BM         *BMC*B**
***BMC*   *BMC*BM   MC*BMC*B    MC*BMC*B    MC*BMC*B    MC*BM    C*BM**
**BMC*B   BMC*BMC*   *BMC*BM     *BMC*B     C*BMC*B   BMC*BMC*B   BMC**
**MC*BM   MC*BMC*B   BMC*BMC      MC*B      *BMC*BM   MC*BMC*BMC*BMC***
**C*BMC   C*BMC*B   BMC*BMC*   *   *B   B   BMC*BMC   C*BMC*BMC*BMC*B**
***BMC*            BMC*BMC*B   BM      BM   MC*BMC*   *BMC*BMC*BMC*BM**
**BMC*B   BMC*BMC   C*BMC*BM   MC*    BMC   C*BMC*B   BMC*BMC*BMC*BMC**
**MC*BM   MC*BMC*B   BMC*BMC   C*BM  BMC*   *BMC*BM   MC*BMC*BMC*BMC***
**C*BMC   C*BMC*BM   MC*BMC*   *BMC*BMC*B   BMC*BMC   C*BMC*BMC   C*B**
***BMC*   *BMC*BM   MC*BMC*B   BMC*BMC*BM   MC*BMC*B    MC*BM    C*BM**
**BMC              MC*BMC*     MC*BMC*BMC     BMC*BMC*         MC*BMC**
**MC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC***
**C*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*B**
***BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BM**
Back to top
View user's profile Send private message

expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Mon Feb 16, 2009 2:42 pm    Post subject:
Reply with quote

What have you tried ?
Back to top
View user's profile Send private message
nkothako

Active User


Joined: 26 Nov 2008
Posts: 125
Location: chennai

PostPosted: Mon Feb 16, 2009 2:53 pm    Post subject: Wants to create menu based on input
Reply with quote

I didn't get any ideas how to create

I think we can't do thru pgm
Back to top
View user's profile Send private message
Marso

REXX Moderator


Joined: 13 Mar 2006
Posts: 1224
Location: Israel

PostPosted: Mon Feb 16, 2009 4:32 pm    Post subject:
Reply with quote

Code:
Address ISPEXEC "CONTROL DISPLAY LOCK"
Address ISPEXEC "DISPLAY PANEL(BMCPANEL)"

/* use your favorite method to wait for 2 seconds */

Address ISPEXEC "DISPLAY PANEL(MAINMENU)"
Back to top
View user's profile Send private message
Marso

REXX Moderator


Joined: 13 Mar 2006
Posts: 1224
Location: Israel

PostPosted: Mon Feb 16, 2009 6:32 pm    Post subject:
Reply with quote

Sorry, was a bit in a hurry. I'm back now for better explanations.

The CONTROL DISPLAY LOCK statement tells ISPF to leave the keyboard locked and to act as if Enter has been pressed
(which means that the panel is displayed but the Rexx process continues withou waiting).

If you put nothing between the 2 "DISPLAY PANEL" commands, the 1st panel will disappear very quickly,
So try to put as much logic as you can in the middle.
And if it's not enough, here is one method for putting your Rexx to sleep: WAIT or SLEEP utility in REXX for delay
Back to top
View user's profile Send private message
nkothako

Active User


Joined: 26 Nov 2008
Posts: 125
Location: chennai

PostPosted: Mon Feb 16, 2009 6:41 pm    Post subject: Wants to create menu based on input
Reply with quote

Thanks alot for your reply and suggestion

but how can i display desired name, ex : like BMC but i want to display syntel. Is it possible thru any built in function in rexx or ispf or etc..

Code:
**C*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*B**
***BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BM**
**BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC**
**MC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC***
**C*B              *BMC*BM     *BMC*BMC*B     C*BMC*BM         *BMC*B**
***BMC*   *BMC*BM   MC*BMC*B    MC*BMC*B    MC*BMC*B    MC*BM    C*BM**
**BMC*B   BMC*BMC*   *BMC*BM     *BMC*B     C*BMC*B   BMC*BMC*B   BMC**
**MC*BM   MC*BMC*B   BMC*BMC      MC*B      *BMC*BM   MC*BMC*BMC*BMC***
**C*BMC   C*BMC*B   BMC*BMC*   *   *B   B   BMC*BMC   C*BMC*BMC*BMC*B**
***BMC*            BMC*BMC*B   BM      BM   MC*BMC*   *BMC*BMC*BMC*BM**
**BMC*B   BMC*BMC   C*BMC*BM   MC*    BMC   C*BMC*B   BMC*BMC*BMC*BMC**
**MC*BM   MC*BMC*B   BMC*BMC   C*BM  BMC*   *BMC*BM   MC*BMC*BMC*BMC***
**C*BMC   C*BMC*BM   MC*BMC*   *BMC*BMC*B   BMC*BMC   C*BMC*BMC   C*B**
***BMC*   *BMC*BM   MC*BMC*B   BMC*BMC*BM   MC*BMC*B    MC*BM    C*BM**
**BMC              MC*BMC*     MC*BMC*BMC     BMC*BMC*         MC*BMC**
**MC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC***
**C*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*B**
***BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BMC*BM**
Back to top
View user's profile Send private message
Marso

REXX Moderator


Joined: 13 Mar 2006
Posts: 1224
Location: Israel

PostPosted: Mon Feb 16, 2009 7:02 pm    Post subject:
Reply with quote

Maybe it can be done, but not in the scope of this forum, and certainly not for free... 824.gif

I strongly suggest that you design a different (fixed) panel for each product / vendor you have.
Back to top
View user's profile Send private message
Pedro

Senior Member


Joined: 01 Sep 2006
Posts: 2025
Location: Silicon Valley

PostPosted: Mon Feb 16, 2009 9:59 pm    Post subject: Reply to: Wants to create menu based on input
Reply with quote

Quote:
I strongly suggest that you design a different (fixed) panel for each product / vendor you have.


As an user of such products, I find such logo panels annoying. Please do not display. But if you really need to...

Can you display with GDDM? ISPF can display graphics produced by GDDM.
Back to top
View user's profile Send private message
nkothako

Active User


Joined: 26 Nov 2008
Posts: 125
Location: chennai

PostPosted: Tue Feb 17, 2009 10:01 am    Post subject: Wants to create menu based on input
Reply with quote

Quote:
Can you display with GDDM? ISPF can display graphics produced by GDDM.



please guide me how to do this
Back to top
View user's profile Send private message
Marso

REXX Moderator


Joined: 13 Mar 2006
Posts: 1224
Location: Israel

PostPosted: Tue Feb 17, 2009 8:06 pm    Post subject: Reply to: Wants to create menu based on input
Reply with quote

WebSphere MQ is compromising. It displays both a small menu and the logo:
Code:
------------------------- WebSphere MQ Utilities  ----------------------------
COMMAND ===>                                                                   
                                                                               
                                                                               
   P  WebSphere MQ Administration                                             
   M  Message Handler                                                         
                                                                               
                                                                               
                                                                               
                 /\~~~~\           /\~~~~\           /~~\~~~~\                 
                /::\    \         /::\    \         /::::\    \               
               /:::/~~~~/        /::::|~~~|        /::::::\    \               
              /:::/    /        /:::::|   |       /::::::::\    \             
             /:::/   /\~~~~\   /::::::|   |      /:::/~~\:::\    \             
            /:::/   /::\    \ /:::/|::|   |     /:::/    \:::\    \           
           /:::/   /:::/~~~~//:::/ |::|   |    /:::/    / \:::\    \           
          /:::/   /:::/    //:::/  |::|   |   /:::/    /   \:::\    \         
         /:::/   /:::/   /\~~~~\   |:::~~~~~\~~~~\~~~~|     |:::|~~~~|         
        |:::|~~~/:::/   /::\    \  |:::::::::\    \   |     |:::|    |         
        |:::|  /:::/   /:::/~~~~/ / ~~~~~/:::/~~~~/~~~ \   /:::/ ~~~/         
         \:::\/:::/   /:::/    / /      /:::/    /:\ |~~|~/:::/    /           
          \::::::/   /:::/    /~~      /:::/    /:::\|::|/:::/    /           
           \::::/   /:::/    /        /:::/    / \::::::::::/    /             
            \:::\  /:::/    /        /:::/    /   \::::::::/    /             
             \:::~~:::/    /        /:::/    /     \::::::/    /               
              \::::::/    /        /:::/    /       \::::/    /               
               \::::/    /        /:::/    /         |::|~~~~|                 
                \::/    /         \::/    /          |::|    |                 
                 ~~~~~~~           \/    /            ~~ ~~~~                 
                                    ~~~~~                                     
                                                                               
                                                                               
This way, there is no waste of time. These delays are really just annoying.
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 -> TSO/ISPF All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Removing Duplicates based on certain ... chandracdac DFSORT/ICETOOL 8 Fri Dec 09, 2016 4:40 am
No new posts Performing arithmetic on input field zh_lad DFSORT/ICETOOL 31 Tue Dec 06, 2016 8:04 pm
No new posts High CPU consumption Job using IAM fi... aswinir JCL & VSAM 15 Thu Dec 01, 2016 8:28 pm
This topic is locked: you cannot edit posts or make replies. Rexx to create GDG by scanning JJ result krish.deepu CLIST & REXX 5 Tue Oct 25, 2016 5:32 pm
No new posts Sort records based on numeric field. Alks SYNCSORT 2 Wed Oct 19, 2016 10:14 pm


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