<%@ Language=VBScript %>
<%Option Explicit%>
<!-- #include file="mod.asp" -->
<%
Dim RS2 : Set RS2 = Server.CreateObject("ADODB.Recordset")
Dim sesid
ConnectRS
select case Request.Form("action")
case "login":
	if Request.Form("username") <> "" then
		
		'Prise de l'information de l'acheteur selon son nom d'utilisateur (..., (SELECT COUNT(ID_Transaction) FROM tblTransaction WHERE ID_ach = a.ID_ach) AS [transac]...)
		strSQL = "SELECT a.ID_Ach, 0 AS [ID_Assistant], webActif, webPassword, webDateFin, (SELECT COUNT(ID_CCach) FROM tblCCAch WHERE ID_ach = a.ID_ach) AS [CCACH] FROM tblSUBAcheteur AS a WHERE webUsername = '" & replace(lcase(Request.Form("username")), "'", "''") & "'" & _
		  " UNION SELECT ID_Ach, ID_Assistant, webActif, webPassword, webDateFin, 0 FROM tblAssistant WHERE webUsername = '" & replace(lcase(Request.Form("username")), "'", "''") & "'"
		 'Response.Write "<!--" & strSQL & "-->"
		RS.Open strSQL, CNRS 'ouverture de la requête
	
		if RS.EOF then 'vérification qu'un nom a été trouvé
			vMess = "Nom d'utilisateur inconnu"
		else
			if RS.Fields("webPassword") <> Request.form("password") then 'vérification du mot de passe
				vMess = "Mot de passe incorrect"
			else
			    Session("user") = UCase(Request.Form("username")) 'l'utilisateur est identifié
				Session("Userid") = RS.Fields("ID_Ach")
				Session("Assistid") = RS.Fields("ID_Assistant")
				Session("CCACH") = RS.Fields("CCACH")
				'Session("Transac") = RS.Fields("transac")
				if Session("CCACH") > 0 then
					dim RScc: Set RScc = Server.CreateObject("ADODB.Recordset")
					strSQL = "SELECT MAX(Date_CCAch) FROM tblCCach WHERE ID_ach = " & Session("Userid") & " AND ID_EtapeCCach = 1"
					RScc.Open strSQL, CNRS
					Response.Write "<!--" & RScc.Fields(0) & "--" & DateDiff("m", RScc.Fields(0), Date) & "-->"
					if RScc.EOF then
						Session("CCACH") = 0
					else
						if DateDiff("m", RScc.Fields(0), Date) > 12 then
							Session("CCACH") = 0
						end if
					end if
				end if
				
				if not RS.Fields("webActif") then 'vérification de l'état de son accès
					vMess = "Vous &ecirc;tes identifi&eacute; mais votre acc&egrave;s a &eacute;t&eacute; r&eacute;voqu&eacute;"
				else 
					
					if datediff("d", RS.Fields("webDateFin"), date) > 0 then 'vérification de la fin de son accès
						vMess = "Vous &ecirc;tes identifi&eacute; mais votre accès a prit fin le " & RS.Fields("webDateFin")
					else
						Session("perm") = 1
						strSQL = " SELECT d.Nom_dos" & _
										 " FROM tblDossier AS d INNER JOIN tblSUBAcheteur AS a ON d.ID_dos = a.ID_dos" & _
										 " WHERE a.ID_Ach = " & Session("Userid") 
								RS2.Open strSQL, CNRS
								sesid = RS2.Fields(0)
								RS2.Close()
						if Session("Userid") <> 1 then
						 SendEMail EMAIL_FROM, EMAIL_TO, "","L'ach. #"& Session("Userid") & " : " & sesid & " vient de se connecter sur le site immobilier !!! ", " "
						 end if
					end if
				end if
			end if
		end if
		RS.Close
		
	end if
case "logout":
	Session.Abandon
	Response.Redirect "index.asp"
end select


%>

<%Dim idAch,idTypeAch,idResTemp,resid
 idResTemp = 0


