Dayle,
I'm not sure the "TO" keyword can be used as a synonym for "=" anymore.
Try:
SET VAR msg = +
("You are about to start reporting for" & CTXT(.bvdate))
Bill
On Feb 13, 2008 10:12 AM, Coxen, Dayle <[EMAIL PROTECTED]> wrote:
> I am new to rbase and have only recently started converting a 6.5application
> to
> 7.5.
>
> The following code works in 6.5.
> But in 7.6 lines 18, 19 and 20 seem to be ignored.
> No error.
> The content of msg is not displayed.
> Execution continues to "Are you sure you want to continue?"
>
> Also when I run R:style on this code, it gives the message for line 14
> "Not a valid command: CONNECT"
>
> 1 SET ANSI OFF
> 2 SET QUOTES="
> 3 SET SINGLE=?
> 4 SET MANY=*
> 5 SET AND OFF
> 6 SET VAR vdate DATE
> 7 SET VAR ANSI TEXT
> 8 SET ERROR VAR hold
> 9 SET VAR CONTAINS INTEGER
> 10 SET VAR CONTAINS = 1
> 11 SET ERROR MESSAGES OFF
> 12 SET MESSAGES OFF
> 13 LABEL start
> 14 CONNNECT wdoss
> 15 SET NULL " "
> 16 CLS
> 17 FILLIN vdate USING "Enter Date To Be Reported. ==> " AT 5 10
> 18 SET VAR bvdate = .vdate
> 19 SET VAR msg TO ("You are about to start reporting for" & CTXT(.bvdate))
> 20 WRITE .msg
> 21 DIALOG "Are you sure you want to continue? " ANSI vkey yes AT 17
> 22 IF ANSI EQ "Yes" THEN
> 23 GOTO end1
> 24 ELSE
> 25 GOTO start
> 26 ENDIF
>
> Very much a Newbie,
> Dayle Coxen
> 850-410-5635
>
> FDOT Office of Maintenance
> 605 Suwannee St.
> Mail Station 52
> Tallahassee, FL 32399
>
>
>