% 'colirs_header_include.asp
' Special script that is included by "three-panel" content pages to display the page header.
' This script does not display the "breadcrumbs" that the standard "5 panel" content pages have.
' On 3-panel pages there is always a "save in personal folder" link, even if the user hasn't
' logged in. But the personal folder scripts will make sure that the user logs in before
' saving the link.
'
' 08/05/01 was Added conditional code in header so that "Our Staff" pages will show a graphic for
' "Our Doctors", and will not show the "Find Similar" link.
' 08/20/01 jrr Removed code that is also used by list.asp, and replaced it with a call to MastHead,
' which is in header.asp. (Thus, added header.asp to the list of included files)
' 09/24/01 jrr - discovered bug: when linking to to Texis, this script decides someone is logged in only be looking for the presence of the cookie.
' 10/05/01 fi Fixed bug (described just above)
' Also installed Send to Friend code
' 10/30/01 jrr Commented out the hyperlink to Send to Friend, because the
' system software isn't working.
'
'11/01/2001 RGL: Get rid of the code to check user's login status and call function getUserId from file
' constant.asp instead.
'07/20/02 jrr Added a Dim statement for current_script_related.
'04/20/05 jrr Restored the "email a friend" link to the header.
' (At some point in the distant past, it has been commented out because
' the system software wasn't working) %>
<%sub sub_page_css %>
<%end sub %>
<%
'********************************************************************
' Name: constants.asp
' Purpose: This include file contains application-wide constants and variables.
'********************************************************************
'*******************************************************************
'Modification history
'11/01/2001 RGL: add function getUserId (moved from file list.asp)to be called
' by list.asp and colirs_header_include.asp to decide user's login
' status.
''11/05/2001 RGL: Move all three functions originally in this file, check_login (user, pass),
' check_login2 and getUserId, to a new included file constantsFunctions.inc
'7/18/02 RGL: add a new constant CINT_VGUIDE_FIRSTCAT_ID
'7/21/02 jrr: Define the various path strings as variables instead of constants and base them on the
' value of request.servervariables("SERVER_NAME"). This should allow the constants.asp
' file to be moved among servers with fewer edits.
'--------------------------------------------------------------------
%>
Error processing SSI file
<%
'--------------------------------------------------------------------------
'For registered user, pass a value to texis site to retain the state
'G_U_LOGIN
dim G_U_LOGIN
'-----------------------------------------------------------------------
' 07-30-2001 RL: add loginMessage to print out friendly message when
' a user attempts to log in
dim loginMessage
dim SERVER_NAME
SERVER_NAME = replace( request.servervariables("SERVER_NAME"),"ccf.org","clevelandclinic.org")
'--------------------------------------------------------------------
' Notes: added 05/16/01
' These constants are prefixes of hard-codes links within SSL-securied
'directories. They force the links to point to out of https: .
'--------------------------------------------------------------------
'const HTTP_DOMAIN_CCF = "http://test.www.clevelandclinic.org"
'const HTTPS_DOMAIN_CCF = "https://test.www.clevelandclinic.org"
'const HTTPS_DOMAIN_FATHOM = "https://test.ccf.fathomi.net"
'const HTTP_DOMAIN_FATHOM = "http://test.ccf.fathomi.net"
'*********************************************************************
'the following pairs comment off/on to match different servers, CCF
' Server and Fathom test server
'*********************************************************************
Dim HTTP_DOMAIN_CURRENT,HTTPS_DOMAIN_CURRENT
HTTP_DOMAIN_CURRENT = "http://" & SERVER_NAME
HTTPS_DOMAIN_CURRENT = "https://" & SERVER_NAME
'--------------------------------------------------------------------
' Constants used in list.asp file
'--------------------------------------------------------------------
'const SEARCHSCRIPTPATH = "http://texis.ccfheart.copfer.com/cgi-bin/texis/cchcsearch"
const SEARCHSCRIPTPATH = "http://texis.clevelandclinic.org/cgi-bin/texis/cchcsearch"
Dim HOME_PATH,HOMEPATHWOHTTP
HOME_PATH = "http://" & SERVER_NAME & "/heartcenter"
HOMEPATHWOHTTP = SERVER_NAME & "/heartcenter"
'--------------------------------------------------------------------
' Notes: These constants define the reply to address and display name for all e-mail forms.
'--------------------------------------------------------------------
'const FROM_EMAIL = "justin@copfer.com"
const FROM_EMAIL = "stovskb@ccf.org"
const FROM_NAME = "Cleveland Clinic Heart Center Webmaster"
'-------------------------------------------------------------------
'--------------------------------------------------------------------
' Notes: These constants define the webmaster address for error handling.
'--------------------------------------------------------------------
'const WEBMASTER_EMAIL = "justin@copfer.com"
const WEBMASTER_EMAIL = "webmaster@ccf.org"
'-------------------------------------------------------------------
'--------------------------------------------------------------------
' Notes: This contant sets the default text to use if a tip is not
' found in the database.
'--------------------------------------------------------------------
const DEFAULT_TIP_TEXT="Spend some time each day for YOU."
'--------------------------------------------------------------------
'--------------------------------------------------------------------
' Notes: This constant will display the specified text within the
' banner for the timeline.
'--------------------------------------------------------------------
const TIMELINE_BANNER_TEXT="Select a year below to begin your tour of the Cleveland Clinic Timeline."
'--------------------------------------------------------------------
' Notes: These constants and gloabl variables define common ASCII formatting codes used in all e-mail forms.
'--------------------------------------------------------------------
dim CRLF
CRLF = Chr(13) + Chr(10)
const PLAIN_TEXT_WIDTH = 45
'-------------------------------------------------------------------
'--------------------------------------------------------------------
' Notes: These constants defines the cookie prefix that will be present in all cookie ID's
' used to maintain login status.
'--------------------------------------------------------------------
const COOKIE_PREFIX = "B895915A7F7011D48005005004D6D931"
dim COOKIE_PREFIX_LEN
COOKIE_PREFIX_LEN = Len(cookie_prefix)
'-------------------------------------------------------------------
'--------------------------------------------------------------------
' Notes: These constants defines the cookie prefix that will be present in all cookie ID's
' used to maintan registration status.
'--------------------------------------------------------------------
const COOKIE_PREFIX2 = "624790FDC4BC11D480A2009027E52D9E"
dim COOKIE_PREFIX_LEN2
COOKIE_PREFIX_LEN2 = Len(cookie_prefix2)
'-------------------------------------------------------------------
'--------------------------------------------------------------------
' Notes: These constants contain the bit mask integer values
' used for Access Rights defined in the "User Group" table.
'--------------------------------------------------------------------
const ACCESS_RIGHT_PUBLIC = 1
const ACCESS_RIGHT_PATIENT = 2
const ACCESS_RIGHT_EDITOR = 4
const ACCESS_RIGHT_ADMIN = 8
'-------------------------------------------------------------------
' Notes: This global variable should be used to retrieve the
' UserID of the current login session. It will contain a
' long integer value.
dim USER_ID
USER_ID = 0
'-------------------------------------------------------------------
'--------------------------------------------------------------------
' Notes: These constants are used to hold common messages and errors.
'--------------------------------------------------------------------
const heart_guide_disclaimer = "This information is provided for education purposes only and is not intended to replace the medical advice of your doctor or health care provider. Please consult your health care provider for advice about a specific medical condition or contact the Cleveland Clinic if you would like an appointment."
'-------------------------------------------------------------------
'--------------------------------------------------------------------
' Constants used in admin/doc/add_doc_upload file
' 1/24/02 RGL: CHAGED
'--------------------------------------------------------------------
Dim ADD_DOC_REFER_PAGE,MOD_DOC_REFER_PAGE
ADD_DOC_REFER_PAGE = HTTP_DOMAIN_CURRENT & "/heartcenter/admin/doc/add_doc.asp"
MOD_DOC_REFER_PAGE = HTTP_DOMAIN_CURRENT & "/heartcenter/admin/doc/mod_doc.asp"
'1/14/02 RGL: comment it out b/c not used anywhere
const PUB_FOLDER_NAME = "/heartcenter/pub/"
'-------------------------------------------------------------------
dim generic_user_id
generic_user_id = check_login("guest", "guest")
'-------------------------------------------------------------------
'--------------------------------------------------------------------
' Notes: These constants are used to create the login cookie.
'--------------------------------------------------------------------
'const COOKIE_DOMAIN = ".fathomi.net"
'const COOKIE_DOMAIN = ".copfer.com"
'const COOKIE_DOMAIN = ".clevelandclinic.org
'const COOKIE_DOMAIN = ".clevelandclinic.org"
const COOKIE_DOMAIN = ".clevelandclinic.org"
'-------------------------------------------------------------------
'-------------------------------------------------------------------
' these are bland substitutions for nt ids and passwords.
const PATIENT = "ccf_patient"
const ADMIN = "ccf_admin"
const PATIENT_PD = "ccf_patient"
const ADMIN_PD = "ccf_admin"
'-------------------------------------------------------------------
'-------------------------------------------------------------------
' Constants for the ID value of a new first level category 'Vascular Guide'
' The value is 'CatId' in table 'Cats' of the record 'Vascular Guide', and it
' can be retrieved using
' select CatID from cats
' where parentID is null
' and cat_dir = 'vguide'
const CINT_VGUIDE_FIRSTCAT_ID = 459
'-------------------------------------------------------------------
%>
<%
'--------------------------------------------------------------------
' This function displays the errors if there are problems.
'--------------------------------------------------------------------
sub handle_errors(obj)
dim errors
set errors = obj.Errors
if errors is nothing then exit sub
Dim objError
%>
| The username you chose was already taken, Please go back to enter a different username |
|
| Script Name: | <%= Request.ServerVariables ("SCRIPT_NAME") %> |
| Source: | <%=objError.ErrorSource%> |
| Number: | <%=objError.ErrorNumber%> |
| Description: | <%=objError.ErrorMessage%> |
![]() |
|
||||||||||
![]() |
|
|||||||||
| The nation's #1 heart program by U.S. News & World Report for 13 years in a row! |
|
There are four valves within your heart. They are the mitral, tricuspid, aortic and pulmonic valves. The valves make sure blood flows in only one direction through the heart. Click here to learn more. What is heart valve disease? Valvular heart disease occurs when your heart's valves do not work correctly. Valvular heart disease can be caused by valvular stenosis or valvular insufficiency. In the valvular heart disease condition valvular stenosis, the tissues forming the valve leaflets become stiffer, narrowing the valve opening and reducing the amount of blood that can flow through it. If the narrowing is mild, the overall functioning of the heart may not be reduced. However, the valve can become so narrow (stenotic) that heart function is reduced, and the rest of the body may not receive adequate blood flow. Another valvular heart disease condition, called valvular insufficiency (or regurgitation, incompetence, "leaky valve"), occurs when the leaflets do not close completely, letting blood leak backward across the valve. This backward flow is referred to as “regurgitant flow.”
Some patients may have both valvular stenosis and valvular insufficiency in one or more valves. Valve disease causes the heart muscle to work harder to circulate the right amount of blood through the body. What causes heart valve disease? There are many types of valve disease .Valve disease can be congenital (present at birth) or may be acquired later in life. Sometimes the cause of valve disease may be unknown. Congenital valve disease is an abnormality that develops before birth. It may be related to improper valve size, malformed leaflets, or an irregularity in the way the leaflets are attached. This most often affects the aortic or pulmonic valve.
This occurs more frequently in some family members. About 1/4 of patients may have some enlargement of the aorta above the valve. Bicuspid aortic valve disease affects about 2 percent of the population. Acquired valve disease includes problems that develop with valves that were once normal. These may involve changes in the structure of your valve or infection.
Infective endocarditis and rheumatic fever are the two common infections that cause valve disease.
Rheumatic fever causes a common type of valve disease, rheumatic heart disease. It causes:
Rheumatic fever is usually caused by an untreated streptococcal infection, such as strep throat. The use of penicillin to treat strep throat can prevent this disease. Rheumatic fever occurs most often in children aged five to fifteen, but symptoms of valve disease may not be seen for years. The valve itself is not infected in rheumatic fever. Antibodies developed by the body to fight the infection react with the heart valves, causing inflammation and eventual scarring.
Endocarditis is a major infection and can be life-threatening. It occurs when germs (especially bacteria) enter your blood stream and attach to the surface of your heart valves. With endocarditis:
The germs can enter your blood stream during:
If you have valve disease (unless you have mild forms of mitral valve prolapse) or have had valve surgery, you are at increased risk for getting this life-threatening infection. Click here to learn more.
Changes in your valve structure can occur due to both acquired and congenital causes. These include:
If the chordae become torn or papillary muscles become stretched, the leaflets may flop backward when the ventricles contract (flail leaflet), causing a leaky valve.
|
|||||||||||||||||||||||
Dilatation may occur when the heart muscle is damaged due to:
|
© Copyright 1999-2005 The Cleveland Clinic Foundation. All rights reserved, revised 9/05
<% 'footer.asp - contains 1 function - PubHtmlFooter ' This include file is used by most pages on the public side of ' the heartcenter site to display the page footer. It is typically ' included by other include files such as list.asp and login.asp. '******************************************************************* 'Modification history '10/29/01 'tweaked indentation for readability '8/15/01 jrr Created file by pulling code from List.asp, login.asp, etc. '9/18/01 jrr Modified the Contact Us link '6/-3/04 bs Modified the disclaimer '10/12/2001 RGL: remove 'search all sites' option by commenting out relevant code '5/16/05 bs added site map '-------------------------------------------------------------------- 'PubHtmlFooter 'Purpose: Print the html part that is at the bottom '-------------------------------------------------------------------- sub pubHtmlFooter dim lower_left_image_name dim current_script current_script = lcase(Request.ServerVariables("SCRIPT_NAME")) 'Customize an image file name based on what folder the current script is within if Instr(current_script, "/heartcenter/pub/about/") <> 0 then lower_left_image_name = "about_lowerleft07.gif" elseif Instr(current_script, "/heartcenter/pub/appointment/") <> 0 then lower_left_image_name = "appointment_lowerleft.gif" elseif Instr(current_script, "/heartcenter/pub/guide/") <> 0 then lower_left_image_name = "guide_lowerleft.gif" elseif Instr(current_script, "/heartcenter/pub/history/") <> 0 then lower_left_image_name = "history_lowerleft.gif" elseif Instr(current_script, "/heartcenter/pub/news/") <> 0 then lower_left_image_name = "news_lowerleft07.gif" elseif Instr(current_script, "/heartcenter/pub/professionals/") <> 0 then lower_left_image_name = "professionals_lowerleft.gif" elseif Instr(current_script, "/heartcenter/pub/research/") <> 0 then lower_left_image_name = "research_lowerleft.gif" elseif Instr(current_script, "/heartcenter/pub/staff/") <> 0 then lower_left_image_name = "staff_lowerleft.gif" elseif Instr(current_script, "/heartcenter/pub/glossary/") <> 0 then lower_left_image_name = "lowerleft_nurse.gif" else lower_left_image_name = "lowerleft_nurse.gif" end if %>
|
||||||||||||
<% end sub %> <% Call PubHtmlFooter %>