Tom,

 

One of the best R:BASE solutions available to you for slow network problems
is to embed all the code into the form.  When the form is loaded, the code
(in later versions of 7.6) is executed from memory, not disk (aka across the
LAN.)  Therefore you avoid repeated network traffic each time a bit of
external code is executed.

 

And with forms compression turned on, the initial load time is minimized.

 

Emmitt Dove

Manager, DairyPak Business Systems

Evergreen Packaging, Inc.

[EMAIL PROTECTED]

[EMAIL PROTECTED]

(203) 643-8022

 

From: [email protected] [mailto:[EMAIL PROTECTED] On Behalf Of TOM HART
Sent: Thursday, May 29, 2008 1:53 AM
To: RBASE-L Mailing List
Subject: [RBASE-L] - Re: Checking a value

 

Razz,

Is this a faster proccess in a multi user than setting a rule because I'm
having the slow network problem.  I have modified the scratch setting for my
app, but will have to wait till tomorrow to test in multi user.

Tom

 

----- Original Message ----
From: A. Razzak Memon <[EMAIL PROTECTED]>
To: RBASE-L Mailing List <[email protected]>
Sent: Thursday, May 29, 2008 12:23:30 AM
Subject: [RBASE-L] - Re: Checking a value

At 12:09 AM 5/29/2008, TOM HART wrote:

>I have a form with a scrolling region and want to check a
>currency value upon exiting a row.  I do not want a null
>or zero value.  Currently I use a rule to check if the
>value is less than 1.  This works, but does a rule slow
>down a multi-user environment, if so I'm sure there is a
>better way.

Tom,

GETPROPERTY <CurrencyColumnCompID> TEXTVALUE 'varname' is
one of the techniques to validate a value when existing a
row or leaving a field.

Here's how:

-- A very simple example
-- start here ...
CLEAR VAR vCheckValueTxt, vCheckValueCur
SET VAR vCheckValueTxt TEXT = NULL
SET VAR vCheckValueCur CURRENCY = NULL
GETPROPERTY <CurrencyColumnCompID> TEXTVALUE 'vCheckValueTxt'
SET VAR vCheckValueCur = (FLOAT(.vCheckValueTxt))
IF vCheckValueCur > 0.00 THEN
    -- All good ...
    -- Do what you need to do here ...
ELSE
    PAUSE 2 USING 'Amount must be greater than 0.00' ICON STOP
    RETURN
ENDIF
-- end here ...

That's all there is to it!

Have fun.

Very Best R:egards,

Razzak.



Reply via email to