<%
'Set Global Variables
isActiveDefined = true
isCurrentDefined = true

'Checks if we are in preview or publication modes; logic is slightly different for each
If "" <> "" Then 'Preview Mode
   Token="&"
Else 'Publication mode
   Token=" "
End If

'FUNCTION TO CHECK IF NAV ITEMS IS "ACTIVE"
Function isActive(strURL)
   'Checks if strURL is anywhere in the strParentPages string
   If inStr(strURL, Token & "pageguid=") > 0 Then
      If inStr(strParentPages ,Mid(strURL, inStrRev(strURL, Token & "pageguid="), 42)) > 0 Then
         isActive=True
      Else
         isActive=False
      End If
   Else
      isActive=False
   End If
End Function

'FUNCTION TO CHECK IF NAV ITEMS IS "CURRENT" (links to the current page)
Function isCurrent(strURL)
   'Checks if strURL is the current page
   If instr(strURL, Token & "pageguid=") > 0 Then
      If inStr("/isda/80.htm", Mid(strURL, inStrRev(strURL, Token & "pageguid="), 42)) > 0 Then
            isCurrent=True
        Else
            isCurrent=False
        End If
    Else
        isCurrent=False
    End If
End Function
%>