-
<%
'populate left nav name
sNavTitle = "Great Northwest Foundation"
'This is the breadcrumb string for highlighting the menu
Dim strParentPages
strParentPages="/ppgnw/whats-new-23740.htm"
'Response.write ""
Function getHeadline()
'
End Function
Function getAffiliateName()
'
End Function
Function formatAffiliateName()
unfname = getAffiliateName
unfname = replace(unfname,"®","")
unfname = replace(unfname, ", Inc.", "")
unfname = replace(unfname, ", Inc", "")
unfname = replace(unfname, "Planned Parenthood of the ", "")
unfname = replace(unfname, "Planned Parenthood of ", "")
unfname = replace(unfname, "Planned Parenthood ", "")
unfname = replace(unfname, " for Planned Parenthood", "")
unfname = replace(unfname, " Planned Parenthood", "")
formatAffiliateName = unfname
End Function
Function getAffiliateShortName()
'
End Function
Function getKeywords()
'
End Function
%>
- > PPGNW HOME <% If isActive("/ppgnw/index.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/who-we-are-23145.htm") then status = active end if %>
- >
Who We Are
<%
If isActive("/ppgnw/who-we-are-23145.htm") and depth < 3 Then
depth = depth + 1
%>
- <%
'You can remove this whole If statement if you want to show first tier reddot. Keep the reddot code.
'Depth 0 = Foundation, Depth 1 = 1st Tier, Depth 2 = 2nd Tier, Depth 3 = 3rd Tier, etc...
If depth > 0 Then
%>
<%
End If
%>
<%
'Default list state code
default = ""
'Active list state code
active = " class='active'"
%>
<%
'set default state
status = default
'is the link a parent page
if isActive("/ppgnw/history-23174.htm") then
status = active
end if
%>
- > History <% If isActive("/ppgnw/history-23174.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/know-your-planned-parenthood-23173.htm") then status = active end if %>
- > Know Your Planned Parenthood <% If isActive("/ppgnw/know-your-planned-parenthood-23173.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/focus-newsletter-23786.htm") then status = active end if %>
- >
FOCUS Newsletter
<%
If isActive("/ppgnw/focus-newsletter-23786.htm") and depth < 3 Then
depth = depth + 1
%>
- <%
'You can remove this whole If statement if you want to show first tier reddot. Keep the reddot code.
'Depth 0 = Foundation, Depth 1 = 1st Tier, Depth 2 = 2nd Tier, Depth 3 = 3rd Tier, etc...
If depth > 0 Then
%>
<%
End If
%>
<%
'Default list state code
default = ""
'Active list state code
active = " class='active'"
%>
<%
'set default state
status = default
'is the link a parent page
if isActive("/ppgnw/Focus-Feature1-23788.htm") then
status = active
end if
%>
- > Trouble Calling <% If isActive("/ppgnw/Focus-Feature1-23788.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/focus-feature2-23793.htm") then status = active end if %>
- > Executive Update <% If isActive("/ppgnw/focus-feature2-23793.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/focus-feature3-23792.htm") then status = active end if %>
- > Legislative Update <% If isActive("/ppgnw/focus-feature3-23792.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/focus-feature4-23791.htm") then status = active end if %>
- > F.L.A.S.H. Training in Idaho <% If isActive("/ppgnw/focus-feature4-23791.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/focus-feature5-23790.htm") then status = active end if %>
- > National Birth Control Project <% If isActive("/ppgnw/focus-feature5-23790.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'Shadowpage nav reddot If NOT isActive("/ppgnw/Focus-Feature1-23788.htm") And Depth = 0 Then %> <% End If %>
<%
'Shadowpage nav reddot
If NOT isActive("/ppgnw/history-23174.htm") And Depth = 0 Then
%>
<% End If %>
<%
'set default state
status = default
'is the link a parent page
if isActive("/ppgnw/patient-resources-23139.htm") then
status = active
end if
%>
- >
Patient Resources
<%
If isActive("/ppgnw/patient-resources-23139.htm") and depth < 3 Then
depth = depth + 1
%>
- <%
'You can remove this whole If statement if you want to show first tier reddot. Keep the reddot code.
'Depth 0 = Foundation, Depth 1 = 1st Tier, Depth 2 = 2nd Tier, Depth 3 = 3rd Tier, etc...
If depth > 0 Then
%>
<%
End If
%>
<%
'Default list state code
default = ""
'Active list state code
active = " class='active'"
%>
<%
'set default state
status = default
'is the link a parent page
if isActive("/ppgnw/teen-clinic-23669.htm") then
status = active
end if
%>
- > Teen Clinic <% If isActive("/ppgnw/teen-clinic-23669.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/about-our-fees-23156.htm") then status = active end if %>
- >
About Our Fees
<%
If isActive("/ppgnw/about-our-fees-23156.htm") and depth < 3 Then
depth = depth + 1
%>
- <%
'You can remove this whole If statement if you want to show first tier reddot. Keep the reddot code.
'Depth 0 = Foundation, Depth 1 = 1st Tier, Depth 2 = 2nd Tier, Depth 3 = 3rd Tier, etc...
If depth > 0 Then
%>
<%
End If
%>
<%
'Default list state code
default = ""
'Active list state code
active = " class='active'"
%>
<%
'set default state
status = default
'is the link a parent page
if isActive("/ppgnw/rx-insurance-billing-31478.htm") then
status = active
end if
%>
- > Rx Insurance Billing <% If isActive("/ppgnw/rx-insurance-billing-31478.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/payment-plans-23187.htm") then status = active end if %>
- > Payment Plans <% If isActive("/ppgnw/payment-plans-23187.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/denali-kidcare-23292.htm") then status = active end if %>
- > Denali KidCare <% If isActive("/ppgnw/denali-kidcare-23292.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/take-charge-23291.htm") then status = active end if %>
- > Take Charge <% If isActive("/ppgnw/take-charge-23291.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/providerone-30337.htm") then status = active end if %>
- > ProviderOne <% If isActive("/ppgnw/providerone-30337.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'Shadowpage nav reddot If NOT isActive("/ppgnw/rx-insurance-billing-31478.htm") And Depth = 0 Then %> <% End If %>
<%
'set default state
status = default
'is the link a parent page
if isActive("/ppgnw/online-health-center-23157.htm") then
status = active
end if
%>
- >
Online Health Center
<%
If isActive("/ppgnw/online-health-center-23157.htm") and depth < 3 Then
depth = depth + 1
%>
- <%
'You can remove this whole If statement if you want to show first tier reddot. Keep the reddot code.
'Depth 0 = Foundation, Depth 1 = 1st Tier, Depth 2 = 2nd Tier, Depth 3 = 3rd Tier, etc...
If depth > 0 Then
%>
<%
End If
%>
<%
'Default list state code
default = ""
'Active list state code
active = " class='active'"
%>
<%
'set default state
status = default
'is the link a parent page
if isActive("/ppgnw/online-services-for-alaska-23506.htm") then
status = active
end if
%>
- > Online Services for Alaska <% If isActive("/ppgnw/online-services-for-alaska-23506.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/online-service-for-idaho-23505.htm") then status = active end if %>
- > Online Services for Idaho <% If isActive("/ppgnw/online-service-for-idaho-23505.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/online-services-for-western-washington-23189.htm") then status = active end if %>
- > Online Services for Western Washington <% If isActive("/ppgnw/online-services-for-western-washington-23189.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'Shadowpage nav reddot If NOT isActive("/ppgnw/online-services-for-alaska-23506.htm") And Depth = 0 Then %> <% End If %>
<%
'set default state
status = default
'is the link a parent page
if isActive("/ppgnw/your-rights-23155.htm") then
status = active
end if
%>
- > Your Rights <% If isActive("/ppgnw/your-rights-23155.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'Shadowpage nav reddot If NOT isActive("/ppgnw/teen-clinic-23669.htm") And Depth = 0 Then %> <% End If %>
<%
'set default state
status = default
'is the link a parent page
if isActive("/ppgnw/get-involved-locally-23141.htm") then
status = active
end if
%>
- >
Get Involved Locally
<%
If isActive("/ppgnw/get-involved-locally-23141.htm") and depth < 3 Then
depth = depth + 1
%>
- <%
'You can remove this whole If statement if you want to show first tier reddot. Keep the reddot code.
'Depth 0 = Foundation, Depth 1 = 1st Tier, Depth 2 = 2nd Tier, Depth 3 = 3rd Tier, etc...
If depth > 0 Then
%>
<%
End If
%>
<%
'Default list state code
default = ""
'Active list state code
active = " class='active'"
%>
<%
'set default state
status = default
'is the link a parent page
if isActive("/ppgnw/events-23962.htm") then
status = active
end if
%>
- >
Events
<%
If isActive("/ppgnw/events-23962.htm") and depth < 3 Then
depth = depth + 1
%>
- <%
'You can remove this whole If statement if you want to show first tier reddot. Keep the reddot code.
'Depth 0 = Foundation, Depth 1 = 1st Tier, Depth 2 = 2nd Tier, Depth 3 = 3rd Tier, etc...
If depth > 0 Then
%>
<%
End If
%>
<%
'Default list state code
default = ""
'Active list state code
active = " class='active'"
%>
<%
'set default state
status = default
'is the link a parent page
if isActive("/ppgnw/free-breast-cancer-screening-31764.htm") then
status = active
end if
%>
- > Free Breast Cancer Screening <% If isActive("/ppgnw/free-breast-cancer-screening-31764.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/chic-choice-31512.htm") then status = active end if %>
- > Chic for Choice <% If isActive("/ppgnw/chic-choice-31512.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/town-halls-wa-31511.htm") then status = active end if %>
- > Town Halls in WA <% If isActive("/ppgnw/town-halls-wa-31511.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'Shadowpage nav reddot If NOT isActive("/ppgnw/free-breast-cancer-screening-31764.htm") And Depth = 0 Then %> <% End If %>
<%
'set default state
status = default
'is the link a parent page
if isActive("/ppgnw/donate-23158.htm") then
status = active
end if
%>
- >
Donate
<%
If isActive("/ppgnw/donate-23158.htm") and depth < 3 Then
depth = depth + 1
%>
- <%
'You can remove this whole If statement if you want to show first tier reddot. Keep the reddot code.
'Depth 0 = Foundation, Depth 1 = 1st Tier, Depth 2 = 2nd Tier, Depth 3 = 3rd Tier, etc...
If depth > 0 Then
%>
<%
End If
%>
<%
'Default list state code
default = ""
'Active list state code
active = " class='active'"
%>
<%
'set default state
status = default
'is the link a parent page
if isActive("/ppgnw/donate-online-23197.htm") then
status = active
end if
%>
- > Donate Online <% If isActive("/ppgnw/donate-online-23197.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/other-ways-give-23195.htm") then status = active end if %>
- > Other Ways to Give <% If isActive("/ppgnw/other-ways-give-23195.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/donor-benefits-preferences-23198.htm") then status = active end if %>
- > Donor Benefits and Preferences <% If isActive("/ppgnw/donor-benefits-preferences-23198.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/contact-donor-advisor-23196.htm") then status = active end if %>
- > Contact a Donor Advisor <% If isActive("/ppgnw/contact-donor-advisor-23196.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'Shadowpage nav reddot If NOT isActive("/ppgnw/donate-online-23197.htm") And Depth = 0 Then %> <% End If %>
<%
'set default state
status = default
'is the link a parent page
if isActive("/ppgnw/take-action-23852.htm") then
status = active
end if
%>
- >
Take Action
<%
If isActive("/ppgnw/take-action-23852.htm") and depth < 3 Then
depth = depth + 1
%>
- <%
'You can remove this whole If statement if you want to show first tier reddot. Keep the reddot code.
'Depth 0 = Foundation, Depth 1 = 1st Tier, Depth 2 = 2nd Tier, Depth 3 = 3rd Tier, etc...
If depth > 0 Then
%>
<%
End If
%>
<%
'Default list state code
default = ""
'Active list state code
active = " class='active'"
%>
<%
'set default state
status = default
'is the link a parent page
if isActive("/ppgnw/take-action-alaska-23856.htm") then
status = active
end if
%>
- > Take Action in Alaska <% If isActive("/ppgnw/take-action-alaska-23856.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/take-action-idaho-23855.htm") then status = active end if %>
- > Take Action in Idaho <% If isActive("/ppgnw/take-action-idaho-23855.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/take-action-washington-23854.htm") then status = active end if %>
- > Take Action in Washington <% If isActive("/ppgnw/take-action-washington-23854.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'Shadowpage nav reddot If NOT isActive("/ppgnw/take-action-alaska-23856.htm") And Depth = 0 Then %> <% End If %>
<%
'set default state
status = default
'is the link a parent page
if isActive("/ppgnw/volunteer-opportunities-23160.htm") then
status = active
end if
%>
- >
Volunteer
<%
If isActive("/ppgnw/volunteer-opportunities-23160.htm") and depth < 3 Then
depth = depth + 1
%>
- <%
'You can remove this whole If statement if you want to show first tier reddot. Keep the reddot code.
'Depth 0 = Foundation, Depth 1 = 1st Tier, Depth 2 = 2nd Tier, Depth 3 = 3rd Tier, etc...
If depth > 0 Then
%>
<%
End If
%>
<%
'Default list state code
default = ""
'Active list state code
active = " class='active'"
%>
<%
'set default state
status = default
'is the link a parent page
if isActive("/ppgnw/volunteer-faq-23968.htm") then
status = active
end if
%>
- > Volunteer FAQ <% If isActive("/ppgnw/volunteer-faq-23968.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/contact-information-23199.htm") then status = active end if %>
- > Contact Information <% If isActive("/ppgnw/contact-information-23199.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'Shadowpage nav reddot If NOT isActive("/ppgnw/volunteer-faq-23968.htm") And Depth = 0 Then %> <% End If %>
<%
'Shadowpage nav reddot
If NOT isActive("/ppgnw/events-23962.htm") And Depth = 0 Then
%>
<% End If %>
<%
'set default state
status = default
'is the link a parent page
if isActive("/ppgnw/local-education-training-23143.htm") then
status = active
end if
%>
- >
Events
<%
If isActive("/ppgnw/events-23962.htm") and depth < 3 Then
depth = depth + 1
%>
- >
Local Education and Training
<%
If isActive("/ppgnw/local-education-training-23143.htm") and depth < 3 Then
depth = depth + 1
%>
- <%
'You can remove this whole If statement if you want to show first tier reddot. Keep the reddot code.
'Depth 0 = Foundation, Depth 1 = 1st Tier, Depth 2 = 2nd Tier, Depth 3 = 3rd Tier, etc...
If depth > 0 Then
%>
<%
End If
%>
<%
'Default list state code
default = ""
'Active list state code
active = " class='active'"
%>
<%
'set default state
status = default
'is the link a parent page
if isActive("/ppgnw/schools-community-23657.htm") then
status = active
end if
%>
- >
For Schools and Community
<%
If isActive("/ppgnw/schools-community-23657.htm") and depth < 3 Then
depth = depth + 1
%>
- <%
'You can remove this whole If statement if you want to show first tier reddot. Keep the reddot code.
'Depth 0 = Foundation, Depth 1 = 1st Tier, Depth 2 = 2nd Tier, Depth 3 = 3rd Tier, etc...
If depth > 0 Then
%>
<%
End If
%>
<%
'Default list state code
default = ""
'Active list state code
active = " class='active'"
%>
<%
'set default state
status = default
'is the link a parent page
if isActive("/ppgnw/schools-community-alaska-23668.htm") then
status = active
end if
%>
- > For Schools and Community in Alaska <% If isActive("/ppgnw/schools-community-alaska-23668.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/schools-community-idaho-23667.htm") then status = active end if %>
- > For Schools and Community in Idaho <% If isActive("/ppgnw/schools-community-idaho-23667.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/local-education-training-western-washington-23660.htm") then status = active end if %>
- > For Schools and Communities in Western Washington <% If isActive("/ppgnw/local-education-training-western-washington-23660.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'Shadowpage nav reddot If NOT isActive("/ppgnw/schools-community-alaska-23668.htm") And Depth = 0 Then %> <% End If %>
<%
'set default state
status = default
'is the link a parent page
if isActive("/ppgnw/teens-23734.htm") then
status = active
end if
%>
- >
For Teens
<%
If isActive("/ppgnw/teens-23734.htm") and depth < 3 Then
depth = depth + 1
%>
- <%
'You can remove this whole If statement if you want to show first tier reddot. Keep the reddot code.
'Depth 0 = Foundation, Depth 1 = 1st Tier, Depth 2 = 2nd Tier, Depth 3 = 3rd Tier, etc...
If depth > 0 Then
%>
<%
End If
%>
<%
'Default list state code
default = ""
'Active list state code
active = " class='active'"
%>
<%
'set default state
status = default
'is the link a parent page
if isActive("/ppgnw/alaska-teens-23738.htm") then
status = active
end if
%>
- > For Alaska Teens <% If isActive("/ppgnw/alaska-teens-23738.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/idaho-teens-23737.htm") then status = active end if %>
- > For Idaho Teens <% If isActive("/ppgnw/idaho-teens-23737.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/western-washington-teens-23736.htm") then status = active end if %>
- > For Western Washington Teens <% If isActive("/ppgnw/western-washington-teens-23736.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'Shadowpage nav reddot If NOT isActive("/ppgnw/alaska-teens-23738.htm") And Depth = 0 Then %> <% End If %>
<%
'set default state
status = default
'is the link a parent page
if isActive("/ppgnw/parents-23749.htm") then
status = active
end if
%>
- >
For Parents
<%
If isActive("/ppgnw/parents-23749.htm") and depth < 3 Then
depth = depth + 1
%>
- <%
'You can remove this whole If statement if you want to show first tier reddot. Keep the reddot code.
'Depth 0 = Foundation, Depth 1 = 1st Tier, Depth 2 = 2nd Tier, Depth 3 = 3rd Tier, etc...
If depth > 0 Then
%>
<%
End If
%>
<%
'Default list state code
default = ""
'Active list state code
active = " class='active'"
%>
<%
'set default state
status = default
'is the link a parent page
if isActive("/ppgnw/alaska-parents-23758.htm") then
status = active
end if
%>
- > For Alaska Parents <% If isActive("/ppgnw/alaska-parents-23758.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/idaho-parents-23757.htm") then status = active end if %>
- > For Idaho Parents <% If isActive("/ppgnw/idaho-parents-23757.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/western-washington-parents-23751.htm") then status = active end if %>
- >
For Western Washington Parents
<%
If isActive("/ppgnw/western-washington-parents-23751.htm") and depth < 3 Then
depth = depth + 1
%>
- <%
'You can remove this whole If statement if you want to show first tier reddot. Keep the reddot code.
'Depth 0 = Foundation, Depth 1 = 1st Tier, Depth 2 = 2nd Tier, Depth 3 = 3rd Tier, etc...
If depth > 0 Then
%>
<%
End If
%>
<%
'Default list state code
default = ""
'Active list state code
active = " class='active'"
%>
<%
'Shadowpage nav reddot
If NOT isActive("") And Depth = 0 Then
%>
<% End If %>
<%
'Shadowpage nav reddot
If NOT isActive("/ppgnw/alaska-parents-23758.htm") And Depth = 0 Then
%>
<% End If %>
<%
'set default state
status = default
'is the link a parent page
if isActive("/ppgnw/planned-parenthood-university-23169.htm") then
status = active
end if
%>
- >
Planned Parenthood University
<%
If isActive("/ppgnw/planned-parenthood-university-23169.htm") and depth < 3 Then
depth = depth + 1
%>
- <%
'You can remove this whole If statement if you want to show first tier reddot. Keep the reddot code.
'Depth 0 = Foundation, Depth 1 = 1st Tier, Depth 2 = 2nd Tier, Depth 3 = 3rd Tier, etc...
If depth > 0 Then
%>
<%
End If
%>
<%
'Default list state code
default = ""
'Active list state code
active = " class='active'"
%>
<%
'set default state
status = default
'is the link a parent page
if isActive("/ppgnw/frequently-asked-questions-23213.htm") then
status = active
end if
%>
- > Frequently Asked Questions <% If isActive("/ppgnw/frequently-asked-questions-23213.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/academic-calendar-23211.htm") then status = active end if %>
- > Academic Calendar <% If isActive("/ppgnw/academic-calendar-23211.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/registration-23212.htm") then status = active end if %>
- > Registration <% If isActive("/ppgnw/registration-23212.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'Shadowpage nav reddot If NOT isActive("/ppgnw/frequently-asked-questions-23213.htm") And Depth = 0 Then %> <% End If %>
<%
'set default state
status = default
'is the link a parent page
if isActive("/ppgnw/professional-development-23170.htm") then
status = active
end if
%>
- >
Professional Development
<%
If isActive("/ppgnw/professional-development-23170.htm") and depth < 3 Then
depth = depth + 1
%>
- <%
'You can remove this whole If statement if you want to show first tier reddot. Keep the reddot code.
'Depth 0 = Foundation, Depth 1 = 1st Tier, Depth 2 = 2nd Tier, Depth 3 = 3rd Tier, etc...
If depth > 0 Then
%>
<%
End If
%>
<%
'Default list state code
default = ""
'Active list state code
active = " class='active'"
%>
<%
'Shadowpage nav reddot
If NOT isActive("") And Depth = 0 Then
%>
<% End If %>
<%
'set default state
status = default
'is the link a parent page
if isActive("/ppgnw/external-resources-23216.htm") then
status = active
end if
%>
- > External Resources <% If isActive("/ppgnw/external-resources-23216.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/publications-23166.htm") then status = active end if %>
- >
Publications
<%
If isActive("/ppgnw/publications-23166.htm") and depth < 3 Then
depth = depth + 1
%>
- <%
'You can remove this whole If statement if you want to show first tier reddot. Keep the reddot code.
'Depth 0 = Foundation, Depth 1 = 1st Tier, Depth 2 = 2nd Tier, Depth 3 = 3rd Tier, etc...
If depth > 0 Then
%>
<%
End If
%>
<%
'Default list state code
default = ""
'Active list state code
active = " class='active'"
%>
<%
'set default state
status = default
'is the link a parent page
if isActive("/ppgnw/birth-control-resource-kit-23208.htm") then
status = active
end if
%>
- > Birth Control Resource Kit <% If isActive("/ppgnw/birth-control-resource-kit-23208.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/growing-up-female-growing-up-male-23205.htm") then status = active end if %>
- > Growing Up Female/Growing Up Male <% If isActive("/ppgnw/growing-up-female-growing-up-male-23205.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/human-sexuality-persons-developmental-disabilities-23209.htm") then status = active end if %>
- > Human Sexuality for Persons with Developmental Disabilities <% If isActive("/ppgnw/human-sexuality-persons-developmental-disabilities-23209.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/pornography-discussing-sexually-explicit-images-23207.htm") then status = active end if %>
- > Pornography: discussing Sexually Explicit Images <% If isActive("/ppgnw/pornography-discussing-sexually-explicit-images-23207.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/pregnancy-options-self-study-guide-23204.htm") then status = active end if %>
- > Pregnancy Options: A Self-study Guide <% If isActive("/ppgnw/pregnancy-options-self-study-guide-23204.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/signs-sexuality-deaf-hard-hearing-23203.htm") then status = active end if %>
- > Signs for Sexuality for Deaf and Hard of Hearing <% If isActive("/ppgnw/signs-sexuality-deaf-hard-hearing-23203.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/talk-me-about-sex-love-life-23202.htm") then status = active end if %>
- > Talk to Me! About Sex, Love, and Life <% If isActive("/ppgnw/talk-me-about-sex-love-life-23202.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/teen-clinics-manual-23206.htm") then status = active end if %>
- > Teen Clinics Manual <% If isActive("/ppgnw/teen-clinics-manual-23206.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'Shadowpage nav reddot If NOT isActive("/ppgnw/birth-control-resource-kit-23208.htm") And Depth = 0 Then %> <% End If %>
<%
'set default state
status = default
'is the link a parent page
if isActive("/ppgnw/contact-health-educator-23759.htm") then
status = active
end if
%>
- > Contact a Health Educator <% If isActive("/ppgnw/contact-health-educator-23759.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'Shadowpage nav reddot If NOT isActive("/ppgnw/schools-community-23657.htm") And Depth = 0 Then %> <% End If %>
<%
'set default state
status = default
'is the link a parent page
if isActive("/ppgnw/international-programs-23144.htm") then
status = active
end if
%>
- >
For Schools and Community
<%
If isActive("/ppgnw/schools-community-23657.htm") and depth < 3 Then
depth = depth + 1
%>
- >
International Programs
<%
If isActive("/ppgnw/international-programs-23144.htm") and depth < 3 Then
depth = depth + 1
%>
- <%
'You can remove this whole If statement if you want to show first tier reddot. Keep the reddot code.
'Depth 0 = Foundation, Depth 1 = 1st Tier, Depth 2 = 2nd Tier, Depth 3 = 3rd Tier, etc...
If depth > 0 Then
%>
<%
End If
%>
<%
'Default list state code
default = ""
'Active list state code
active = " class='active'"
%>
<%
'set default state
status = default
'is the link a parent page
if isActive("/ppgnw/history-about-suzanne-cluett-31202.htm") then
status = active
end if
%>
- > History / About Suzanne Cluett <% If isActive("/ppgnw/history-about-suzanne-cluett-31202.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/international-projects-31203.htm") then status = active end if %>
- >
International Projects
<%
If isActive("/ppgnw/international-projects-31203.htm") and depth < 3 Then
depth = depth + 1
%>
- <%
'You can remove this whole If statement if you want to show first tier reddot. Keep the reddot code.
'Depth 0 = Foundation, Depth 1 = 1st Tier, Depth 2 = 2nd Tier, Depth 3 = 3rd Tier, etc...
If depth > 0 Then
%>
<%
End If
%>
<%
'Default list state code
default = ""
'Active list state code
active = " class='active'"
%>
<%
'set default state
status = default
'is the link a parent page
if isActive("/ppgnw/cameroon-31208.htm") then
status = active
end if
%>
- > Cameroon <% If isActive("/ppgnw/cameroon-31208.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/laos-31209.htm") then status = active end if %>
- > Lao PDR <% If isActive("/ppgnw/laos-31209.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/nepal-31210.htm") then status = active end if %>
- > Nepal <% If isActive("/ppgnw/nepal-31210.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'Shadowpage nav reddot If NOT isActive("/ppgnw/cameroon-31208.htm") And Depth = 0 Then %> <% End If %>
<%
'set default state
status = default
'is the link a parent page
if isActive("/ppgnw/international-program-newsletters-31204.htm") then
status = active
end if
%>
- > International Program Newsletters <% If isActive("/ppgnw/international-program-newsletters-31204.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/apply-grant-31205.htm") then status = active end if %>
- > Apply for a Grant <% If isActive("/ppgnw/apply-grant-31205.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/contributions-31206.htm") then status = active end if %>
- > Contributions <% If isActive("/ppgnw/contributions-31206.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'Shadowpage nav reddot If NOT isActive("/ppgnw/history-about-suzanne-cluett-31202.htm") And Depth = 0 Then %> <% End If %>
<%
'set default state
status = default
'is the link a parent page
if isActive("/ppgnw/contact-us.htm") then
status = active
end if
%>
- >
Contact Us
<%
If isActive("/ppgnw/contact-us.htm") and depth < 3 Then
depth = depth + 1
%>
- <%
'You can remove this whole If statement if you want to show first tier reddot. Keep the reddot code.
'Depth 0 = Foundation, Depth 1 = 1st Tier, Depth 2 = 2nd Tier, Depth 3 = 3rd Tier, etc...
If depth > 0 Then
%>
<%
End If
%>
<%
'Default list state code
default = ""
'Active list state code
active = " class='active'"
%>
<%
'set default state
status = default
'is the link a parent page
if isActive("/ppgnw/where-we-are-23165.htm") then
status = active
end if
%>
- >
Where We Are
<%
If isActive("/ppgnw/where-we-are-23165.htm") and depth < 3 Then
depth = depth + 1
%>
- <%
'You can remove this whole If statement if you want to show first tier reddot. Keep the reddot code.
'Depth 0 = Foundation, Depth 1 = 1st Tier, Depth 2 = 2nd Tier, Depth 3 = 3rd Tier, etc...
If depth > 0 Then
%>
<%
End If
%>
<%
'Default list state code
default = ""
'Active list state code
active = " class='active'"
%>
<%
'set default state
status = default
'is the link a parent page
if isActive("/ppgnw/locations-alaska-23418.htm") then
status = active
end if
%>
- > Locations in Alaska <% If isActive("/ppgnw/locations-alaska-23418.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/locations-idaho-23420.htm") then status = active end if %>
- > Locations in Idaho <% If isActive("/ppgnw/locations-idaho-23420.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/locations-western-washington-23419.htm") then status = active end if %>
- > Locations in Western Washington <% If isActive("/ppgnw/locations-western-washington-23419.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'Shadowpage nav reddot If NOT isActive("/ppgnw/locations-alaska-23418.htm") And Depth = 0 Then %> <% End If %>
<%
'set default state
status = default
'is the link a parent page
if isActive("/ppgnw/media-access-23162.htm") then
status = active
end if
%>
- > Media Access <% If isActive("/ppgnw/media-access-23162.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/job-opportunities-23163.htm") then status = active end if %>
- > Job Opportunities <% If isActive("/ppgnw/job-opportunities-23163.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'set default state status = default 'is the link a parent page if isActive("/ppgnw/refund-policy-23164.htm") then status = active end if %>
- > Refund Policy <% If isActive("/ppgnw/refund-policy-23164.htm") and depth < 3 Then depth = depth + 1 %> <% depth = depth -1 End If %> <% 'Shadowpage nav reddot If NOT isActive("/ppgnw/where-we-are-23165.htm") And Depth = 0 Then %> <% End If %>
<%
'Shadowpage nav reddot
If NOT isActive("/ppgnw/index.htm") And Depth = 0 Then
%>
<% End If %> - >
Where We Are
<%
If isActive("/ppgnw/where-we-are-23165.htm") and depth < 3 Then
depth = depth + 1
%>
<%
'
'The delimiter between values in the breadcrumb is different in preview and published versions of the pages
'The sessionkey determines which state you are in
If ""<>"" Then 'Preview Mode
Token="&"
Else 'Published
Token=" "
End If
'FUNCTION TO CHECK IF NAV ITEMS IS "ACTIVE" (links to the current page or a parent/ancestor of the current page)
Function isActive(strURL)
' response.write ""
'Checks if strURL (path/filename of nav item) 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 (path/filename of nav item) is the current page
If instr(strURL, Token & "pageguid=")>0 Then
If instr("/ppgnw/whats-new-23740.htm", Mid(strURL, instrrev(strURL, Token & "pageguid="), 42))>0 Then
isCurrent=True
Else
isCurrent=False
End If
Else
isCurrent=False
End If
End Function
' FUNCTION TO GET THE DEPTH OF A PAGE IN THE NAVIGATION STRUCTURE
Function getDepth(strURL)
Dim parentPages, strPart, depthCounter
depthCounter=1
parentPages = Split(strParentPages,"|")
For Each strPart In parentPages
If Not instr(strPart,Mid(strURL,instrrev(strURL,Token & "pageguid="),42)) Then
depthCounter = depthCounter+1
Else
Exit For
End If
Next
getDepth=depthCounter
End Function
'
' DETERMINE CURRENT LANGUAGE AND SET URL FOR CURRENT PAGE IN ALTERNATE LANGUAGE
If ("ENU" = "ENU") Then
'eng environment, sp link
if (("" = "/ppgnw/whats-new-23740.htm") or (trim("") = "")) then
'link to homepage if no corresponding page in alternate language exists
strUrlAltLang = "http://www.plannedparenthood.org/esp/"
else
strUrlAltLang = ""
end if
Else
'sp environment, eng link
if (("" = "/ppgnw/whats-new-23740.htm") or (trim("") = "")) then
'link to homepage if no corresponding page in alternate language exists
strUrlAltLang = "http://www.plannedparenthood.org/"
else
strUrlAltLang = "/ppgnw/whats-new-23740.htm"
end if
End If
'added ability to set a second image link on right-hand side of the logo nav bar.
'right image should be 357x149.
'-alan, 11/17/09
if ("ENU" = "ENU") then
strHomeRightLink = "http://plannedparenthoodaction.org/healthreform/"
else
strHomeRightLink = "/key-issues/ensuring-health-care-access-25937.htm"
end if
strHomeRightImg = ""
strHomeRightTrackingCode = ""
%>
<%
if ((trim(strHomeRightLink) <> "") and (trim(strHomeRightImg) <> "")) then
response.write(space(10) & "" & vbcr)
response.write(space(12) & "
" & vbcr)
response.write(space(10) & "" & vbcr)
end if
%>
<%
if ((trim(strHomeRightLink) <> "") and (trim(strHomeRightImg) <> "")) then
response.write(space(10) & "" & vbcr)
response.write(space(12) & "-
<%
Dim Depth
Dim Subdepth
Depth=0
Subdepth = 0
%>
<%
'You can remove this whole If statement if you want to show first tier reddot. Keep the reddot code.
'Depth 0 = Foundation, Depth 1 = 1st Tier, Depth 2 = 2nd Tier, Depth 3 = 3rd Tier, etc...
If depth > 0 Then
%>
<%
End If
%>
<%
'Default list state code
default = ""
'Active list state code
active = " class='active'"
%>
<%
'set default state
status = default
'is the link a parent page
if isActive("/ppgnw/index.htm") then
status = active
end if
%>
