// =====================================================================================
//
//  stdlib.js        Historie     
//
// =====================================================================================
//
//
//  02.02.2007  085  upk  Reparatur direkt auf dem Server
//  03.11.2007  086  upk  cgi_access_projekte eingebaut
//  06.11.2007  087  upk  externer Zugriff prj analog shg eingebaut
//  14.11.2007  088  upk  Projekte Umfragen
//  12.06.2008  089  upk  Mozilla Umlautfehler chk_username_ok behoben
//  03.09.2008  090  upk  list_gruppen_termine neu
//  11.12.2009  091  upk  404-Kommentar / Antivir-Problem entfernt
//
//
//







function cnst_subrelease () {

         return ( "091" );


}




function cnst_sid () {



        
         cgi_sid = "#n/a";
         var internal_path_values = top.document.location.href.split("/");




// ----- plausi 

         if ( internal_path_values.length < 3 ){

              alert ("stdlib-000-0001 : fehler in pfad : " + location.href + " ... SID nicht ermittelbar" );
              return;
         }


// ----- SID suchen ----------------------------

         if ( internal_path_values[3] == "contents" ){

              cgi_sid = internal_path_values[4];
         }
         else {
              cgi_sid = internal_path_values[5];
         }


// ----- Sonderfall : cgi-bin url

         if ( top.document.location.href.indexOf("cgi-bin") > -1 ){

              cgi_sid = "#n/a";

              start_pos = top.document.location.href.indexOf("sid=") + 4;
              start_str = top.document.location.href.substr(start_pos,top.document.location.href.length);

              ende_pos  = start_str.indexOf ("&");
              ende_str  = start_str.substr  ( 0, ende_pos);

//            alert ("cgi-bin url : " + ende_str );

              cgi_sid = ende_str;


         }






// ----- plausi 

         if ( cgi_sid == "#n/a" ){

              alert ("stdlib : SID konnte aus pfad nicht ermittelt werden : " + location.href  );
              return;
         }




         return ( cgi_sid );

}




function cnst_url () {




//       return ( "http://www." + cnst_sid() + ".de" );

//       alert ( "http://" + window.location.host );


         return ( "http://" + window.location.host );





}


function cnst_release () {


        
         cgi_release = "#n/a";

         var internal_path_values = location.href.split("/");

         if ( internal_path_values.length == 0 ){
              internal_path_values = location.href.split("\\");
         }


// ----- plausi 

         if ( internal_path_values.length == 0 ){

              alert ("stdlib-000-0001 : fehler in pfad : " + location.href + " ... Release nicht ermittelbar" );
              return;
         }


// ----- release suchen ----------------------------

         for ( i=0;i<internal_path_values.length;i++ ){


               if ( internal_path_values[i].substr(0,3) == "rel"  ){

// aktivieren, wenn auf Server ok
//               if ( internal_path_values[i].substr(0,3) == "rel" &&
//                    internal_path_values[i].substr(6,1) ==   "." ){

                    cgi_release = internal_path_values[i];
               }

         }




// ----- plausi 

         if ( cgi_release == "#n/a" ){

              alert ("stdlib : release konnte aus pfad nicht ermittelt werden : " + location.href  );
              return;
         }





         return ( cgi_release );


}






function cgi_ueberlast () {



         var ueberlast_sperre = false;    // NUR HIER :  true oder false setzen


         if ( ueberlast_sperre == false ){
              return ( false );
         }




// ----- Server Crash

         check =  prompt("Bitte nachfolgende Meldung beachten :  [OK] anklicken.","");

         if ( check == "arthrose"  ){
              return ( false );
         }



         alert ( "\r\rDie aufgerufene Funktion ist im Moment\r\rwegen akuter Überlastung für\r\rNICHT-Mitglieder gesperrt.\r\r" );
         return ( true );


}


function graphics_fullpath () {


         return ( cnst_url() + "/portal/" + cnst_release() +  "/" + cnst_sid() + "/base/grafic" );


}


function cgi_fullserverpath () {


         return ( cnst_url() + "/cgi-bin/" + cnst_release() );


}

function cgi_access ( scriptname ){


         window.location.href = cgi_fullserverpath () + "/" + scriptname + ".cgi";

}






function cgi_editor( mode, fullpath, subsubmode ){





// ----- forced login, if necessary 

         if ( top.document.forms[0].UserLoginFlag.value == '0' ){

              top.document.forms[0].Stack_00.value="javascript:cgi_editor(\"" + mode + "\",\"" + fullpath + "\")";
              cgi_access_user ("forcedlogin" );
              return;
         }


// ----- ident                            

         username       = top.document.forms[0].UserName.value;
         userpass       = top.document.forms[0].UserPassword.value;
         berechtigungen = top.document.forms[0].Berechtigungen.value;



// ----- php-files : evtl parameter wegkürzen ... file.php?sid= ...

         if ( fullpath.lastIndexOf("?") > -1 ){

              var pos        = fullpath.lastIndexOf("?");
              var fullpath   = fullpath.substr(0,pos);
         }






// ----- direct : editor call 

         switch ( mode ){



             case 'default' :

                   fullpath = cgi_fullserverpath () + "/editor/editor.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&mode=editieren&submode=default&subsubmode=" + subsubmode + "&name=" + username + "&password=" + userpass + "&fullpath=" + fullpath + "&berechtigungen=" + berechtigungen; 
                   f1 = open( fullpath,"_blank","location=0,status=0,title=0,scrollbars=1,resizable=1");

                   break;


             case 'reduziert' :

                   fullpath = cgi_fullserverpath () + "/editor/editor.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&mode=editieren&submode=reduziert&subsubmode=" + subsubmode + "&name=" + username + "&password=" + userpass + "&fullpath=" + fullpath + "&berechtigungen=" + berechtigungen; 
                   f1 = open( fullpath,"_blank","location=0,status=0,title=0,scrollbars=1,resizable=1");

                   break;



             default :

                  alert ( "unbekannter mode '" + mode + "' in  cgi_download( )" );
                  return;

          } 




}





function cgi_index ( mode ){





// ----- forced login, if necessary 

         if ( top.document.forms[0].UserLoginFlag.value == '0' && mode == 'admin' ){

              top.document.forms[0].Stack_00.value="javascript:cgi_index(\"" + mode + "\")";
              cgi_access_user ("forcedlogin" );
              return;
         }


// ----- ident                            

         username       = top.document.forms[0].UserName.value;
         userpass       = top.document.forms[0].UserPassword.value;
         berechtigungen = top.document.forms[0].Berechtigungen.value;


// ----- direct : chat call 

         switch ( mode ){



             case 'admin' :


                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/search/search.pl?Mode=Admin&sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=enterchat&name=" + username + "&password=" + userpass; 

                   break;


             case 'search' :


                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/search/search.pl?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=enterchat&name=" + username + "&password=" + userpass; 

                   break;



             default :

                  alert ( "unbekannter mode '" + mode + "' in  cgi_index( )" );
                  return;

          } 




}




function cgi_newsletter ( mode ){





// ----- forced login, if necessary 

         if ( top.document.forms[0].UserLoginFlag.value == '0' && mode == 'admin' ){

              top.document.forms[0].Stack_00.value="javascript:cgi_index(\"" + mode + "\")";
              cgi_access_user ("forcedlogin" );
              return;
         }


// ----- ident                            

         username       = top.document.forms[0].UserName.value;
         userpass       = top.document.forms[0].UserPassword.value;
         berechtigungen = top.document.forms[0].Berechtigungen.value;


// ----- direct : chat call 

         switch ( mode ){



             case 'admin' :


                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/newsletter/nl.cgi?Mode=Admin&sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=enterchat&name=" + username + "&password=" + userpass; 

                   break;


             case 'subscribe' :


                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/newsletter/newsletter.htm"; 

                   break;


             case 'unsubscribe' :


                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/newsletter/newsletter.htm"; 

                   break;



             default :

                  alert ( "unbekannter mode '" + mode + "' in  cgi_newsletter( )" );
                  return;

          } 




}



function cgi_access_infobox ( mode, infobox_username ){



         boardnr = "8100";






// ----- check : anzeigen nur wenn owner

         if ( top.document.forms[0].UserName.value != infobox_username ){

              mode = "schreiben";
         }




// ----- modes ----------

         switch ( mode ){



             case 'anzeigen' :

                   cgi_access_messageboard ( boardnr, 'overview', 'dummy', infobox_username );
                   break;


             case 'schreiben' :

                   cgi_access_messageboard ( boardnr, 'submit', 'dummy', infobox_username );
                   break;



             default :

                  alert ( "unbekannter mode '" + mode + "' in  cgi_access_infobox( )" );
                  return;

          } 




}




function cgi_access_notizbuch ( mode, notizbuch_username ){



         boardnr = "8101";






// ----- check : anzeigen nur wenn owner

         if ( top.document.forms[0].UserName.value != notizbuch_username ){

              mode = "schreiben";
         }




// ----- modes ----------

         switch ( mode ){



             case 'anzeigen' :

                   cgi_access_messageboard ( boardnr, 'overview', 'dummy', notizbuch_username );
                   break;


             case 'schreiben' :

                   cgi_access_messageboard ( boardnr, 'submit', 'dummy', notizbuch_username );
                   break;



             default :

                  alert ( "unbekannter mode '" + mode + "' in  cgi_access_notizbuch( )" );
                  return;

          } 




}



function cgi_access_diskussionsbeitraege ( mode, diskussionsbeitraege_username ){



         boardnr = "8102";









// ----- modes ----------

         switch ( mode ){



             case 'anzeigen' :

                   cgi_access_messageboard ( boardnr, 'overview', 'dummy', diskussionsbeitraege_username );
                   break;



             default :

                  alert ( "unbekannter mode '" + mode + "' in  cgi_access_diskussionsbeitraege( )" );
                  return;

          } 




}




function cgi_access_chat ( mode, submode, infotype, bezeichnung ){



         username = top.document.forms[0].UserName.value;
         userpass = top.document.forms[0].UserPassword.value;



// ----- Ueberlast-Sperre

         if ( cgi_ueberlast() == true ){
              return;
         }



// ----- plausi 

         if ( bezeichnung == "" ){
              bezeichnung = 'undefined';
         }



// ----- forced login, if necessary 

         if ( top.document.forms[0].UserLoginFlag.value == '0' ){

              top.document.forms[0].Stack_00.value="javascript:cgi_access_chat(\"" + mode + "\",\"" + submode + "\",\"" + infotype + "\",\"" + bezeichnung + "\")";
              cgi_access_user ("forcedlogin" );
              return;
         }




// ----- hauptfenster

         self.name = "hauptfenster"; 





// ----- standalone parameter


         var width  = 550;
         var height = 600;

         var l = ( screen.availWidth - width) / 2;
         var t = ((screen.availHeight - height) / 2) + 0;





// ----- counter

         cgi_access_counter( 0, "chat-all", "add" );
         cgi_access_counter( 1, "chat-allgemeiner-chatroom", "add" );



// ----- direct : chat call 

         switch ( mode ){



             case 'enterchat' :

                   fullpath  = cgi_fullserverpath () + "/chat/chat.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=enterchat&submode=submode&name=" + username + "&password=" + userpass + "&infotype=" + infotype + "&bezeichnung=" + bezeichnung; 
                   f1        = open( fullpath,"_blank","menubars=no,location=no,toolbars=no,scrollbars=no,"+"width="+width+",height="+height+",screenX="+l+",screenY="+t+",left=" +l+",top="+t);
 
                   break;


             case 'online_user_liste' :



                   var width  = 250;
                   var height = 500;

                   var l = ( screen.availWidth - width) / 2;
                   var t = ((screen.availHeight - height) / 2) + 0;



                   fullpath  = cgi_fullserverpath () + "/chat/chat.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=online_user_liste&submode=submode&name=" + username + "&password=" + userpass + "&infotype=" + infotype + "&bezeichnung=" + bezeichnung; 
                   f1        = open( fullpath,"_blank","menubars=no,location=no,toolbars=no,scrollbars=no,"+"width="+width+",height="+height+",screenX="+l+",screenY="+t+",left=" +l+",top="+t);
 
                   break;


             case 'default' :

                   fullpath  = cgi_fullserverpath () + "/chat/chat.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=enterchat&submode=submode&name=" + username + "&password=" + userpass + "&infotype=" + infotype + "&bezeichnung=" + bezeichnung; 
                   f1        = open( fullpath,"_blank","menubars=no,location=no,toolbars=no,scrollbars=no,"+"width="+width+",height="+height+",screenX="+l+",screenY="+t+",left=" +l+",top="+t);
 
                   break;


          } 




}






function cgi_access_abstimmung ( infotype, mode, external_umfragetext ){





// ----- Ueberlast-Sperre

         if ( cgi_ueberlast() == true ){
              return;
         }




// ----- fuer popups

         var breite=600;
         var hoehe=600;

         var width=breite;
         var height=hoehe;

         var l = (( screen.availWidth  - width  ) / 2) + 100;
         var t = (( screen.availHeight - height ) / 2) - 100;





// ----- forced login, if necessary 

         if ( top.document.getElementById("TopBody") ){

              if ( top.document.forms[0].UserLoginFlag.value == '0' ){
                   top.document.forms[0].Stack_00.value="javascript:cgi_access_abstimmung(\"" + infotype + "\",\"" + mode + "\",\"" + external_umfragetext + "\")";
                   cgi_access_user ("forcedlogin" );
                   return;
              }
         }





         umfragetext          =  external_umfragetext;




         stack_push ( 'abstimmung' );



         switch ( mode ){


             case 'getform' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/abstimmung/" + "abstimmung.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() +  "&mode=" + mode + "&infotype=" + infotype + "&umfragetext=" + umfragetext;
                   break;

             case 'getform_standalone' :

                   fullpath     = cgi_fullserverpath () + "/abstimmung/" + "abstimmung.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&infotype=" + infotype + "&mode=getform&submode=standalone&infotype=" + infotype + "&umfragetext=" + umfragetext;
                   f1 = open( fullpath,"_blank","menubars=no,location=no,toolbars=no,scrollbars=yes,"+"width="+breite+",height="+hoehe+",screenX="+l+",screenY="+t+",left=" +l+",top="+t);
                   break;

             case 'show' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/abstimmung/" + "abstimmung.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() +  "&mode=" + mode + "&infotype=" + infotype + "&umfragetext=" + umfragetext;
                   break;


             case 'show_standalone' :

                   fullpath     = cgi_fullserverpath () + "/abstimmung/" + "abstimmung.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&infotype=" + infotype + "&mode=show&submode=standalone&infotype=" + infotype + "&umfragetext=" + umfragetext;
                   f1 = open( fullpath,"_blank","menubars=no,location=no,toolbars=no,scrollbars=yes,"+"width="+breite+",height="+hoehe+",screenX="+l+",screenY="+t+",left=" +l+",top="+t);
                   break;


             default :

                   alert ( "unknown mode for cgi_access_abstimmung ()" );

          } 



}

