if Request.Form("hidcheck") = 1 then
   Sub RunScript
    Location.Reload(True)
   End Sub
   
    
   if Session("Userid")<>1 AND Session("perm") = 1 then
   
    strSQL = " SELECT d.Nom_dos,a.ID_TypeAcheteur  "  & _
										 " FROM tblDossier AS d INNER JOIN tblSUBAcheteur AS a ON d.ID_dos = a.ID_dos" & _
										 " WHERE a.ID_Ach = " & Session("Userid") 
								RS.Open strSQL, CNRS
								idAch = Session("Userid") & RS.Fields(0)
								idTypeAch = RS.Fields("ID_TypeAcheteur")
								RS.Close()
   
   
			strSQL = _
				"SELECT	r.ID_res AS vID,l.Open_Listing, IIF(w.ID_AccesWeb IS NULL, 2, 1) as vOrd " & _
				"FROM	(((tblSUBResidence AS r " & _
				"		INNER JOIN tblVente AS v ON r.MainVente = v.ID_Vente) " & _
				"		INNER JOIN (SELECT * FROM tblListing WHERE Id_Listing = " & Request.Form("hidID") & ") AS l ON v.ID_Vente = l.ID_Vente ) " & _
				"		LEFT JOIN tblAccesWeb AS w ON ( " & _
				"			l.ID_Listing = w.ID_Listing " & _
				"			AND w.ID_ach = " & Session("Userid") & " " 
				
			strSQL = strSQL & _
				"			)) " & _				
				"WHERE	Actif_Listing  " & _
				"ORDER BY 1 ASC "
		
		Response.Write "<!--" & strSQL & "-->"
		RS.Open strSQL, CNRS
			
		if RS.Fields("Open_Listing") = 0 AND RS.Fields("vOrd") = 2 then	
	 SendEMail EMAIL_FROM, EMAIL_TO, "","L'ach. #" & idAch & " et l-sommaire sans acces client #" & RS.Fields("vID"), " " 
	 elseif (idTypeAch=1 or idTypeAch=2) then
     SendEMail EMAIL_FROM, EMAIL_TO, "","L'ach. #" & idAch & " et l-sommaire #" & RS.Fields("vID"), " " 	
		else
     SendEMail EMAIL_FROM, EMAIL_TO, "","L'ach. #" & idAch & " et l-sommaire accesible suite à l'envoi de masse #" & RS.Fields("vID"), " " 
      end if
		RS.Close	
		end if	
	Server.Execute "ficheWeb.asp"
else
'*****************************************************************************************************************
dim DD, MD, SD 'DefaultDevise, ModDevise and SymboleDevise
if Request.QueryString("d") <> "" then
	DD = Request.QueryString("d")
else
	DD = Request.Cookies("devise")
end if
MD = 1
SD = "$"


Public Function Div0(ByVal v1, ByVal v2)
    If Not IsNull(v1) And Not IsNull(v2) Then
        If v2 <> 0 Then
            Div0 = v1 / v2
        Else
            Div0 = 0
        End If
    End If
End Function

Public Function CalculerMensualite(ECapital, EDuree, ETaux)
    'set the variables
    Dim vTaux 'As Double
    Dim vPaiement 'As Currency
    Dim vDiviseur 'As Double
    Dim vNumPaiement 'As Integer
    Dim vQuotien 'As Double
    Dim vQuotien1 'As Double
    
    If ECapital > 0 And EDuree > 0 Then
        vTaux = (ETaux) / 2
        vQuotien1 = ((1 + vTaux) ^ 2) - 1
        vQuotien = ((1 + vQuotien1) ^ (1 / 12)) - 1
        vNumPaiement = EDuree * 12
        vDiviseur =Div0( (1 - ((1 + vQuotien) ^ (-1 * vNumPaiement))) , vQuotien)
         if vDiviseur <>0 then vPaiement = ECapital / vDiviseur  end if
        
        CalculerMensualite = FormatNumber(vPaiement, 2)
    Else
        CalculerMensualite = 0
    End If
