%[@ IncludeFile "Code/Util.vbs" ]%>
<%[@ IncludeFile "Code/Lang.vbs" ]%>
<%[
InitGlobalVariables
]%>
<%[
g_ichNotesStart = Report.BufferLength
WriteHtmlButtonToggle("Notes")
ichNotesEnd = Report.BufferLength
g_ichReferencesStart = Report.BufferLength
WriteHtmlButtonToggle("OtherDetails")
ichReferencesEnd = Report.BufferLength
WriteHtmlButtonToggle("HidePopUp")
]%>
<%[
WriteHtmlSource s
' remove any unecessary items (reverse order to avoid invalidating buffer pointers)
If g_ichReferencesStart >= 0 Then
' We have no place references, so remove the "Show All References | Hide All References"
Report.BufferRemoveAt g_ichReferencesStart, ichReferencesEnd
End If
If (g_ichNotesStart >= 0) Then
' We have no annotations, so remove the "Show All Notes | Hide All Notes"
Report.BufferRemoveAt g_ichNotesStart, ichNotesEnd
End If
]%>
<%[ WriteHtmlFramesetSafeguard("Sources") ]%>