function cgi_access_group_messageboard ( fullgroupid, boardnr, mode, gruppentypname ){



         var boardname        = "Forumsname unbekannt";
         var infotype         = "501-" + fullgroupid;
         var OverviewText     = "&OverviewText=";  
         var WorkType001Text  = "&WorkType001Text=";  
         var SubmitForm01Text = "&SubmitForm01Text=Schritt 1 von 3 - Text eintragen :";  
         var Parameters       =  SubmitForm01Text + OverviewText;


// ----- test

         cgi_access_group ( fullgroupid, "member_add" );







         switch ( boardnr ){



// -  -  -   Selbsthilfegruppen - Allgemein


             case '0000' :  boardname        =  gruppentypname + " - Schwarzes Brett";
                            SubmitForm01Text = "&SubmitForm01Text=Schwarzes Brett<br><br>Bitte hinterlassen Sie hier alles, was die anderen Gruppenmitglieder interessieren könnte.";  
                            OverviewText     = ""; 
                            Parameters       =  SubmitForm01Text + OverviewText;
                            break;

             case '0001' :  boardname        =  gruppentypname + " - Mitglieder der Selbsthilfegruppe stellen sich vor";
                            SubmitForm01Text = "&SubmitForm01Text=Bitte stellen Sie sich kurz vor.";  
                            OverviewText     = "&OverviewText=<font size=1><b>Sie finden hier die neuen Mitglieder der Selbsthilfegruppe. Es wäre nett, wenn Sie sich dem neuen Mitglied selbst vortsellen würden.</b>"; 
                            Parameters       =  SubmitForm01Text + OverviewText;
                            break;

             case '0002' :  boardname        =  gruppentypname + " - Offenes Diskussionsforum";
                            SubmitForm01Text = "&SubmitForm01Text=Fragen, Antworten, Ideen - Ihr Beitrag interessiert uns alle";  
                            OverviewText     = "&OverviewText=<font size=1><b>Sie befinden sich im Bearbeitungsmodus</b></font><br><br>Übersicht über die Themen."; 
                            Parameters       =  SubmitForm01Text + OverviewText;
                            break;


// -  -  -   Krankheitsbezogene Boards der Selbsthilfegruppen


             case '1001' :  boardname        =  gruppentypname + " - Allgemeine Fragen";
                            SubmitForm01Text = "&SubmitForm01Text=<br>Bitte hinterlassen Sie hier alles, was die anderen Gruppenmitglieder interessieren könnte.";  
                            OverviewText     = ""; 
                            Parameters       =  SubmitForm01Text + OverviewText;
                            break;

             case '1002' :  boardname        =  gruppentypname + " - Behandlungsformen";
                            SubmitForm01Text = "&SubmitForm01Text=<br>Bitte hinterlassen Sie hier alles, was die anderen Gruppenmitglieder interessieren könnte.";  
                            OverviewText     = ""; 
                            Parameters       =  SubmitForm01Text + OverviewText;
                            break;

             case '1003' :  boardname        =  gruppentypname + " - Kliniken";
                            SubmitForm01Text = "&SubmitForm01Text=<br>Bitte hinterlassen Sie hier alles, was die anderen Gruppenmitglieder interessieren könnte.";  
                            OverviewText     = ""; 
                            Parameters       =  SubmitForm01Text + OverviewText;
                            break;

             case '1004' :  boardname        =  gruppentypname + " - Kuren und AHB";
                            SubmitForm01Text = "&SubmitForm01Text=<br>Bitte hinterlassen Sie hier alles, was die anderen Gruppenmitglieder interessieren könnte.";  
                            OverviewText     = ""; 
                            Parameters       =  SubmitForm01Text + OverviewText;
                            break;

             case '1005' :  boardname        =  gruppentypname + " - Fitness und Ernährung";
                            SubmitForm01Text = "&SubmitForm01Text=<br>Bitte hinterlassen Sie hier alles, was die anderen Gruppenmitglieder interessieren könnte.";  
                            OverviewText     = ""; 
                            Parameters       =  SubmitForm01Text + OverviewText;
                            break;


             default :

                   boardname = "Forumsname unbekannt";

          } 




         switch ( mode ){


             case 'submit' :

                   parent.portal_middle_embedded_01_frame.location.href = cgi_fullserverpath () + "/messageboard/" + "forum.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&infotype=" + infotype + "&mode=submit&submode=embedded&boardid="   + infotype + "-" + boardnr + "&boardname=" + boardname + OverviewText + Parameters;
                   break;
 
             case 'submit_in_this_document' :

                   document.portal_middle_embedded_01_frame.location.href = cgi_fullserverpath () + "/messageboard/" + "forum.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&infotype=" + infotype + "&mode=submit&submode=embedded&boardid="   + infotype + "-" + boardnr + "&boardname=" + boardname + OverviewText + Parameters;
                   break;


             case 'overview' :

                   parent.portal_middle_embedded_01_frame.location.href = cgi_fullserverpath () + "/messageboard/" + "forum.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&infotype=" + infotype + "&mode=overview&submode=embedded&boardid=" + infotype + "-" + boardnr + "&boardname=" + boardname + OverviewText + Parameters;
                   break;

             case 'work_overview' :


                   parent.portal_middle_embedded_01_frame.location.href = cgi_fullserverpath () + "/messageboard/" + "forum.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&infotype=" + infotype + "&mode=overview&submode=embedded&boardid=" + infotype + "-" + boardnr + "&boardname=" + boardname + OverviewText + Parameters;
                   break;

             case 'embedded_overview' :


                   parent.portal_middle_embedded_01_frame.location.href = cgi_fullserverpath () + "/messageboard/" + "forum.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&infotype=" + infotype + "&mode=overview&submode=embedded&boardid=" + infotype + "-" + boardnr + "&boardname=" + boardname + OverviewText + Parameters;
                   break;

             case 'embedded_overview' :

                   document.write ( "<br><br><center>Daten werden geladen - bitte einen Moment Geduld.</center>" );
                   parent.portal_middle_embedded_01_frame.location.href = cgi_fullserverpath () + "/messageboard/" + "forum.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&infotype=" + infotype + "&mode=overview&submode=embedded&boardid=" + infotype + "-" + boardnr + "&boardname=" + boardname + OverviewText + Parameters;

                   break;

             default :

                   parent.portal_middle_embedded_01_frame.location.href = cgi_fullserverpath () + "/messageboard/" + "forum.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&infotype=" + infotype + "&mode=submit&submode=embedded&boardid="   + infotype + "-" + boardnr + "&boardname=" + boardname + OverviewText + Parameters;

          } 



}



function cgi_access_gemeinschaft ( mode ){



         username = top.document.forms[0].UserName.value;
         userpass = top.document.forms[0].UserPassword.value;



// ----- forced login, if necessary 

         if ( top.document.forms[0].UserLoginFlag.value == '0' ){
              top.document.forms[0].Stack_00.value="javascript:cgi_access_gemeinschaft(\"" + mode + "\")";
              cgi_access_user ("forcedlogin" );
              return;
         }





// ----- modes -----

         switch ( mode ){


             case 'default' :
                       
                   top.portal_left_frame.location.href    = navigation_get_portal_root() + "/dyn/contents/data/504-0004.php?sid=" + cnst_sid() + "&release=" + cnst_release() + "&mode=undefined&username=" + username;
                   top.portal_middle_frame.location.href  = navigation_get_portal_root() + "/dyn/contents/data/504-0006.php?sid=" + cnst_sid() + "&release=" + cnst_release() + "&mode=undefined&username=" + username;
                   top.portal_right_frame.location.href   = navigation_get_portal_root() + "/dyn/contents/data/504-0005.php?sid=" + cnst_sid() + "&release=" + cnst_release() + "&mode=undefined&username=" + username;

                   break;
 

             default :

                  alert ( "unbekannter mode '" + mode + "' in  cgi_access_gemeinschaft( )" );
                  return;

          } 



}



function cgi_access_referenz ( referenz ){




         var refclass;       
         var refrest;       



// ----- debug 

//       alert ("debug 001 : cgi_access_referenz : " + referenz );


// ----- plausi 

         if ( referenz == "" ){

              alert ("stdlib : RefernzCode fehlt" );
              return;
         }



// ----- refclass 4-stellig feststellen


         refclass = referenz.substr(0,4);
         refrest  = referenz.substr(4,referenz.length);




         switch ( refclass ){


             case 'doc-' :

                   cgi_access_referenz_doc ( refrest );

                   break;
 

             case 'msg-' :
             case 'gma-' :

                   cgi_access_referenz_msg ( refrest );

                   break;

             case 'inf-' :

                   cgi_access_referenz_inf ( refrest );

                   break;
 
             case 'act-' :

                   cgi_access_referenz_act ( refrest );

                   break;
 
             case 'shg-' :

                   cgi_access_referenz_shg ( refrest );

                   break;
 

             case 'prj-' :

                   cgi_access_referenz_prj ( refrest );

                   break;
 

             default :

                  alert ( "unbekannter mode '" + mode + "' in  cgi_access_group( )" );
                  return;

          } 



}


function cgi_access_referenz_msg ( referenz ){




         var messageboard;       
         var messageboard_left;       
         var messageboard_right;       
         var messageno;       



// ----- debug 

//       alert ("debug 002 : cgi_access_referenz_msg : " + referenz );


// ----- plausi 

         if ( referenz == "" ){

              alert ("stdlib : Messageboard fehlt" );
              return;
         }




// ----- mode ---

         var mode = "unbekannt";


//       alert ("debug 11 : " + referenz);



         if ( referenz.indexOf("-antwort") == -1 ){
              mode = "showmsg";
         }
         else {
              referenz = referenz.replace( "-antwort", "");
              mode = "reply";

//            alert ("debug 222 : " + referenz);


         }



// ----- refclass feststellen

         var pos          = referenz.lastIndexOf("-");
         var messageno    = referenz.substr(pos+1,referenz.length);
         var messageboard = referenz.substr(0,pos);



// ----- plausi 

         if ( messageno == "" ){

              alert ("stdlib : Message Nummer fehlt" );
              return;
         }

         if ( messageboard == "" ){

              alert ("stdlib : Messageboard fehlt" );
              return;
         }


// ----- messageboard z.B. 501-1001 splitten ---

         pos                = messageboard.indexOf("-");
         messageboard_left  = messageboard.substr(0,3);
         messageboard_right = messageboard.substr(pos+1,messageboard.length);





// ----- Aufruf 

         switch ( messageboard_left ){

           case '501' : 
           case 'ZUV' : 

                 cgi_access_referenz_msg_e ( messageboard_right, mode, messageno );
                 break;

           default :

                alert ( "unbekannter messageboard typ :" + messageboard_left );


         }



}




function cgi_access_referenz_msg_e ( messageboard, mode, messageno ){



         messageboard_right = "";






// ----- spezialfall : email antwort auf 501-3800-erfahrungstausch


         if ( messageboard.indexOf("3800-") == -1 ){
         }
         else {

              messageboard_right = messageboard.replace( "3800-", "");
              messageboard_left  = messageboard.replace( "-" + messageboard_right, "");
              messageboard       = messageboard_left;

         }


// ----- spezialfall : email antwort auf 501-3801-freier-text-schwarzes-brett


         if ( messageboard.indexOf("3801-") == -1 ){
         }
         else {

              messageboard_right = messageboard.replace( "3801-", "");
              messageboard_left  = messageboard.replace( "-" + messageboard_right, "");
              messageboard       = messageboard_left;

         }


// ----- spezialfall : email antwort auf 501-3802-freier-text-schwarzes-brett


         if ( messageboard.indexOf("3802-") == -1 ){
         }
         else {

              messageboard_right = messageboard.replace( "3802-", "");
              messageboard_left  = messageboard.replace( "-" + messageboard_right, "");
              messageboard       = messageboard_left;

         }


// ----- spezialfall : alte Infoboxaufrufe nicht mehr unterstützt

         if ( messageboard.indexOf("8100-") == -1 ){
         }
         else {

              alert ( "Alter Infobox-Modus nicht mehr unterstützt" );
              return;
         }





// ----- forced login, if necessary : z.B. Postfach, SHGs

         if ( top.document.forms[0].UserLoginFlag.value == '0' && ( messageboard.indexOf("8100-") > -1  || messageboard.indexOf("2VUU-") > -1  ||  messageboard.indexOf("3802") > -1 )){

              top.document.forms[0].Stack_00.value="javascript:cgi_access_messageboard(\"" + messageboard + "\",\"" + mode + "\",\"" + messageno + "\")";
              cgi_access_user ("forcedlogin" );
              return;
         }

         else {

       // --- normaler Aufruf i.d.R. Messageboard aus Archiv : rechte Therapie-Leiste anzeigen

              top.portal_right_frame.location.href = navigation_get_portal_root() + '/dyn/contents/data/600-0007.php';

         }





// ----- Aufruf 

         cgi_access_messageboard ( messageboard, mode, messageno, messageboard_right );



}



function cgi_access_referenz_doc ( referenz ){



// ----- debug 

//       alert ("debug 004 : cgi_access_referenz_doc : " + referenz );


// ----- Aufruf 

         if ( referenz.indexOf(".php") == -1 ){

              doc_access('contents',referenz,'embedded');
         }
         else {
              doc_access('portal.php',referenz,'embedded');
         }


}


function cgi_access_referenz_inf ( referenz ){



// ----- debug 

//       alert ("debug 003 : cgi_access_referenz_inf : " + referenz );


// ----- Aufruf 

         doc_access('infopage.000', referenz );





}


function cgi_access_referenz_act ( referenz ){




         var messageboard;       
         var messageboard_left;       
         var messageboard_right;       
         var messageno;       



// ----- debug 

//       alert ("debug 004 : cgi_access_referenz_act : " + referenz );


// ----- plausi 

         if ( referenz == "" ){

              alert ("stdlib : Action fehlt" );
              return;
         }






// ----- Aufruf 

         switch ( referenz ){

           case 'adm-0001' :  // Neuanmeldung

                 if ( cookie_query    ( 'nodebug', 'username_existiert' )){
                      return;
                 }
                 else {
                      cgi_access_user('register');
                 }
                 return;
                 break;

           default :

                alert ( "unbekannte Aktion :" + referenz );


         }



}



function cgi_access_referenz_shg ( referenz ){



// ----- debug 

//       alert ("debug 005 : cgi_access_referenz_shg : " + referenz );


// ----- Aufruf 

         cgi_access_gruppen('gruppeninfo',referenz )
         


}




function cgi_access_referenz_prj ( referenz ){



// ----- debug 

//       alert ("debug 006 : cgi_access_referenz_prj : " + referenz );


// ----- Aufruf 

         cgi_access_projekte('projekteinfo',referenz )
         


}