End Function

Public function ShowProjection()
	if RS.Fields("final") <> true then
	  Response.Write "Fiche préliminaire(résumé) " 
	 else
	  Response.Write "Dossier complet(résumé)"
	   end if
End function

Public function PN(vVal)
	if P then
		dim I
		dim vRet
		vRet = ""
		for I = 1 to len(vVal)
			vRet = vRet & "-"
		next
		PN = vRet
	else
		PN = vVal
	end if
end function
Public function PS(vVal)
	if P then
		PS = ""
	else
		PS = vVal
	end if
end function

Public function lettreID()
 if RS.Fields("Open_Listing") <> 0 then
		lettreID = ((RS.Fields("vID") +3000) Mod 1804) + RS.Fields("vID") 
	else
	lettreID =  RS.Fields("vID")
	end if	
end function

Public function lettreOpen(rid)
  if rid <> RS.Fields("vID") then
  
   if rid < 300 then 
  lettreOpen =  "Z"
  elseif  rid >1499 then 
  lettreOpen =  "H"
	else lettreOpen = "B" 
	   end if
	   
	   end if
		
end function


%>

<script type="text/javascript">
function Devise()
{
	var cmb = document.getElementById("cmbDevise");
	var dd = new Date();
	dd.setMonth(dd.getMonth() + 1);
	document.cookie = "devise=" + cmb.options[cmb.selectedIndex].value + ";expires=" + dd.toDateString();
	window.location.href = unescape(window.location.pathname + "?p=<%=Request.querystring("p")%>&d=" + cmb.options[cmb.selectedIndex].value);
}
function Comptant()
{
	var cmb = document.getElementById("cmbComptant");
	var dd = new Date();
	dd.setMonth(dd.getMonth() + 1);
	document.cookie = "comptant=" + cmb.options[cmb.selectedIndex].value + ";expires=" + dd.toDateString();
}

function SetID(vID)
{
	document.getElementById("hidID").value = vID;
	return true;
}
</script>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">


<head>

<!-- Meta Data -->
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
<meta name="description" content="Short description of your site here." />
<meta name="keywords" content="keywords, go, here, seperated, by, commas" />

<!-- Site Title -->
<title>Richard Perreault</title>

<!-- Link to Style External Sheet -->
<link href="css/style.css" type="text/css" rel="stylesheet" />
<link rel="icon" type="image/ico" href="images/logoRP.ico" />

</head>

<script type="text/javascript">
function initRedir() {
window.location='http://aineshebergement.dtdns.net/richardperreault/indexDoc.asp?p=mandats'   
    
}
</script>
<body onload = "initRedir()">

<div id="page_wrapper">
<table width="100%">
<tr><td colspan="3">

<div id="header_wrapper">

<div id="header">

<h1>Richard  <font color="#FFDF8C">Perreault</font></h1>
<h2>La première étape vers un investissement performant</h2>

</div>

<div id="navcontainer">

<ul id="navlist">
<li id="active"><a href="index.asp?p=mandats" >Mandats actuels</a></li>
<li><a href="indexVendus.asp?p=mandats">Vendus</a></li>
<li><a href="indexMandat.asp">Mandats acheteur</a></li>
</ul>
</div>

</div>

</td></tr>
<tr>
<td valign="top">

<div id="left_side">
    <% Dim noBrp
				strSQL = " SELECT Last_brp FROM tblBrp" 
							 RS2.Open strSQL, CNRS					
					noBrp = RS2.Fields(0)
					RS2.Close 
					noBrp = noBrp & "Web.html"%>
    
