qualcuno che mi aiuti a capire la logica di questo codice
In particolare session("oRsTemp")("durataSS") come vengono definiti
GRAZIE A TUTTI

'ver 2.0 12/9 ' 12/9
Public Function DIS_dblTempDissSingoloSAP(lngSapCod,dblSapPeso)

dim DurataDiss
dim TipoDiss

session("oRsTemp").Filter = "rsrcod=" & lngSapCod
dblTempDissSingoloSAP = 0
Do While Not session("oRsTemp").EOF

'inserita scelta tra durata e duratass
'se h24=s or tipodiss<>a duratass else durata

TipoDiss=TRA_strTipologiaGuasto(session("oRsTemp") ("dataape"),session("oRsTemp")("datachi"))

'If (Session("FLGH24") = "S") OR ( TipoDiss <>"A") then
If ( TipoDiss <>"A") then
DurataDiss=session("oRsTemp")("durataSS")
'response.Write " DurataDiss " & DurataDiss
else
DurataDiss=session("oRsTemp")("durata")
end if

dblTempDissSingoloSAP = CalcolaSconSisu(session("oRsTemp")("guacod"), session("oRsTemp")("anno"), session("oRsTemp")("sdfcod"),DurataDiss, dblSapPeso,session("oRsTemp")("dataape"), session("oRsTemp")("datachi"))


if(session("oRsTemp")("sdfcod") > 0) then
session("TempDiss")=session("TempDiss") + dblTempDissSingoloSAP
session("TempDissBck")=session("TempDissBck") + dblTempDissSingoloSAP
else
session("TempDissBck")=session("TempDissBck") + dblTempDissSingoloSAP
end if
session("oRsTemp").MoveNext
Loop

session("oRsTemp").filter=""
if not session("oRsTemp").BOF then
session("oRsTemp").movefirst
end if
End Function