%[@IncludeFile "Code/Util.vbs"]%>
<%[@IncludeFile "Code/Lang.vbs"]%>
<%[
InitGlobalVariables
If g_cTocExpand = -1 Or g_cTocExpand >= Places.Count Then
fTreeOpen = true
strToggle="collapse"
Else
fTreeOpen = false
strToggle = "expand"
End If
]%>
@[ Report.WriteText Session("Title") ]@ - Places and Locations
<%[If g_fUseTreeIndexes Then]%>
@[WriteHtmlButtonToggle("Entries")]@
@[ Report.WriteTextDic "TocIndexPlaces" ]@
<%[Else]%>
@[ Report.WriteTextDic "TocIndexPlaces" ]@
<%[End If]%>
<%[
If g_fUseTreeIndexes Then Report.WriteLn "
"
WriteHtmlTocPlaces fTreeOpen, false
If g_fUseTreeIndexes Then Report.WriteLn "
"
]%>
<%[ WriteHtmlFramesetSafeguard(Places.Count) ]%>