<h3>Acheteur / Vendeur</h3>

				
<ul class='sousmenu'  >
						<li><%if Request.QueryString("p") = "mandats" then
								Response.Write "<p>Liste des mandats</p>"
							else
						Response.Write "<a href=""index.asp?p=mandats"">Liste des mandats</a>"	
						end	if					
							%></li>
								<% if Session("Perm") = 1 then  %>
							<li>
							 <a href="http://aineshebergement.dtdns.net/WebResidences/Comparables.aspx?id=<%=Session("Userid")%>"  target="_blank">
							 Comparez mandats</a> 
			               
							</li>
							<%else %>
							<li>
							 <a href="http://aineshebergement.dtdns.net/WebResidences/Comparables.aspx?id=1&non=1"  target="_blank">
							 Comparez mandats</a> 
			               
							</li>
							<% end if%>
						<li><%
							if Request.QueryString("p") = "motdepasse" then
								Response.Write "<p>Achat / mot de passe</p>"
							else						
								Response.Write "<a href=""indexInscr.asp?p=motdepasse"">Achat / mot de passe</a>"
							end if
							%></li>	
						<li><%
							if Request.QueryString("p") = "faq" then
								Response.Write "<p>F.A.Q.- mandat acheteur</p>"
							else						
								Response.Write "<a href=""indexFaq.asp?p=faq"">F.A.Q.- mandat acheteur</a>"
							end if
							%></li>						
						<li><%
							if Request.QueryString("p") = "vente" then
								Response.Write "<p>Vente de r&eacute;sidence</p>"
							else						
								Response.Write "<a href=""indexVente.asp?p=vente"">Vente de r&eacute;sidence</a>"
							end if
							%></li>
						<li><%
								if Request.QueryString("p") = "loyers"  then
									Response.Write "<p>Types d'hebergement</p>"
								else						
									Response.Write "<a href=""indexLoyers.asp?p=loyers"">Types d'hebergement</a>"
								end if
								%></li>
					</ul>
	
<ul class='menu'>
				
				<li><%
					if Request.QueryString("p") = "consultation" then
						Response.Write "<p>Services de consultation</p>"
					else						
						Response.Write "<a href=""indexConsult.asp?p=consultation"">Services de consultation</a>"
					end if
					%></li>
					  <li>
						<a href="http://www.richardperreault.ca/brp/<%=noBrp%>" target="_blank">
						<img src="http://aineshebergement.com/indice/images/BRP.jpg" width="190px" /></a>
						</li>
						
						 <li><%
						if Request.QueryString("p") = "revuepresse" then
							Response.Write "<p>Revue de presse</p>"
						else
						 	 Response.Write "<a href=""indexPress.asp?p=revuepresse"">Revue de presse</a>"				
						end if
						%></li>
					
				
</ul>
<h3>Chercher Mandat</h3>
<ul class='menu'>				
				<li><%	if Request.QueryString("p") = "prix" then
							Response.Write "<p>Par Prix</p>"
						else					
							Response.Write "<a href=""indexParP.asp?p=prix"">Par Prix</a>"
						end if
					
						%></li>
					<li><%
							if Request.QueryString("p") = "region" then
							Response.Write "<p>Par Région</p>"
						else						
							Response.Write "<a href=""indexParR.asp?p=region"">Par Région</a>"
						end if
						%></li>
					
</ul>
<h3>Calculez</h3>
<ul class='menu'>				
				<li><%
						if Request.QueryString("p") = "calculhypotheque" then
							Response.Write "<p>Hypoth&egrave;que</p>"
						else						
							Response.Write "<a href=""indexHyp.asp?p=calculhypotheque"">Hypoth&egrave;que</a>"
						end if
						%></li>
					<li><%
						if Request.QueryString("p") = "taxemutation" then
							Response.Write "<p>Taxe de mutation</p>"
						else						
							Response.Write "<a href=""indexHyp.asp?p=taxemutation&"">Taxe de mutation</a>"
						end if
						%></li>
					<li><%
						if Request.QueryString("p") = "tpstvq" then
							Response.Write "<p>TPS & TVQ</p>"
						else						
							Response.Write "<a href=""indexHyp.asp?p=tpstvq"">TPS & TVQ</a>"
						end if
						%></li>
						<li><%
						if Request.QueryString("p") = "ajustements" then
							Response.Write "<p>Calcul d'ajustement</p>"
						else						
							Response.Write "<a href=""indexAjust.asp?p=ajustements"">Calcul d'ajustement</a>"
						end if
						%></li>
						<li><%
						if Request.QueryString("p") = "commentaire" then
							Response.Write "<p>Laissez vos commentaires</p>"
						else						
							Response.Write "<a href=""indexComm.asp?p=commentaire"">Laissez vos commentaires</a>"
						end if
						%></li>
