function changeCodeBlock(o)   {
  if(o.style.display == "none"){o.style.display="";return "images/minus.gif";}
  else{o.style.display="none";return "images/plus.gif";}
  }     



//--- betrifft Feld "DNA Extraction Number"
//--- Prüft, ob nur Ziffern eingegeben wurden
  function NurZiffern(Feld)
  {  PruefeZeichen(Feld, "0123456789", "Please check your entry!") }
  
    function NurZiffernundPunkt(Feld)
  {  PruefeZeichen(Feld, "0123456789,-", "Please check your entry!") }
  
//--- Unterprogramm, welches die Zeichen prüft
    function PruefeZeichen(Feld, ZugelasseneZeichen, FehlerMeldung)
    {  
       for (var Pos = 0; Pos < Feld.value.length; Pos++)
       {
          if (ZugelasseneZeichen.indexOf(Feld.value.charAt(Pos)) == -1)
          { FehlerMeldung += "\n\nEntry contains these characters:'"
            FehlerMeldung += Feld.value.charAt(Pos)
            FehlerMeldung += "'. Please use these characters:\n"
            FehlerMeldung += ZugelasseneZeichen
            if (ZugelasseneZeichen.indexOf(" ") == -1)
               { FehlerMeldung += "\nBlanks noch accepted!" }
            else
               { FehlerMeldung += "\nand blank" }
            alert(FehlerMeldung)
            Feld.focus()
            Feld.value = "";
            return false;
          }
       }
    }

function CheckInput () {
    if(!document.formular['UnitID[0]'] && !document.formular['formSourceInstitutionID[0]'])
    {
    alert("Please verify the selected specimen at first!");
    return false;
    }
    
  if (document.formular.formSpecimenNumber.value == "" && document.formular.NoSpecimenAvailable.checked == false && document.formular.formDnaBankNumber.value != "")
  {
  check = window.confirm("Specimen not selected! Save DNA data anyway?");
  return (check);
  }
  
  if (document.formular.formSpecimenNumber.value != "" && document.formular.NoSpecimenAvailable.checked == true)
  {
  alert("Please complete neither 'Specimen Number' or select a checkbox!");
  return false;
  }
  
  if (document.formular.formProviderIntern.value == "" && document.formular.formProviderExtern.value == "")
  {
  alert("Please select a Specimen Database!");
  return false;
  }

  if (document.formular.formProviderIntern.value != "" && document.formular.formProviderExtern.value != "")
  {
  alert("Please select either an 'Internal' or 'External' Specimen database!");
  return false;
  } 
  
    if (document.formular.NoSpecimenAvailable.checked == true && document.formular.formProviderIntern.value != "1")
  {
  alert("Please select 'Offline Specimen Data' (Internal Specimen Database)!");
  return false;
  }
    if (document.formular.formSpecimenNumber.value == "" && document.formular.formDnaBankNumber.value == "" && document.formular.NoSpecimenAvailable.checked == false)
    {
    alert("Please complete 'Specimen Number' or select a checkbox!");
    document.formular.formSpecimenNumber.focus();
    return false;
    }
  
    if (document.formular.formDnaBankNumber.value == "" || document.formular.formDnaBankNumber.value == "B-DB ")
    {
    alert("Please complete 'DNA Extraction Number'!");
    document.formular.formDnaBankNumber.focus();
    return false;
    }
    
    if (document.formular.formExtractionMethod.value == "")
    {
    alert("Please complete 'Extraction Method!'");
    document.formular.formExtractionMethod.focus();
    return false;
    } 
             
    if (document.formular.formExtractionStaff.value == "")
    {
    alert("Please complete 'Extraction Staff!'");
    document.formular.formExtractionStaff.focus();
    return false;
    }
    
    if (document.formular.formRelation.value == "")
    {
    alert("Please complete 'Relation to Voucher'!");
    document.formular.formRelation.focus();
    return false;
    } 
    
    if (document.formular.formExtractionDate.value == "" && document.formular.formNoExtractDate.checked == false)
    {
    alert("Please complete 'Extraction Date' or select the checkbox!");
    document.formular.formExtractionDate.focus();
    return false;
    } 
    
    if (document.formular.formExtractionDate.value == "dd.mm.yyyy" && document.formular.formNoExtractDate.checked == false)
    {
    alert("Please complete 'Extraction Date' or select the checkbox!");
    document.formular.formExtractionDate.focus();
    return false;
    } 

    if (document.formular.formAliquotsFridge.value == "" && document.formular.formAliquotsRack.value == "" && document.formular.formAliquotsBox.value == "" && document.formular.Aliquot.checked == false) 
    {
    check = window.confirm("Location Aliquot not selected! Save DNA data anyway?");
    return (check);
    } 
        
    if(document.formular['formTest[0]'].value != "")
    {
    alert("Please select a Specimen!");
    return false;
    }
   


  }


