General information
Category:
Menus & Menu designer
>Mike i tried this but when i recompile the code goes back to what it originally was. Any suggestions.
>
>TIA
>Shawn
PMFJI: But: We actually use no MPRs in our application, but build the menu using a table, and issuing each menu choice definition as we scan thru the table of choices. (Something like:
(for each record in the menu choices table)
DEFINE PAD &jcModule. OF _MSYSMENU ;
PROMPT jcMprompt ;
STYLE 'B' ;
FONT 'Arial', 10 ;
MESSAGE jcMod_Descr ;
KEY &jc_Hotkey., ""
ON PAD &jcModule. OF _MSYSMENU ACTIVATE POPUP &jcModule.
then:
IF jn_Bar_No = 1
DEFINE POPUP &tc_SubMenu.
ENDIF
DEFINE BAR jn_Bar_No OF &tc_SubMenu. ;
PROMPT jc_Prompt ;
STYLE 'B' ;
FONT 'Arial', 10 ;
MESSAGE jc_BarMsg
* call the usage logger, which invokes the module itself...
ON SELECTION BAR jn_Bar_No OF &tc_SubMenu. ;
DO [&jcmodule.]
or some such... The table has fields for menu choice name, program module to run, menu prompt for the message line, and index fields for the right order to build the drop-downs...
By using SQL selects with a user permissions table, this allows us to only show choices applicable for each user and avoid 'dimming them out'. It also could be used to allow your users to edit the descriptions. If this sounds like what you want, and more info is needed, I'll dig out our early demo/test version used to see if this would even work and e-mail it to you. I'm not sure I can send the final version due to client proprietary info concerns.
HTH
Rob
Previous
Next
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only