ANMÄLAN TILL TÄVLING

Avbrutet! Ingen anmälan mottagen.

"; } elseif ($insert != "") { $db = mysql_connect($sqlHost, $sqlUser, $sqlPass); mysql_select_db($sqlDb, $db); $query = "INSERT INTO horseevent values(0, NULL, NULL, \"$datum\", \"$ryttarfnamn\", \"$ryttarenamn\", \"$ryttarlicens\", \"$ryttarklubb\", \"$ryttarlan\", \"$ryttaradress\", \"$ryttarpostnr\", \"$ryttarort\", \"$ryttarpersonnr\", \"$ryttartfnkv\", \"$ryttartfndag\", \"$hastnamn\", \"$hastlicens\", \"$tavlingsbok\", \"$hastfodd\", \"$hastfarg\", \"$hastkon\", \"$hastras\", \"$haststam\", \"$agarfnamn\", \"$agarenamn\", \"$agarpersonnr\", \"$agaradress\", \"$agarpostnr\", \"$agarort\", \"$uppfodare\", \"$uppfort\", \"$unghast\", \"$mankhojd\", \"$hastregnr\", \"$girotyp\", \"$betaltsumma\", \"$klass1\", \"$klass2\", \"$klass3\", \"$klass4\", \"$klass5\", \"$klass6\", \"$klass7\", \"$klass8\", \"$klass9\", \"$klass10\", \"$klass11\", \"$klass12\", \"$klass13\", \"$klass14\", \"$klass15\", \"$stallforsta\", \"$stallsista\", \"$stallspeciell\", \"$epostadress\", \"$publicera\")"; $res = mysql_query($query); $id = mysql_insert_id($db); $query = "SELECT * FROM horseevent WHERE id=$id"; $res = mysql_query($query); if ($row = mysql_fetch_array($res)) { $msg = "Tävlingsdatum: $datum\n\nRyttare\n$row[4] $row[5]\n $row[9], $row[10] $row[11], $row[8]\n $row[12]\n tfn kv: $row[13], dag: $row[14]\n Licensnr: $row[6], rider för $row[7]\n\n Häst\n$row[15], $row[19], $row[20], $row[21], född $row[18], $row[22].\n Reg.nr: $row[34], Licens: $row[16], tävlingsbok: $row[17]\n\n Ägare\n$row[23] $row[24]\n$row[26], $row[27] $row[28]\n$row[25]\n\n Uppfödare\n$row[29] $row[30]\n\n $row[35] betalt till $row[34]\n\n Deltar i "; for ($i=36; $i<51; $i++) { if ($row[$i] == "ja") { $klass = $i-35; $msg .= "klass $klass "; } } if ($row[51] == "0000-00-00") { $msg .= "\nUppstallning önskas ej.\n"; } else { $msg .= "\nUppstallning önskas fr.o.m. $row[51] t.o.m. $row[52].\n"; } if ($row[53] != "") { $msg .= "Speciella stallinstruktioner: \"$row[53]\"\n"; } $msg .= "$row[54]\n"; if ($row[55] != "ja") { $msg .= "Vill ej publiceras i resultatlista!\n"; } mail($row[54], "Anmalan", $msg, "Bcc: $mail_bcc\r\n"); echo "

Klart, anmälan mottagen.

Ett mail kommer inom kort som bekräftar anmälan."; } else { echo "

Fel uppstod! Ingen anmälan mottagen.

"; } } elseif ($kontroll != "") { ?>

Hästägarförsäkran

Anmälaren försäkrar härmed på heder och samvete att hästen endast kommer att starta under förutsättning:

Att hästen ej under de senaste tre veckorna före tävlingens början visat några tecken på smittsam sjukdom.
Att hästen under de senaste tre veckorna före tävlingens början, icke varit uppställd i stall, där smittsam hästsjukdom mig veterligen förekommit.
Att hästen är erforderligt tränad för tävlingsdeltagande, samt i övrigt mig veterligen fullt frisk.

Felaktiga data\n"; $errorFound = 1; } echo "$str
\n"; } $errorFound = 0; if (strcasecmp($agarfnamn, "ryttaren") == 0) { $agarfnamn = $ryttarfnamn; $agarenamn = $ryttarenamn; $agarpersonnr = $ryttarpersonnr; $agaradress = $ryttaradress; $agarpostnr = $ryttarpostnr; $agarort = $ryttarort; } if ($datum=="") { errPrint("Datum för tävlingen saknas.", &$errorFound); } elseif (!ereg("^[[:blank:]]*[[:digit:]]{4}-[[:digit:]]{2}-[[:digit:]]{2}[[:blank:]]*$", $datum)) { errPrint("V.v. ange datum som åååå-mm-dd", &$errorFound); } if ($ryttarfnamn=="") { errPrint("Ryttarens förnamn saknas.", &$errorFound); } if ($ryttarenamn=="") { errPrint("Ryttarens efternamn saknas.", &$errorFound); } // if ($ryttarlicens=="") { errPrint("Ryttarens licens saknas. Om nyligen betalt ange 99999 - visa kvitto!", &$errorFound); } if ($ryttarklubb=="") { errPrint("Ryttarens klubb saknas.", &$errorFound); } // if ($ryttarlan=="") { errPrint("Ryttarens länsbokstav (nationalitet om annan än svensk) saknas.", &$errorFound); } if ($ryttaradress=="") { errPrint("Ryttarens adress saknas.", &$errorFound); } if ($ryttarpostnr=="") { errPrint("Ryttarens postnummer saknas.", &$errorFound); } if ($ryttarort=="") { errPrint("Ryttarens hemort saknas.", &$errorFound); } if ($ryttarpersonnr=="") { errPrint("Ryttarens personnummer saknas.", &$errorFound); } if ($ryttartfnkv=="") { errPrint("Ryttarens telefonnummer (kväll) saknas.", &$errorFound); } if ($ryttartfndag=="") { errPrint("Ryttarens telefonnummer (dag) saknas.", &$errorFound); } if ($hastnamn=="") { errPrint("Hästens namn saknas.", &$errorFound); } // if ($tavlingsbok=="") { errPrint("Tävlingsbok saknas.", &$errorFound); } // if ($hastlicens=="") { errPrint("Hästens licens saknas. Om nyligen betalt ange 99999 - visa kvitto!", &$errorFound); } if ($hastfodd=="") { errPrint("Hästens födelseår saknas.", &$errorFound); } if ($hastfarg=="") { errPrint("Hästens färg saknas.", &$errorFound); } if ($hastkon=="välj") { errPrint("Hästens kön saknas.", &$errorFound); } if ($hastras=="") { errPrint("Hästens ras saknas.", &$errorFound); } if ($haststam=="") { errPrint("Hästens stam saknas.", &$errorFound); } if ($agarfnamn=="") { errPrint("Ägarens förnamn saknas.", &$errorFound); } if ($agarenamn=="") { errPrint("Ägarens efternamn saknas.", &$errorFound); } if ($agarpersonnr=="") { errPrint("Ägarens personnummer saknas.", &$errorFound); } if ($agaradress=="") { errPrint("Ägarens adress saknas.", &$errorFound); } if ($agarpostnr=="") { errPrint("Ägarens postnummer saknas.", &$errorFound); } if ($agarort=="") { errPrint("Ägarens hemort saknas.", &$errorFound); } // if ($uppfodare=="") { errPrint("Uppfödare saknas.", &$errorFound); } // if ($uppfort=="") { errPrint("Uppfödarens hemort saknas.", &$errorFound); } // if ($hastregnr=="") { errPrint("Hästens registreringsnummer saknas.", &$errorFound); } if ($girotyp=="") { errPrint("Uppgift om vart pengar betalats saknas.", &$errorFound); } if ($betaltsumma=="") { errPrint("Betald summa saknas.", &$errorFound); } if ($klass1=="" && $klass2=="" && $klass3=="" && $klass4=="" && $klass5=="" && $klass6=="" && $klass7=="" && $klass8=="" && $klass9=="" && $klass10=="" && $klass11=="" && $klass12=="" && $klass13=="" && $klass14=="" && $klass15=="") { errPrint("Ingen klass är angedd", &$errorFound); } if ($stallforsta!="" || $stallsista!="") { if ($stallforsta=="" || $stallsista=="") { errPrint("Ange både första och sista uppstallningsdatum", &$errorFound); } elseif (!ereg("^[[:blank:]]*[[:digit:]]{4}-[[:digit:]]{2}-[[:digit:]]{2}[[:blank:]]*$", $stallforsta) || !ereg("^[[:blank:]]*[[:digit:]]{4}-[[:digit:]]{2}-[[:digit:]]{2}[[:blank:]]*$", $stallsista)) { errPrint("V.v. ange uppstallningsdatum som åååå-mm-dd", &$errorFound); } elseif ($stallforsta >= $stallsista) { errPrint("Sista uppstallningsdatum bör vara senare än första", &$errorFound); } } if ($epostadress=="") { errPrint("E-postadress måste anges", &$errorFound); } else { $pos = strpos($epostadress, '@'); if ($pos === false) { errPrint("E-postadress ska innehålla \"@\"", &$errorFound); } else { if ($pos === 0) { errPrint("E-postadress kan inte börja med \"@\"", &$errorFound); } else { if ($pos == strlen($epostadress)-1) { errPrint("E-postadress kan inte sluta med \"@\"", &$errorFound); } else { $pos = strpos($epostadress, '@', $pos+1); if ($pos !== false) { errPrint("E-postadress ska bara innehålla 1 st. \"@\"", &$errorFound); } } } } } if ($errorFound!=0) { echo "Tillbaka till formuläret\n"; } else { echo "

Är detta korrekt?

\n"; $msg = "Tävlingsdatum: $datum

\nRyttare
\n$ryttarfnamn $ryttarenamn
\n $ryttaradress, $ryttarpostnr $ryttarort, $ryttarlan
\n $ryttarpersonnr
\n tfn kv: $ryttartfnkv, dag: $ryttartfndag
\n Licensnr: $ryttarlicens, rider för $ryttarklubb
\n
\n Häst
\n$hastnamn, $hastfarg, $hastkon, $hastras, född $hastfodd, $haststam.
\n Reg.nr: $hastregnr, Licens: $hastlicens, tävlingsbok: $tavlingsbok
\n
\n Ägare
\n$agarfnamn $agarenamn
\n$agaradress, $agarpostnr $agarort
\n$agarpersonnr
\n
\n Uppfödare
\n$uppfodare $uppfort
\n
\n $betaltsumma betalt till $girotyp
\n
\n Deltar i "; if ($klass1 == "ja") { $msg .= "klass 1 "; } if ($klass2 == "ja") { $msg .= "klass 2 "; } if ($klass3 == "ja") { $msg .= "klass 3 "; } if ($klass4 == "ja") { $msg .= "klass 4 "; } if ($klass5 == "ja") { $msg .= "klass 5 "; } if ($klass6 == "ja") { $msg .= "klass 6 "; } if ($klass7 == "ja") { $msg .= "klass 7 "; } if ($klass8 == "ja") { $msg .= "klass 8 "; } if ($klass9 == "ja") { $msg .= "klass 9 "; } if ($klass10 == "ja") { $msg .= "klass 10 "; } if ($klass11 == "ja") { $msg .= "klass 11 "; } if ($klass12 == "ja") { $msg .= "klass 12 "; } if ($klass13 == "ja") { $msg .= "klass 13 "; } if ($klass14 == "ja") { $msg .= "klass 14 "; } if ($klass15 == "ja") { $msg .= "klass 15 "; } if ($stallforsta == "") { $msg .= "
\nUppstallning önskas ej.
\n"; } else { $msg .= "
\nUppstallning önskas fr.o.m. $stallforsta t.o.m. $stallsista.
\n"; } if ($stallspeciell != "") { $msg .= "Speciella stallinstruktioner: \"$stallspeciell\"
\n"; } $msg .= "$epostadress
\n"; if ($publicera != "ja") { $msg .= "Vill ej publiceras i resultatlista!
\n"; } echo $msg; echo ""; } } else { ?>

ANMÄLAN TILL TÄVLING

Arrangör

Tävlingsdatum

Nerikes Distansryttarklubb

Ryttare

Förnamn

Efternamn

Licensnummer

Klubb (ej förkortning)

Länsbokstav om ej svensk nationalitet

Adress

Postnummer

Ort

Personnummer

Telefon, kväll

Telefon, dag

Häst/Ponny

Hästens/Ponnyns namn

Tävlingsboksnr

Licensnummer

Född, år

Färg

Kön

Ras

Härstamning (far, mor-morfar)

Ägare, Förnamn

Efternamn

Personnummer/Organisationsnummer

Adress

Postnummer

Ort

Uppfödare

Ort

Önskar starta i avdelning för unghäst/ungponny

Mankhöjd (endast ponny) cm

Registreringsnummer

Ja Nej

(behövs ej)

Fyll i markerade fält - skuggade fält används av arrangören

Inbetalt per

Kronor

Postgiro Bankgiro

Klasser

Kronor

Anmälan till klass

Anmälan-meeting-avgift

Start/Anmälningsavgift

Premier

Veterinäravgift

Övriga avgifter

Uppstallning önskas fr.o.m.

t.o.m.

Dag à

Dygn à

Meeting à

Summa ryttaren/arrangören tillgodo

Speciella önskemål om uppstallning

Namnteckning

Namn vid utskrift

Namnförtydligande

E-postadress

Skriv nedan mottagare av ryttarmeddelande

Förnamn

Efternamn

Skickas till E-postadress angiven ovan.

Adress

Postnummer

Ort

Jag tillåter att mitt namn publiceras i resultatlista på Internet