function cgi_access_messageboard ( boardnr, mode, msgno, rawsubmode, rawsubsubmode ){



         var boardname        = "Forumsname unbekannt";
         var infotype         = "501";
         var OverviewText     = "&OverviewText=";  
         var WorkType001Text  = "&WorkType001Text=";  
         var SubmitForm01Text = "&SubmitForm01Text=Schritt 1 von 3 - Text eintragen :";  
         var Parameters       =  SubmitForm01Text + OverviewText;
         var submode          = "none";
         var berechtigungen   = "";




// ----- Ueberlast-Sperre

         if ( cgi_ueberlast() == true ){
              return;
         }



// ----- fuer popups

         var breite=600;
         var hoehe=600;

         var width=breite;
         var height=hoehe;

         var l = (( screen.availWidth  - width  ) / 2) + 100;
         var t = (( screen.availHeight - height ) / 2) - 100;





// ----- embedded actions

         if ( rawsubsubmode != 'submit_standalone'){


              berechtigungen  =  top.document.forms[0].Berechtigungen.value;

              if ( top.document.forms[0].UserLoginFlag.value == '0' && ( boardnr == '3700' ||  boardnr == '3802' )){

                   top.document.forms[0].Stack_00.value="javascript:cgi_access_messageboard(\"" + boardnr + "\",\"" + mode + "\",\"" + msgno + "\",\"" + rawsubmode + "\")";
                   cgi_access_user ("forcedlogin" );
                   return;
              }
              if ( top.document.forms[0].UserLoginFlag.value == '0' &&  mode == 'submit' ){


                   // beim Submit keine Stack-Belegung - sonst gibt es eine Submit-Endlos-Schleife

                   cgi_access_user ("forcedlogin" );
                   return;
              }


              // ----- Stack : Reset bei Infobox, Notizbuch und Diskussionsforum

              if ( mode == "overview" && ( boardnr == '0000'  || boardnr == '8100' || boardnr == '2VUU'  || boardnr == '8101' )){

                   top.document.forms[0].Stack_00.value = "#n/a";
                   top.document.forms[0].Stack_01.value = "#n/a";
              }


              // ----- Stack : Absprungpunkt merken

              if ( top.document.forms[0].Stack_00.value == "#n/a"  && top.document.forms[0].Stack_01.value == "#n/a"  && mode != "overview"  && mode != "submit_standalone" ){

                   stack_push ( 'messageboard' );
              }
         }







// ----- plausi 

         if ( rawsubmode == "" ){

              rawsubmode = "none";
         }


         switch ( rawsubmode ){


             case 'comeback_after_submit' :

                   submode = 'comeback_after_submit';

                   stack_push ( 'messageboard' );
                   break;


             default :

                   break;

          } 






// ----- Standalone Infos : indirekt ----------------------

         if ( top.document.getElementById("TopBody") ){

              username  = top.document.forms[0].UserName.value;
              useremail = top.document.forms[0].UserEmail.value;
         }
         else {
              username  = "";
              useremail = "";
              userpass  = "";

         }





         switch ( boardnr ){


// --------- Allgemein :  Diverse Boards 

             case '0000' :  boardname        = "Diskussionsforum";  
                            Parameters       = "&SubmitForm01Text=Bitte geben Sie hier Ihren Beitrag oder Ihre Frage ein.";  
                            break;

             case '0001' :  boardname        = "Gästebuch";  
                            Parameters       = "&SubmitForm01Text=Wie gefällt Ihnen das Forum ? Haben Sie eine Anregung ?<br>Wir freuen uns auf Ihren Kommentar !";  
                            break;

             case '0002' :  boardname        = "Pinnwand";
                            Parameters       = "&SubmitForm01Text=Wenn Sie einen Tip für Andere haben oder eine Info brauchen oder <br>einfach nur Kontakt zu jemandem suchen, der sich auskennt ... dann <br>sind Sie hier richtig ... bitte hinterlassen Sie hier Ihre Eintragung.";  
                            break;

             case '0003' :  boardname        = "Tausche/Verschenke";
                            Parameters       = "&SubmitForm01Text=Hier sind Sie richtig, wenn Sie etwas tauschen oder verschenken wollen. Bitte beschreiben Sie kurz, um was es geht.";  
                            break;

             case '0004' :  boardname        = "Verkaufe/Suche";
                            Parameters       = "&SubmitForm01Text=Hier sind Sie richtig, wenn Sie etwas verkaufen wollen oder etwas suchen. Bitte beschreiben Sie kurz, um was es geht.";  
                            break;

             case '0005' :  boardname        = "Obsolet - leer (war vorher: Visitenkarten)";
                            Parameters       = "&SubmitForm01Text=Bitte stellen Sie sich hier dem Forum durch Ihre Visitenkarte vor.";  
                            break;

             case '0006' :  boardname        = "Poesie Album";
                            SubmitForm01Text = "&SubmitForm01Text=Selbstgedichtetes oder Bewundertes vom Meister ? Hier ist der Platz für Ihr Lieblingsgedicht.";  
                            OverviewText     = "&OverviewText=Wisset nur, daß Dichterworte, um des Paradieses Pforte<br>Immer leise klopfend schweben, sich erbittend ewges Leben. Goethe "; 
                            Parameters       =  SubmitForm01Text + OverviewText;
                            break;







             case '0007' :  boardname        = "Treffpunkt Literatur";
                            Parameters       = "&SubmitForm01Text=Was sollte man gelesen haben ? Welches Buch empfehlen Sie den Anderen für die Insel ?";  
                            break;

             case '0008' :  boardname        = "Treffpunkt Musik";
                            Parameters       = "&SubmitForm01Text=Welches Schallplatte/CD  empfehlen Sie den Anderen für die Insel ?";  
                            break;

             case '0009' :  boardname        = "Lebensweisheit";
                            Parameters       = "&SubmitForm01Text=Hier können Sie Ihr Lebensmotto, eigene oder fremde Lebensweisheiten hinterlassen.";  
                            break;

             case '0010' :  boardname        = "Treffpunkt Film";
                            Parameters       = "&SubmitForm01Text=Welchen Film sollte man gesehen haben ? Und warum ?";  
                            break;

             case '0011' :  boardname        = "Humor aus dem Forum";
                            SubmitForm01Text = "&SubmitForm01Text=Hier können Sie Ihre Lieblingsanekdote oder Witz hinterlassen. Aber bitte : in keinster Weise anstössig oder beleidigend !";  
                            OverviewText     = "&OverviewText=Hier können Sie Ihre Lieblingsanekdote oder Witz hinterlassen."; 
                            Parameters       =  SubmitForm01Text + OverviewText;
                            break;

             case '0012' :  boardname        = "Allgemeine Fragen an das Forum";
                            Parameters       = "&SubmitForm01Text=Bitte stellen Sie hier Fragen, die ganz allgemein das Forum betreffen, wie kann ich mitarbeiten, was ist wenn ich etwas nicht verstehe, etc. Falls Sie eine spezielle Frage haben, wie z.B. Hilfsmittel nach AHB, etc. gehen Sie bitte in das entsprechende Frageforum.";  
                            break;

             case '0013' :  boardname        = "Hausmittel für die Gesundheit";
                            Parameters       = "&SubmitForm01Text=Auf welches Hausmittel schwören Sie ? Hier können Sie Ihren Tipp den anderen Forumsteilnehmern hinterlassen.";  
                            break;


             case '0014' :  boardname        = "Themen und Termine";
                            Parameters       = "&SubmitForm01Text=Bitte hier die Themen und Termine des Allgemeinen Chatrooms ( in umgekehrter Reihenfolge, So, Sa. Fr ,... ) eintragen.<br>Form : [Wochentag] [VonZeit] - [BisZeit] : [Thema]";  
                            break;


             case '0015' :  boardname        = "Tierbetreuung - Hilfe gesucht";
                            Parameters       = "&SubmitForm01Text=Wenn Sie jemanden suchen, der Ihr Tier zeitweise bzw. längerfristig betreut, tragen Sie sich bitte hier in folgender Form ein : [Bundesland/Land] [Gebiet/Grossstadt] [Ort] -  [Tier] -  [Datum/Zeitraum]  [Nähere Angaben]";  
                            break;

             case '0016' :  boardname        = "Tierbetreuung - Hilfe geboten";
                            Parameters       = "&SubmitForm01Text=Wenn Sie zeitweise bzw. längerfristig für jemanden ein Tier aufnehmen können, tragen Sie sich bitte hier in folgender Form ein : [Bundesland/Land] [Gebiet/Grossstadt] [Ort] -  [Tier] -  [evtl. nähere Angaben]";  
                            break;


             case '0017' :  boardname        = "Kontakt zu Betroffenen gesucht";
                            Parameters       = "&SubmitForm01Text=Wenn Sie zu jemanden Betroffenem Kontakt suchen, zum Erfahrungsaustausch etc. sind Sie hier richtig.";  
                            break;

             case '0018' :  boardname        = "Partnerschaft / Freundschaft";
                            Parameters       = "&SubmitForm01Text=Wenn Sie zu jemanden zwecks Partnerschaft oder Freundschaft Kontakt suchen, sind Sie hier richtig.";  
                            break;


             case '0019' :  boardname        = "Treffpunkt Basteln";
                            Parameters       = "&SubmitForm01Text=Welches Bastelhobby haben Sie - empfehlen Sie den Anderen Ihr Hobby - geben Sie Tipps.";  
                            break;


             case '0020' :  boardname        = "Reisen";
                            Parameters       = "&SubmitForm01Text=Welches Reiseziel können Sie empfehlen ? Oder haben Sie Frage ?";  
                            break;


             case '0021' :  boardname        = "Malerei";
                            Parameters       = "&SubmitForm01Text=Was sind Ihre Motive ? Welche Techniken wenden Sie an ? Was gefällt Ihnen besonders ?";  
                            break;


             case '1000' :  boardname        = "Sammelforum aller Selbsthilfegruppen";  
                            Parameters       = "&SubmitForm01Text=Bitte geben Sie hier Ihren Beitrag oder Ihre Frage ein.";  
                            break;


// --------- Allgemein : Administrative Boards 

             case '1001' :  boardname        = "Hilfe zur Systemnutzung";
                            Parameters       = "&SubmitForm01Text=Die Hilfetexte hier sollen helfen die Handhabung<br>des Forums besser zu verstehen.";  
                            break;

             case '1002' :  boardname        = "Das Neueste aus den Foren";
                            SubmitForm01Text = "&SubmitForm01Text=Hier finden Sie die neuesten Einträge aus allen Foren.";  
                            OverviewText     = "&OverviewText=<font size=1><center>Hier finden Sie über einen kurzen Zeitraum die neusten Einträge aus allen<br> Bereichen in der Reihenfolge der Eingänge.</center>"; 
                            Parameters       =  SubmitForm01Text + OverviewText;
                            break;

             case '1003' :  boardname        = "Systemnachrichten";
                            Parameters       = "&SubmitForm01Text=Hier finden Sie die neuesten Systemnachrichten.";  
                            break;

             case '1004' :  boardname        = "Mitarbeit im Forum";
                            SubmitForm01Text = "&SubmitForm01Text=Vielen Dank für Ihr Interesse. Das Forum braucht Ihre Mitarbeit.<br>Bitte tragen Sie Ihren Namen und Ihre EMail-Adresse ein.<br>Wir melden uns bei Ihnen.";  
                            OverviewText     = "&OverviewText=<font size=1><b>Sie befinden sich im Bearbeitungsmodus</b></font><br><br>Bitte bei <b>jedem</b> Interessenten folgendes prüfen : <br><br><b>[1]</b> für welchen Aufgabenbereich hat er Interesse<br><br><b>[2]</b> Den Interessenten dem Aufgabenbereich zuordnen<br><br><b>[3]</b> Mit dem Interessenten Kontakt aufnehmen und Ihn über seine künftige Aufgabe informieren.</b>"; 
                            Parameters       =  SubmitForm01Text + OverviewText;
                            break;

             case '1005' :  boardname        = "Frageforen - die noch fehlen";
                            Parameters       = "&SubmitForm01Text=Mitarbeit im Forum<br><br>Wenn Sie eine Frage oder Thema keinem der vorhandenen Foren zuordnen können, schlagen Sie bitte ein neues Frageforum vor.";  
                            break;

             case 'X-1006' :boardname        = "Gönner gesucht";
                            Parameters       = "&SubmitForm01Text=Da wir aus Prinzip auf Werbung verzichten ist unser Budget immer an der Schmerzgrenze. Ohne Spenden müssten wir das Forum morgen schliessen. Jeder soll dabei nach seinen Möglichkeiten beitragen, kleine Beträge, Sachspenden oder Mitgliedschaft im Förderkreis.";  
                            break;

             case '1007' :  boardname        = "Themenwünsche zu Dokumenten - die im Forum noch fehlen";
                            Parameters       = "&SubmitForm01Text=Wenn Sie gern ein Thema ausgearbeitet hätten, schlagen Sie das Thema hier vor. Die Projektgruppe Inhaltspflege wird Ihrem Vorschlag nachgehen.";  
                            break;

             case '1008' :  boardname        = "Freigabe von Postings an das Forum";
                            Parameters       = "&SubmitForm01Text=In diesem Bereich werden Postings an das Forum geprüft und ggf. weitergeleitet.";  
                            break;

             case '1009' :  boardname        = "Wiedervorlage von zurückgestellten Postings";
                            Parameters       = "&SubmitForm01Text=In diesem Bereich werden zurückgestellte Postings geprüft und ggf. wieder vorgelegt.";  
                            break;




             case '1107' :  boardname        = "Vorschlag für eine neue Umfrage - gestellt im öffentlich zugänglichen Portal des Forums";
                            SubmitForm01Text = "&SubmitForm01Text=Welche neue Umfrage interessiert Sie - Ihr Vorschlag bitte. Da es sich um einen Fragebogen zum Ankreuzen handelt, geben Sie bitte auch die Antworten vor. Beispiel : FRAGE : Sind Sie mit Ihrem künstlichen Gelenk zufieden ? ANTWORT 1 : ja ANTWORT 2 : nein.";  
                            OverviewText     = "&OverviewText=<font size=1><b>Sie befinden sich im Bearbeitungsmodus</b></font><br><br>Übersicht über die Umfrage-Vorschläge."; 
                            Parameters       =  SubmitForm01Text + OverviewText;
                            break;

// -  -  -   Projektbereich : Benutzerbetreuung

             case '1100' :  boardname        = "Schwarzes Brett : Projektbereich : Benutzerbetreuung";
                            SubmitForm01Text = "&SubmitForm01Text=Schwarzes Brett : Benutzerbetreuung<br><br>Bitte nur Aufgaben dieses Projektbereichs eintragen. Die Aufgaben müssen aktuell un lösbar sein. Keine Vorschläge für Aufgaben eintragen.";  
                            OverviewText     = "&OverviewText=<font size=1><b>Sie befinden sich im Bearbeitungsmodus</b></font><br><br>In diesem Bereich werden nur sachbezogene,lösbare Aufgaben gestellt. Bitte bei <b>jeder</b> Aufgabe folgendes prüfen : <br><br><b>[1]</b> Sind Sie angesprochen<br><br><b>[2]</b> Bitte soweit möglich - Aufgabe bearbeiten.<br><br><b>[3]</b> Erledigte Aufgaben als ERLEDIGT kennzeichnen.</b>"; 
                            Parameters       =  SubmitForm01Text + OverviewText;
                            break;

             case '1101' :  boardname        = "Teammitglieder Projektbereich : Benutzerbetreuung";
                            SubmitForm01Text = "&SubmitForm01Text=Bitte hier aktive Benutzerbetreuer eintragen und solche - die es werden wollen.";  
                            OverviewText     = "&OverviewText="; 
                            Parameters       =  SubmitForm01Text + OverviewText;
                            break;

             case '1102' :  boardname        = "ToDo-Liste : Projektbereich : Benutzerbetreuung";
                            SubmitForm01Text = "&SubmitForm01Text=ToDo-Liste : Projektbereich : Benutzerbetreuung<br><br>Bitte nur Aufgaben dieses Projektbereichs eintragen. Die Aufgaben müssen aktuell un lösbar sein. Keine Vorschläge für Aufgaben eintragen.";  
                            OverviewText     = "&OverviewText=<font size=1><b>Sie befinden sich im Bearbeitungsmodus</b></font><br><br>In diesem Bereich werden nur sachbezogene,lösbare Aufgaben gestellt. Bitte bei <b>jeder</b> Aufgabe folgendes prüfen : <br><br><b>[1]</b> Sind Sie angesprochen<br><br><b>[2]</b> Bitte soweit möglich - Aufgabe bearbeiten.<br><br><b>[3]</b> Erledigte Aufgaben als ERLEDIGT kennzeichnen.</b>"; 
                            Parameters       =  SubmitForm01Text + OverviewText;
                            break;

             case '1103' :  boardname        = "Aufgabenvorschlags-Liste : Projektbereich : Benutzerbetreuung";
                            SubmitForm01Text = "&SubmitForm01Text=Aufgabenvorschlags-Liste : Projektbereich : Benutzerbetreuung<br><br>Bitte tragen Sie hier Ihre Ideen zur Diskussion ein.";  
                            OverviewText     = "&OverviewText=<font size=1><b>Sie befinden sich im Bearbeitungsmodus</b></font><br><br>In diesem Bereich werden nur sachbezogene,lösbare Aufgaben gestellt. Bitte bei <b>jeder</b> Aufgabe folgendes prüfen : <br><br><b>[1]</b> Sind Sie angesprochen<br><br><b>[2]</b> Bitte soweit möglich - Aufgabe bearbeiten.<br><br><b>[3]</b> Erledigte Aufgaben als ERLEDIGT kennzeichnen.</b>"; 
                            Parameters       =  SubmitForm01Text + OverviewText;
                            break;



// -  -  -   Projektbereich : Systementwicklung

             case '1150' :  boardname        = "Schwarzes Brett : Projektbereich : Systementwicklung";
                            SubmitForm01Text = "&SubmitForm01Text=Schwarzes Brett : Systementwicklung<br><br>Hier gehört das her, was jeder sucht, was jeden interessiert.";  
                            OverviewText     = "&OverviewText="; 
                            Parameters       =  SubmitForm01Text + OverviewText;
                            break;

             case '1151' :  boardname        = "Teammitglieder Projektbereich : Systementwicklung";
                            SubmitForm01Text = "&SubmitForm01Text=Bitte hier aktive Benutzerbetreuer eintragen und solche - die es werden wollen.";  
                            OverviewText     = "&OverviewText="; 
                            Parameters       =  SubmitForm01Text + OverviewText;
                            break;

             case '1152' :  boardname        = "Aufgaben - Offen : Projektbereich : Systementwicklung";
                            SubmitForm01Text = "&SubmitForm01Text=Bitte nur Aufgaben dieses Projektbereichs eintragen. Die Aufgaben müssen aktuell und lösbar sein. Keine Vorschläge für Aufgaben eintragen.";  
                            OverviewText     = "&OverviewText=<font size=1><b>Sie befinden sich im Bearbeitungsmodus</b></font><br><br>In diesem Bereich werden nur sachbezogene,lösbare Aufgaben eingetragen."; 
                            Parameters       =  SubmitForm01Text + OverviewText;
                            break;

             case '1153' :  boardname        = "Aufgaben - Erledigt : Projektbereich : Systementwicklung";
                            SubmitForm01Text = "&SubmitForm01Text=Bitte nur erledigte Aufgaben dieses Projektbereichs aufnehmen.";  
                            OverviewText     = "&OverviewText=<font size=1><b>Sie befinden sich im Bearbeitungsmodus</b></font><br><br>In diesem Bereich werden nur sachbezogene,lösbare Aufgaben gestellt. Bitte bei <b>jeder</b> Aufgabe folgendes prüfen : <br><br><b>[1]</b> Sind Sie angesprochen<br><br><b>[2]</b> Bitte soweit möglich - Aufgabe bearbeiten.<br><br><b>[3]</b> Erledigte Aufgaben als ERLEDIGT kennzeichnen.</b>"; 
                            Parameters       =  SubmitForm01Text + OverviewText;
                            break;

             case '1154' :  boardname        = "Aufgaben - Vorschläge : Projektbereich : Systementwicklung";
                            SubmitForm01Text = "&SubmitForm01Text=Bitte tragen Sie hier Ihre Ideen und Vorschläge für neue Aufgaben dieses Bereichs zur Diskussion ein.";  
                            OverviewText     = "&OverviewText=<left><font size=1 ><b>Sie befinden sich im Bearbeitungsmodus</b></font><br><br>Bitte bei <b>jeder</b> Aufgabe folgendes prüfen : <br><br><b>[1]</b> Welche Priorität hat die Aufgabe<br><br><b>[2]</b> Wann sollte damit begonnen werden<br><br>"; 
                            Parameters       =  SubmitForm01Text + OverviewText;
                            break;

             case '1155' :  boardname        = "Test-Messageboard der Systementwicklung";
                            SubmitForm01Text = "&SubmitForm01Text=Test-Messageboard : Projektbereich : Systementwicklung.";  
                            OverviewText     = "&OverviewText=<font size=1><b>Messageboard nur für Testzwecke"; 
                            Parameters       =  SubmitForm01Text + OverviewText;
                            break;




// -  -  -   Projektbereich : Systementwicklung

             case '1160' :  boardname        = "Schwarzes Brett : Projektbereich : Webmaster";
                            SubmitForm01Text = "&SubmitForm01Text=Schwarzes Brett : Webmaster<br><br>Hier gehört das her, was jeder sucht, was jeden interessiert.";  
                            OverviewText     = "&OverviewText="; 
                            Parameters       =  SubmitForm01Text + OverviewText;
                            break;

             case '1161' :  boardname        = "Teammitglieder Projektbereich : Webmaster";
                            SubmitForm01Text = "&SubmitForm01Text=Bitte hier aktive Benutzerbetreuer eintragen und solche - die es werden wollen.";  
                            OverviewText     = "&OverviewText="; 
                            Parameters       =  SubmitForm01Text + OverviewText;
                            break;

             case '1162' :  boardname        = "Aufgaben - Offen : Projektbereich : Webmaster";
                            SubmitForm01Text = "&SubmitForm01Text=Bitte nur Aufgaben dieses Projektbereichs eintragen. Die Aufgaben müssen aktuell und lösbar sein. Keine Vorschläge für Aufgaben eintragen.";  
                            OverviewText     = "&OverviewText=<font size=1><b>Sie befinden sich im Bearbeitungsmodus</b></font><br><br>In diesem Bereich werden nur sachbezogene,lösbare Aufgaben eingetragen."; 
                            Parameters       =  SubmitForm01Text + OverviewText;
                            break;

             case '1163' :  boardname        = "Aufgaben - Erledigt : Projektbereich : Webmaster";
                            SubmitForm01Text = "&SubmitForm01Text=Bitte nur erledigte Aufgaben dieses Projektbereichs aufnehmen.";  
                            OverviewText     = "&OverviewText=<font size=1><b>Sie befinden sich im Bearbeitungsmodus</b></font><br><br>In diesem Bereich werden nur sachbezogene,lösbare Aufgaben gestellt. Bitte bei <b>jeder</b> Aufgabe folgendes prüfen : <br><br><b>[1]</b> Sind Sie angesprochen<br><br><b>[2]</b> Bitte soweit möglich - Aufgabe bearbeiten.<br><br><b>[3]</b> Erledigte Aufgaben als ERLEDIGT kennzeichnen.</b>"; 
                            Parameters       =  SubmitForm01Text + OverviewText;
                            break;

             case '1164' :  boardname        = "Aufgaben - Vorschläge : Projektbereich : Webmaster";
                            SubmitForm01Text = "&SubmitForm01Text=Bitte tragen Sie hier Ihre Ideen und Vorschläge für neue Aufgaben dieses Bereichs zur Diskussion ein.";  
                            OverviewText     = "&OverviewText=<left><font size=1 ><b>Sie befinden sich im Bearbeitungsmodus</b></font><br><br>Bitte bei <b>jeder</b> Aufgabe folgendes prüfen : <br><br><b>[1]</b> Welche Priorität hat die Aufgabe<br><br><b>[2]</b> Wann sollte damit begonnen werden<br><br>"; 
                            Parameters       =  SubmitForm01Text + OverviewText;
                            break;





// -  -  -   Projektbereich : Inhaltspflege

             case '1200' :  boardname        = "Schwarzes Brett : Projektbereich : Inhaltspflege";
                            SubmitForm01Text = "&SubmitForm01Text=Schwarzes Brett : Inhaltspflege<br><br>Bitte nur Aufgaben dieses Projektbereichs eintragen. Die Aufgaben müssen aktuell un lösbar sein. Keine Vorschläge für Aufgaben eintragen.";  
                            OverviewText     = "&OverviewText=<font size=1><b>Sie befinden sich im Bearbeitungsmodus</b></font><br><br>In diesem Bereich werden nur sachbezogene,lösbare Aufgaben gestellt. Bitte bei <b>jeder</b> Aufgabe folgendes prüfen : <br><br><b>[1]</b> Sind Sie angesprochen<br><br><b>[2]</b> Bitte soweit möglich - Aufgabe bearbeiten.<br><br><b>[3]</b> Erledigte Aufgaben als ERLEDIGT kennzeichnen.</b>"; 
                            Parameters       =  SubmitForm01Text + OverviewText;
                            break;

             case '1201' :  boardname        = "Teammitglieder Projektbereich : Inhaltspflege";
                            SubmitForm01Text = "&SubmitForm01Text=Bitte hier aktive Teammitglieder eintragen und solche - die es werden wollen.";  
                            OverviewText     = "&OverviewText="; 
                            Parameters       =  SubmitForm01Text + OverviewText;
                            break;

             case '1202' :  boardname        = "Aufgaben in Arbeit : Projektbereich : Inhaltspflege";
                            SubmitForm01Text = "&SubmitForm01Text=Aufgaben-in-Arbeit-Liste : Projektbereich : Inhaltspflege<br><br>Bitte nur Aufgaben dieses Projektbereichs eintragen. Die Aufgaben müssen aktuell un lösbar sein. Keine Vorschläge für Aufgaben eintragen.";  
                            OverviewText     = "&OverviewText=<font size=1><b>Sie befinden sich im Bearbeitungsmodus</b></font><br><br>In diesem Bereich werden nur sachbezogene,lösbare Aufgaben gestellt. Bitte bei <b>jeder</b> Aufgabe folgendes prüfen : <br><br><b>[1]</b> Sind Sie angesprochen<br><br><b>[2]</b> Bitte soweit möglich - Aufgabe bearbeiten.<br><br><b>[3]</b> Erledigte Aufgaben als ERLEDIGT kennzeichnen.</b>"; 
                            Parameters       =  SubmitForm01Text + OverviewText;
                            break;

             case '1203' :  boardname        = "Aufgabenvorschläge in der Diskussion : Projektbereich : Inhaltspflege";
                            SubmitForm01Text = "&SubmitForm01Text=Aufgabenvorschlags-Liste : Projektbereich : Inhaltspflege<br><br>Bitte tragen Sie hier Ihre Ideen zur Diskussion ein.";  
                            OverviewText     = "&OverviewText=<font size=1><b>Sie befinden sich im Bearbeitungsmodus</b></font><br><br>In diesem Bereich werden nur sachbezogene,lösbare Aufgaben gestellt. Bitte bei <b>jeder</b> Aufgabe folgendes prüfen : <br><br><b>[1]</b> Sind Sie angesprochen<br><br><b>[2]</b> Bitte soweit möglich - Aufgabe bearbeiten.<br><br><b>[3]</b> Erledigte Aufgaben als ERLEDIGT kennzeichnen.</b>"; 
                            Parameters       =  SubmitForm01Text + OverviewText;
                            break;


             case '1204' :  boardname        = "Recherche : Dokumentation und Archiv";
                            SubmitForm01Text = "&SubmitForm01Text=Recherche Dokumentation : Projektbereich : Inhaltspflege<br><br>Bitte dokumentieren Sie hier Informationsfundstellen:";  
                            OverviewText     = "&OverviewText=<font size=1>Die Inhalte diese Bereichs dienen lediglich als Archiv. Die Inhalte dürfen aus Urheberrechtsgründen NICHT im WWW veröffentlicht werden. Sie dienen nur als interne Arbeitsgrundlage und Infoquelle für die Forumsarbeit. Deshalb ist dieser Bereich nur Forumsmitarbeitern zugänglich.</font>"; 
                            Parameters       =  SubmitForm01Text + OverviewText;
                            break;



// --------- Allgemein :  Technikbezogene Boards 

             case '2001' :  boardname        = "Problemmeldung";
                            Parameters       = "&SubmitForm01Text=Bitte beschreiben Sie hier Probleme und Fehler.<br> Geben Sie so genau wie möglich wieder, <br>wo und wie Sie auf das Problem gestossen sind.";  
                            break;

             case '2002' :  boardname        = "Qualitätssicherung";
                            Parameters       = "&SubmitForm01Text=Bitte erfassen Sie hier inhaltliche oder sprachliche Mängel, unverlässliche Informationen <br>und andere Ungereimtheiten, die Ihnen aufgefallen sind.";  
                            break;

             case '2003' :  boardname        = "Verbesserungsvorschlag";
                            Parameters       = "&SubmitForm01Text=Sagen Sie uns, was wir verbessern sollten.<br>Wir sind gespannt auf Ihre Vorschläge und Kommentare.";  
                            break;

             case '2004' :  boardname        = "Regelverstoss bei Forumsbeitrag";
                            Parameters       = "&SubmitForm01Text=Bitte fühlen Sie sich <b>ausdrücklich ermutigt</b>, einen Beitrag, der gegen unsere Regeln verstösst oder den Sie als anstössig oder kritikwürdig empfinden, hier zu melden.";  
                            break;

             case '2005' :  boardname        = "Regelverstoss bei einem Dokument";
                            Parameters       = "&SubmitForm01Text=Bitte fühlen Sie sich <b>ausdrücklich ermutigt</b>, ein Dokument, das gegen unsere Regeln verstösst oder das Sie als anstössig oder kritikwürdig empfinden, hier zu melden.";  
                            break;

             case '2006' :  boardname        = "Regelverstoss im Chatroom";
                            Parameters       = "&SubmitForm01Text=Bitte nennen Sie Ross und Reiter, was stört Sie im Chatroom, was hat Sie geärgert, was lässt sich wie verbessern.";  
                            break;

             case '2007' :  boardname        = "Lob und Tadel";
                            Parameters       = "&SubmitForm01Text=Sagen Sie uns wie Ihnen das Forum gefällt. Geben Sie uns Tipps und Anregungen.";  
                            break;


// --------- Hauptforum :   Tipps Allgemeines

             case '3000' :  boardname        = "Tipps ganz allgemein zur Gesundheit";
                            Parameters       = "&SubmitForm01Text=Wenn Sie eine interessante Erfahrung gemacht haben oder einen Rat für Andere haben, bitte hinterlassen Sie diese Information hier.";  
                            break;

             case '3001' :  boardname        = "Tipps für das Krankenhaus";
                            Parameters       = "&SubmitForm01Text=Wenn Sie eine interessante Erfahrung gemacht haben oder einen Rat für Andere haben, bitte hinterlassen Sie diese Information hier.";  
                            break;

             case '3002' :  boardname        = "Tipps für die Kur";
                            Parameters       = "&SubmitForm01Text=Wenn Sie eine interessante Erfahrung gemacht haben oder einen Rat für Andere haben, bitte hinterlassen Sie diese Information hier.";  
                            break;

             case '3003' :  boardname        = "Tipps für die AHB";
                            Parameters       = "&SubmitForm01Text=Wenn Sie eine interessante Erfahrung gemacht haben oder einen Rat für Andere haben, bitte hinterlassen Sie diese Information hier.";  
                            break;

             case '3004' :  boardname        = "Tipps für Dies und Das";
                            Parameters       = "&SubmitForm01Text=Wenn Sie eine interessante Erfahrung gemacht haben oder einen Rat für Andere haben, bitte hinterlassen Sie diese Information hier.";  
                            break;

             case '3005' :  boardname        = "Tipps zum Versorgungsamt";
                            Parameters       = "&SubmitForm01Text=Wenn Sie eine interessante Erfahrung gemacht haben oder einen Rat für Andere haben, bitte hinterlassen Sie diese Information hier.";  
                            break;

             case '3006' :  boardname        = "Tipps zu Verbänden (z.B. VdK)";
                            Parameters       = "&SubmitForm01Text=Wenn Sie eine interessante Erfahrung gemacht haben oder einen Rat für Andere haben, bitte hinterlassen Sie diese Information hier.";  
                            break;

             case '3007' :  boardname        = "Tipps für Vergünstigungen bei Behinderungen";
                            Parameters       = "&SubmitForm01Text=Kennen Sie Preissnachlässe und Vergünstigungen für Behinderte. bitte hier eintragen. Sofern bekannt, den notwendigen Grad der Behinderung mit angeben.";  
                            break;

             case '3008' :  boardname        = "Tipps zu Fitness und Sport";
                            Parameters       = "&SubmitForm01Text=Wenn Sie eine interessante Erfahrung gemacht haben oder einen Rat für Andere haben, bitte hinterlassen Sie diese Information hier.";  
                            break;


// --------- Hauptforum :   Tipps Alltag

             case '3501' :  boardname        = "Hilfsmittel";
                            Parameters       = "&SubmitForm01Text=Wenn Sie eine interessante Erfahrung gemacht haben oder einen Rat für Andere haben, bitte hinterlassen Sie diese Information hier.";  
                            break;


// --------- Erfahrungsberichte - Dokumentation

             case '3700' :  boardname        = "Therapie - Kritik und Warnungen";
                            Parameters       = "&SubmitForm01Text=Dieser Bereich dient zur Dokumentation. Bitte verwendete Namen anonymisieren.";  
                            break;


             case '3701' :  boardname        = "Erfahrungsberichte : Komplikationen";
                            Parameters       = "&SubmitForm01Text=Dieser Bereich dient zur Dokumentation. Bitte verwendete Namen anonymisieren.";  
                            break;


             case '3702' :  boardname        = "Erfahrungsberichte : Allgemein";
                            Parameters       = "&SubmitForm01Text=Dieser Bereich dient zur Dokumentation. Bitte verwendete Namen anonymisieren.";  
                            break;


// --------- Freie Erfahrungs-Messageboards

             case '3800' :  boardname        = "Erfahrungsaustausch : " + rawsubmode;
                            Parameters       = "&SubmitForm01Text=Bitte geben Sie hier Ihre Erfahrungen zum Thema weiter ? Aber auch Fragen und sonstige Informationen.";  
                            boardnr          =  boardnr + '-' + rawsubmode;
                            break;


// --------- Frei zuordenbares Schwarzes Brett

             case '3801' :  boardname        = "Schwarzes Brett : " + rawsubmode;
                            Parameters       = "&SubmitForm01Text=Bitte hier Themen von allgemeinem Interesse, Ankündigungen und sonstige Informationen eingeben.";  
                            boardnr          =  boardnr + '-' + rawsubmode;
                            break;


// --------- Total frei zuordenbarer für Selbsthilfegruppen

             case '3802' :  boardname        =  rawsubmode;
                            Parameters       = "&SubmitForm01Text=Bitte hier Text eingeben.";  
                            boardnr          =  boardnr + '-' + rawsubmode;
                            break;


// --------- Hauptforum :   Tipps - Interne Verwaltung, Verbesserungsvorschläge, etc.

             case '3999' :  boardname        = "Verbesserungsvorschläge für den Forumsbereich - Tipps";
                            Parameters       = "&SubmitForm01Text=Hier können Sie einen Verbesserungsvorschlag zum Bereich Tipps hinterlassen, vielleicht ein Sie Thema hier nicht finden können und es zur Aufnahme vorschlagen wollen.";  
                            break;



// --------- Hauptforum :   Arthrose Info Center


             case '4001' :  boardname        = "Arthrose News Center";
                            Parameters       = "&SubmitForm01Text=Hier ist der Platz für neue Infos, Nachrichten, Recherchen, Publikationen zum Thema Arthrose Allgemein.";  
                            break;

             case '4002' :  boardname        = "Info gesucht - Recherche gewünscht";
                            Parameters       = "&SubmitForm01Text=Haben Sie spezielle Fragen oder Themenvorschläge ? Was sollen wir recherchieren ?";  
                            break;

             case '4003' :  boardname        = "Arthrose - Allgemeine Fragen";
                            Parameters       = "&SubmitForm01Text=Hier können Sie allgemeine Fragen zur Arthrose stellen.";  
                            break;



// --------- Archiv :       Allgemeine Verwaltung

             case '5001' :  boardname        = "Offene Themen für Ausarbeitungen";
                            OverviewText     = "&OverviewText=Jedes Forumsmitglied ist ausdrücklich aufgefordert, sich hier zu beteiligen. Bitte suchen Sie sich ein Thema aus, bei dem Sie Experte sind und das Sie selbst ausführlich erörten wollen. Fehlt Ihr Thema noch in der Liste - dann tragen Sie es bitte ein.<br>";  
                            SubmitForm01Text = "&SubmitForm01Text=Bitte hier Themen eintragen, die vertieft ausgearbeitet werden sollen.";  
                            Parameters       =  SubmitForm01Text + OverviewText;  
                            break;

             case '5002' :  boardname        = "Datenübertragung";
                            OverviewText     = "&OverviewText=Übersicht der Online heraufgeladenen Dateien";  
                            SubmitForm01Text = "&SubmitForm01Text=Bitte beschreiben Sie hier kurz den Inhalt der Datei.";  
                            Parameters       =  SubmitForm01Text + OverviewText;  
                            break;

             case '5003' :  boardname        = "Werbung - Promotion - PR - Aktionen";
                            OverviewText     = "&OverviewText=Übersicht über geplante oder durchgeführte Promotion-Aktionen : Suchmaschineneinträge, Werbeaktionen, Anschreiben";  
                            SubmitForm01Text = "&SubmitForm01Text=Bitte Art der Aktion, Planung, Durchführung etc. hier eingeben.";  
                            Parameters       =  SubmitForm01Text + OverviewText;  
                            break;

             case '5004' :  boardname        = "Benutzerbetreuung - Aktionen";
                            OverviewText     = "&OverviewText=Übersicht über geplante oder durchgeführte Benutzerbetreuung-Aktionen : Suchmaschineneinträge, Werbeaktionen, Anschreiben";  
                            SubmitForm01Text = "&SubmitForm01Text=Bitte Art der Aktion, Planung, Durchführung etc. hier eingeben.";  
                            Parameters       =  SubmitForm01Text + OverviewText;  
                            break;

             case '5100' :  boardname        = "Virtuelles Sekretariat - Posteingang";
                            OverviewText     = "&OverviewText=Übersicht über den Posteingang des Sekretariat";  
                            SubmitForm01Text = "&SubmitForm01Text=Bitte nennen Sie Ihr Anliegen - womit kann Ihnen das Sekretariat weiterhelfen.";  
                            Parameters       =  SubmitForm01Text + OverviewText;  
                            break;

             case '5101' :  boardname        = "Virtuelles Sekretariat - Beschwerden";
                            OverviewText     = "&OverviewText=Übersicht über den Beschwerde-Posteingang des Sekretariat";  
                            SubmitForm01Text = "&SubmitForm01Text=Bitte nennen Sie Ihr Anliegen - womit kann Ihnen das Sekretariat weiterhelfen.";  
                            Parameters       =  SubmitForm01Text + OverviewText;  
                            break;


// --------- Villa Sonnenschein

             case '6000' :  boardname        = "Sammelforum der Villa Sonnenschein";  
                            Parameters       = "&SubmitForm01Text=";  
                            break;



// -  -  -   Community


             case '2VUU' :  
             case '8100' :  boardname        = "Infobox von " + rawsubmode;
                            SubmitForm01Text = "&SubmitForm01Text=Bitte Info verfassen an " + rawsubmode + ".";  
                            OverviewText     = ""; 
                            Parameters       =  SubmitForm01Text + OverviewText;
                            boardnr          =  boardnr  + "-" + rawsubmode;
                            break;

             case '8101' :  boardname        = "Notizbuch von " + rawsubmode;
                            SubmitForm01Text = "&SubmitForm01Text=Notiz verfassen.";  
                            OverviewText     = ""; 
                            Parameters       =  SubmitForm01Text + OverviewText;
                            boardnr          =  boardnr  + "-" + rawsubmode;
                            break;

             case '8102' :  boardname        = "Diskussionsbeiträge von " + rawsubmode;
                            SubmitForm01Text = "&SubmitForm01Text=Notiz verfassen.";  
                            OverviewText     = ""; 
                            Parameters       =  SubmitForm01Text + OverviewText;
                            boardnr          =  boardnr  + "-" + rawsubmode;
                            break;



// --------- Selbsthilfegruppen 

             case 'g30-0000-610-0000-grp00000-1001' :  

                            boardname        = "Zehenarthrose - Fragen, Antworten, Erfahrungen";
                            Parameters       = "&SubmitForm01Text=Wenn Sie eine Frage haben oder wenn Sie eine interessante Erfahrung gemacht haben oder einen Rat für Andere haben, bitte hinterlassen Sie diese Information hier.";  
                            break;


             case 'g30-0000-620-0000-grp00000-1001' :  

                            boardname        = "Sprunggelenksarthrose - Fragen, Antworten, Erfahrungen";
                            Parameters       = "&SubmitForm01Text=Wenn Sie eine Frage haben oder wenn Sie eine interessante Erfahrung gemacht haben oder einen Rat für Andere haben, bitte hinterlassen Sie diese Information hier.";  
                            break;


             case 'g30-0000-630-0000-grp00000-1001' :  

                            boardname        = "Kniegelenksarthrose - Fragen, Antworten, Erfahrungen";
                            Parameters       = "&SubmitForm01Text=Wenn Sie eine Frage haben oder wenn Sie eine interessante Erfahrung gemacht haben oder einen Rat für Andere haben, bitte hinterlassen Sie diese Information hier.";  
                            break;


             case 'g30-0000-640-0000-grp00000-1001' :  

                            boardname        = "Hüftgelenksarthrose - Fragen, Antworten, Erfahrungen";
                            Parameters       = "&SubmitForm01Text=Wenn Sie eine Frage haben oder wenn Sie eine interessante Erfahrung gemacht haben oder einen Rat für Andere haben, bitte hinterlassen Sie diese Information hier.";  
                            break;


             case 'g30-0000-650-0000-grp00000-1001' :  

                            boardname        = "Kreuz-Darmbein-Arthrose - Fragen, Antworten, Erfahrungen";
                            Parameters       = "&SubmitForm01Text=Wenn Sie eine Frage haben oder wenn Sie eine interessante Erfahrung gemacht haben oder einen Rat für Andere haben, bitte hinterlassen Sie diese Information hier.";  
                            break;


             case 'g30-0000-660-0000-grp00000-1001' :  

                            boardname        = "Schultergelenksarthrose - Fragen, Antworten, Erfahrungen";
                            Parameters       = "&SubmitForm01Text=Wenn Sie eine Frage haben oder wenn Sie eine interessante Erfahrung gemacht haben oder einen Rat für Andere haben, bitte hinterlassen Sie diese Information hier.";  
                            break;


             case 'g30-0000-670-0000-grp00000-1001' :  

                            boardname        = "Ellenbogensarthrose - Fragen, Antworten, Erfahrungen";
                            Parameters       = "&SubmitForm01Text=Wenn Sie eine Frage haben oder wenn Sie eine interessante Erfahrung gemacht haben oder einen Rat für Andere haben, bitte hinterlassen Sie diese Information hier.";  
                            break;


             case 'g30-0000-680-0000-grp00000-1001' :  

                            boardname        = "Handgelenkssarthrose - Fragen, Antworten, Erfahrungen";
                            Parameters       = "&SubmitForm01Text=Wenn Sie eine Frage haben oder wenn Sie eine interessante Erfahrung gemacht haben oder einen Rat für Andere haben, bitte hinterlassen Sie diese Information hier.";  
                            break;


             case 'g30-0000-690-0000-grp00000-1001' :  

                            boardname        = "Fingergelenksarthrose - Fragen, Antworten, Erfahrungen";
                            Parameters       = "&SubmitForm01Text=Wenn Sie eine Frage haben oder wenn Sie eine interessante Erfahrung gemacht haben oder einen Rat für Andere haben, bitte hinterlassen Sie diese Information hier.";  
                            break;


             case 'g30-0000-700-0000-grp00000-1001' :  

                            boardname        = "Kiefergelenksarthrose - Fragen, Antworten, Erfahrungen";
                            Parameters       = "&SubmitForm01Text=Wenn Sie eine Frage haben oder wenn Sie eine interessante Erfahrung gemacht haben oder einen Rat für Andere haben, bitte hinterlassen Sie diese Information hier.";  
                            break;


             case 'g30-0000-710-0000-grp00000-1001' :  

                            boardname        = "Wirbelsäulenarthrose - Fragen, Antworten, Erfahrungen";
                            Parameters       = "&SubmitForm01Text=Wenn Sie eine Frage haben oder wenn Sie eine interessante Erfahrung gemacht haben oder einen Rat für Andere haben, bitte hinterlassen Sie diese Information hier.";  
                            break;


             case 'g30-0000-720-0000-grp00000-1001' :  

                            boardname        = "Polyarthrose - Fragen, Antworten, Erfahrungen";
                            Parameters       = "&SubmitForm01Text=Wenn Sie eine Frage haben oder wenn Sie eine interessante Erfahrung gemacht haben oder einen Rat für Andere haben, bitte hinterlassen Sie diese Information hier.";  
                            break;


             case 'g30-0000-730-0000-grp00000-1001' :  

                            boardname        = "Sonstige Arthrosen - Fragen, Antworten, Erfahrungen";
                            Parameters       = "&SubmitForm01Text=Wenn Sie eine Frage haben oder wenn Sie eine interessante Erfahrung gemacht haben oder einen Rat für Andere haben, bitte hinterlassen Sie diese Information hier.";  
                            break;

             default :

                   boardname = "Forumsname unbekannt";

          } 







         switch ( mode ){


             case 'showmsg' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/messageboard/" + "forum.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&infotype=" + infotype + "&mode=showmsg&msgno=" + msgno + "&boardid="   + infotype + "-" + boardnr + "&boardname=" + boardname + OverviewText + Parameters;
                   break;

             case 'showmsg_standalone' :

                   fullpath                              = cgi_fullserverpath () + "/messageboard/" + "forum.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&infotype=" + infotype + "&mode=showmsg&subsubmode=standalone&msgno=" + msgno + "&boardid="   + infotype + "-" + boardnr + "&boardname=" + boardname + OverviewText + Parameters;
                   f1 = open( fullpath,"_blank","menubars=no,location=no,toolbars=no,scrollbars=yes,"+"width="+breite+",height="+hoehe+",screenX="+l+",screenY="+t+",left=" +l+",top="+t);

                   break;

             case 'reply' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/messageboard/" + "forum.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&infotype=" + infotype + "&mode=reply&msgno=" + msgno + "&boardid="   + infotype + "-" + boardnr + "&boardname=" + boardname + OverviewText + Parameters;
                   break;

             case 'submit' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/messageboard/" + "forum.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&infotype=" + infotype + "&mode=submit&submode=" + submode + "&boardid="   + infotype + "-" + boardnr + "&boardname=" + boardname + OverviewText + Parameters;
                   break;

             case 'submit_standalone' :

                   fullpath                              = cgi_fullserverpath () + "/messageboard/" + "forum.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&infotype=" + infotype + "&mode=submit&submode=" + submode + "&boardid="   + infotype + "-" + boardnr + "&boardname=" + boardname + "&subsubmode=standalone&berechtigungen=" + berechtigungen + OverviewText + Parameters + "&username=" + username + "&useremail=" + useremail;
                   f1 = open( fullpath,"_blank","menubars=no,location=no,toolbars=no,scrollbars=yes,"+"width="+breite+",height="+hoehe+",screenX="+l+",screenY="+t+",left=" +l+",top="+t);
                   break;

             case 'overview' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/messageboard/" + "forum.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&infotype=" + infotype + "&mode=overview&boardid=" + infotype + "-" + boardnr + "&boardname=" + boardname + OverviewText + Parameters;
                   break;

             case 'overview_standalone' :

                   fullpath                              = cgi_fullserverpath () + "/messageboard/" + "forum.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&infotype=" + infotype + "&mode=overview&boardid=" + infotype + "-" + boardnr + "&boardname=" + boardname + "&subsubmode=standalone&berechtigungen=" + berechtigungen + OverviewText + Parameters;
                   f1 = open( fullpath,"_blank" );
                   break;

             case 'work_overview' :


                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/messageboard/" + "forum.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&infotype=" + infotype + "&mode=overview&boardid=" + infotype + "-" + boardnr + "&boardname=" + boardname + OverviewText + Parameters;
                   break;

             case 'embedded_overview' :

                   document.write ( "<br><br><center>Daten werden geladen - bitte einen Moment Geduld.</center>" );
                   top.portal_middle_frame.portal_middle_sub00_frame.location.href = cgi_fullserverpath () + "/messageboard/" + "forum.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&infotype=" + infotype + "&mode=overview&submode=embedded&boardid=" + infotype + "-" + boardnr + "&boardname=" + boardname + OverviewText + Parameters;
                   break;

             default :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/messageboard/" + "forum.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&infotype=" + infotype + "&mode=submit&boardid="   + infotype + "-" + boardnr + "&boardname=" + boardname + OverviewText + Parameters;

          } 



}





