function DoWwtPage ( n , v , u )
         {
           WKSet  ( "MemNiv" , n                                                 ) ;
           WKSet  ( "MemAdr" , v                                                 ) ;
           WKSet  ( "MemUsr" , u                                                 ) ;
           WKSet  ( "WkUser" , " "                                          ) ;
           switch ( n                                                            )
                  { case -1 : WKSet       ( "WkSelect"              , " "   ) ;
                              WKGetPage   ( "WwtPassword.php"       , "WkDialog" ) ;
                              WKGetPage   ( "FrancoMenu.php"        , "WkMenu"   ) ;
                              WKGetPage   ( "FrancoAccueil.php"     , "WkInfo"   ) ;
                              break                                                ;
                    default :
                    case 0  : WKSetCont   ( "WkSelect"              , " "   ) ;
                              WKGetPage   ( "WwtPassword.php"       , "WkDialog" ) ;
                              WKGetPage   ( "FrancoMenu.php"        , "WkMenu"   ) ;
                              WKGetPage   ( "FrancoAccueil.php"     , "WkInfo"   ) ;
                              break                                                ;
                    case 1  : WKSet       ( "WkSelect"              , " "   ) ;
                              WKGetPage   ( "FrancoMenu.php"        , "WkMenu"   ) ;
                              WKSet       ( "WkUser"                , u          ) ;
                              Horaire     ( 0                                    ) ;
                              break                                                ;
                    case 2  : WKSet       ( "WkSelect"              , " "   ) ;
                              WKGetPage   ( "FrancoMenu.php"        , "WkMenu"   ) ;
                              WKSet       ( "WkUser"                , u          ) ;
                              CalcChiffre ( 1                                    ) ;
                              break                                                ;
                    case 3  : WKSet       ( "WkSelect"              , " "   ) ;
                              WKGetPage   ( "FrancoMenu.php"        , "WkMenu"   ) ;
                              WKSet       ( "WkUser"                , u          ) ;
                              CalcChiffre ( 1                                    ) ;
                              break                                                ;
                    case 4  : WKSet       ( "WkSelect"              , " "   ) ;
                              WKGetPage   ( "FrancoMenu.php"        , "WkMenu"   ) ;
                              WKSet       ( "WkUser"                , u          ) ;
                              Liste       (                                      ) ;
                              break                                                ;
                    case 5  : WKSet       ( "WkSelect"              , " "   ) ;
                              WKGetPage   ( "FrancoMenu.php"        , "WkMenu"   ) ;
                              WKSet       ( "WkUser"                , u          ) ;
                              Liste       (                                      ) ;
                              break                                                ;
                  } 
        }

function Accueil ( )
         {
           DoWwtPage ( 0 , 0 , "-" ) ;
         }

function Infos ( )
         {
           WKGetPage   ( "FrancoInfo.php" , "WkInfo"   ) ;
         }

function Fonc ( )
         {
           WKGetPage   ( "FrancoFonc.php" , "WkInfo"   ) ;
         }

function Form_i ( )
         {
           WKGetPage   ( "FrancoForm.php" , "WkInfo"   ) ;
         }

function Form_a ( ad )
         {
           var      pa = "FrancoAdr01.php" ;
           if          ( ad > 0          ) pa += "?mod=" + ad
           WKGetPage   ( pa , "WkInfo"   ) ;
         }

function Form_s ( )
         {
           WKGetPage   ( "FrancoAdr02.php" , "WkInfo"   ) ;
         }