</ul>
				
<%if session("user") <> "" then%>
			<div id="logged">
				<h2>Identification</h2>
				<form name="frmLogout" id="frmLogout" action="index.asp" method="post">
				<input type="hidden" name="action" id="action" value="logout">
				<p>Vous &ecirc;tes connect&eacute<br>
				   en tant que : <strong><%=Session("user")%></strong>				</p>
				<p id="errmess"><%=vMess%></p>
				<p><input type="submit" class="button" name="dologout" id="dologout" value="fermer la session" /></p>
				</form>
			</div>
			<%else%>
			<div id="login">
				<h2>Identification</h2>
				<form name="frmLogin" id="frmLogin" action="index.asp" method="post">
				<input type="hidden" name="action" id="Hidden1" value="login">
				<p>Utilisateur :
					<input type="text" class="text" name="username" id="username" value="<%=Request.Form("username")%>" size="20" />
				</p>
				<p>Mot de passe :
					<input type="password" class="text" name="password" id="password" size="20" />
				</p>
				<p><input type="submit" class="button" name="dologin" id="dologin" value="entrer" /></p>
				<p id="P1"><%=vMess%></p>
				<p id="inscription"><a href="indexInscr.asp?p=motdepasse">&lt; S'INSCRIRE &gt;</a></p>
				</form>
			</div>
			<%if vMess = "" then%> 
			<%end if%>
 		<%end if%>
 		<div style="text-align:center;">
 		<a href="http://aineshebergement.com/bottin" target="_blank">
 		<img src="http://aineshebergement.com/bottin/images/LogoBAH_194X194.jpg" width="205px" height="175px" />
 		</a>
    </div>
 		
 		
</div>
</td>

<td valign="top" align="center">

<div id="content">

<table id="formulaire" >
<tr><td>	
	
  <h3>CERTIFICATION : DOCUMENTS DE BASE</h3>
<ol>
			<li>Informations de base sur le site du MSSS
				<ul>
					  <li><a href="http://www.msss.gouv.qc.ca/sujets/groupes/pa_certification.php">http://www.msss.gouv.qc.ca/sujets/groupes/pa_certification.php</a></li>
			    </ul>	        
            </li>
            
            <li>Manuel d'application du règlement sur les conditions d'obtention d'un certificat de conformité de résidence pour personnes âgées
				<ul>
					  <li><a href="http://publications.msss.gouv.qc.ca/acrobat/f/documentation/2007/07-843-01.pdf">
					 http://publications.msss.gouv.qc.ca/acrobat/f/documentation/2007/07-843-01.pdf</a></li>
			    </ul>	        
            </li>
            
            <li>Guide pratique. La prévention des incendies et l'évacuation des résidences hébergeant des personnes âgées
				<ul>
					  <li><a href="http://www.securitepublique.gouv.qc.ca/fileadmin/Documents/securite_incendie/publications/guide_ages/guide_evacuation_aines.pdf">
					 http://www.securitepublique.gouv.qc.ca/fileadmin/Documents/securite_incendie/publications/guide_ages/guide_evacuation_aines.pdf</a></li>
			    </ul>	        
            </li>
            
            <li>  Complément au Guide pratique. La prévention des incendies et l'évacuation des résidences hébergeant des personnes âgées
				<ul>
					  <li><a href="http://www.securitepublique.gouv.qc.ca/fileadmin/Documents/securite_incendie/publications/guide_ages/complement_2011.pdf">
					 http://www.securitepublique.gouv.qc.ca/fileadmin/Documents/securite_incendie/publications/guide_ages/complement_2011.pdf</a></li>
			    </ul>	        
            </li>
  