function cgi_mail ( infotype, mode, call_infotypename, call_infotypesubject, call_infotypebody ){



         var infotypename     = "#n/a";
         var SubmitForm01Text = "&SubmitForm01Text=Bitte die Felder ausfüllen :";  


         switch ( infotype ){


// --------- Allgemeine Email Infotypen 

             case '503-0001' :  infotypename     = "Empfehlung";  
                                SubmitForm01Text = "&SubmitForm01Text=Das Forum befindet sich am Rande des Internet, ohne Werbung und nur wenigen Links von anderen Sites. Deshalb sind wird dringend auf Mund-zu-Mund Propaganda angewiesen. Bitte empfehlen Sie das Forum Freunden, Verwandten und Bekannten weiter. Danke schön.";  
                                Parameters       =  SubmitForm01Text;  
                                break;

             case '503-0002' :  infotypename     = "Genesungswünsche versenden";  
                                SubmitForm01Text = "&SubmitForm01Text=Übermitteln Sie elektronisch Ihre Genesungswünsche.";  
                                Parameters       =  SubmitForm01Text;  
                                break;


// --------- per Aufruf mitgelieferte Textbausteine 

             case '503-1001' :  infotypename     =  call_infotypename;  
                                infotypesubject  = "&infotypesubject=" + call_infotypesubject;  
                                infotypebody     = "&infotypebody="    + call_infotypebody;  
                                SubmitForm01Text = "&SubmitForm01Text=Das Forum befindet sich am Rande des Internet, ohne Werbung und nur wenigen Links von anderen Sites. Deshalb sind wird dringend auf Mund-zu-Mund Propaganda angewiesen. Bitte empfehlen Sie das Forum Freunden, Verwandten und Bekannten weiter. Danke schön.";  
                                Parameters       =  SubmitForm01Text + infotypesubject + infotypebody;  
                                break;

             case '503-1002' :  infotypename     = "EMail Textbausteine";  
                                infosubtype      = "&infosubtype=" + call_infotypename;  
                                SubmitForm01Text = "&SubmitForm01Text=";  
                                Parameters       =  SubmitForm01Text + infosubtype;  
                                break;


// --------- Fehler


             default :

                   infotypename = "Email Infotyp unbekannt";

          } 





// --------- Mode



         switch ( mode ){


             case 'getform' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/mail/" + "mail.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&infotype=" + infotype + "&mode=getform&infotypename=" + infotypename + Parameters;
                   break;


             case 'sendform' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/mail/" + "mail.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&infotype=" + infotype + "&mode=getform&infotypename=" + infotypename + Parameters;
                   break;


             default :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/mail/" + "mail.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&infotype=" + infotype + "&mode=getform&infotypename=" + infotypename + Parameters;

          } 



}


