% dim startyr,starthebyr Session("Display")="Chag" startyr=Session("StartYear") if Request("content_length")<>0 then startyr=request("Year") if Request("submitNext")<>"" then startyr=startyr+1 if Request("submitPrev")<>"" then startyr=startyr-1 Session("StartYear")=startyr %>
<% ' calc the table even on first load of page ' if Request("submitChagim")<>"" then ChagTable starthebyr=startyr if startyr<5000 then starthebyr=startyr+3761 call ChagTable(starthebyr) %>