Try clearing the variable v_1 to v_10 first. Maybee one of the vars is already defined as a different type and not getting re-set to the currency you expect.
Troy ===== Original Message from [EMAIL PROTECTED] at 5/15/02 12:23 pm >G'day, > >I have a problem summing variables for a report. The weird thing >is that sometimes she works, sometimes she don't. Sometimes the var >vSumPromoGI is without one of the constituents. Which one it is >missing varies from one running of the code to another. > >Is there something I am doing wrong or should I report this to RDCC> > >Here is the code: > >$COMMAND >CalSumGI >-- Sums Deposits received for where clause >-- Called by: >-- RptsMenu in PromCmpn.apx >*( Requires var >vWhere > Returns var >vSumPromoGI >) >-- Created by Tom Grimshaw 25-04-2002 >-- Modification history >-- > >SET VAR v_1 CURRENCY = 0.00 >SET VAR v_2 CURRENCY = 0.00 >SET VAR v_3 CURRENCY = 0.00 >SET VAR v_4 CURRENCY = 0.00 >SET VAR v_5 CURRENCY = 0.00 >SET VAR v_6 CURRENCY = 0.00 >SET VAR v_7 CURRENCY = 0.00 >SET VAR v_8 CURRENCY = 0.00 >SET VAR v_9 CURRENCY = 0.00 >SET VAR v_10 CURRENCY = 0.00 >SELECT SUM(GI_0_30_Days) INTO + > v_1 IND vi1 + > FROM Promotions + > &vWhere >SELECT SUM(GI_31_61_Days) INTO + > v_2 IND vi2 + > FROM Promotions + > &vWhere >SELECT SUM(GI_62_92_Days) INTO + > v_3 IND vi3 + > FROM Promotions + > &vWhere >SELECT SUM(GI_93_123_Days) INTO + > v_4 IND vi4 + > FROM Promotions + > &vWhere >SELECT SUM(GI_124_153_Days) INTO + > v_5 IND vi5 + > FROM Promotions + > &vWhere >SELECT SUM(GI_154_183_Days) INTO + > v_6 IND vi6 + > FROM Promotions + > &vWhere >SELECT SUM(GI_184_275_Days) INTO + > v_7 IND vi7 + > FROM Promotions + > &vWhere >SELECT SUM(GI_276_365_Days) INTO + > v_8 IND vi8 + > FROM Promotions + > &vWhere >SELECT SUM(GI_366_732_Days) INTO + > v_9 IND vi9 + > FROM Promotions + > &vWhere >SELECT SUM(GI_Over732_Days) INTO + > v_10 IND vi10 + > FROM Promotions + > &vWhere >SET VAR vSumPromoGI CURRENCY = + >(.v_1 + .v_2 + .v_3 + .v_4 + .v_5 + .v_6 + .v_7 + .v_8 + .v_9 + .v_10) >CLEAR VAR v_1,v_2,v_3,v_4,v_5,v_6,v_7,v_8,v_9,v_10 >RETURN > >Any help on this would, as always, be greatly appreciated. > >Warmest regards, > > >Tom Grimshaw >coy: Just For You Software >tel: 612 9552 3311 >fax: 612 9566 2164 >mobile: 0414 675 903 > >post: PO Box 470 Glebe NSW 2037 Australia >street: 3/66 Wentworth Park Rd Glebe NSW 2037 > >email: [EMAIL PROTECTED] >web: www.just4usoftware.com.au > >"... the control of impulse -- is the first principle of civilization."-- >Will Durant, >Pulitzer Prize winning philosopher, writer and historian > >the most needed product in the world can be found at >www.thewaytohappiness.org > >This email and any files transmitted with it are confidential to the >intended recipient and may be privileged. If you have received this email >inadvertently or you are not the intended recipient, you may not >disseminate, distribute, copy or in any way rely on it. Further, you should >notify the sender immediately and delete the email from your computer. >Whilst we have taken precautions to alert us to the presence of computer >viruses, we cannot guarantee that this email and any files transmitted with >it are free from such viruses. > >================================================ >TO SEE MESSAGE POSTING GUIDELINES: >Send a plain text email to [EMAIL PROTECTED] >In the message body, put just two words: INTRO rbase-l >================================================ >TO UNSUBSCRIBE: send a plain text email to [EMAIL PROTECTED] >In the message body, put just two words: UNSUBSCRIBE rbase-l >================================================ >TO SEARCH ARCHIVES: >http://www.mail-archive.com/rbase-l%40sonetmail.com/ ================================================ TO SEE MESSAGE POSTING GUIDELINES: Send a plain text email to [EMAIL PROTECTED] In the message body, put just two words: INTRO rbase-l ================================================ TO UNSUBSCRIBE: send a plain text email to [EMAIL PROTECTED] In the message body, put just two words: UNSUBSCRIBE rbase-l ================================================ TO SEARCH ARCHIVES: http://www.mail-archive.com/rbase-l%40sonetmail.com/
