Please start any new threads on our new site at https://forums.sqlteam.com. We've got lots of great SQL Server experts to answer whatever question you can come up with.

 All Forums
 SQL Server 2000 Forums
 SQL Server Development (2000)
 SQL DATA RETRIEVE AND UPDATE

Author  Topic 

AskSQLTeam
Ask SQLTeam Question

0 Posts

Posted - 2004-06-18 : 10:17:00
shirl writes "NEED HELP TO CONVERT THE SAME VISUAL BASIC CODE TO SQL SO THAT I CAN RUN IT AS A STORED PROCEDURE.

SQL = "SELECT DISTINCT COMPANY_CODE,SUM(TOTALFEES) FROM TOTALFEESYTD GROUP BY COMPANY_CODE"
Set rs = con.Execute(SQL)
Do While Not rs.EOF
j = rs(1)
'k = rs(2)
'L = rs(3)
M = rs(0)
SQL1 = "Update XYZ SET TOTALFEESYTD = ('" & j & "') Where COMPANY_CODE = ('" & M & "') "
Set RS1 = con.Execute(SQL1)
rs.MoveNext

Loop"

kselvia
Aged Yak Warrior

526 Posts

Posted - 2004-06-18 : 17:25:42
This should do it:

UPDATE XYZ
SET TOTALFEESYTD = (SELECT SUM(TOTALFEES) FROM TOTALFEESYTD WHERE TOTALFEESYTD.COMPANY_CODE = XYZ.COMPANY_CODE)
Go to Top of Page
   

- Advertisement -