function cgi_access_user ( mode, auxdata, auxauxdata  ){


         username = top.document.forms[0].UserName.value;
         userpass = top.document.forms[0].UserPassword.value;


//       alert ( "debug 001 : " + cnst_sid() );




// ----- Ueberlast-Sperre

         if ( cgi_ueberlast() == true ){
              return;
         }





// ----- Server Crash

//
//       if ( mode == 'register'     || 
//            mode == 'login'        ||
//            mode == 'forcedlogin'  ){
//
//            check =  prompt("Aufgrund von wiederholten Systemausfällen wegen Überlastung des Forum-Servers ist Moment diese Funktion nicht unterstützt. Bitte [OK] anklicken.","");
//
//            if ( check != "orthopäde" && check != "Orthopäde" && check != "ORTHOPÄDE"  ){
//                 return;
//            }
//       }
//




         switch ( mode ){

             case 'register' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/user/user2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=register"; 
                   break;

             case 'login' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/user/user2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=login&submode=login-only-with-acknowledgement&name=" + username + "&password=" + userpass; 
                   break;

             case 'forcedlogin' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/user/user.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=forcedlogin";
                   break;

             case 'explicitlogin' :

                   top.document.forms[0].Stack_00.value="auto_reference_to_team";
                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/user/user.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=forcedlogin&subsubmode=autorefer_to_projektgruppe";
                   break;

             case 'changeuserinfo' :


                   // ----- forced login, if necessary 

                            if ( top.document.forms[0].UserLoginFlag.value == '0' ){

                                 top.document.forms[0].Stack_00.value="javascript:cgi_access_user(\"" + mode + "\",\"" + auxdata + "\")";
                                 cgi_access_user ("forcedlogin" );
                                 return;
                            }



                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/user/user2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=changeuserinfo&name=" + username + "&password=" + userpass; 
                   break;



             case 'changeforeignuserinfo' :


                   // ----- forced login, if necessary 

                            if ( top.document.forms[0].UserLoginFlag.value == '0' ){

                                 top.document.forms[0].Stack_00.value="javascript:cgi_access_user(\"" + mode + "\",\"" + auxdata + "\")";
                                 cgi_access_user ("forcedlogin" );
                                 return;
                            }



                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/user/user2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=changeuserinfo&submode=changeforeignuserinfo&name=" + auxdata + "&password=changeforeignuserinfo"; 
                   break;


             case 'changeforeignuseradmin' :


                   // ----- forced login, if necessary 

                            if ( top.document.forms[0].UserLoginFlag.value == '0' ){

                                 top.document.forms[0].Stack_00.value="javascript:cgi_access_user(\"" + mode + "\",\"" + auxdata + "\")";
                                 cgi_access_user ("forcedlogin" );
                                 return;
                            }



                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/user/useradmin.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=fcd_aendern_einstieg&DATEI_USERADMIN_feld_000=" + auxdata;
                   break;



             case 'fcd_uebersicht' :


                   // ----- forced login, if necessary 

                            if ( top.document.forms[0].UserLoginFlag.value == '0' ){

                                 top.document.forms[0].Stack_00.value="javascript:cgi_access_user(\"" + mode + "\",\"" + auxdata + "\")";
                                 cgi_access_user ("forcedlogin" );
                                 return;
                            }



                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/user/useradmin.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=fcd_uebersicht";
                   break;



             case 'benutzer_loeschen' :



                   // ----- Löschbestätigung

                   check = confirm ("A C H T U N G !\r\rBenutzer > " + auxdata + " < wirklich löschen ?\r\r" );

                   if ( check == false){
                        return;
                   }



                   // ----- forced login, if necessary 

                            if ( top.document.forms[0].UserLoginFlag.value == '0' ){

                                 top.document.forms[0].Stack_00.value="javascript:cgi_access_user(\"" + mode + "\",\"" + auxdata + "\")";
                                 cgi_access_user ("forcedlogin" );
                                 return;
                            }



                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/user/user2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=benutzer_loeschen&submode=changeforeignuserinfo&name=" + auxdata + "&password=changeforeignuserinfo"; 
                   break;




             case 'options_html' :


                   // ----- forced login, if necessary 

                            if ( top.document.forms[0].UserLoginFlag.value == '0' ){

                                 top.document.forms[0].Stack_00.value="javascript:cgi_access_user(\"" + mode + "\",\"" + auxdata + "\")";
                                 cgi_access_user ("forcedlogin" );
                                 return;
                            }



                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/user/user2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=options_html&name=" + username + "&password=" + userpass; 
                   break;



             case 'userinfo' :



                   // ----- forced login, if necessary 

                            if ( top.document.forms[0].UserLoginFlag.value == '0' && auxdata != 'DIANA' ){

                                 top.document.forms[0].Stack_00.value="javascript:cgi_access_user(\"" + mode + "\",\"" + auxdata + "\")";
                                 cgi_access_user ("forcedlogin" );
                                 return;
                            }



                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/user/user2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=userinfo&infoabout=" + auxdata; 
                   break;

             case 'useradmin' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/user/user2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=fcd_anzeigen&DATEI_USERADMIN_feld_000=" + auxdata; 
                   break;

             case 'stillalive' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/user/user.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=stillalive&name=" + username;
                   break;

             case 'loginlist' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/user/user.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=loginlist";
                   break;

             case 'list_user_all' :
             case 'list_user_infobox' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/user/user2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=" + mode;
                   break;

             case 'list_user_gemeinschaft' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/user/user2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=list_user_gemeinschaft";
                   break;

             case 'mitgliedersuche' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/user/user2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=mitgliedersuche";
                   break;

             case 'mitgliedersuche_detail' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/user/user2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=mitgliedersuche_detail";
                   break;

             case 'mitgliedersuche_durchfuehren' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/user/user2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=mitgliedersuche_durchfuehren&suchbegriff=" + auxdata;
                   break;

             case 'kontaktliste_eintragen' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/user/user2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=kontaktliste_eintragen&name=" + auxdata + "&listenfarbe=" + auxauxdata; 
                   break;


             case 'kontaktliste_anzeigen' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/user/user2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=kontaktliste_anzeigen&name=" + auxdata + "&listenfarbe=" + auxauxdata; 
                   break;


             case 'kontaktliste_austragen' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/user/user2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=kontaktliste_austragen&name=" + auxdata + "&listenfarbe=" + auxauxdata; 
                   break;






             default :

                  alert ( "unbekannter mode '" + mode + "' in  cgi_access_user( )" );
                  return;
          } 



}



