<%[@IncludeFile "Code/Util.vbs"]%> <%[@IncludeFile "Code/Lang.vbs"]%> <%[If Session("Book") Then Report.AbortTemplate]%> <%[ If Session("cTocExpand") = -1 Or Session("cTocExpand") >= Places.Count Then fTreeOpen = true strToggle="collapse" Else fTreeOpen = false strToggle = "expand" End If ]%> @[ Report.WriteFormatted Dic("FmtTitleTocPlaces"), Session("Title") ]@ <%[If Session("fUseTreeIndexes") Then]%> <%[If Session("fUseCurvyBoxes") Then CurvyBoxOpen() Else Report.WriteLn "
" End if ]%> @[WriteHtmlButtonToggle("Entries")]@ <%[Else]%> <%[If Session("fUseCurvyBoxes") Then CurvyBoxOpen() Else Report.WriteLn "
" End if End if ]%>

@[ Report.WriteTextDic "TocIndexPlaces" ]@

<%[Report.Write Util.IfElse(Session("fUseCurvyBoxes"), "
", "
") If Session("fUseTreeIndexes") Then Report.WriteLn "
    " WriteHtmlTocPlaces fTreeOpen, false If Session("fUseTreeIndexes") Then Report.WriteLn "
" ]%>
<%[If Session("fUseCurvyBoxes") Then CurvyBoxClose()]%> <%[ WriteHtmlFramesetSafeguard(Places.Count) ]%>