</ol>	

<h3>CERTIFICATION : DOCUMENTS COMPLÉMENTAIRES</h3>
<ol>
			<li>Guide du manipulateur d'aliments
				<ul>
					  <li><a href="http://www.mapaq.gouv.qc.ca/fr/Publications/Guidemanipulateur5.pdf">
					  http://www.mapaq.gouv.qc.ca/fr/Publications/Guidemanipulateur5.pdf</a></li>
			    </ul>	        
            </li>
            
            <li>   Formation obligatoire en hygiène et salubrité alimentaires
				<ul>
					  <li><a href="http://www.mapaq.gouv.qc.ca/fr/Publications/DepliantFHS.pdf">
					http://www.mapaq.gouv.qc.ca/fr/Publications/DepliantFHS.pdf</a></li>
			    </ul>	        
            </li>
         
  
</ol>	

<h3>LOIS ET RÈGLEMENTS </h3>
<ol>
			<li>Code des professions
				<ul>
					  <li><a href="http://www2.publicationsduquebec.gouv.qc.ca/dynamicSearch/telecharge.php?type=2&file=%2F%2FC_26%2FC26.htm">
					  http://www2.publicationsduquebec.gouv.qc.ca/dynamicSearch/telecharge.php?type=2&file=%2F%2FC_26%2FC26.htm</a></li>
			    </ul>	        
            </li>
            
            <li>  Loi sur la protection des renseignements personnels dans le secteur privé (L.R.Q., c. P-39.1, Art. 10)
				<ul>
					  <li><a href="http://www2.publicationsduquebec.gouv.qc.ca/dynamicSearch/telecharge.php?type=2&file=/S_4_2/S4_2.html">
					http://www2.publicationsduquebec.gouv.qc.ca/dynamicSearch/telecharge.php?type=2&file=/S_4_2/S4_2.html</a></li>
			    </ul>	        
            </li>
            
            <li>Loi sur la sécurité des édifices publics (L.R.Q., c. S-3)
				<ul>
					  <li><a href="http://www2.publicationsduquebec.gouv.qc.ca/dynamicSearch/telecharge.php?type=2&file=/S_3/S3.html">
					http://www2.publicationsduquebec.gouv.qc.ca/dynamicSearch/telecharge.php?type=2&file=/S_3/S3.html</a></li>
			    </ul>	        
            </li>
            
            <li>    Loi sur le bâtiment (L.R.Q., c. B-1.1)
				<ul>
					  <li><a href="http://www2.publicationsduquebec.gouv.qc.ca/dynamicSearch/telecharge.php?type=2&file=/B_1_1/B1_1.HTM">
					 http://www2.publicationsduquebec.gouv.qc.ca/dynamicSearch/telecharge.php?type=2&file=/B_1_1/B1_1.HTM</a></li>
			    </ul>	        
            </li>
  
   <li>    Loi sur les produits alimentaires (L.R.Q., c., P-26)
				<ul>
					  <li><a href="http://www2.publicationsduquebec.gouv.qc.ca/dynamicSearch/telecharge.php?type=2&file=/P_29/P29.html">
					http://www2.publicationsduquebec.gouv.qc.ca/dynamicSearch/telecharge.php?type=2&file=/P_29/P29.html</a></li>
			    </ul>	        
            </li>
            
            <li>Règlement sur l'exercice des activités décrites aux articles 39.7 et 39.8 du Code des professions
				<ul>
					  <li><a href="http://www2.publicationsduquebec.gouv.qc.ca/dynamicSearch/telecharge.php?type=2&file=%2F%2FC_26%2FC26R3.htm">
					http://www2.publicationsduquebec.gouv.qc.ca/dynamicSearch/telecharge.php?type=2&file=%2F%2FC_26%2FC26R3.htm</a></li>
			    </ul>	        
            </li>
            
            <li>   Règlement sur les conditions d'obtention d'une certificat de conformité de résidence de personnes âgées (L.R.Q., c. S-4.2,r.0.01.1)
				<ul>
					  <li><a href="http://www.rrsss03.gouv.qc.ca/documents/R%C3%A8glements.pdf">
					http://www.rrsss03.gouv.qc.ca/documents/R%C3%A8glements.pdf</a></li>
			    </ul>	        
            </li>