function cgiAccessUser ( mode, auxdata  ){    // Sonderfunktion für Messageboard ohne  _  im Namen

         cgi_access_user ( mode, auxdata  );

}





function cgi_access_gruppen ( mode, auxdata, auxauxdata  ){


         username = top.document.forms[0].UserName.value;
         userpass = top.document.forms[0].UserPassword.value;



         switch ( mode ){

             case 'gruppeninfo' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/gruppen/gruppen2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=gruppeninfo&infoabout=" + auxdata; 
                   break;

             case 'gruppeninfo_alles' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/gruppen/gruppen2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=gruppeninfo_alles&infoabout=" + auxdata; 
                   break;


             case 'register' :


                   // ----- forced login, if necessary 

                            if ( top.document.forms[0].UserLoginFlag.value == '0' ){

                                 top.document.forms[0].Stack_00.value="javascript:cgi_access_gruppen(\"" + mode + "\",\"" + auxdata + "\")";
                                 cgi_access_user ("forcedlogin" );
                                 return;
                            }


                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/gruppen/gruppen2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=register"; 
                   break;


             case 'gruppe_austreten' :


                   // ----- forced login, if necessary 

                            if ( top.document.forms[0].UserLoginFlag.value == '0' ){

                                 top.document.forms[0].Stack_00.value="javascript:cgi_access_gruppen(\"" + mode + "\",\"" + auxdata + "\")";
                                 cgi_access_user ("forcedlogin" );
                                 return;
                            }


                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/gruppen/gruppen2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=gruppe_austreten&name=" + auxdata + "&username=" + username + "&submode=" + auxauxdata; 
                   break;


             case 'gruppe_beitreten' :


                   // ----- forced login, if necessary 

                            if ( top.document.forms[0].UserLoginFlag.value == '0' ){

                                 top.document.forms[0].Stack_00.value="javascript:cgi_access_gruppen(\"" + mode + "\",\"" + auxdata + "\")";
                                 cgi_access_user ("forcedlogin" );
                                 return;
                            }


                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/gruppen/gruppen2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=gruppe_beitreten&name=" + auxdata + "&username=" + username + "&submode=" + auxauxdata; 
                   break;


             case 'gruppe_mail' :


                   // ----- forced login, if necessary 

                            if ( top.document.forms[0].UserLoginFlag.value == '0' ){

                                 top.document.forms[0].Stack_00.value="javascript:cgi_access_gruppen(\"" + mode + "\",\"" + auxdata + "\")";
                                 cgi_access_user ("forcedlogin" );
                                 return;
                            }


                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/gruppen/gruppen2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=gruppe_mail&name=" + auxdata + "&username=" + username + "&submode=" + auxauxdata; 
                   break;


             case 'gruppe_login' :


                   // ----- forced login, if necessary 

                            if ( top.document.forms[0].UserLoginFlag.value == '0' ){

                                 top.document.forms[0].Stack_00.value="javascript:cgi_access_gruppen(\"" + mode + "\",\"" + auxdata + "\")";
                                 cgi_access_user ("forcedlogin" );
                                 return;
                            }


                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/gruppen/gruppen2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=gruppe_login&infoabout=" + auxdata + "&username=" + username; 
                   break;



             case 'schwarzes_brett_eintragen' :


                   // ----- forced login, if necessary 

                            if ( top.document.forms[0].UserLoginFlag.value == '0' ){

                                 top.document.forms[0].Stack_00.value="javascript:cgi_access_gruppen(\"" + mode + "\",\"" + auxdata + "\")";
                                 cgi_access_user ("forcedlogin" );
                                 return;
                            }


                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/gruppen/gruppen2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=schwarzes_brett_eintragen&name=" + auxdata + "&username=" + username; 
                   break;




             case 'login' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/gruppen/gruppen2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=login&submode=login-only-with-acknowledgement&name=" + username + "&password=" + userpass; 
                   break;

             case 'forcedlogin' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/gruppen/gruppen.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=forcedlogin";
                   break;

             case 'explicitlogin' :

                   top.document.forms[0].Stack_00.value="auto_reference_to_team";
                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/gruppen/gruppen.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=forcedlogin&subsubmode=autorefer_to_projektgruppe";
                   break;

             case 'changegruppeninfo' :


                   // ----- forced login, if necessary 

                            if ( top.document.forms[0].UserLoginFlag.value == '0' ){

                                 top.document.forms[0].Stack_00.value="javascript:cgi_access_gruppen(\"" + mode + "\",\"" + auxdata + "\")";
                                 cgi_access_gruppen ("forcedlogin" );
                                 return;
                            }



                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/gruppen/gruppen2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=changegruppeninfo&name=" + username + "&password=" + userpass; 
                   break;



             case 'changeforeigngruppeninfo' :


                   // ----- forced login, if necessary 

                            if ( top.document.forms[0].UserLoginFlag.value == '0' ){

                                 top.document.forms[0].Stack_00.value="javascript:cgi_access_gruppen(\"" + mode + "\",\"" + auxdata + "\")";
                                 cgi_access_gruppen ("forcedlogin" );
                                 return;
                            }



                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/gruppen/gruppen2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=changegruppeninfo&submode=changeforeigngruppeninfo&name=" + auxdata + "&password=changeforeigngruppeninfo"; 
                   break;


             case 'changeforeigngruppenadmin' :


                   // ----- forced login, if necessary 

                            if ( top.document.forms[0].UserLoginFlag.value == '0' ){

                                 top.document.forms[0].Stack_00.value="javascript:cgi_access_gruppen(\"" + mode + "\",\"" + auxdata + "\")";
                                 cgi_access_gruppen ("forcedlogin" );
                                 return;
                            }



                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/gruppen/gruppen2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=fcd_aendern_einstieg&DATEI_USERADMIN_feld_000=" + auxdata;
                   break;



             case 'gruppe_loeschen' :



                   // ----- Löschbestätigung

                   check = confirm ("A C H T U N G !\r\rSelbsthilfegruppe > " + auxdata + " < wirklich löschen ?\r\r" );

                   if ( check == false){
                        return;
                   }



                   // ----- forced login, if necessary 

                            if ( top.document.forms[0].UserLoginFlag.value == '0' ){

                                 top.document.forms[0].Stack_00.value="javascript:cgi_access_gruppen(\"" + mode + "\",\"" + auxdata + "\")";
                                 cgi_access_gruppen ("forcedlogin" );
                                 return;
                            }



                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/gruppen/gruppen2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=gruppe_loeschen&submode=changeforeigngruppeninfo&name=" + auxdata + "&password=changeforeigngruppeninfo"; 
                   break;




             case 'options_html' :


                   // ----- forced login, if necessary 

                            if ( top.document.forms[0].UserLoginFlag.value == '0' ){

                                 top.document.forms[0].Stack_00.value="javascript:cgi_access_gruppen(\"" + mode + "\",\"" + auxdata + "\")";
                                 cgi_access_gruppen ("forcedlogin" );
                                 return;
                            }



                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/gruppen/gruppen2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=options_html&name=" + username + "&password=" + userpass; 
                   break;



             case 'gruppenadmin' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/gruppen/gruppen2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=fcd_anzeigen&DATEI_USERADMIN_feld_000=" + auxdata; 
                   break;

             case 'stillalive' :
             case 'loginlist' :
             case 'list_gruppen_all' :
             case 'list_gruppen_infobox' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/gruppen/gruppen2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=" + mode;
                   break;

             case 'list_gruppen_gemeinschaft' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/gruppen/gruppen2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=list_gruppen_gemeinschaft&username=" + username;
                   break;

             case 'list_gruppen_gemeinschaft_details' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/gruppen/gruppen2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=list_gruppen_gemeinschaft_details&submode=" + auxdata;
                   break;


             case 'list_gruppen_termine' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/gruppen/gruppen2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=list_gruppen_termine&submode=" + auxdata;
                   break;


             case 'mitgliedersuche' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/gruppen/gruppen2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=mitgliedersuche";
                   break;

             case 'mitgliedersuche_detail' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/gruppen/gruppen2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=mitgliedersuche_detail";
                   break;

             case 'mitgliedersuche_durchfuehren' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/gruppen/gruppen2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=mitgliedersuche_durchfuehren&suchbegriff=" + auxdata;
                   break;

             case 'kontaktliste_eintragen' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/gruppen/gruppen2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=kontaktliste_eintragen&name=" + auxdata + "&listenfarbe=" + auxauxdata; 
                   break;


             case 'kontaktliste_anzeigen' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/gruppen/gruppen2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=kontaktliste_anzeigen&name=" + auxdata + "&listenfarbe=" + auxauxdata; 
                   break;


             case 'kontaktliste_austragen' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/gruppen/gruppen2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=kontaktliste_austragen&name=" + auxdata + "&listenfarbe=" + auxauxdata; 
                   break;






             default :

                  alert ( "unbekannter mode '" + mode + "' in  cgi_access_gruppen( )" );
                  return;
          } 



}









function cgi_access_projekte ( mode, auxdata, auxauxdata  ){


         username = top.document.forms[0].UserName.value;
         userpass = top.document.forms[0].UserPassword.value;



         switch ( mode ){

             case 'projekteinfo' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/projekte/projekte2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=projekteinfo&infoabout=" + auxdata; 
                   break;

             case 'projekteinfo_alles' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/projekte/projekte2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=projekteinfo_alles&infoabout=" + auxdata; 
                   break;


             case 'register' :


                   // ----- forced login, if necessary 

                            if ( top.document.forms[0].UserLoginFlag.value == '0' ){

                                 top.document.forms[0].Stack_00.value="javascript:cgi_access_projekte(\"" + mode + "\",\"" + auxdata + "\")";
                                 cgi_access_user ("forcedlogin" );
                                 return;
                            }


                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/projekte/projekte2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=register"; 
                   break;


             case 'gruppe_austreten' :


                   // ----- forced login, if necessary 

                            if ( top.document.forms[0].UserLoginFlag.value == '0' ){

                                 top.document.forms[0].Stack_00.value="javascript:cgi_access_projekte(\"" + mode + "\",\"" + auxdata + "\")";
                                 cgi_access_user ("forcedlogin" );
                                 return;
                            }


                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/projekte/projekte2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=gruppe_austreten&name=" + auxdata + "&username=" + username + "&submode=" + auxauxdata; 
                   break;


             case 'gruppe_beitreten' :


                   // ----- forced login, if necessary 

                            if ( top.document.forms[0].UserLoginFlag.value == '0' ){

                                 top.document.forms[0].Stack_00.value="javascript:cgi_access_projekte(\"" + mode + "\",\"" + auxdata + "\")";
                                 cgi_access_user ("forcedlogin" );
                                 return;
                            }


                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/projekte/projekte2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=gruppe_beitreten&name=" + auxdata + "&username=" + username + "&submode=" + auxauxdata; 
                   break;


             case 'gruppe_mail' :


                   // ----- forced login, if necessary 

                            if ( top.document.forms[0].UserLoginFlag.value == '0' ){

                                 top.document.forms[0].Stack_00.value="javascript:cgi_access_projekte(\"" + mode + "\",\"" + auxdata + "\")";
                                 cgi_access_user ("forcedlogin" );
                                 return;
                            }


                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/projekte/projekte2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=gruppe_mail&name=" + auxdata + "&username=" + username + "&submode=" + auxauxdata; 
                   break;


             case 'gruppe_login' :


                   // ----- forced login, if necessary 

                            if ( top.document.forms[0].UserLoginFlag.value == '0' ){

                                 top.document.forms[0].Stack_00.value="javascript:cgi_access_projekte(\"" + mode + "\",\"" + auxdata + "\")";
                                 cgi_access_user ("forcedlogin" );
                                 return;
                            }


                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/projekte/projekte2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=gruppe_login&infoabout=" + auxdata + "&username=" + username; 
                   break;


             case 'gruppe_umfragen' :


                   // ----- forced login, if necessary 

                            if ( top.document.forms[0].UserLoginFlag.value == '0' ){

                                 top.document.forms[0].Stack_00.value="javascript:cgi_access_projekte(\"" + mode + "\",\"" + auxdata + "\")";
                                 cgi_access_user ("forcedlogin" );
                                 return;
                            }


                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/projekte/projekte2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=gruppe_umfragen&infoabout=" + auxdata + "&username=" + username; 
                   break;





             case 'login' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/projekte/projekte2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=login&submode=login-only-with-acknowledgement&name=" + username + "&password=" + userpass; 
                   break;

             case 'forcedlogin' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/projekte/projekte.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=forcedlogin";
                   break;

             case 'explicitlogin' :

                   top.document.forms[0].Stack_00.value="auto_reference_to_team";
                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/projekte/projekte.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=forcedlogin&subsubmode=autorefer_to_projektgruppe";
                   break;

             case 'changeprojekteinfo' :


                   // ----- forced login, if necessary 

                            if ( top.document.forms[0].UserLoginFlag.value == '0' ){

                                 top.document.forms[0].Stack_00.value="javascript:cgi_access_projekte(\"" + mode + "\",\"" + auxdata + "\")";
                                 cgi_access_projekte ("forcedlogin" );
                                 return;
                            }



                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/projekte/projekte2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=changeprojekteinfo&name=" + username + "&password=" + userpass; 
                   break;



             case 'changeforeignprojekteinfo' :


                   // ----- forced login, if necessary 

                            if ( top.document.forms[0].UserLoginFlag.value == '0' ){

                                 top.document.forms[0].Stack_00.value="javascript:cgi_access_projekte(\"" + mode + "\",\"" + auxdata + "\")";
                                 cgi_access_projekte ("forcedlogin" );
                                 return;
                            }



                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/projekte/projekte2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=changeprojekteinfo&submode=changeforeignprojekteinfo&name=" + auxdata + "&password=changeforeignprojekteinfo"; 
                   break;


             case 'changeforeignprojekteadmin' :


                   // ----- forced login, if necessary 

                            if ( top.document.forms[0].UserLoginFlag.value == '0' ){

                                 top.document.forms[0].Stack_00.value="javascript:cgi_access_projekte(\"" + mode + "\",\"" + auxdata + "\")";
                                 cgi_access_projekte ("forcedlogin" );
                                 return;
                            }



                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/projekte/projekte2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=fcd_aendern_einstieg&DATEI_USERADMIN_feld_000=" + auxdata;
                   break;



             case 'gruppe_loeschen' :



                   // ----- Löschbestätigung

                   check = confirm ("A C H T U N G !\r\rSelbsthilfegruppe > " + auxdata + " < wirklich löschen ?\r\r" );

                   if ( check == false){
                        return;
                   }



                   // ----- forced login, if necessary 

                            if ( top.document.forms[0].UserLoginFlag.value == '0' ){

                                 top.document.forms[0].Stack_00.value="javascript:cgi_access_projekte(\"" + mode + "\",\"" + auxdata + "\")";
                                 cgi_access_projekte ("forcedlogin" );
                                 return;
                            }



                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/projekte/projekte2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=gruppe_loeschen&submode=changeforeignprojekteinfo&name=" + auxdata + "&password=changeforeignprojekteinfo"; 
                   break;




             case 'options_html' :


                   // ----- forced login, if necessary 

                            if ( top.document.forms[0].UserLoginFlag.value == '0' ){

                                 top.document.forms[0].Stack_00.value="javascript:cgi_access_projekte(\"" + mode + "\",\"" + auxdata + "\")";
                                 cgi_access_projekte ("forcedlogin" );
                                 return;
                            }



                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/projekte/projekte2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=options_html&name=" + username + "&password=" + userpass; 
                   break;



             case 'projekteadmin' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/projekte/projekte2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=fcd_anzeigen&DATEI_USERADMIN_feld_000=" + auxdata; 
                   break;

             case 'stillalive' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/projekte/projekte.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=stillalive&name=" + username;
                   break;

             case 'loginlist' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/projekte/projekte.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=loginlist";
                   break;

             case 'list_projekte_all' :
             case 'list_projekte_infobox' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/projekte/projekte2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=" + mode;
                   break;

             case 'list_projekte_gemeinschaft' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/projekte/projekte2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=list_projekte_gemeinschaft&username=" + username;
                   break;

             case 'list_projekte_gemeinschaft_details' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/projekte/projekte2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=list_projekte_gemeinschaft_details&submode=" + auxdata;
                   break;

             case 'kontaktliste_eintragen' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/projekte/projekte2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=kontaktliste_eintragen&name=" + auxdata + "&listenfarbe=" + auxauxdata; 
                   break;


             case 'kontaktliste_anzeigen' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/projekte/projekte2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=kontaktliste_anzeigen&name=" + auxdata + "&listenfarbe=" + auxauxdata; 
                   break;


             case 'kontaktliste_austragen' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/projekte/projekte2.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&action=kontaktliste_austragen&name=" + auxdata + "&listenfarbe=" + auxauxdata; 
                   break;






             default :

                  alert ( "unbekannter mode '" + mode + "' in  cgi_access_projekte( )" );
                  return;
          } 



}