function Inscrip ( )
         {
            var frnom = WKGetValue ( "FrNom"                   ) ;
            if        ( frnom == ""                            ) 
                      { alert  ( "Manque le nom"               ) ;
                        return                                   ;
                      }
            var frpre = WKGetValue ( "FrPrenom"                ) ;
            if        ( frpre == ""                            ) 
                      { alert  ( "Manque le prénom"            ) ;
                        return                                   ;
                      }
            var frrue = WKGetValue ( "FrRue"                   ) ;
            var frnpa = WKGetValue ( "FrNP"                    ) ;
            if        ( frnpa == ""                            ) 
                      { alert  ( "Manque le Npa"               ) ;
                        return                                   ;
                      }
            var frvil = WKGetValue ( "FrVille"                 ) ;
            if        ( frvil == ""                            ) 
                      { alert  ( "Manque la ville"             ) ;
                        return                                   ;
                      }
            var frpro = WKGetValue ( "FrProf"                  ) ;
            var frtai = WKGetValue ( "FrTaille"                ) ;
            var frnai = WKGetValue ( "FrNais"                  ) ;
            if        ( frnai == ""                            ) 
                      { alert  ( "Manque la date de naissance" ) ;
                        return                                   ;
                      }
            var frsex = WKGetValue ( "FrSexe"                  ) ;
            var frmai = WKGetValue ( "FrMail"                  ) ;
            if        ( frmai == ""                            ) 
                      { alert  ( "Manque l'E-Mail"             ) ;
                        return                                   ;
                      }
            var frtel = WKGetValue ( "FrTele"                  ) ;
            var frmp1 = WKGetValue ( "FrMdp1"                  ) ;
            var frmp2 = WKGetValue ( "FrMdp2"                  ) ;
            if        ( frmp1 == ""                            ) 
                      { alert  ( "Manque le mot de passe"      ) ;
                        return                                   ;
                      }
            if        ( frmp1 != frmp2                         ) 
                      { alert  ( "Le mot de passe et son contrôle ne sont pas identique"  ) ;
                        return                                   ;
                      }
            var frlie = WKGetValue ( "FrLieu"                  ) ;
            var frgrp = WKGetValue ( "FrGrps"                  ) ;
            var frfn1 = WKGetValue ( "FrFnc1"                  ) ;
            var frfn2 = WKGetValue ( "FrFnc2"                  ) ;
            if        ( frfn1 == frfn2                         ) 
                      { alert  ( "La fonction 2 doit être différente de la 1"  ) ;
                        return                                   ;
                      }

           var hor    = WKGetCkeckStr ( "M01" ) + WKGetCkeckStr ( "M02" ) + WKGetCkeckStr ( "M03" ) +
                        WKGetCkeckStr ( "M04" ) + WKGetCkeckStr ( "M05" ) + WKGetCkeckStr ( "M06" ) + 
                        WKGetCkeckStr ( "M07" ) + WKGetCkeckStr ( "M08" ) + WKGetCkeckStr ( "M09" ) +
                        WKGetCkeckStr ( "M10" ) + WKGetCkeckStr ( "M11" ) + WKGetCkeckStr ( "M12" ) +
                        WKGetCkeckStr ( "M13" ) + WKGetCkeckStr ( "M14" ) +
                        WKGetCkeckStr ( "A01" ) + WKGetCkeckStr ( "A02" ) + WKGetCkeckStr ( "A03" ) +
                        WKGetCkeckStr ( "A04" ) + WKGetCkeckStr ( "A05" ) + WKGetCkeckStr ( "A06" ) + 
                        WKGetCkeckStr ( "A07" ) + WKGetCkeckStr ( "A08" ) + WKGetCkeckStr ( "A09" ) +
                        WKGetCkeckStr ( "A10" ) + WKGetCkeckStr ( "A11" ) + WKGetCkeckStr ( "A12" ) +
                        WKGetCkeckStr ( "A13" ) + WKGetCkeckStr ( "A14" ) +
                        WKGetCkeckStr ( "S08" ) + WKGetCkeckStr ( "S09" ) + WKGetCkeckStr ( "S10" ) +
                        WKGetCkeckStr ( "S11" ) + WKGetCkeckStr ( "S12" ) ; 

           var inf    = "?nom=" + frnom +
                        "&pre=" + frpre +
                        "&rue=" + frrue +
                        "&npa=" + frnpa +
                        "&vil=" + frvil +
                        "&pro=" + frpro +
                        "&tai=" + frtai +
                        "&nai=" + frnai +
                        "&sex=" + frsex +
                        "&mai=" + frmai +
                        "&tel=" + frtel +
                        "&mdp=" + frmp1 +
                        "&hor=" + hor   +
                        "&lie=" + frlie +
                        "&grp=" + frgrp +
                        "&fn1=" + frfn1 +
                        "&fn2=" + frfn2 ;
                        

            WKGetPage ( "FrancoFormOk.php" + inf , "WkInfo" ) ;
         }

function SauveA ( ad1 )
         {
            var ad2   = WKGet      ( 'MemAdr'                  ) ;
            var frnom = WKGetValue ( "FrNom"                   ) ;
            if        ( frnom == ""                            ) 
                      { alert  ( "Manque le nom"               ) ;
                        return                                   ;
                      }
            var frpre = WKGetValue ( "FrPrenom"                ) ;
            if        ( frpre == ""                            ) 
                      { alert  ( "Manque le prénom"            ) ;
                        return                                   ;
                      }
            var frrue = WKGetValue ( "FrRue"                   ) ;
            var frnpa = WKGetValue ( "FrNP"                    ) ;
            if        ( frnpa == ""                            ) 
                      { alert  ( "Manque le Npa"               ) ;
                        return                                   ;
                      }
            var frvil = WKGetValue ( "FrVille"                 ) ;
            if        ( frvil == ""                            ) 
                      { alert  ( "Manque la ville"             ) ;
                        return                                   ;
                      }
            var frpro = WKGetValue ( "FrProf"                  ) ;
            var frtai = WKGetValue ( "FrTaille"                ) ;
            var frnai = WKGetValue ( "FrNais"                  ) ;
            if        ( frnai == ""                            ) 
                      { alert  ( "Manque la date de naissance" ) ;
                        return                                   ;
                      }
            var frsex = WKGetValue ( "FrSexe"                  ) ;
            var frmai = WKGetValue ( "FrMail"                  ) ;
            if        ( frmai == ""                            ) 
                      { alert  ( "Manque l'E-Mail"             ) ;
                        return                                   ;
                      }
           var frtel = WKGetValue ( "FrTele"                  ) ;
           var inf    = "?nom=" + frnom +
                        "&pre=" + frpre +
                        "&rue=" + frrue +
                        "&npa=" + frnpa +
                        "&vil=" + frvil +
                        "&pro=" + frpro +
                        "&tai=" + frtai +
                        "&nai=" + frnai +
                        "&sex=" + frsex +
                        "&mai=" + frmai +
                        "&tel=" + frtel +
                        "&mod=" + ad1   ;

            WKGetPage ( "FrancoAdr01Ok.php" + inf , "WkInfo" ) ;
            if        ( ad1 == ad2                           ) WKGetPage ( "FrancoAdr01.php" , "WkInfo" ) ;
                        else                                   WKGetPage ( "FrancoList.php"  , "WkInfo" ) ;

         }

