﻿// ====================================
// Code pour le défilement de l'IFrame
// ====================================
var timer_id;
function scroll_iframe(frm,inc,dir) 
{
  if (timer_id) clearTimeout(timer_id);
  if (window.frames[frm]) 
  {
    if (dir == "v") window.frames[frm].scrollBy(0, inc);
    else window.frames[frm].scrollBy(inc, 0);
    timer_id = setTimeout("scroll_iframe('" + frm + "'," + inc + ",'" + dir + "')", 50);
  }
}
function stopScroll() 
{ 
    if (timer_id) clearTimeout(timer_id); 
}

// =================================
// Affichage d'un texte en Français
// =================================
function afficherLeTexteFr(numero)
{
    var leTexte;
    switch (numero)
    {
        case 1891  : 
            leTexte = "<b>1891</b><br>Avec l'accord du Conseil de Fondation, Charles Krafft transforme son appartement en une petite clinique, nommée clinique de Beaulieu, qui s'ouvre le 1er octobre de la même année."
            break 
        case 1898  : 
            leTexte = "<b>1898</b><br>Achat d'un appareil à gaz pour chauffer l'eau de la salle d'opération qui est transformée: pavée de mosaïques, peinte à l'huile lavable, les fenêtres sont élargies et l'on place une petite grille pour l'écoulement des eaux."
            break
        case 1905  : 
            leTexte = "<b>1905</b><br>La Polyclinique et le Dispensaire sont logés dans un petit bâtiment nouvellement construit au sud du jardin."
            break            
        case 1907  : 
            leTexte = "<b>1907</b><br>L'électricité est amenée à La Source."
            break            
         case 1913  : 
            leTexte = "<b>1913</b><br>Déménagement dans la nouvelle Clinique construite par la Fondation La Source à la demande de Charles Krafft.<br><br>La Clinique de Beaulieu devient alors une clinique générale qui reçoit des cas de chirurgie, de médecine et des accouchées."
            break                       
         case 1919  : 
            leTexte = "<b>1919</b><br>Henry Krafft, fils aîné du directeur installe à ses frais les rayons X créant ainsi un petit service de radiologie."
            break
         case 1921 : 
            leTexte = "<b>1921</b><br>A la suite de la mort subite du Dr. Charles Krafft, la direction est partagée en trois : le Pasteur Maurice Vuilleumier pour la direction administrative et morale de l'institution, le Dr. Henry Krafft pour celle de la chirurgie et de la gynécologie et le Dr. Henri Tecoz pour la médecine.<br><br>La Source rachète le mobilier et l'équipement de la Clinique de Beaulieu à la Société Charles Krafft et Cie et la clinique qui a changé de propriétaire et devient <i>Clinique de La Source</i>.<br><br>Sous la nouvelle direction de Maurice Vuilleumier, sa modernisation continue  avec l'installation d'un chauffage central."
            break
         case 1923  : 
            leTexte = "<b>1923</b><br>L'Ecole La Source établit une convention avec la Croix-Rouge suisse et devient l' Ecole romande d'infirmières de la Croix-Rouge suisse.<br><br>Installation du premier ascenseur."
            break
         case 1927  : 
            leTexte = "<b>1927</b><br>Construction d'un petit pavillon opératoire relié à l'infirmerie et restructuration de la Clinique avec la création d'une maternité et d'une nurserie pour 12 bébés."
            break                       
         case 1938  : 
            leTexte = "<b>1938</b><br>Premier luxe: le téléphone est installé dans 10 chambres particulières. Construction d'une buanderie centrale."
            break                       
         case 1940  : 
            leTexte = "<b>1940</b><br>Décès de Maurice Vuilleumier, le pasteur Pierre Jaccard le remplace; il centralise et rationnalise les différents services pour en faire un ensemble hospitalier."
            break
         case 1946  : 
            leTexte = "<b>1946</b><br>Achat de la maison de Béthanie pour y loger les élèves et agrandir de ce fait la Clinique qui devient ainsi un lieu exclusif de soins."
            break
         case 1950  : 
            leTexte = "<b>1950</b><br>Mme Gertrude Augsburger, infirmière, Sourcienne, accède à la direction de l'institution."
            break                       
         case 1955  : 
            leTexte = "<b>1955</b><br>Jean-David Buffat est élu Président du Conseil de Fondation; il expose ses plans pour l'agrandissement de la Clinique."
            break
         case 1956  : 
            leTexte = "<b>1956</b><br>Après une visite de l'institution, La Croix-Rouge suisse et les représentants des cantons de Genève, Neuchâtel, Vaud et la Ville de Lausanne se déclarent prêts à participer financièrement à la reconstruction projetée de l'école-hôpital."
            break
         case 1958  : 
            leTexte = "<b>1958</b><br>Les travaux commencent  afin que l'internat soit bâti et l'école rénovée pour le centenaire de celle-ci, en 1959."
            break
         case 1960  : 
            leTexte = "<b>1960</b><br>La nouvelle Clinique de 120 lits ouvre ses portes."
            break
         case 1961  : 
            leTexte = "<b>1961</b><br>La Source devient un petit centre de chirurgie cardiaque, les opérations à cœur ouvert et à cœur fermé s'y succèdent."
            break
         case 1964  : 
            leTexte = "<b>1964</b><br>Une deuxième Sourcienne, Charlotte von Allmen, accède à la direction de l'institution."
            break
         case 1971  : 
            leTexte = "<b>1971</b><br>Inauguration du nouveau Dispensaire."
            break                       
         case 1974  : 
            leTexte = "<b>1974</b><br>Inauguration de la nouvelle Ecole, achevant ainsi la modernisation totale des infrastructures."
            break
         case 1977  : 
            leTexte = "<b>1977</b><br>Nomination de Micheline Boyer, diplômée du Bon Secours, à la tête de l'institution."
            break
         case 1978  : 
            leTexte = "<b>1978</b><br>La chirurgie cardiaque cesse son activité."
            break                       
         case 1982  : 
            leTexte = "<b>1982</b><br>L'Infirmerie ferme ses portes faute de soutien des assurances sociales et cantonales."
            break 
         case 1985  : 
            leTexte = "<b>1985</b><br>Le Dispensaire devient un centre de soins à domicile de la Ville de Lausanne."
            break
         case 1988  : 
            leTexte = "<b>1988</b><br>M. Michel R. Walther prend la direction de la Clinique et Mme Christiane Augsburger, diplômée du Bon Secours, celle de l'Ecole.<br><br>La séparation administrative de l'Ecole et de la Clinique crée une nouvelle dynamique."
            break                                        
         case 1991  : 
            leTexte = "<b>1991</b><br>Célébration du 100ème anniversaire de la Clinique.<br><br>Inauguration d'un nouvel étage de 14 chambres et rénovation complète du bloc opératoire."
            break     
         case 1992  : 
            leTexte = "<b>1992</b><br>Ouverture du restaurant-salon-bar La Véranda.<br><br>Construction d'un bâtiment de cabinets médicaux."
            break                           
         case 1993  : 
            leTexte = "<b>1993</b><br>Installation d'un appareil d'Imagerie à Résonance Magnétique (I.R.M.)."
            break                           
         case 1994  : 
            leTexte = "<b>1994</b><br>Ouverture de l'unité de Soins Intensifs avec présence d'un médecin anesthésiste FMH 24H/ 24.<br><br>Agrandissement du Service de Physiothérapie.<br><br>Création du 1er Centre Ophtalmologique privé du Canton de Vaud."
            break                          
         case 1995  : 
            leTexte = "<b>1995</b><br>Ouverture du nouveau Centre Ambulatoire (CAM) avec une capacité de 12 lits.<br><br>Ouverture du Secteur Ophtalmologie.<br><br>Développement du laboratoire de la Clinique dans le domaine de l'hématologie, de la sérologie et de la microbiologie clinique."
            break                           
         case 1996  : 
            leTexte = "<b>1996</b><br>Rénovation du bloc opératoire et construction de 2 salles d'opération avec flux laminaire.<br><br>Rénovation de l'Institut de Radiologie.<br><br>Transformation de la Maternité."
            break                           
        case 1997  : 
            leTexte = "<b>1997</b><br>Modernisation des structures d'Accueil du Centre Ambulatoire.<br><br>Création d'un service informatique.<br><br>Mise en place d'une nouvelle Conception de soins par Anne Clavel, Directrice des Soins infirmiers.<br><br>Introduction de nouvelles techniques opératoires (coelioscopie)."
            break                           
        case 1998  : 
            leTexte = "<b>1998</b><br>Ouverture du Centre de Radiothérapie de La Source.<br><br>Création d'un grand parking sous-terrain."
            break                           
        case 1999  : 
            leTexte = "<b>1999</b><br>Ouverture d'un Centre d'Urgences Médico-Chirurgicales Vidy Source.<br><br>"
            break              
        case 2000  : 
            leTexte = "<b>2000</b><br>Fin de construction et inauguration de la nouvelle école.<br><br>Nouvelle discipline : La Procréation Médicalement Assistée.<br><br>Agrandissement de la salle de réveil et de l'unité de Soins Intensifs.<br><br>Mise en place d'un Management dela Qualité. "
            break                      
        case 2001  : 
            leTexte = "<b>2001</b><br>Développement de l'informatique médicale. Expansion du Centre d'urgences Vidy Source."
            break                         
        case 2002  : 
            leTexte = "<b>2002</b><br>Ouverture d'un web-club à disposition des patients."
            break                         
        case 2003  : 
            leTexte = "<b>2003</b><br>Création d'une unité spécifique de traitements en oncologie ainsi que d'une unité médecine nucléaire avec acquisition gamma-caméra hybride.<br><br>Développement d'une unité de Chirurgie orthopédique et traumatologique."
            break                         
        case 2004  : 
            leTexte = "<b>2004</b><br>Rénovation et inauguration de la Maternité baptisée Source de Vie."
            break                         
        case 2005  : 
            leTexte = "<b>2005</b><br>Rénovation de la cuisine avec la création d'une table d'hôtes Source des Saveurs.<br><br>Agrandissement du centre Ambulatoire.<br><br>Aménagement d'un nouvel IRM 3 Tesla et d'un PET-CT en Radiologie.<br><br>Agrandissement du centre Ambulatoire.<br><br>Aménagement d'un nouvel IRM 3 T et d'un PET-CT en Radiologie."
            break                         
        case 2006  : 
            leTexte = "<b>2006</b><br>Accréditation de la Filière infirmière, dont l'Ecole La Source, en tant que Haute Ecole Supérieure de la Santé (HES).<br><br>La cuisine est totalement rénovée et ouvre une table d'hôtes."
            break       
        case 2007  : 
            leTexte = "<b>2007</b><br>Rénovation du bloc opératoire et installation du bloc OR1 système qui permet de contrôler tous les appareils qui sont suspendus sur un écran tactile."
            break       
        case 2008  : 
            leTexte = "<b>2008</b><br>Fin de rénovation du bloc opératoire.<br><br>Changement des façades extérieures côté Vinet."
            break            
        default : 
            leTexte = ""
    }         
    TexteAnnee.innerHTML=leTexte
}