function cgi_access_counter ( id, infotype, mode, auxinfo ){



                


         switch ( infotype ){



             case 'homepage' :
 
                   cgi_access_counter_homepage ();

                   break;



             default :

                   cgi_access_counter_e ( id, infotype, mode, auxinfo );
                   return;
                   break;
          } 







}



function cgi_access_counter_e ( id, infotype, mode, auxinfo ){


         // --- Performance Filter --- evtl spaeter wieder entfernen
                
         if ( infotype.indexOf("infobox-")                       > -1 ||
              infotype.indexOf("usability-")                     > -1 ||
              infotype.indexOf("messageboard-501-8100-")         > -1 ||
              infotype.indexOf("messageboard-501-8101-")         > -1 ||
              infotype.indexOf("messageboard-501-8102-")         > -1 ||
              infotype.indexOf("-beendet")                       > -1 ||
              infotype.indexOf("vistitenkarte-")                 > -1 ||
              infotype.indexOf("homepage_heute_bereits_besucht") > -1 ){

              // alert (infotype);

              return;
         }









         switch ( mode ){



             case 'addvisible' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/counter/counter.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&infotype=" + infotype + "&mode=" + mode + "&auxinfo=" + auxinfo; 
                   break;

             case 'add' :
                                        // Bei 1,1 klappts nicht

                  if ( id == -1 ){
                       
                       top.refstat00.src = cgi_fullserverpath () + "/counter/counter.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&infotype=" + infotype + "&mode=" + mode + "&auxinfo=" + auxinfo; 
                  }
                  else
                  if ( id == 0 ){
                       refstat00     = new Image(1000,1000);
                       refstat00.src = cgi_fullserverpath () + "/counter/counter.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&infotype=" + infotype + "&mode=" + mode + "&auxinfo=" + auxinfo; 
                  }
                  else
                  if ( id == 1 ){
                       refstat01     = new Image(1000,1000);
                       refstat01.src = cgi_fullserverpath () + "/counter/counter.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&infotype=" + infotype + "&mode=" + mode + "&auxinfo=" + auxinfo; 
                  }
                  else 
                  if ( id == 2 ){
                       refstat02     = new Image(1000,1000);
                       refstat02.src = cgi_fullserverpath () + "/counter/counter.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&infotype=" + infotype + "&mode=" + mode + "&auxinfo=" + auxinfo; 
                  }
                  else {
                       refstat03     = new Image(1000,1000);
                       refstat03.src = cgi_fullserverpath () + "/counter/counter.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&infotype=" + infotype + "&mode=" + mode + "&auxinfo=" + auxinfo; 
                  }




                   break;

             case 'show' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/counter/counter.cgi?sid=" + cnst_sid() + "&release=" + cnst_release() + "&infotype=" + infotype + "&mode=" + mode + "&auxinfo=" + auxinfo; 
                   break;


             default :

                  alert ( "unbekannter mode'" + mode + "' in  cgi_access_counter()" );
                  return;
                  break;
          } 







}



function cgi_access_counter_homepage (){



         cgi_access_counter_e( 0, "homepage_aufrufe", "add", document.referrer );
                



         if ( navigator.appName.indexOf("Explorer") == -1 ){


              // alert ("FALL 0a : unbekanntes Cookie-Handling - Cookies ausgeschaltet");


              cgi_access_counter_e( 1, "homepage_besucher_ohne_cookies", "add" );


              // evtl. Doppelzählungen

              cgi_access_counter_e( 2, "homepage_besucher"    , "add", "filter_ip_dupe_check" );

              return; // Ende !!! Counter-Verarbeitung
         }
         


         if ( cookie_query ('nodebug', 'erstmaliger_site_aufruf' )){   // imliziert : Cookies aus



              // Cookie Init + Check ob Cookies ausgeschalten sind

              yyyymmdd = String(fct_yyyymmdd ());
              cookie_set_field( 'nodebug', 'user.contact.yyyymmdd' ,  yyyymmdd );


              if (!( cookie_query ('nodebug', 'erstmaliger_site_aufruf' ))){

                     cgi_access_counter_e( 1, "homepage_besucher"    , "add", document.referrer );
                     cgi_access_counter_e( 2, "homepage_erstbesucher", "add"                    );

                     // alert ("FALL 1a : Erstbesucher - Cookies angeschaltet");

              }
              else {
                   // Cookies ausgeschaltet

                      // alert ("FALL 1b : Erstbesucher - Cookies ausgeschaltet");


                      // evtl. Doppelzählungen

                      cgi_access_counter_e( 1, "homepage_besucher"    , "add", "filter_ip_dupe_check" );
                      cgi_access_counter_e( 2, "homepage_besucher_ohne_cookies", "add" );




              }

         }
         else {


              if ( cookie_query ('nodebug', 'homepage_heute_bereits_besucht' )){


                   // alert ("FALL 2a : Folgebesucher - der nicht gezählt wird");

                   cgi_access_counter_e( 1, "homepage_heute_bereits_besucht" , "add" , cookie_get_field( 'nodebug', 'user.name' ) );
                   return; // !!!!!!!
              }
              else {

                   if ( cookie_query   ( 'nodebug', 'username_existiert' )){


                        // alert ("FALL 2b : Besucher - Mitglied");

                        cgi_access_counter_e( 1, "homepage_besucher"        , "add" ,document.referrer );
                        cgi_access_counter_e( 2, "homepage_mitgliedbesucher", "add", cookie_get_field( 'nodebug', 'user.name' )  );
                   }
                   else {

                        // alert ("FALL 2c : Besucher - Nichtmitglied");

                        cgi_access_counter_e( 1, "homepage_besucher"     , "add" ,document.referrer );
                        cgi_access_counter_e( 2, "homepage_folgebesucher", "add", cookie_get_field( 'nodebug', 'user.contact.anzahl' )  );
                  }

              }


         }





        yyyymmdd = String(fct_yyyymmdd ());
        cookie_set_field( 'nodebug', 'user.contact.yyyymmdd' ,  yyyymmdd );





        contact_anzahl_raw = cookie_get_field( 'nodebug', 'user.contact.anzahl' );
        contact_anzahl = parseInt( contact_anzahl_raw ) + 1;
        contact_anzahl  =  contact_anzahl.toString();
        cookie_set_field( 'nodebug', 'user.contact.anzahl'    , contact_anzahl );
        







}





function cgi_access_tools ( scriptname ){





         switch ( scriptname ){


             case 'serverinfos0001' :

                   var cgiurl = cgi_fullserverpath () + "/tools/" + "serverinfos0001.cgi";
                   F1 = open  ( cgiurl );
                   break;


             case 'contents_mk_index_page' :

                   var cgiurl = cgi_fullserverpath () + "/tools/" + "contents_mk_index_page.cgi?sid=" + cnst_sid() + "&release=" + cnst_release();
                   F1 = open  ( cgiurl );
                   break;


             case 'contents_mk_archive_page' :

                   var cgiurl = cgi_fullserverpath () + "/tools/" + "contents_mk_archive_page.cgi?sid=" + cnst_sid() + "&release=" + cnst_release();
                   F1 = open  ( cgiurl );
                   break;


             case 'contents_mk_index_hitliste_counter' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/tools/" + "contents_mk_index_hitliste_counter.cgi?sid=" + cnst_sid() + "&release=" + cnst_release();
                   break;


             case 'contents_mk_index_embedded' :

                   top.portal_middle_frame.location.href = cgi_fullserverpath () + "/tools/" + "contents_mk_index_embedded.cgi?sid=" + cnst_sid() + "&release=" + cnst_release();
                   break;



             default :
 
                   var cgiurl = cgi_fullserverpath () + "/tools/" + scriptname + ".cgi";
                   F1 = open  ( cgiurl );

                   break;
          } 
}









function cgi_exec_remote_and_assign_local ( scriptname ){



         top.portal_middle_frame.location.href    = cgi_fullserverpath () + "/tools/" + scriptname + ".cgi";




}



function cgi_exec_remote_and_assign_local2 ( scriptname ){



         top.portal_middle_frame.location.href    = cgi_fullserverpath () + "/tools/" + scriptname + ".cgi";



}






function cgi_exec_remote_and_assign_local3 ( scriptname ){



         top.portal_middle_frame.location.href    = "\\tmp\\reassignment.htm";



}








// java script :  errors



function catch_error (){

//       navigation_check_regular_page_access();

         return ( true );
}



// navigation 




function navigation_get_portal_root ( ){


         var portal_rootpath;
         var portal_hostname = window.location.hostname;

         portal_rootpath = cnst_url () + "/portal/" + cnst_release() + "/" + cnst_sid ();



//       alert ( "debug 002 : " + portal_rootpath );


         return ( portal_rootpath );


}



function navigation_to_portal_only ( ){    



         top.document.forms[0].ConfigWelcomeMessageNumber.value = 0;

         navigation_reset_to_home ();

}


// --- trap rechte Maustaste

function navigation_to_portal ( ){    



         cgi_access_counter( 0, "usability-rechte-maustaste", "add" );


         navigation_to_kontextmenu ( );


//       window.external.AddFavorite( cnst_url() ,'ARTHROSE FORUM');

//       navigation_to_portal_only ();

}



// --- trap sperre z.B. Email

function navigation_to_trap_sperre ( ){    



         cgi_access_counter( 0, "usability-trap-sperre", "add" );

         window.external.AddFavorite( cnst_url() ,'ARTHROSE FORUM');

         navigation_to_portal_only ();

         
}




// --- Kontextmenue

function navigation_to_kontextmenu ( ){    



// ----- hauptfenster

         self.name = "hauptfenster"; 




         docid = '100-0006.html';

         var width  = 300;
         var height = 500;

//       var l = ( screen.availWidth - width) / 2;
         var l = ( screen.availWidth - width ) - ( screen.availWidth / 20 );

//       var t = ((screen.availHeight - height) / 2) + 0;

         var t = ( screen.availHeight / 20 );

//       var t = ((screen.availHeight - height) / 2) - 100;



         fullpath = cnst_url() + "/portal/" + cnst_release() + "/" + cnst_sid() + "/dyn/contents/data/" + docid;
         f1       = open( fullpath,"_blank","menubar=no,location=no,toolbar=no,scrollbars=no,"+"width="+width+",height="+height+",screenX="+l+",screenY="+t+",left=" +l+",top="+t);


         return;
}





function navigation_to_schedule ( ){


         top.document.forms[0].ConfigWelcomeMessageNumber.value = 1;

         navigation_reset_to_home ();


}


function navigation_reset_to_home ( ){




// ----- Filter

         if (!( top.document.getElementById("TopBody") )){
                return;
         }



         var local_ConfigLanguage = "";

         if ( top.document.forms[0].ConfigLanguage.value != "#n/a" && top.document.forms[0].ConfigLanguage.value != "" ){

              local_ConfigLanguage = "_" + top.document.forms[0].ConfigLanguage.value;
         }
         else {
              local_ConfigLanguage = "";
         }

         if ( top.document.forms[0].ConfigLanguage.value == "de" ){  // Deutsch ist Standard

              local_ConfigLanguage = "";  
         }


         top.portal_left_frame.location.href   = navigation_get_portal_root() + '/dyn/contents/data/504-0002'   + local_ConfigLanguage + '.php';
         top.portal_middle_frame.location.href = navigation_get_portal_root() + '/dyn/contents/data/504-0003'   + local_ConfigLanguage + '.html';
         top.portal_right_frame.location.href  = navigation_get_portal_root() + '/dyn/contents/data/504-0001'   + local_ConfigLanguage + '.php';
         top.portal_top_frame.location.href    = navigation_get_portal_root() + '/dyn/contents/topnews/topnews' + local_ConfigLanguage + '.html';

}



function sd_literatur ( ){




// ----- counter

         cgi_access_counter( 0, "sd-contact-all", "add" );
         cgi_access_counter( 1, "sd-contact-literatur", "add" );




         doc_access('contents','600-0003.html','embedded');


}



// java script :  contents






function contents_assign_menu_right ( object ){



         top.portal_right_frame.location.href= cnst_url() + "/contents/" + cnst_sid() + "/data/" + object + ".html";



}





// java script :  security


function secu_violation_coding (){


         alert ("stdlib : obsolete funktion : secu_violation_coding    aufgerufen" );



}





function doc_access ( location, docid, mode, chapter ){


// mode = embedded oder standalone



// ----- plausi 1


         if ( doc_access.arguments.length == 2 ){
              mode    = "embedded";
              chapter = "undefined";
         }

         if ( doc_access.arguments.length == 3 ){
              chapter = "undefined";
         }



// ----- plausi 2

         if (!mode ){

              mode = "standalone";
         }
         if ( mode.substr(0,1) == "#" ){
              chapter = mode;
              mode = "embedded";
         }




// ----- chapter : # weg 

         if ( chapter.substr(0,1) == "#" ){
              chapter = chapter.substr(1,chapter.length-1);
         }


// ----- docid : fuehrende spaces weg ( bei Portal-Links )


         if ( docid.substr(0,4) == "    " ){
              docid = docid.substr(4,docid.length-1);
         }
         if ( docid.substr(0,3) == "   " ){
              docid = docid.substr(3,docid.length-1);
         }
         if ( docid.substr(0,2) == "  " ){
              docid = docid.substr(2,docid.length-1);
         }
         if ( docid.substr(0,1) == " " ){
              docid = docid.substr(1,docid.length-1);
         }






// ----- forced login, if necessary 

         if ( top.document.forms[0].UserLoginFlag ){

              if ( top.document.forms[0].UserLoginFlag.value == '0' && docid == '600-0025.inf000' ){

                   top.document.forms[0].Stack_00.value="javascript:doc_access(\"" + location + "\",\"" + docid + "\",\"" + mode + "\",\"" + chapter + "\")";
                   cgi_access_user ("forcedlogin" );
                   return;
              }
         }




// ----- embedded --------------------------


         if ( mode == 'embedded' ){


            switch ( location ){


             case 'infopage.000' :


                   top.portal_middle_frame.location.href = cnst_url() + "/portal/" + cnst_release() +  "/" + cnst_sid() + "/stat/infopages/infopage_typ000.php"
                                                         + "?sid="                 + cnst_sid() 
                                                         + "&release="             + cnst_release()
                                                         + "&docid="               + docid
                                                         + "&chapter="             + chapter;

                   break;


             case 'hilfe-infopage.000' :

                   top.portal_middle_frame.location.href = cnst_url() + "/portal/" + cnst_release() +  "/" + cnst_sid() + "/stat/infopages/hilfe-infopage_typ000.php"
                                                         + "?sid="                 + cnst_sid() 
                                                         + "&release="             + cnst_release()
                                                         + "&docid="               + docid
                                                         + "&chapter="             + chapter;

                   break;

             case 'contents' :
             case 'portal' :

                   
                   top.portal_middle_frame.location.href = cgi_fullserverpath ()   + "/infopages/" 
                                                         + "doc_access.cgi?sid="   + cnst_sid() 
                                                         + "&release="             + cnst_release() 
                                                         + "&location="            + location 
                                                         + "&mode=anzeigen&docid=" + docid
                                                         + "&chapter="             + chapter;
                   break;



             case 'portal.php' :

                   username = "undefiniert";
                   

//
// 068 Mozilla
//                 if ( top.document.all.TopBody ){
//



                   if ( top.document.getElementById("TopBody")  ){
                        username = top.document.forms[0].UserName.value;
                   }




                   top.portal_middle_frame.location.href = cnst_url() + "/portal/" + cnst_release() +  "/" + cnst_sid() + "/dyn/contents/data/" + docid
                                                         + "?sid="                 + cnst_sid() 
                                                         + "&release="             + cnst_release()
                                                         + "&mode="                + chapter
                                                         + "&username="            + username;





                   break;



             default :

                   top.portal_middle_frame.location.href = cgi_fullserverpath ()   + "/infopages/" 
                                                         + "doc_access.cgi?sid="   + cnst_sid() 
                                                         + "&release="             + cnst_release() 
                                                         + "&location="            + location 
                                                         + "&mode=anzeigen&docid=" + docid;
                   break;

           } 


         }



// ----- standalone document --------------------------

         else 

         if ( mode == 'standalone' ){


              switch ( location ){


                case 'contents' :

                   fullpath = cnst_url() + "/contents/" + cnst_sid() + "/data/" + docid;
                   f1 = open( fullpath,"_blank" );
                   break;

                case 'portal' :

                   fullpath = cnst_url() + "/portal/" + cnst_release() + "/" + cnst_sid() + "/dyn/contents/data/" + docid;
                   f1 = open( fullpath,"_blank" );
                   break;


             case 'portal.php' :

                   username = "undefiniert";
                   

                   if ( top.document.getElementById("TopBody")  ){
                        username = top.document.forms[0].UserName.value;
                   }


                   fullpath = cnst_url() + "/portal/" + cnst_release() +  "/" + cnst_sid() + "/dyn/contents/data/" + docid
                            + "?sid="                 + cnst_sid() 
                            + "&release="             + cnst_release()
                            + "&mode="                + chapter
                            + "&username="            + username;


                   if ( chapter.indexOf("hauptfenster") == -1 ){   // Spezial-FensterSteuerung 

                        f1 = open( fullpath,"_blank" );
                   }
                   else {

                        f1 = open( fullpath,"_blank","menubars=no,location=no,toolbars=no,scrollbars=no");
                   }


                   break;




                default :

                   fullpath = cnst_url() + "/portal/" + cnst_release() + "/" + cnst_sid() + "/dyn/contents/data/" + docid;
                   f1 = open( fullpath,"_blank" );
                   break;

               }
          } 


// ----- popup window --------------------------

         else 

         if ( mode == 'popup' ){


              switch ( location ){


                case 'contents' :

                   fullpath = cnst_url() + "/contents/" + cnst_sid() + "/data/" + docid;
                   f1 = open( fullpath,"_blank","menubars=no,location=no,toolbars=no,scrollbars=yes");


                   break;

                case 'portal' :

                   fullpath = cnst_url() + "/portal/" + cnst_release() + "/" + cnst_sid() + "/dyn/contents/data/" + docid;
                   f1 = open( fullpath,"_blank","menubars=no,location=no,toolbars=no,scrollbars=yes");
                   break;


                default :

                   fullpath = cnst_url() + "/portal/" + cnst_release() + "/" + cnst_sid() + "/dyn/contents/data/" + docid;
                   f1 = open( fullpath,"_blank","menubars=no,location=no,toolbars=no,scrollbars=yes");
                   break;

               }
          } 


// ----- Fehler --------------------------

         else {

                  alert ( "unbekannter mode'" + mode + "' in  doc_access ()" );
                  return;
          } 



}





