I just ran into this in RBase6.5
Actually, what was weird is that for a few years now this has
been working, and then the other day I added a couple of small
things to the app and recompiled into an apx and boom
this following code failed along the same lines.
What was...
SET VAR vm_getdate DATE = NULL
SET VAR vm_getdate = (getdate('Select End Of Month'))
IF vm_getdate IS NOT NULL AND vm_getdate <> '[Esc]' THEN
I changed to ...
What was...
SET VAR vm_getdate DATE = NULL
SET VAR vm_getdate = (getdate('Select End Of Month'))
IF vm_getdate IS NOT NULL AND vm_getdate <> '[Esc]' THEN
In other parts I changed code to something like this...
SET VAR vm_begdate DATE = NULL
SET VAR vm_begdate = (getdate('Select Beginning Date'))
SET VAR vm_enddate DATE = NULL
SET VAR vm_enddate = (getdate('Select Ending Date'))
IF vm_begdate IS NOT NULL AND vm_enddate IS NOT NULL THEN
The values will be NULL if they are not filled with a date.
Whether you hit the [X] or the Cancel button.
I guess it makes since when your talking strict data typing
in the sense that you can not compare a date value to a string
value.
Jim
-----Original Message-----
From: [email protected] [mailto:[EMAIL PROTECTED] On Behalf Of Bernard Lis
Sent: Monday, March 07, 2005 10:01 AM
To: RBG7-L Mailing List
Subject: [RBG7-L] - Re: Can't get AutoSelect Property to work
Doug,
Why can't you use: set var birth = (getdate('Enter Birth Date')) Then they
can't enter an invalid date.
But you should check for '[Esc]'
Bernie Lis
----- Original Message -----
From: "Doug Hamilton" <[EMAIL PROTECTED]>
To: "RBG7-L Mailing List" <[email protected]>
Sent: Monday, March 07, 2005 12:27 AM
Subject: [RBG7-L] - Can't get AutoSelect Property to work
> I'm working on Date with Year Optional issue for which several people
> have offered very helpful suggestions. I'll post the final results soon.
>
> Part of the effort is to make it goof-proof (yeah, right). I'm
> collecting the month, day and year in separate varialbles and then
> RDATEing them into a valid date. So the first error check is to make
> sure user enters an invalid month. If an invalid month is entered (> 12
> at this time), I do a Pause error message and then set focus on the
> month variable control for re-entry. I would also like to have it
> Autoselect, as it does when user first tabs into it, so user doesn't
> have to delete the null symbol. But I can't get the Autoselect property
> to work. The following code is in an On Exit eep for the birth month
> variable control; vIndBirthMM is the integer variable defined before
> the form starts, BirthMM is the componentID. Autoselect is checked on
> the properties. I have also tried putting the Autoselect before the
> Set_Focus with no luck and tried moving the Autoselect to an On Entry
> eep, again with no luck. Any ideas?
>
> IF vIndBirthMM > 12 THEN
> PAUSE 2 USING 'Invalid Month' +
> CAPTION 'caption' Button 'OK'
>
> SET V vIndBirthMM = NULL
> PROPERTY BirthMM SET_FOCUS 'true'
> PROPERTY BirthMM autoselect 'TRUE'
> ENDIF
>
> RETURN
>
> Thanks much.
> Doug
> p.s. Version 80.30228
>
> --- RBG7-L
> ================================================
> TO POST A MESSAGE TO ALL MEMBERS:
> Send a plain text email to [email protected]
>
> (Don't use any of these words as your Subject:
> INTRO, SUBSCRIBE, UNSUBSCRIBE, SEARCH,
> REMOVE, SUSPEND, RESUME, DIGEST, RESEND, HELP)
> ================================================
> TO SEE MESSAGE POSTING GUIDELINES:
> Send a plain text email to [email protected]
> In the message SUBJECT, put just one word: INTRO
> ================================================
> TO UNSUBSCRIBE:
> Send a plain text email to [email protected]
> In the message SUBJECT, put just one word: UNSUBSCRIBE
> ================================================
> TO SEARCH ARCHIVES:
> Send a plain text email to [email protected]
> In the message SUBJECT, put just one word: SEARCH-n
> (where n is the number of days). In the message body,
> place any
> text to search for.
> ================================================
>
>