// =================================
// Affichage d'un texte en Anglais
// =================================
function afficherLeTexteEn(numero)
{
    var leTexte;
    switch (numero)
    {
        case 1891  : 
            leTexte = "<b>1891</b><br>With the consent of the Foundation Board, Charles Krafft transformed his apartment into a small clinic called Clinique de Beaulieu, which was inaugurated on 1st October of the same year."
            break 
        case 1898  : 
            leTexte = "<b>1898</b><br>Purchase of a gas heater to supply hot water to the operating theatre which is modified with a mosaic floor, washable paint, enlarged windows , and the installation of a small lattice for water evacuation."
            break
        case 1905  : 
            leTexte = "<b>1905</b><br>A private hospital and health centre are set up in a new building on the south side of the garden."
            break            
        case 1907  : 
            leTexte = "<b>1907</b><br>Electricity is brought to La Source."
            break            
         case 1913  : 
            leTexte = "<b>1913</b><br>Moving into the new clinic built by the La Source Foundation on behalf of Charles Krafft.<br><br>The Clinique de Beaulieu becomes a general purpose clinic including surgery and a maternity ward."
            break                       
         case 1919  : 
            leTexte = "<b>1919</b><br>Henry Krafft, the eldest son, installs an x-ray at his own cost, thus creating a small radiology unit."
            break
         case 1921 : 
            leTexte = "<b>1921</b><br>Following the sudden death of Dr Charles Krafft, the management is split into three: The Rev. Maurice Vuilleumier for the administration and moral management, Dr Henry Krafft for surgery and gynaecology, and Dr Henri Tecoz for medicine.<br><br>La Source buys back the Clinique de Beaulieu’s furniture and equipment from Charles Krafft & Co. and becomes “Clinique de La Source”.<br><br>Under the new management of Maurice Vuilleumier the improvements continue with the installation of central heating."
            break
         case 1923  : 
            leTexte = "<b>1923</b><br>The first lift is installed."
            break
         case 1927  : 
            leTexte = "<b>1927</b><br>A small wing with an operating theatre is built which is linked to the infirmary, and the reconstruction continues with establishment of a maternity ward with a nursery for 12 babies."
            break                       
         case 1938  : 
            leTexte = "<b>1938</b><br>A first luxury: 10 private rooms get a telephone. A central laundry is built."
            break                       
         case 1940  : 
            leTexte = "<b>1940</b><br>Maurice Vuilleumier dies, and is replaced by the Rev. Pierre Jaccard who reorganises the various departments to form a centralised hospital unit."
            break
         case 1946  : 
            leTexte = "<b>1946</b><br>The purchase of the Bethanie house to provide accommodation for the students, which consequently expands the Clinique and thus becomes a place of exclusive care."
            break
         case 1950  : 
            leTexte = "<b>1950</b><br>Mrs Gertrude Augsburger, a nurse trained at La Source, becomes managing director."
            break                       
         case 1955  : 
            leTexte = "<b>1955</b><br>Jean-David Buffat is elected to be chairman of the Foundation Board; he outlines his plans for an expansion of the Clinique."
            break
         case 1956  : 
            leTexte = "<b>1956</b><br>Following a visit at the institution, the Swiss Red Cross and the representatives of the cantons of Geneva, Neuchatel, Vaud, and the City of Lausanne, declare their willingness to provide funding for the planned rebuilding of the hospital and school."
            break
         case 1958  : 
            leTexte = "<b>1958</b><br>Work begins to build the dormitories and the school is renovated in time for its centenary in 1959."
            break
         case 1960  : 
            leTexte = "<b>1960</b><br>The new 120 bed Clinique is inaugurated."
            break
         case 1961  : 
            leTexte = "<b>1961</b><br>An anaesthetics department is established thus enabling highly technical operations to be carried out plus specialized training for nurses in operating theatres or in anaesthetics. "
            break
         case 1964  : 
            leTexte = "<b>1964</b><br>A second nurse trained at La Source, Charlotte von Allmen, becomes managing director."
            break
         case 1971  : 
            leTexte = "<b>1971</b><br>Inauguration of the new health centre."
            break                       
         case 1974  : 
            leTexte = "<b>1974</b><br>Inauguration of the new school, thus completing the total infrastructural modernization."
            break
         case 1977  : 
            leTexte = "<b>1977</b><br>Micheline Boyer, graduate of Bon Secours, is appointed at the head of the institution."
            break
         case 1978  : 
            leTexte = "<b>1978</b><br>Heart surgery ceases to be performed."
            break                       
         case 1982  : 
            leTexte = "<b>1982</b><br>The infirmary is closed due to lack of support from the social and cantonal health insurance."
            break 
         case 1985  : 
            leTexte = "<b>1985</b><br>The health centre becomes a unit for home care of the City of Lausanne."
            break
         case 1988  : 
            leTexte = "<b>1988</b><br>Mr Michel R. Walther becomes the managing director of the Clinique and Mrs Christiane Augsburger, graduate of Bon Secours, heads the school.<br><br>The two separate administrations of the school and the Clinique bring a new sense of dynamic enthusiasm."
            break                                        
         case 1991  : 
            leTexte = "<b>1991</b><br>Celebration of the Clinique’s 100th anniversary.<br><br>Inauguration of an additional floor of 14 rooms and the complete renovation of an operating theatre."
            break     
         case 1992  : 
            leTexte = "<b>1992</b><br>Opening of the restaurant & bar La Veranda Construction of a wing of medical offices."
            break                           
         case 1993  : 
            leTexte = "<b>1993</b><br>Installation of a Magnetic Resonance Imaging (MRI) apparatus."
            break                           
         case 1994  : 
            leTexte = "<b>1994</b><br>Opening of the Intensive Care unit with the permanent presence of an anaesthetist on a 24 h. basis.<br><br>Expansion of the Physiotherapy unit.<br><br>Formation of the 1st private Ophthalmological Centre in the Canton of Vaud."
            break                          
         case 1995  : 
            leTexte = "<b>1995</b><br>Opening of the new Outpatient unit with 12 beds.<br><br>Opening of the Ophthalmology unit.<br><br>Development of the Clinique’s laboratory in the fields of haematology, serology, and clinical microbiology."
            break                           
         case 1996  : 
            leTexte = "<b>1996</b><br>Renovation of the operating theatre and the construction of 2 operating theatres with laminar flow.<br><br>Renovation of the Radiology Department.<br><br>Transformation of the Maternity Ward."
            break                           
        case 1997  : 
            leTexte = "<b>1997</b><br>Modernization of the reception desk in the Outpatient Centre.<br><br>Creation of a computer department.<br><br>Establishment of a new Concept of Care by Anne Clavel, Manager of Nursing Care.<br><br>Introduction of new operating techniques (coelioscopy)."
            break                           
        case 1998  : 
            leTexte = "<b>1998</b><br>Opening of the La Source Radiotherapy Centre.<br><br>Creation of a large underground car park."
            break                           
        case 1999  : 
            leTexte = "<b>1999</b><br>Opening of Vidy Source, an emergency treatment centre with surgical facilities."
            break              
        case 2000  : 
            leTexte = "<b>2000</b><br>The building of the new school is completed and inaugurated.<br><br>A new discipline: Assisted Reproductive Technology (ART).<br><br>Extension of the recovery ward and the intensive care unit.<br><br>Setting up of Quality Management."
            break                      
        case 2001  : 
            leTexte = "<b>2001</b><br>Development of medical data processing. Extension of the Vidy Source Emergency Centre."
            break                         
        case 2002  : 
            leTexte = "<b>2002</b><br>Opening of a web-club for the patients."
            break                         
        case 2003  : 
            leTexte = "<b>2003</b><br>Formation of a department specifically for oncological treatments as well as a nuclear medicine unit with the acquisition of a hybrid gamma-camera.<br><br>Development of a department of orthopedic and traumatic surgery."
            break                         
        case 2004  : 
            leTexte = "<b>2004</b><br>Renovation and inauguration of the Maternity Ward named “Source de Vie” (Source of Life)."
            break                         
        case 2005  : 
            leTexte = "<b>2005</b><br>Renovation of the kitchens with the introduction of a table d’hôte “Source de Saveurs”.<br><br>Extension of the Outpatient Centre.<br><br>Installation of a new MRI 3Tesla and a PET-CT in the Radiology Department.<br><br> Enlargement of the Outpatient Unit, installation of a new MRI T 3 and a PET-CT in the Radiology unit."
            break                         
        case 2006  : 
            leTexte = "<b>2006</b><br>Accreditation of the Ecole de La Source as a Superior Health College for the nursing profession.<br><br>A total renovation of the kitchens supplemented by a table d’hôtes."
            break    
        case 2007  : 
            leTexte = "<b>2007</b><br>Renovation of the operating theatre with the installation of an OR1 system for the control of all overhanging apparatus by touch-screen."
            break       
        case 2008  : 
            leTexte = "<b>2008</b><br>Completion of the operating theatre renovations. Modification of the external façades on the Vinet side."
            break                           
        default : 
            leTexte = ""
    }         
    TexteAnnee.innerHTML=leTexte
}


// ===========================
// Reset affichage d'un texte
// ===========================
function effacerLeTexte()
{
  TexteAnnee.innerHTML='';
}