function portal_middle_access ( location ){

            

         top.portal_middle_frame.location.href = cnst_url() + "/portal/" + cnst_release() + "/" + cnst_sid() + "/" + location;



}






function stack_push (  mode  ){


// ----- Filter

         if (!( top.document.getElementById("TopBody") )){
                return;
         }




         switch ( mode ){


             case 'chat' :
             case 'abstimmung_embedded' :

                   top.document.forms[0].Stack_00.value = document.URL;
                   break;


             case 'abstimmung' :
             case 'messageboard' :
             case 'infobox' :
             case 'notizbuch' :
             case 'diskussionsbeitraege' :

                   top.document.forms[0].Stack_00.value = top.portal_middle_frame.document.URL;

                   break;

             case 'abstimmung_standalone' :

                   top.document.forms[0].Stack_00.value = "#n/a";
                   break;

             default :

                   top.document.forms[0].Stack_00.value = document.URL;

                   break;

          } 



}


function stack_pop (  mode  ){



// ----- Filter

         if (!( top.document.getElementById("TopBody") )){
                return;
         }



// ----- Vermeidung leerer stack bei doppelklick

         if ( top.document.forms[0].Stack_00.value == "#n/a" || top.document.forms[0].Stack_00.value == "" ){
              top.document.forms[0].Stack_00.value  =  top.document.forms[0].Stack_01.value;
         }


// ----- plausi auf leeren stack

         if ( top.document.forms[0].Stack_00.value == "#n/a" || top.document.forms[0].Stack_00.value == "" ){

              alert ( "Bitte klicken Sie jetzt eine andere Funktion auf der Seite an.\n" +
                      "Stack leer : " + top.document.forms[0].Stack_00.value + "\n"  );
              return;
         }




         switch ( mode ){


             case 'chat' :
             case 'abstimmung' :
             case 'forcedlogin' :
             case 'messageboard' :
             case 'infobox' :
             case 'notizbuch' :
             case 'diskussionsbeitraege' :

                   top.portal_middle_frame.location.href= top.document.forms[0].Stack_00.value;
                   break;

             default :

                   top.portal_middle_frame.location.href= top.document.forms[0].Stack_00.value;
                   break;

          } 



          top.document.forms[0].Stack_01.value =  top.document.forms[0].Stack_00.value;
          top.document.forms[0].Stack_00.value = "#n/a";



}



function php_group_fullserverpath () {


         return ( cnst_url() + "/portal/" + cnst_release() +  "/" + cnst_sid() + "/stat/communication" );


}




function php_access_group ( bereichkey, bereichname, gruppentypkey, gruppentypname, gruppenkey, gruppenbezeichnung, seitenname ){



         username = top.document.forms[0].UserName.value;
         userpass = top.document.forms[0].UserPassword.value;




// ----- forced login, if necessary 

         if ( top.document.forms[0].UserLoginFlag.value == '0' ){

              top.document.forms[0].Stack_00.value="javascript:php_access_group(\"" + bereichkey + "\",\"" + bereichname + "\",\"" + gruppentypkey + "\",\"" + gruppentypname + "\",\"" + gruppenkey + "\",\"" + gruppenbezeichnung + "\",\"" + seitenname + "\")";
              cgi_access_user ("forcedlogin" );
              return;
         }






// ----- direct : chat call 

         switch ( bereichkey ){



             case 'g30-0000' :

                   


                   
                   top.portal_middle_frame.location.href = php_group_fullserverpath () + "/selbsthilfegruppen/hueftgelenksarthrose/" + seitenname 
                                                         + "?sid="                 + cnst_sid() 
                                                         + "&release="             + cnst_release()
                                                         + "&name="                + username 
                                                         + "&password="            + userpass 
                                                         + "&bereichkey="          + bereichkey
                                                         + "&bereichname="         + bereichname 
                                                         + "&gruppentypkey="       + gruppentypkey
                                                         + "&gruppentypname="      + gruppentypname
                                                         + "&gruppenkey="          + gruppenkey
                                                         + "&gruppenbezeichnung="  + gruppenbezeichnung;

                   break;



             default :

                  alert ( "unbekannter bereichkey '" + bereichkey + "' in  ceccess_group()" );
                  return;


          } 




}


function php_team_fullserverpath () {


         return ( cnst_url() + "/portal/" + cnst_release() +  "/" + cnst_sid() + "/stat/admin" );


}

function php_access_team ( bereichkey ){



         username       = top.document.forms[0].UserName.value;
         userpass       = top.document.forms[0].UserPassword.value;
         berechtigungen = top.document.forms[0].Berechtigungen.value;




// ----- forced login, if necessary 

         if ( top.document.forms[0].UserLoginFlag.value == '0' ){

              top.document.forms[0].Stack_00.value="javascript:php_access_team(\"" + bereichkey + "\")";
              cgi_access_user ("forcedlogin" );
              return;
         }






// ----- Projektgruppen

         switch ( bereichkey ){





             case 'g10-0000' :   // Projektgruppe - Webmaster

                   
                   top.portal_middle_frame.location.href = php_team_fullserverpath () + "/webmaster/einstieg.php"
                                                         + "?sid="                 + cnst_sid() 
                                                         + "&release="             + cnst_release()
                                                         + "&name="                + username 
                                                         + "&password="            + userpass 
                                                         + "&berechtigungen="      + berechtigungen;




                   break;



             case 'f20-0001' :   // Sekretariat

                   doc_access('portal','f20-menu-0000.html','embedded')
                   break;




             case 'g10-0001' :   // Projektgruppe - Inhaltspflege

                   
                   top.portal_middle_frame.location.href = php_team_fullserverpath () + "/workgroups/inhaltspflege/menu-middle.html";

                   break;




             case 'g10-0002' :   // Projektgruppe - Systementwicklung

                   
                   top.portal_middle_frame.location.href = php_team_fullserverpath () + "/development/development-menu.html";

                   break;



             case 'g10-0003' :   // Projektgruppe - Systemadministration

                   
                   top.portal_middle_frame.location.href = php_team_fullserverpath () + "/sysadmin/menu-middle.html";

                   break;



             case 'g20-0001' :    // Benutzerbetreuung

                   
                   top.portal_middle_frame.location.href = php_team_fullserverpath () + "/workgroups/benutzerbetreuung/menu-middle.html";

                   break;



             case 'g20-0002' :    // Beschwerdebearbeitung

                   
                   top.portal_middle_frame.location.href = php_team_fullserverpath () + "/workgroups/beschwerdebearbeitung/menu-middle.html";

                   break;



             case 'g20-0003' :    // Forenbetreuung

                   
                   top.portal_middle_frame.location.href = php_team_fullserverpath () + "/workgroups/forenbetreuung/menu-middle.html";

                   break;
          


             default :

                  alert ( "unbekannter bereichkey '" + bereichkey + "' in  php_access_team()" );
                  return;


          } 




}




function php_online_treffpunkt_fullserverpath () {


         return ( cnst_url() + "/portal/" + cnst_release() +  "/" + cnst_sid() + "/stat/termine" );


}




function php_access_online_treffpunkt ( referrer ){



         username = top.document.forms[0].UserName.value;
         userpass = top.document.forms[0].UserPassword.value;

         referrer_history = history.length -1;



// ----- forced login, if necessary 

         if ( top.document.forms[0].UserLoginFlag.value == '0' ){
              top.document.forms[0].Stack_00.value="javascript:php_access_online_treffpunkt(\"" + referrer_history + "\")";
              cgi_access_user ("forcedlogin" );
              return;
         }






// ----- direct : chat call 

         top.portal_middle_frame.location.href = php_online_treffpunkt_fullserverpath () + "/online-treffen.php?referrer_history=" + referrer_history;




}


function php_access_termine ( ){


         top.portal_middle_frame.location.href = cnst_url() + "/portal/" + cnst_release() +  "/" + cnst_sid() + "/stat/termine/chatroom.php"
                                               + "?sid="     + cnst_sid() 
                                               + "&release=" + cnst_release();

}



function sys_neues_fenster ( mode, submode ) {




// ----- SID pfade

         var this_sid_fullpath = top.location.href;
         var prod_sid_fullpath = top.location.href;
         var test_sid_fullpath = top.location.href;
         var dev_sid_fullpath  = top.location.href;


         if ( this_sid_fullpath.indexOf(".prod\/") > -1 ){

              dev_sid_fullpath  = this_sid_fullpath.replace(/.prod\//,".dev\/" );
              test_sid_fullpath = this_sid_fullpath.replace(/.prod\//,".test\/");
         }
         else
         if ( this_sid_fullpath.indexOf(".test\/") > -1 ){

              dev_sid_fullpath  = this_sid_fullpath.replace(/.test\//,".dev\/" );
              prod_sid_fullpath = this_sid_fullpath.replace(/.test\//,".prod\/");
         }
         else
         if ( this_sid_fullpath.indexOf(".dev\/") > -1 ){

              test_sid_fullpath  = this_sid_fullpath.replace(/.dev\//,".test\/" );
              prod_sid_fullpath  = this_sid_fullpath.replace(/.dev\//,".prod\/");
         }
         else {
              alert ( "unbekanntes system in '" + this_sid_fullpath + "' - sid war nicht ermittelbar" );

         }
 





// ----- Systeme

         switch ( mode ){


             case 'this' : 

                   
                   if ( submode == 'neues_fenster' ){

                        f1 = open( top.location.href,"_blank" ); 
                   }
                   else {
                        f1 = open( top.location.href,"_top" ); 
                   }

                   break;



             case 'prod' : 

                   
                   if ( submode == 'neues_fenster' ){

                        f1 = open( prod_sid_fullpath,"_blank" ); 
                   }
                   else {
                        f1 = open( prod_sid_fullpath, "_top" ); 
                   }

                   break;


             case 'test' : 

                   
                   if ( submode == 'neues_fenster' ){

                        f1 = open( test_sid_fullpath,"_blank" ); 
                   }
                   else {
                        f1 = open( test_sid_fullpath, "_top" ); 
                   }

                   break;


             case 'dev' : 

                   
                   if ( submode == 'neues_fenster' ){

                        f1 = open( dev_sid_fullpath,"_blank" ); 
                   }
                   else {
                        f1 = open( dev_sid_fullpath, "_top" ); 
                   }

                   break;


             default :

                  alert ( "unbekannter mode '" + mode + "' in  sys_neues_fenster()" );
                  return;


          } 






}




function chk_emailadress_ok ( email ) {




                if ( email == "" || email.length == 0  ){
                     alert ( "FEHLER IN EMAILADRESSE : \n\nEMail-Adresse nicht ausgefüllt.\n\n");
                     return ( false );
                }
                if ( email.indexOf (' ', 0) > -1 ){		
	             alert ( "FEHLER IN EMAILADRESSE : " + email + "\n\nLeerzeichen in EMailadresse nicht erlaubt.\r\rBitte korrigieren.");		
                     return ( false );
                } 
                if ( email.indexOf (' ', 0) > -1  ||  email.indexOf (':', 0) > -1  || email.indexOf (',', 0) > -1  || email.indexOf (';', 0) > -1 ) {		
	             alert ( "FEHLER IN EMAILADRESSE : " + email + "\n\nUnerlaubtes Zeichen in EMailadresse.\r\rBitte korrigieren.")		
                     return ( false );
                } 
                if ( email.indexOf ('\@', 0) == -1 ) {		
	             alert ( "FEHLER IN EMAILADRESSE : " + email + "\n\nEs fehlt das '@'-Zeichen.\r\rBitte korrigieren.")		
                     return ( false );
                } 
                if ( email.indexOf ('.', 0) == -1 ) {		
	             alert ( "FEHLER IN EMAILADRESSE : " + email + "\n\nEs fehlt das '.'-Zeichen.\r\rBitte korrigieren.")		
                     return ( false );
                } 
                if ( email.indexOf ('..', 0) > -1  ||  email.indexOf ('.@', 0) > -1 ||  email.indexOf ('@.', 0) > -1 || email.indexOf ('@@', 0) > -1 ) {		
	             alert ( "FEHLER IN EMAILADRESSE : " + email + "\n\nFehler in Email-Adresse.\r\rBitte korrigieren.")		
                     return ( false );
                } 

//              alert ( email.length -1 );
//              alert ( email.charAt ( email.length -1 ) );


                if ( email.charAt ( email.length -1 ) == '.' || email.charAt ( email.length -1 ) == '@'  ) {
	             alert ( "FEHLER IN EMAILADRESSE : " + email + "\n\nFehler in Email-Adresse.\r\rBitte korrigieren.");
                     return ( false );
                } 




//                if ( email.indexOf ('\@', 0) != email.lastIndexOf ('\@', 0) ) {		
//	               alert ( "FEHLER IN EMAILADRESSE : " + email + "\n\nDas '@'-Zeichen darf nicht zweimal vorkommen.\r\rBitte korrigieren.")		
//                     return ( false );
//                } 

//                if ( email.indexOf ('@', 0) > email.lastIndexOf ('\.', 0) ) {
//	               alert ( "FEHLER IN EMAILADRESSE : " + email + "\n\nDas '@'-Zeichen muss vor dem '.'-Zeichen vorkommen.\r\rBitte korrigieren.")		
//                     return ( false );
//                } 
                if ( email.length < 8 ) {	// a@abc.de	
                     alert ( "FEHLER IN EMAILADRESSE : " + email + "\n\nEMail-Adresse muss grösser als 5 Zeichen sein.\r\rBitte korrigieren.")		
                     return ( false );
                } 


                return ( true );




}




function chk_username_ok ( username ) {




                if ( username == "" || username.length == 0  ){
                     alert ( "FEHLER IN BENUTZERNAME : \n\nusername-Adresse nicht ausgefüllt.\n\n");
                     return ( false );
                }
                if ( username.length > 20 ) {		
                     alert ( "FEHLER IN BENUTZERNAME : " + username + "\n\n darf nicht grösser als 20 Zeichen sein.\r\rBitte korrigieren.")		
                     return ( false );
                } 



         // --- Regex Check ---

                var regex_string  = username;

                var check = regex_string.search ( /\W/g );    // nicht alphanumerishe Zeichen


                if ( check > -1 ){
	             alert  ( "FEHLER IN BENUTZERNAME : " + username + "\n\nBitte EINEN Namen ohne\n\nUmlaute, Sonder- und Leerzeichen eingeben.\r\rBitte korrigieren.")		
                     return ( false );
                } 


                if ( username.indexOf ('_', 0) > -1 ) {		
	             alert  ( "FEHLER IN BENUTZERNAME : " + username + "\n\nBitte EINEN Namen ohne\n\nUnterstrich, Umlaute, Sonder- und Leerzeichen eingeben.\r\rBitte korrigieren.")		
                     return ( false );
                } 




                return ( true );




}





  function fct_yyyymmdd () {


     var Datum = new Date();  // Ein neues Date-Objekt wird angelegt
     var tt    = Datum.getDate();        if (tt < 10) tt = "0" + tt;
     var mM    = Datum.getMonth() + 1;   if (mM < 10) mM = "0" + mM;  // Die Monatszählung
     var jjjj  = Datum.getFullYear();     // In JavaScript 1.1 ist auch eine Methode
                                         // ".getYear()" definiert. Diese liefert aber
                                         // beim Browser Netscape 4.x ein falsches Jahr.

     return (  jjjj + mM + tt );




  } 




  function fct_yyyymmddhhmmss () {


     var Datum = new Date();  // Ein neues Date-Objekt wird angelegt
     var tt    = Datum.getDate();        if (tt < 10) tt = "0" + tt;
     var mM    = Datum.getMonth() + 1;   if (mM < 10) mM = "0" + mM;  // Die Monatszählung
     var jjjj  = Datum.getFullYear();     // In JavaScript 1.1 ist auch eine Methode
                                         // ".getYear()" definiert. Diese liefert aber
                                         // beim Browser Netscape 4.x ein falsches Jahr.


     var hh = Datum.getHours();     if (hh < 10) hh = "0" + hh;
     var mm = Datum.getMinutes();   if (mm < 10) mm = "0" + mm;
     var ss = Datum.getSeconds();   if (ss < 10) hh = "0" + ss;
     


     return (  jjjj + mM + tt + hh + mm + ss );


  } 