function CheckVerify () {

  if (document.formular.formProviderIntern.value == "" && document.formular.formProviderExtern == "")
  {
  alert("Please select a Specimen Database!");
  return false;
  }

  if (document.formular.formProviderIntern.value != "" && document.formular.formProviderExtern.value != "")
  {
  alert("Please select either an 'Internal' or 'External' Specimen database!");
  return false;
  } 

  if (document.formular.formSpecimenNumber.value == "" && document.formular.NoSpecimenAvailable.checked == false)
  {
  alert("Please complete 'Specimen Number' or select a checkbox!");
  return false;
  }
  
 
  if (document.formular.formSpecimenNumber.value != "" && document.formular.NoSpecimenAvailable.checked == true)
  {
  alert("Please complete neither 'Specimen Number' or select a checkbox!");
  return false;
  }

  if (document.formular.NoSpecimenAvailable.checked == true && document.formular.formProviderIntern.value != "1")
  {
  alert("Please select 'Offline Specimen Data' (Internal Specimen Database)!");
  return false;
  }
  
}  

function CheckNewDataset() {
  if (document.formular.formSchema.value == "")
  {
  alert("Please select a Schema!");
  return false;
  }

  if (document.formular.formNewProviderUrl.value == "")
  {
  alert("Please complete 'Provider Url'!");
  return false;
  }
  if (document.formular.formNewView.value == "")
  {
  alert("Please complete 'View'!");
  return false;
  }
  if (document.formular.formStatus.value == "")
  {
  alert("Please select Intern or Extern");
  return false;
  }
  
  if (document.formular.formSchema.value == 3)
  {
  if (document.formular.formDigirSource.value == "" || document.formular.formDigirResource.value == "")
  {
  alert("Please complete Digir parameters!");
  return false;
  }
  }

}  

function CheckNewDataset2() {
  if (document.formular.formStatus.value == "")
  {
  alert("Please select Intern or Extern");
  return false;
  }
  if (document.formular.formNewView.value == "")
  {
  alert("Please complete 'View'!");
  return false;
  }
  }
  
function CheckNewDataset3() {
  if (document.formular.formStatus.value == "")
  {
  alert("Please select Intern or Extern");
  return false;
  }
  if (document.formular.formNewView.value == "")
  {
  alert("Please complete 'View'!");
  return false;
  }
  if (document.formular.formDigirSource.value == "" || document.formular.formDigirResource == "")
  {
  alert("Please complete Digir parameters!");
  return false;
  }
  
  
  }  



function CheckNewMethod() {

  if (document.formular.formNewMethod.value == "")
  {
  alert("Please complete 'New Method'!");
  return false;
  }

  if (document.formular.formNewCompany.value == "")
  {
  alert("Please complete 'Company'!");
  return false;
  }
 
} 

function CheckPerson() {

  if (document.formular.formSurname.value == "")
  {
  alert("Please complete 'Surname'!");
  return false;
  }
  if (document.formular.formIntern.checked == false && document.formular.formProvider.checked == false && document.formular.formCustomer.checked == false)
  {
  alert("Please select a rank!");
  return false;
  }
} 

function CheckInstitut() {

  if (document.formular.formInstitut.value == "")
  {
  alert("Please complete 'Institut/University'!");
  return false;
  }
}

function CheckSearch() {

  if (document.formular.formCountryList.value != "" && document.formular.formCountryListISO.value != "")
  {
  alert("Please select either Country OR Country ISO Code!");
  return false;
  }
}

