Frank,

Try the following code in you eep:
-- FOLLOWING CODE APPEARS IN EEP
SET VAR v_subtotal5 = (.v_subtotal3 + .v_subtotal4)
WRITE .v_subtotal1 AT 15,70 USING '[>]$9,999.00' WHITE ON BLACK
WRITE .v_subtotal2 AT 16,70 USING '[>]$9,999.00' WHITE ON BLACK
WRITE .v_subtotal3 AT 18,70 USING '[>]$9,999.00' WHITE ON BLACK
WRITE .v_subtotal4 AT 19,70 USING '[>]$9,999.00' WHITE ON BLACK
WRITE .v_subtotal5 AT 21,70 USING '[>]$9,999.00' WHITE ON BLACK
SCREEN RESTORE OFF
RETURN
*(END OF PROGRAM)

Make sure that your form is setting values for the v_subtotal variables.  You can do 
it all with the WRITE command.  No need to set additional variables.  See 
www.rsyntax.com for all options of the WRITE command.  You also need to include the 
"SCREEN RESTORE OFF" command before you return from the EEP.  The SCREEN RESTORE 
command prevents the FORM runtime from redisplaying you form thus wipeing out what you 
wrote to the screen.  Also note you only need one '>' symbol in the format statement.
-- 
Jim Bentley
American Celiac Society
[EMAIL PROTECTED] - email
(973) 325-8837 voice
(973) 669-8808 Fax



-----Original Message-----
From:     "Claudine Robbins" <[EMAIL PROTECTED]>
Sent:     Wed, 25 Dec 2002 19:55:17 -0600
To:       [EMAIL PROTECTED] (RBASE-L Mailing List)
Subject:  [RBASE-L] - Screen Displays

Frank,
V_subtotal1, V_subtotal2 and V_subtotal3 have to be set or evaluated
first. Add a RETURN to the bottom.  Then your code works fine.  I tested
the following:
set v v_subtotal1 = 400
  set v v_subtotal2 = 500
  set v v_subtotal3 = 1000
  set v v_subtotal4 = 2000
  SET VAR v_subtotal5 = (.v_subtotal3 + .v_subtotal4)
  SET VAR v_1 = (FORMAT(.v_subtotal1,'[>>]$9,999.00'))
  SET VAR v_2 = (FORMAT(.v_subtotal2,'[>>]$9,999.00'))
  SET VAR v_3 = (FORMAT(.v_subtotal3,'[>>]$9,999.00'))
  SET VAR v_4 = (FORMAT(.v_subtotal4,'[>>]$9,999.00'))
  SET VAR v_5 = (FORMAT(.v_subtotal5,'[>>]$9,999.00'))
  WRI .v_1           AT 15,70 WHITE ON BLACK
  WRI .v_2           AT 16,70 WHITE ON BLACK
  WRI .v_3           AT 18,70 WHITE ON BLACK
  WRI .v_4           AT 19,70 WHITE ON BLACK
  WRI .v_5           AT 21,70 WHITE ON BLACK
*(END OF PROGRAM)
  RETURN
~Claudine :)

-----Original Message-----
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]] On Behalf Of Frank
Carrubba
Sent: Wednesday, December 25, 2002 8:36 PM
To: RBASE-L Mailing List
Subject: [RBASE-L] - Screen Displays

I hope someone can help me with this problem,  I have an older Rbase
application I am converting to 6.5++.  This is a retail pint of sale
application, as item numbers are enter on to the screen running totals
and
sales tax is computer and displayed on the screen as each line is
entered by
calling and eep.  Here's the code:

SET VAR v_subtotal5 = (.v_subtotal3 + .v_subtotal4)
SET VAR v_1 = (FORMAT(.v_subtotal1,'[>>]$9,999.00'))
SET VAR v_2 = (FORMAT(.v_subtotal2,'[>>]$9,999.00'))
SET VAR v_3 = (FORMAT(.v_subtotal3,'[>>]$9,999.00'))
SET VAR v_4 = (FORMAT(.v_subtotal4,'[>>]$9,999.00'))
SET VAR v_5 = (FORMAT(.v_subtotal5,'[>>]$9,999.00'))
WRI .v_1           AT 15,70 White on Black
WRI .v_2           AT 16,70 White on Black
WRI .v_3           AT 18,70 White on Black
WRI .v_4           AT 19,70 White on Black
WRI .v_5           AT 21,70 White on Black
*(END OF PROGRAM)

The value of the variables are computing fine, but nothing is displaying
on
the screen.

Thanks,
Frank
Technology Solutions
[EMAIL PROTECTED]

Reply via email to