You can also (6.5++) do this
1. Put a Var or Column on a form but not a button
2. Goto properties
3. On the "On Entry Into" or "On Exit From" Type
A1.EEP Using 1 (The epp name must be very short because of
limitations)
4. In the eep have some code like this. The code below works kind of like
a popup but you could do anything
SET VAR vOptions = .%1
SET VAR vCatID1 INTEGER = NULL
SET VAR vPCategoryID1 INTEGER = NULL
SET VAR vWidthID1 INTEGER = NULL
SET VAR vThicknessID1 INTEGER = NULL
SET VAR vLengthHeightID1 INTEGER = NULL
SET VAR vStyleID1 INTEGER = NULL
SET VAR vMaterialID1 INTEGER = NULL
SET VAR vCoreID1 INTEGER = NULL
SET VAR vUsageID1 INTEGER = NULL
SET VAR vColorID1 INTEGER = NULL
IF vOptions = 1 THEN
CHOOSE vCatID1 FROM #Values FOR(CatDesc),CatID FROM Categories
IF vCatID1 FAILS OR vCatID1 = '[Esc]' THEN
GOTO DONE
ENDIF
SET VAR vCatID INTEGER = .vCatID1
UPDATE PartsList SET CatID = .vCatID WHERE ItemID = .vItemID
GOTO Done
ENDIF
IF vOptions = 2 THEN
CHOOSE vPCategoryID1 FROM #Values FOR(PCategoryDesc),PCategoryID FROM
ProductCategory WHERE CatID = .vCatID
IF vPCategoryID1 FAILS OR vPCategoryID1 = '[Esc]' THEN
GOTO DONE
ENDIF
SET VAR vPCategoryID2 INTEGER = .vPCategoryID1
UPDATE PartsList SET PCategoryID = .vPCategoryID2 WHERE ItemID =
.vItemID
GOTO Done
ENDIF
Label Done
On 14 Nov 2003 at 13:26, Albert Berry wrote:
> My presentation at the last R:Base conference uses a slightly different take on this.
>
> The eep property for each button reads "EepFile USING 'something'"
> The eepfile has a variable at the top that picks up the .%1 and then
runs the appropriate block of code.
>
> Set var vBlockName TEXT = .%1
>
> The eep then runs the specific block specified in the button properties.
>
>
> marc schluter <[EMAIL PROTECTED]> wrote:
>
> >This should be simple but I can't seem to get it to
> >work.
> >
> >I have a menu form with buttons. �The eep should get
> >the button name, close the window, then run a command
> >file in a case statement.
> >
> >I see how the example works in Rrbyw4 but when I trace
> >my eep the var gets set to .%1 not the button name.
> >
> >I use to use SET VAR vbutton =
> >(CVAL'form_field_name')) �but that doesn't seem to
> >work. �So, I replaced that with set var VmenuOption =
> >.%1 but no luck so far.
> >
> >sorry about asking so many questions
> >marc
> >
> >
> >
> >
> >__________________________________
> >Do you Yahoo!?
> >Protect your identity with Yahoo! Mail AddressGuard
> >http://antispam.yahoo.com/whatsnewfree
> >
> >
>
>
> --
> Albert Berry
> Full Time Consultant to
> PSD Solutions
> 350 West Hubbard, Suite 210
> Chicago, IL 60610
> 312-828-9253 Ext. 32
>
>
> __________________________________________________________________
> McAfee VirusScan Online from the Netscape Network.
> Comprehensive protection for your entire computer. Get your free trial
today!
> http://channels.netscape.com/ns/computing/mcafee/index.jsp?promo=393397
>
> Get AOL Instant Messenger 5.1 free of charge. Download Now!
> http://aim.aol.com/aimnew/Aim/register.adp?promo=380455
>
>
Victor Timmons
Tiz's Door Sales, Inc
425-258-2391