function CheckOfflineTaxa() {

  if (document.formular.formSpecimenNumber.value == "" && document.formular.NoSpecimenAvailable.checked == false)
  {
  alert("Please complete 'Specimen Number' or select the checkbox!");
  return false;
  }
  
  
  if (document.formular.formSpecimenNumber.value != "" && document.formular.NoSpecimenAvailable.checked == true)
  {
  alert("Please complete neither 'Specimen Number' or select a checkbox!");
  return false;
  }
  
  
  if (document.formular.formInstitutionCodeList.value == "" && document.formular.formInstitutionCode.value == "" && document.formular.NoInstCodeAvailable.checked == false)
  {
  alert("Please complete 'Institution (Code)' or select the checkbox!");
  return false;
  }
  
    if (document.formular.formCollectionCodeList.value == "" && document.formular.formCollectionCode.value == "" && document.formular.NoCollCodeAvailable.checked == false)
  {
  alert("Please complete 'Collection (Code)' or select the checkbox!");
  return false;
  }
  
  if (document.formular.formImageLink.value == "" && document.formular.NoImagesAvailable.checked == false)
  {
  alert("Please complete 'Image Link' or select the checkbox!");
  return false;
  }  
  
  if (document.formular.formInstitutionCodeList.value == "" && document.formular.formInstitutionCode.value == "" && document.formular.formSpecimenNumber.value != "")
  {
  alert("Please complete 'Institution (Code)'!");
  return false;
  }
  
  if (document.formular.formCollectionCodeList.value == "" && document.formular.formCollectionCode.value == ""  && document.formular.formSpecimenNumber.value != "")
  {
  alert("Please complete 'Collection (Code)'!");
  return false;
  }
  
  if (document.formular.NoCollCodeAvailable.checked == true && document.formular.NoInstCodeAvailable.checked == true && document.formular.BasisOfRecord != "2")
  {
  check = window.confirm("You've selected 'No Collection Code' and 'No Institution Code'! Please check the Basis of Record (typically 'Observation')! Save data anyway?");
  return (check);
  }   
  
  if (document.formular.formGenusList.value == "" && document.formular.formGenus.value == "")
  {
  alert("Please complete 'Genus'!");
  return false;
  } 
  
  if (document.formular.formCountryList.value == "" && document.formular.formOceanList.value == "")
  {
  alert("Please complete 'Country or Sea/Ocean'!");
  return false;
  }
  
  if (document.formular.formCollector.value == "")
  {
  alert("Please complete 'Collector(s)'!");
  return false;
  }


if (document.formular.formInstitutionCodeList.value != "" && document.formular.formInstitutionCode.value != "")
  {
  alert("Please select either Institution (Code) from list or use free text!");
  return false;
  }
if (document.formular.formCollectionCodeList.value != "" && document.formular.formCollectionCode.value != "")
  {
  alert("Please select either Collection (Code) from list or use free text!");
  return false;
  }  
  
if (document.formular.formLongitude.value != "" && document.formular.formLongitude1.value != "")
  {
  alert("Please select either decimal or sexagesimal type!");
  return false;
  }
  
if (document.formular.formLatitude.value != "" && document.formular.formLatitude1.value != "")
  {
  alert("Please select either decimal or sexagesimal type!");
  return false;
  }
  
if (document.formular.formCountryList.value != "" && document.formular.formOceanList.value != "")
  {
  alert("Please select either a Country or a Sea/Ocean!");
  return false;
  }  
    
  if (document.formular.formSubgenusList.value != "" && document.formular.formSubgenus.value != "")
  {
  alert("Please select either Subgenus from list or use free text!");
  return false;
  }
  if (document.formular.formGenusList.value != "" && document.formular.formGenus.value != "")
  {
  alert("Please select either Genus from list or use free text!");
  return false;
  }
  if (document.formular.formSubgenusList.value != "" && document.formular.formSubgenus.value != "")
  {
  alert("Please select either Subgenus from list or use free text!");
  return false;
  }  
if (document.formular.formGenusList1.value != "" && document.formular.formGenus1.value != "")
  {
  alert("Please select either Genus from list or use free text!");
  return false;
  }
  if (document.formular.formSubgenusList1.value != "" && document.formular.formSubgenus1.value != "")
  {
  alert("Please select either Subgenus from list or use free text!");
  return false;
  }
  if (document.formular.formGenusList2.value != "" && document.formular.formGenus2.value != "")
  {
  alert("Please select either Genus from list or use free text!");
  return false;
  }
  if (document.formular.formSubgenusList2.value != "" && document.formular.formSubgenus2.value != "")
  {
  alert("Please select either Subgenus from list or use free text!");
  return false;
  }
  if (document.formular.formGenusList3.value != "" && document.formular.formGenus3.value != "")
  {
  alert("Please select either Genus from list or use free text!");
  return false;
  }
  if (document.formular.formSubgenusList3.value != "" && document.formular.formSubgenus3.value != "")
  {
  alert("Please select either Subgenus from list or use free text!");
  return false;
  }
}

