SQL - Maximum stored procedure, function, trigger, or view nesting level exceeded (limit 32).

<%
 
'*******************GENERATE THE SUBCATEGORY PAGES**********************
 
 set oRScsb = Server.CreateObject("ADODB.Recordset")
 
' Maciej - 11.04.2005 - I added : 
'	support for parent(category) template if current subcategory has no template
'	I fixed the problem with getting templateid of current subcategory.
'		Mark, your idea of getting templateID from templates ( inner join templetes ) was good however you forgot to 
'		use it : you were still using sc.templateid instead of template.temp_id
 
' old query
' ExecuteString = "select sc.CatID,subcatid, sc.templateid, sc.category as subcatname, c.category as catname,sc.imageon, sc.imageoff, sc.imageover, sc.mainimage, temp_type,sc.categorytext1, sc.categorytext2, sc.categorytext3, sc.categorytext4, sc.categorytext5,sc.Notes, template_notes from subcategory sc left outer join category c on sc.catid = c.catid left outer join templates on sc.templateid = temp_id left outer join product_template on template_id = temp_id WHERE sc.[processed] = 0 order by sc.category"
		
' new query
 E =     "SELECT SC.[CatID], SC.[SubCatID], SC.[Category] as SubCatName, C.[Category] as CatName, SC.[ImageOn], SC.[ImageOff], SC.[ImageOver], "
 E = E & "SC.[MainImage], SC.[CategoryText1], SC.[CategoryText2], SC.[CategoryText3], SC.[CategoryText4], SC.[CategoryText5], "
 E = E & "T.[Temp_ID] as TemplateID, T.[Temp_Type], CT.[Temp_ID] as CategoryTemplateID, CT.[Temp_Type] as CategoryTemp_Type, "
 E = E & "SC.[Notes], P.[Template_Notes], CP.[Template_Notes] as CategoryTemplate_Notes "
 E = E & "FROM SubCategory SC "
 E = E & "LEFT OUTER JOIN Category			C  ON SC.[CatID]     = C.[CatID] "
 E = E & "LEFT OUTER JOIN Templates			T  ON SC.[TemplateID]= T.[Temp_ID] "
 E = E & "LEFT OUTER JOIN Product_Template	P  ON P.[Template_ID]= T.[Temp_ID] "
 E = E & "LEFT OUTER JOIN Templates			CT ON C.[TemplateID] = CT.[temp_id] "
 E = E & "LEFT OUTER JOIN Product_Template	CP ON C.[TemplateID] = CP.[Template_ID] "
 E = E & "WHERE SC.[Processed] = 0 "
 E = E & "ORDER BY SC.[Category]"
 
 set oRs3 = template.execute(E)
 if not oRs3.eof then
       fixcatid = oRs3("catid")
 end if
 
 subcatlisttxt = ""
 do while not oRs3.EOF 
 
    t_Catid = oRs3("catid")
    t_subcatid = oRs3("subcatid")
    t_subcatname = trim(oRs3("subcatname"))        
    t_catname = dotrim(oRs3("catname"))
  
    cimageon = dotrim(oRs3("imageon"))
    cimageoff = dotrim(oRs3("imageoff"))
    cimageover = dotrim(oRs3("imageover"))
    cmainimage = dotrim(oRs3("mainimage"))
    ccategorytext1 = dotrim(oRs3("categorytext1"))
    ccategorytext2 = dotrim(oRs3("categorytext2"))
    ccategorytext3 = dotrim(oRs3("categorytext3"))
    ccategorytext4 = dotrim(oRs3("categorytext4"))
    ccategorytext5 = dotrim(oRs3("categorytext5"))
    ctemplateid = oRs3("templateid")
    ctemp_type = dotrim(oRs3("temp_type"))  
    CategoryTemplateID = oRs3("CategoryTemplateID").value    
    CategoryTempType = dotrim(oRs3("CategoryTemp_Type")) 
    
    catnotes = oRs3("notes")
    if isnull(catnotes) then
       catnotes = ""
    else 
       catnotes = trim(catnotes)
    end if  
      
    template_notes = oRs3("template_notes")
    if isnull(template_notes) then
       template_notes = ""
    else
       template_notes = trim(template_notes)
    end if
    
    categorytemplate_notes = oRs3("categorytemplate_notes")
    if isnull(template_notes) then
       categorytemplate_notes = ""
    else
       categorytemplate_notes = trim(categorytemplate_notes)
    end if
  
    ' set template for subcategory
    cusetemplate = false
 
    if not isnull(ctemplateid) then
       if ctemplateid > 0 and ctemp_type = "category page" then
          cusetemplate = true
       end if
    end if
    
    ' set template for category    
    CategoryUseTemplate = false
    If Not isnull(CategoryTemplateID) Then
		If CategoryTemplateID > 0 And CategoryTempType = "category page" Then
			CategoryUseTemplate = True
		End If
	End If
    
    
    if cusetemplate then	
       ReturnString = template_notes	' use template for this subcategory
    else
		' if there is no template for this subcategory
		' check for template for category
		If CategoryUseTemplate Then
			ReturnString = categorytemplate_notes		' use template for parent(category)
		Else
			If cattemp_id > 0 Then
				ReturnString = cattemp_notes						' use main default template 
			Else
				ReturnString = catnotes								' if no default page is set	use SubCategory Notes
			End If
		End If
	End If
 
    if isnull(returnstring) then
       returnstring = ""
    end if
    
    returnstring = replace(returnstring,"{subcategoryname}",t_subcatname)
    returnstring = replace(returnstring,"{categoryname}",t_catname) 
    
    url_catname = replace(t_catname," ","_")
	if useurlrewriting then 
		ttfile = session("path_info") & "mcp/" & url_catname & ".html"
	else
		ttfile = session("path_info") & "main.asp?category=" & server.URLencode(t_catname)
	end if
	tt = "<a href='" & ttfile & "' title='" & t_catname & "'>" & t_catname & "</a>"
	returnstring = replace(returnstring, "{category:link}", tt)
	
	url_subcatname = replace(t_subcatname," ","_")     
	if useurlrewriting then
		ttfile = session("path_info") & "scp/" & url_catname & "/" & url_subcatname & ".html"
	else
		ttfile = session("path_info") & "products.asp?subcategory=" & server.URLencode(t_subcatname) & "&category=" & server.URLencode(t_catname)
	end if
	tt = "<a href='" & ttfile & "' title='" & t_subcatname & "'>" & t_subcatname & "</a>"
  	returnstring = replace(returnstring, "{subcategory:link}", tt) 
  	     
    returnstring = replace(returnstring,"{longdescription}",catnotes)
    cmainimagerendered = "<img src='" & path_info & "/images/" & cmainimage & "' border=0>"
    returnstring = replace(returnstring,"{mainimage}",cmainimagerendered)
    returnstring = replace(returnstring,"{mainimagename}",cmainimage)
    csmallimagerendered = "<img src='" & path_info & "/images/" & cimageoff & "' border=0>"    
    returnstring = replace(returnstring,"{smallimage}",csmallimagerendered)
    returnstring = replace(returnstring,"{smallimagename}",cimageoff)  
    returnstring = replace(returnstring,"{catvalue1}",ccategorytext1)
    returnstring = replace(returnstring,"{catvalue2}",ccategorytext2)      
    returnstring = replace(returnstring,"{catvalue3}",ccategorytext3)
    returnstring = replace(returnstring,"{catvalue4}",ccategorytext4)       
    returnstring = replace(returnstring,"{catvalue5}",ccategorytext5)
 
 
    'parse for {catsummary:xx} tags (ie category summary templates)
    returnstring = cattemplateparser(returnstring, "category",t_catid)
    'parse for {subcatsummary:xx} tags (ie subcategory summary templates)
    returnstring = cattemplateparser(returnstring, "subcategory",t_catid)     
 
    returnstring = featuredparser("subcategory",t_subcatname, returnstring)
 
 
    returnstring = sitemap(returnstring)
    returnstring = tagreplace(returnstring,"subcategory", t_catid, t_subcatid, t_catname, t_subcatname, "ParamSearch" & t_subcatid)
    returnstring = replace(returnstring,"{subcatid}",t_subcatid)    
    quadrentmaker returnstring, "subcategory", t_catname & t_subcatname
 
    oRs3.movenext
 
loop
 
 ExecuteString = "UPDATE subcategory SET [processed] = 1"
 template.execute(ExecuteString)
%>

Select allOpen in new window