function SauveS ( )
         {
            var frlie = WKGetValue ( "FrLieu"                  ) ;
            var frgrp = WKGetValue ( "FrGrps"                  ) ;
            var frfn1 = WKGetValue ( "FrFnc1"                  ) ;
            var frfn2 = WKGetValue ( "FrFnc2"                  ) ;
            if        ( frfn1 == frfn2                         ) 
                      { alert  ( "La fonction 2 doit être différente de la 1"  ) ;
                        return                                   ;
                      }

           var hor    = "NN"                    + WKGetCkeckStr ( "M03" ) +
                        WKGetCkeckStr ( "M04" ) + WKGetCkeckStr ( "M05" ) + WKGetCkeckStr ( "M06" ) + 
                        WKGetCkeckStr ( "M07" ) + WKGetCkeckStr ( "M08" ) + WKGetCkeckStr ( "M09" ) +
                        WKGetCkeckStr ( "M10" ) + WKGetCkeckStr ( "M11" ) + WKGetCkeckStr ( "M12" ) +
                        WKGetCkeckStr ( "M13" ) + WKGetCkeckStr ( "M14" ) +
                        "NN"                    + WKGetCkeckStr ( "A03" ) +
                        WKGetCkeckStr ( "A04" ) + WKGetCkeckStr ( "A05" ) + WKGetCkeckStr ( "A06" ) + 
                        WKGetCkeckStr ( "A07" ) + WKGetCkeckStr ( "A08" ) + WKGetCkeckStr ( "A09" ) +
                        WKGetCkeckStr ( "A10" ) + WKGetCkeckStr ( "A11" ) + WKGetCkeckStr ( "A12" ) +
                        WKGetCkeckStr ( "A13" ) + WKGetCkeckStr ( "A14" ) +
                        WKGetCkeckStr ( "S08" ) + WKGetCkeckStr ( "S09" ) + WKGetCkeckStr ( "S10" ) +
                        WKGetCkeckStr ( "S11" ) + WKGetCkeckStr ( "S12" ) ; 

           var inf    = "?hor=" + hor   +
                        "&lie=" + frlie +
                        "&grp=" + frgrp +
                        "&fn1=" + frfn1 +
                        "&fn2=" + frfn2 ;
                        

            WKGetPage ( "FrancoAdr02Ok.php" + inf , "WkInfo" ) ;
            WKGetPage ( "FrancoAdr02.php"         , "WkInfo" ) ;
         }

function Horaire ( ad )
         {
           var inf     = "?hor=" + ad                             ; 
           WKGetPage   ( "FrancoHoraire.php" + inf , "WkInfo"   ) ;
         }

function Planing ( )
         {
           WKGetPage   ( "FrancoPlaningSel.php" , "WkSelect" ) ;
           PlaningSel  (                                     ) ;
         }

function PlaningSel ( )
         {
           var frlie   = WKGetValue ( "FrLieu"                ) ;
           var frdat   = WKGetValue ( "FrDate"                ) ;
           var frtim   = WKGetValue ( "FrTime"                ) ;
           var inf    = "?lie=" + frlie +
                        "&dat=" + frdat +                         
                        "&tim=" + frtim                         ;
           WKGetPage   ( "FrancoPlaning.php" + inf , "WkInfo" ) ;
         }

function Liste ( )
         {
           WKSet       ( "WkSelect"       , " "   ) ;
           WKGetPage   ( "FrancoList.php" , "WkInfo"   ) ;
         }

function ListePJ ( )
         {
           WKSet       ( "WkSelect"       , " "   ) ;
           WKGetPage   ( "FrancoListPJ.php" , "WkInfo"   ) ;
         }

function Agenda ( )
         {
           WKSet       ( "WkSelect"       , " "   ) ;
           WKGetPage   ( "FrancoAgenda.php" , "WkInfo"   ) ;
         }

function ModResa ( )
         {
           WKSetCont ( "WkSelect"    , " " ) ;
           WKGetPage ( "WwtResa.php" , "WkInfo" ) ;
         }

function ModAcces ( )
         {
           WKSetCont ( "WkSelect"      , " " ) ;
           WKGetPage ( "WwtDistri.php" , "WkInfo" ) ;
         }