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/
