Use a NUMERIC data type of the correct definition for your input.
SET VAR vInput NUMERIC (6,2) = NULL
Albert
On 2016-06-15 11:13 PM, 'James Bentley' via RBASE-L wrote:
Dan,
using the example suggested by Buddy. try the following:
SET VAR V1 DOUBLE
DIALOG 'Enter your number here||999999.00;0;_' v1=10 vEndKey 1
note the ";0;_" after Buddy's example
Inline image
Results after clicking "OK"
R>SHO VAR
Variable = Value Type
------------------ ------------------------------ -------
#DATE = 06/16/2016 DATE
#TIME = 00:12:52 TIME
#PI = 3.14159265358979 DOUBLE
SQLCODE = 0 INTEGER
SQLSTATE = 00000 TEXT
#NOW = 06/16/2016 00:12:52 DATETIME
v1 = 620.94 DOUBLE
vEndKey = [Enter] TEXT
Jim Bentley, American Celiac Society 1-504-305-2968
------------------------------------------------------------------------
*From:* jan johansen <[email protected]>
*To:* [email protected]
*Sent:* Wednesday, June 15, 2016 4:28 PM
*Subject:* RE: [RBASE-L] - Dialog format mask numbers and decimals
Dan,
How 'bout this.
1. Pre-define a varaiable
SET VAR vINeedThisNoText REAL = NULL
SET VAR vCancel TEXT = 'Yes'
SET VAR vContinue TEXT = 'No'
2. Create a variable form with a DB-Edit and 2 buttons, CANCEL and
CONTINUE
3. Treat the form as you would a dialog.
So it looks like this
SET VAR vINeedThisNoText REAL = NULL
SET VAR vCancel TEXT = 'Yes'
SET VAR vContinue TEXT = 'No'
EDIT USING MyDialog
IF vCancel = 'Yes'
GOTO Done
ENDIF
Jan
-----Original Message-----
From: Dan Goldberg <[email protected]>
To: "[email protected]" <[email protected]>
Date: Wed, 15 Jun 2016 21:14:41 +0000
Subject: RE: [RBASE-L] - Dialog format mask numbers and decimals
That is a good workaround. I was thinking the same thing.
I was hoping on something that would not allow not numeric entries
in the dialog box.
Dan
*From:*[email protected] [mailto:[email protected]]
*On Behalf Of *Buddy Walker
*Sent:* Wednesday, June 15, 2016 12:13 PM
*To:* [email protected]
*Subject:* RE: [RBASE-L] - Dialog format mask numbers and decimals
Dan
Since the format mask will not work for you then I maybe something
like this.
Buddy
__________________code starts here
LABEL Start
SET VAR V1 DOUBLE = NULL
SET ERROR MESSAGE 480 OFF
DIAL 'Enter number (ex. 48.54)' v1=10 vendkey 1
SET ERROR MESSAGE 480 ON
IF v1 = 0 or v1 IS NULL THEN
PAUSE 2 USI ' Invalid number entered'
GOTO Start
ENDIF
----------------------------code ends here
*From:* [email protected] <mailto:[email protected]>
[mailto:[email protected]] *On Behalf Of *Dan Goldberg
*Sent:* Wednesday, June 15, 2016 2:06 PM
*To:* [email protected] <mailto:[email protected]>
*Subject:* RE: [RBASE-L] - Dialog format mask numbers and decimals
Thx buddy. It sort of works but looks weird with the spaces.
Dan Goldberg
*From:*[email protected] <mailto:[email protected]>
[mailto:[email protected]] *On Behalf Of *Buddy Walker
*Sent:* Wednesday, June 15, 2016 10:58 AM
*To:* [email protected] <mailto:[email protected]>
*Subject:* RE: [RBASE-L] - Dialog format mask numbers and decimals
Dan
Try something like this
SET VAR v1 DOUBLE
DIALOG 'Enter your number here||999999.00' v1=10 vEndKey 1
Buddy
*From:* [email protected] <mailto:[email protected]>
[mailto:[email protected]] *On Behalf Of *Dan Goldberg
*Sent:* Wednesday, June 15, 2016 1:46 PM
*To:* [email protected] <mailto:[email protected]>
*Subject:* [RBASE-L] - Dialog format mask numbers and decimals
I need to have a dialog box that only allows numbers and the decimal.
I am thinking the format option will work but am confused on if it
will.
Has anybody done this or have any ideas?
TIA
Dan Goldberg**
**
**
--
You received this message because you are subscribed to the Google
Groups "RBASE-L" group.
To unsubscribe from this group and stop receiving emails from it,
send an email to [email protected]
<mailto:[email protected]>.
For more options, visit https://groups.google.com/d/optout.
--
You received this message because you are subscribed to the Google
Groups "RBASE-L" group.
To unsubscribe from this group and stop receiving emails from it,
send an email to [email protected]
<mailto:[email protected]>.
For more options, visit https://groups.google.com/d/optout.
--
You received this message because you are subscribed to the Google
Groups "RBASE-L" group.
To unsubscribe from this group and stop receiving emails from it,
send an email to [email protected]
<mailto:[email protected]>.
For more options, visit https://groups.google.com/d/optout.
--
You received this message because you are subscribed to the Google
Groups "RBASE-L" group.
To unsubscribe from this group and stop receiving emails from it,
send an email to [email protected]
<mailto:[email protected]>.
For more options, visit https://groups.google.com/d/optout.
--
You received this message because you are subscribed to the Google
Groups "RBASE-L" group.
To unsubscribe from this group and stop receiving emails from it,
send an email to [email protected]
<mailto:[email protected]>.
For more options, visit https://groups.google.com/d/optout.
Please note, responding to this email leads to an email box that is
not monitored, if you have any questions feel free to send request to
[email protected] or to your normal contact.
Thank you,
JJ Staff
--
You received this message because you are subscribed to the Google
Groups "RBASE-L" group.
To unsubscribe from this group and stop receiving emails from it, send
an email to [email protected]
<mailto:[email protected]>.
For more options, visit https://groups.google.com/d/optout.
--
You received this message because you are subscribed to the Google
Groups "RBASE-L" group.
To unsubscribe from this group and stop receiving emails from it, send
an email to [email protected]
<mailto:[email protected]>.
For more options, visit https://groups.google.com/d/optout.
--
You received this message because you are subscribed to the Google Groups
"RBASE-L" group.
To unsubscribe from this group and stop receiving emails from it, send an email
to [email protected].
For more options, visit https://groups.google.com/d/optout.
