DEFINE PAD _PWSEdit OF _MSYSMENU BEFORE VTSHELP ; PROMPT "PW*S" COLOR SCHEME 3 KEY ALT+S, "" ON PAD _PWSEdit OF _MSYSMENU ACTIVATE POPUP pws DEFINE POPUP pws MARGIN RELATIVE SHADOW COLOR SCHEME 4 DEFINE BAR 1 OF pws PROMPT "Addresses" DEFINE BAR 2 OF pws PROMPT "Violations" DEFINE BAR 3 OF pws PROMPT "Enforcement Actions" DEFINE BAR 4 OF pws PROMPT "SNC Data" ON SELECTION BAR 1 OF pws oApp.DoForm("Address", "frmAddress") ON SELECTION BAR 2 OF pws oApp.DoForm("Viols", "frmViolations") ON SELECTION BAR 3 OF pws oApp.DoForm("EnfActs", "frmEnfActs") ON SELECTION BAR 4 OF pws oApp.DoForm("SncData", "frmSncData")Keep in mind all of this was generated for me, and all I do is cut and paste into a PRG. I first start out by creating a menu and selecting the Quick Menu option. I modify from there.