if($dat>0) {mod "Id==$dat", ["Name", $nam, "Passwort", $pw, "EMail", $eml, "rStrasse", $str, "rPLZ", $plz, "rOrt", $ort, "rBeritt", $ber,
       "rBeteil", $bet, "rTelefon", $tel, "rGeboren", $geb, "rKarte", $IdRK, "rSchule", $cbS, "rPrivat", $cbP, "rEinsteller", $cbE, "rSelWas", serial(@list)], "reiterDB";}
     else{
       get "Name==$nam","reiterDB";
       if($_amount>0){$retStr = serial($rkey,$tkey,1,"butSend");} # ---- Name existiert bereits, keine neue Seite
       else {put ["Name", $nam, "Passwort", $pw, "EMail", $eml, "rStrasse", $str, "rPLZ", $plz, "rOrt", $ort, "rBeritt", $ber, "rBeteil", $bet,
         "rTelefon", $tel, "rGeboren", $geb, "rKarte", $IdRK, "rSchule", $cbS, "rPrivat", $cbP, "rEinsteller", $cbE, "rSelWas", serial(@list)], "reiterDB";}
     }