Hmm, looks like that might work.

Thx

Dan Goldberg

From: 'James Bentley' via RBASE-L [mailto:[email protected]]
Sent: Wednesday, June 15, 2016 10:14 PM
To: [email protected]
Subject: Re: [RBASE-L] - Dialog format mask numbers and decimals

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]<mailto:[email protected]>>
To: [email protected]<mailto:[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]<mailto:[email protected]>>
To: "[email protected]<mailto:[email protected]>" 
<[email protected]<mailto:[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]> 
[mailto:[email protected]] On Behalf Of Buddy Walker
Sent: Wednesday, June 15, 2016 12:13 PM
To: [email protected]<mailto:[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]<mailto:[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.

Reply via email to