How come I'm getting following error when I use GETBAR() and PRMBAR(), when PAD() is _mgroups, but works fine when PAD() is _medit ??

ERROR MESSAGE:
Menu has not been defined with DEFINE POPUP.


Code snip from the .MPR file:

SET SYSMENU TO
SET SYSMENU AUTOMATIC

<--snip-->

DEFINE PAD _msm_edit OF _MSYSMENU PROMPT "\ KEY ALT+E, "" ;
MESSAGE "Edit Companies or Contacts."

DEFINE PAD _msm_group OF _MSYSMENU PROMPT "\ KEY ALT+G, "" ;
MESSAGE "Add, Edit or Remove Groups"

<--snip-->

ON PAD _msm_edit OF _MSYSMENU ACTIVATE POPUP _medit
ON PAD _msm_group OF _MSYSMENU ACTIVATE POPUP _mgroups

<--snip-->

DEFINE POPUP _medit MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF _medit PROMPT "Company" ;
MESSAGE "Edit Companies."
DEFINE BAR 2 OF _medit PROMPT "Contact" ;
MESSAGE "Edit Contacts in Companies."
ON SELECTION BAR 1 OF _medit GoApp.doMenuChange("company")
ON SELECTION BAR 2 OF _medit GoApp.DoMenuChange("contact")

DEFINE POPUP _mgroups MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF _mgroups PROMPT "Add" ;
MESSAGE "Add a new Group."
DEFINE BAR 2 OF _mgroups PROMPT "Edit" ;
MESSAGE "Edit a Group Name."
DEFINE BAR 3 OF _mgroups PROMPT "Remove" ;
MESSAGE "Remove a Group."
ON SELECTION BAR 1 OF _mgroups goApp.DoMenuChange("GroupAdd")
ON SELECTION BAR 2 OF _mgroups goApp.DoMenuChange("GroupEdt")
ON SELECTION BAR 3 OF _mgroups goApp.DoMenuChange("GroupDel")

----

TIA

Erik Niese-Petersen

- Erik Niese-Petersen

Crazy Dane in USA.