function CheckOrder() {

  if (document.formular.formOrderDate.value == "" || document.formular.formOrderDate.value == "dd.mm.yyyy")
  {
  alert("Please complete 'Order Date'!");
  return false;
  }
 
  }  

function CheckOrderEdit() {
  if (document.formular.formAction.value == "")
    {
    alert("Please select an action!");
    return false;
    }
  
  if (document.formular.formAction.value == "1")
    {
    check = window.confirm("Selected Orders will be deleted finally! Continue anyway?");
    return (check);
    }
  }  
  
function CheckPub() {
  if (document.formular.formAuthor.value == "")
    {
    alert("Please complete 'Author'!");
    return false;
    }
  
  if (document.formular.formTitle.value == "")
    {
    alert("Please complete 'Title'!");
    return false;
    }
    
  if (document.formular.formYear.value == "")
    {
    alert("Please complete 'Year' or type 'submitted, in press etc.'!");
    return false;
    }
    
  if (document.formular.formJournal.value == "" && document.formular.formBook.value == "")
    {
    alert("Please complete 'Journal' or 'Book'!");
    return false;
    }    
  }    
  
function CheckEditInput () {
    
    if (document.formular.formDnaBankNumber.value == "" || document.formular.formDnaBankNumber.value == "B-DB ")
    {
    alert("Please complete 'DNA Extraction Number'!");
    document.formular.formDnaBankNumber.focus();
    return false;
    }
    
    if (document.formular.formExtractionMethod.value == "")
    {
    alert("Please complete 'Extraction Method!'");
    document.formular.formExtractionMethod.focus();
    return false;
    } 
             
    if (document.formular.formExtractionStaff.value == "")
    {
    alert("Please complete 'Extraction Staff!'");
    document.formular.formExtractionStaff.focus();
    return false;
    }
    
    if (document.formular.formRelation.value == "")
    {
    alert("Please complete 'Relation to Voucher'!");
    document.formular.formRelation.focus();
    return false;
    }
    
    if (document.formular.Amplification.checked == true)
    {
    if (document.formular.radioAmplification.checked == false || document.formular.formAmplificationDate.value == "" || document.formular.formAmplificationDate.value == "dd.mm.yyyy" || document.formular.formAmplificationStaff.value == "" || document.formular.formFragment.value == "") 
    {
    alert("Please complete Amplification!");
    return false;
    }  }    
    
    
    if (document.formular.formExtractionDate.value == "" && document.formular.formNoExtractDate.checked == false)
    {
    alert("Please complete 'Extraction Date' or select the checkbox!");
    document.formular.formExtractionDate.focus();
    return false;
    } 
    
    if (document.formular.formExtractionDate.value == "dd.mm.yyyy" && document.formular.formNoExtractDate.checked == false)
    {
    alert("Please complete 'Extraction Date' or select the checkbox!");
    document.formular.formExtractionDate.focus();
    return false;
    } 

    if (document.formular.formAliquotsFridge.value == "" && document.formular.formAliquotsRack.value == "" && document.formular.formAliquotsBox.value == "" && document.formular.Aliquot.checked == false) 
    {
    check = window.confirm("Location Aliquot not selected! Save DNA data anyway?");
    return (check);
    } 
        

  }
  
  
    