</ol>	

<h3>SITES WEB</h3>
<ol>
			<li>Association des établissements privés conventionnés (AEPC)
				<ul>
					  <li><a href="http://www.aepc.qc.ca/">
					  http://www.aepc.qc.ca/</a></li>
			    </ul>	        
            </li>
            
            <li>Association québécoise d'établissement de santé et de services sociaux (AQESSS)
				<ul>
					  <li><a href="http://www.aqesss.qc.ca/fr/accueil.aspx?sortcode=1">
					http://www.aqesss.qc.ca/fr/accueil.aspx?sortcode=1</a></li>
			    </ul>	        
            </li>
            
            <li>   Association québécoise de défense des droits des personnes retraitées et préretraitées (AQDR)
				<ul>
					  <li><a href="http://www.aqdr.org/">
					http://www.aqdr.org/</a></li>
			    </ul>	        
            </li>
            
            <li>     Association des ressources intermédiaires d'hébergement du Québec (ARIHQ)
				<ul>
					  <li><a href="http://www.arihq.com/">
					http://www.arihq.com/</a></li>
			    </ul>	        
            </li>
  
   <li>    Centre de recherche sur le vieillissement
				<ul>
					  <li><a href="http://www.csss-iugs.ca/cdrv/?L=fr">
				http://www.csss-iugs.ca/cdrv/?L=fr</a></li>
			    </ul>	        
            </li>
            
            <li>  Institut universitaire de gériatrie de Montréal (IUGM)
				<ul>
					  <li><a href="http://www.iugm.qc.ca/">
					http://www.iugm.qc.ca/</a></li>
			    </ul>	        
            </li>
            
            <li>  Ministère de l'Agriculture, pêcherie et Alimentation (MAPAQ)
				<ul>
					  <li><a href="http://www.mapaq.gouv.qc.ca/fr/Pages/Accueil.aspx">
					http://www.mapaq.gouv.qc.ca/fr/Pages/Accueil.aspx</a></li>
			    </ul>	        
            </li>
            
                 <li>Programme Logi-être (FADOQ)
				<ul>
					  <li><a href="http://www.logi-etre.com/fr/Programme/">
					http://www.logi-etre.com/fr/Programme/</a></li>
			    </ul>	        
            </li>
            
            <li>Régie du bâtiment du Québec
				<ul>
					  <li><a href="http://www.rbq.gouv.qc.ca/">
					http://www.rbq.gouv.qc.ca/</a></li>
			    </ul>	        
            </li>
            
            <li>    Régie du logement
				<ul>
					  <li><a href="http://www.rdl.gouv.qc.ca/fr/accueil/accueil.asp">
					http://www.rdl.gouv.qc.ca/fr/accueil/accueil.asp</a></li>
			    </ul>	        
            </li>
  
   <li>     Registre des résidences privées pour aînés
				<ul>
					  <li><a href="http://wpp01.msss.gouv.qc.ca/appl/K10/K10accueil.asp">
				http://wpp01.msss.gouv.qc.ca/appl/K10/K10accueil.asp</a></li>
			    </ul>	        
            </li>
            
            <li>       Regroupement québécois des résidences pour aînés (RQRA)
				<ul>
					  <li><a href="http://www.rqra.qc.ca/">
					http://www.rqra.qc.ca/</a></li>
			    </ul>	        
            </li>
            
            <li>    Société canadienne d'hypothèque et de logement (SCHL)
				<ul>
					  <li><a href="http://www.schl.ca/">
					http://www.schl.ca/</a></li>
			    </ul>	        
            </li>
