<%[@ IncludeFile "Code/Util.vbs" ]%> <%[@ IncludeFile "Code/Lang.vbs" ]%> <%[ InitGlobalVariables ]%> @[ Report.WriteFormatted Dic("FmtTitleSource"), Session("Title") ]@
<%[ 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") ]%>