//--- betrifft Feld "DNA eXTRACTION Date" -> pr&uuml;ft das Format dd.mm.yyyy
function PruefeDatumExtraction()
{
      if (document.formular.formExtractionDate.value.length==0) { return true }
      var Datum, Tag, Monat, Jahr, Laenge, tageMonat;
      Datum = document.formular.formExtractionDate.value;
      Laenge = document.formular.formExtractionDate.value.length;
      // alert zur Kontrolle (Länge)
      // alert("Länge ist " + Laenge);
      var datum = new Date();

      // Eingabeformat ist OK (10 Zeichen) nun Prüfung ob Trennzeichen ein Punkt ist

      if (Laenge==10 && Datum.substring(2,3)=="." && Datum.substring(5,6)==".")
      {
      Tag=parseInt(Datum.substring(0,2),10);
      Monat=parseInt(Datum.substring(3,5),10);
      Jahr=parseInt(Datum.substring(6,10),10);

      // alert zur Kontrolle Trennzeichen
      // alert("Trennzeichen OK");

      }
      
      else
      {
      Datum = "  .  .  ";
      Fehlermeldung01();return false;
      }

      // TageMonat festlegen, größter Eintrag für den entsprechenden Monat (auch Schaltjahr)
      if (Monat==4 || Monat==6 || Monat==9 || Monat==11)
      {
      tageMonat=30;
      }
      else if (Monat==1 || Monat==3 || Monat==5 || Monat==7 || Monat==8
        || Monat==10 || Monat==12)
      {
      tageMonat=31;
      }
      else if(Monat==2 && Jahr%4==0 && Jahr%100!=0 || Jahr%400==0)
      {
      tageMonat=29;
      }
      else if(Monat==2 && Jahr%4!=0 || Jahr%100==0 && Jahr%400!=0)
      {
      tageMonat=28;
      }
}

 //--- Unterprogramm zur Datumspr&uuml;fung
      function Fehlermeldung01()
      {
      alert("Kein gültiges Datum - Eingabeformat!");
      document.formular.formExtractionDate.focus();
      document.formular.formExtractionDate.value = "dd.mm.yyyy";
      return false;
      }


//--- betrifft Feld "DNA Degredation Date" -> pr&uuml;ft das Format dd.mm.yyyy
function PruefeDatumDegradation()
{
      if (document.formular.formDegradationDate.value.length==0) { return true }
      var Datum, Tag, Monat, Jahr, Laenge, tageMonat;
      Datum = document.formular.formDegradationDate.value;
      Laenge = document.formular.formDegradationDate.value.length;
      // alert zur Kontrolle (Länge)
      // alert("Länge ist " + Laenge);
      var datum = new Date();

      // Eingabeformat ist OK (10 Zeichen) nun Prüfung ob Trennzeichen ein Punkt ist

      if (Laenge==10 && Datum.substring(2,3)=="." && Datum.substring(5,6)==".")
      {
      Tag=parseInt(Datum.substring(0,2),10);
      Monat=parseInt(Datum.substring(3,5),10);
      Jahr=parseInt(Datum.substring(6,10),10);

      // alert zur Kontrolle Trennzeichen
      // alert("Trennzeichen OK");

      }
      
      else
      {
      Datum = "  .  .  ";
      Fehlermeldung02();return false;
      }

      // TageMonat festlegen, größter Eintrag für den entsprechenden Monat (auch Schaltjahr)
      if (Monat==4 || Monat==6 || Monat==9 || Monat==11)
      {
      tageMonat=30;
      }
      else if (Monat==1 || Monat==3 || Monat==5 || Monat==7 || Monat==8
        || Monat==10 || Monat==12)
      {
      tageMonat=31;
      }
      else if(Monat==2 && Jahr%4==0 && Jahr%100!=0 || Jahr%400==0)
      {
      tageMonat=29;
      }
      else if(Monat==2 && Jahr%4!=0 || Jahr%100==0 && Jahr%400!=0)
      {
      tageMonat=28;
      }
}

 //--- Unterprogramm zur Datumspr&uuml;fung
      function Fehlermeldung02()
      {
      alert("Kein gültiges Datum - Eingabeformat!");
      document.formular.formDegradationDate.focus();
      document.formular.formDegradationDate.value = "dd.mm.yyyy";
      return false;
      }

      //--- betrifft Feld "DNA Degredation Date" -> pr&uuml;ft das Format dd.mm.yyyy
