ASP update løkke til SP

Jeg har denne ASP kode som jeg gerne vil have lavet til en Stored Procedure:

sql = "select b.*, ((TILSLUTTETKVARTAL1+TILSLUTTETKVARTAL2+TILSLUTTETKVARTAL3+TILSLUTTETKVARTAL4)/4)*TILSLUTTETFAKTOR as gen, dk.LXBENUMMER "&_
    "from BUDGET b inner join Projects p on p.id=b.caseID "&_
    "inner join DEBKART d on d.konto=p.custID "&_
    "inner join DEBKVARTAL dk on dk.konto=p.custID "&_
    "where b.id>=6342 and b.id <=10406 and b.lockedId is null and d.dataset='DAT' "&_
    "and dk.dataset='DAT' and dk.XR=2007 "&_
    "order by b.id "
set oRs = oConn.execute(sql)
while not oRs.eof
    gen = round(cDbl(oRs("gen")),2)
    sql = "update BUDGET set timer="& DBnum(gen) &", lockedID="& DBNum(oRs("LXBENUMMER")) &", "&_
        "totalK="& DBNum(gen*cDbl(oRs("KostP"))) &", totalS="& DBNum(gen*cDbl(oRs("SalgP"))) &" "&_
        "where id="& oRs("id")
    oConn.execute(sql)
    oRs.MoveNext
wend

DBNum funktionen formatere bare kommatal fra 1,2 til 1.2

I bund og grund finder jeg bare et timegennemsnit og skal så have opdateret budgetlinjer med det antal og beregne en ny kost/salg.

Hvem kan klare den??