</ol>	

  
</td></tr></table>


<%end if %>

</div>

</td>

<td valign="top">
    <div id="right_side">

<h3>Qui suis-je ?</h3>
<ul class='menu'>				
				<li><h5><a href="indexQui.asp" target="_self">Profil professionel</a></h5></li>
				<li>
				    <a href="http://www.linkedin.com/profile/view?id=17033983&locale=en_US&trk=tyah" target="_blank">
				    <img src= "images/linkedin.png" width="70px"; /></a>&nbsp;&nbsp;&nbsp;&nbsp;
				    <a href="http://www.facebook.com/group.php?gid=73435300398" target="_blank">
				<img src= "images/fbook.jpg" width="70px"; /></a>
				   
				</li>
				
			
</ul>

<h3>Contacts</h3>
<div class='menu'>
<a href="indexComm.asp">
			FAX : (514) 644-9722<br/>
			BUR. : (514) 644-4444<br />
			Lundi au vendredi de 8h30 à 16h30
			 <br/>rp@aineshebergement.com</a><br/>


  <a href="http://maps.google.ca/maps?q=+400+St-Jacques+O,Montr%C3%A9al,+QC.,+H2Y+1S1&hl=fr&ie=UTF8&sll=45.501595,-73.55999&sspn=0.049991,0.077162&vpsrc=0&hnear=Rue+Saint-Jacques+Ouest,+Montr%C3%A9al,+Communaut%C3%A9-Urbaine-de-Montr%C3%A9al,+Qu%C3%A9bec&t=m&z=16" style="color:#0000FF;text-align:left" target="_blank">
                    <img src= "images/Gmaps.png" width="190px"; />
		 400 St-Jacques O, #300<br />	Montréal, QC., H2Y 1S1</a><br/>

</div>
<h3>Liens utiles</h3>
<table>
 <tr><td colspan="2"><a href="indexDoc.asp"><img src="/images/dlr.jpg" height="80px" width="190px" ></a>
			</td></tr>
			<tr>
          <td colspan="2" bgcolor="#C4D7ED" ><img src="images/spacer.gif" alt="" width="1" height="1" /></td>
        </tr>	
	        <tr><td colspan="2"><a href="http://www.rbq.gouv.qc.ca/" target="_blank"><img src="/images/regieB.png" height="80px" width="190px" ></a>
			</td></tr>
			<tr>
          <td colspan="2" bgcolor="#C4D7ED" ><img src="images/spacer.gif" alt="" width="1" height="1" /></td>
        </tr>	
			<tr><td colspan="2"><a href="http://logietre.com" target="_blank"><img src="/images/cNormes.jpg" width="190px" ></a>
			</td></tr>
			 <tr>
		            <td align = "center"><a href="http://logietre.cyprex.com/docs/Documents/cahiernormes9.pdf" target="_blank">
			        <font size="-3" color="blue">9 unités et moins</font> <img src="images/logietre9.png" width="65px" height="70px" alt="Richard Perreault"  border=0></a>
			       
			        </td>
		            <td align = "center">
		           <a href="http://logietre.cyprex.com/docs/Documents/cahiernormes9.pdf" target="_blank">
			        <font size="-3" color="blue" >10 unités et plus</font>  <img src="images/logietre10.png" width="65px" height="70px" alt="Richard Perreault"  border=0></a>
			      
		           </td>		            
	            </tr>
	            <tr>
          <td colspan="2" bgcolor="#C4D7ED" ><img src="images/spacer.gif" alt="" width="1" height="1" /></td>
        </tr>
	            <tr><td colspan="2"><a href="http://wpp01.msss.gouv.qc.ca/appl/K10/certification/K10CertFonctionnement.asp" target="_blank">
				<img src="/images/Certification.bmp" height="170px" width="190px" ></a>
			</td></tr>
	            </table>


</div>
</td>
</tr>
</table>

</div>

</body>

</html>