function PruefeDatumBlock()
{
      if (document.formular.formBlockDate.value.length==0) { return true }
      var Datum, Tag, Monat, Jahr, Laenge, tageMonat;
      Datum = document.formular.formBlockDate.value;
      Laenge = document.formular.formBlockDate.value.length;
      // alert zur Kontrolle (Länge)
      // alert("Länge ist " + Laenge);
      var datum = new Date();

      // Eingabeformat ist OK (10 Zeichen) nun Prüfung ob Trennzeichen ein Punkt ist

      if (Laenge==10 && Datum.substring(2,3)=="." && Datum.substring(5,6)==".")
      {
      Tag=parseInt(Datum.substring(0,2),10);
      Monat=parseInt(Datum.substring(3,5),10);
      Jahr=parseInt(Datum.substring(6,10),10);

      // alert zur Kontrolle Trennzeichen
      // alert("Trennzeichen OK");

      }
      
      else
      {
      Datum = "  .  .  ";
      Fehlermeldung03();return false;
      }

      // TageMonat festlegen, größter Eintrag für den entsprechenden Monat (auch Schaltjahr)

      if (Monat==4 || Monat==6 || Monat==9 || Monat==11)
      {
      tageMonat=30;
      }
      else if (Monat==1 || Monat==3 || Monat==5 || Monat==7 || Monat==8
        || Monat==10 || Monat==12)
      {
      tageMonat=31;
      }
      else if(Monat==2 && Jahr%4==0 && Jahr%100!=0 || Jahr%400==0)
      {
      tageMonat=29;
      }
      else if(Monat==2 && Jahr%4!=0 || Jahr%100==0 && Jahr%400!=0)
      {
      tageMonat=28;
      }
}

 //--- Unterprogramm zur Datumspr&uuml;fung
      function Fehlermeldung03()
      {
      alert("Kein gültiges Datum - Eingabeformat!");
      document.formular.formBlockDate.focus();
      document.formular.formBlockDate.value = "";
      return false;
      }

//--- betrifft Feld "DNA eXTRACTION Date" -> pr&uuml;ft das Format dd.mm.yyyy
function PruefeDatumAmplification()
{
      if (document.formular.formAmplificationDate.value.length==0) { return true }
      var Datum, Tag, Monat, Jahr, Laenge, tageMonat;
      Datum = document.formular.formAmplificationDate.value;
      Laenge = document.formular.formAmplificationDate.value.length;
      // alert zur Kontrolle (Länge)
      // alert("Länge ist " + Laenge);
      var datum = new Date();

      // Eingabeformat ist OK (10 Zeichen) nun Prüfung ob Trennzeichen ein Punkt ist

      if (Laenge==10 && Datum.substring(2,3)=="." && Datum.substring(5,6)==".")
      {
      Tag=parseInt(Datum.substring(0,2),10);
      Monat=parseInt(Datum.substring(3,5),10);
      Jahr=parseInt(Datum.substring(6,10),10);

      // alert zur Kontrolle Trennzeichen
      // alert("Trennzeichen OK");

      }
      
      else
      {
      Datum = "  .  .  ";
      Fehlermeldung04();return false;
      }

      // TageMonat festlegen, größter Eintrag für den entsprechenden Monat (auch Schaltjahr)
      if (Monat==4 || Monat==6 || Monat==9 || Monat==11)
      {
      tageMonat=30;
      }
      else if (Monat==1 || Monat==3 || Monat==5 || Monat==7 || Monat==8
        || Monat==10 || Monat==12)
      {
      tageMonat=31;
      }
      else if(Monat==2 && Jahr%4==0 && Jahr%100!=0 || Jahr%400==0)
      {
      tageMonat=29;
      }
      else if(Monat==2 && Jahr%4!=0 || Jahr%100==0 && Jahr%400!=0)
      {
      tageMonat=28;
      }
}

 //--- Unterprogramm zur Datumspr&uuml;fung
      function Fehlermeldung04()
      {
      alert("Kein gültiges Datum - Eingabeformat!");
      document.formular.formAmplificationDate.focus();
      document.formular.formAmplificationDate.value = "dd.mm.yyyy";
      return false;
      }
      
function PruefeDatumOrder()
{
      if (document.formular.formOrderDate.value.length==0) { return true }
      var Datum, Tag, Monat, Jahr, Laenge, tageMonat;
      Datum = document.formular.formOrderDate.value;
      Laenge = document.formular.formOrderDate.value.length;
      // alert zur Kontrolle (Länge)
      // alert("Länge ist " + Laenge);
      var datum = new Date();

      // Eingabeformat ist OK (10 Zeichen) nun Prüfung ob Trennzeichen ein Punkt ist

      if (Laenge==10 && Datum.substring(2,3)=="." && Datum.substring(5,6)==".")
      {
      Tag=parseInt(Datum.substring(0,2),10);
      Monat=parseInt(Datum.substring(3,5),10);
      Jahr=parseInt(Datum.substring(6,10),10);

      // alert zur Kontrolle Trennzeichen
      // alert("Trennzeichen OK");

      }
      
      else
      {
      Datum = "  .  .  ";
      Fehlermeldung06();return false;
      }

      // TageMonat festlegen, größter Eintrag für den entsprechenden Monat (auch Schaltjahr)
      if (Monat==4 || Monat==6 || Monat==9 || Monat==11)
      {
      tageMonat=30;
      }
      else if (Monat==1 || Monat==3 || Monat==5 || Monat==7 || Monat==8
        || Monat==10 || Monat==12)
      {
      tageMonat=31;
      }
      else if(Monat==2 && Jahr%4==0 && Jahr%100!=0 || Jahr%400==0)
      {
      tageMonat=29;
      }
      else if(Monat==2 && Jahr%4!=0 || Jahr%100==0 && Jahr%400!=0)
      {
      tageMonat=28;
      }
}

 //--- Unterprogramm zur Datumspr&uuml;fung
      function Fehlermeldung06()
      {
      alert("Kein gültiges Datum - Eingabeformat!");
      document.formular.formOrderDate.focus();
      document.formular.formOrderDate.value = "dd.mm.yyyy";
      return false;
      }      

function PruefeDatumShipping()
{
      if (document.formular.formCShippingDate.value.length==0) { return true }
      var Datum, Tag, Monat, Jahr, Laenge, tageMonat;
      Datum = document.formular.formShippingDate.value;
      Laenge = document.formular.formShippingDate.value.length;
      // alert zur Kontrolle (Länge)
      // alert("Länge ist " + Laenge);
      var datum = new Date();

      // Eingabeformat ist OK (10 Zeichen) nun Prüfung ob Trennzeichen ein Punkt ist

      if (Laenge==10 && Datum.substring(2,3)=="." && Datum.substring(5,6)==".")
      {
      Tag=parseInt(Datum.substring(0,2),10);
      Monat=parseInt(Datum.substring(3,5),10);
      Jahr=parseInt(Datum.substring(6,10),10);

      // alert zur Kontrolle Trennzeichen
      // alert("Trennzeichen OK");

      }
      
      else
      {
      Datum = "  .  .  ";
      Fehlermeldung07();return false;
      }

      // TageMonat festlegen, größter Eintrag für den entsprechenden Monat (auch Schaltjahr)
      if (Monat==4 || Monat==6 || Monat==9 || Monat==11)
      {
      tageMonat=30;
      }
      else if (Monat==1 || Monat==3 || Monat==5 || Monat==7 || Monat==8
        || Monat==10 || Monat==12)
      {
      tageMonat=31;
      }
      else if(Monat==2 && Jahr%4==0 && Jahr%100!=0 || Jahr%400==0)
      {
      tageMonat=29;
      }
      else if(Monat==2 && Jahr%4!=0 || Jahr%100==0 && Jahr%400!=0)
      {
      tageMonat=28;
      }
}

 //--- Unterprogramm zur Datumspr&uuml;fung
      function Fehlermeldung07()
      {
      alert("Kein gültiges Datum - Eingabeformat!");
      document.formular.formShippingDate.focus();
      document.formular.formShippingDate.value = "dd.mm.yyyy";
      return false;
      }      
      
  function CheckUpdateSpecimen()
    {
    check = window.confirm("Attention! Older version of the link to the related Specimen will be deleted! Save data anyway?");
    if (check  == false) return false;
    }