// Daten werden ausgelesen
// ************************
$count=0; // Datensätze werden ausgelesen
$fp=fopen($datei,"r");
while($line=fgets($fp,10000)) {
//echo "$line ";
$zeile[$count]=$line;
$count++;
}
$zeilenzahl=$count;
fclose($fp);
$anzahl=$count--;
$anzahldetails=$count;
if ($anzahl<=0)
{
//echo "
Es sind noch keine Linkgruppen angelegt !";die;
}
//echo " Es waren $anzahl Datensätze ";
if ($anzahl==0)
{
//echo " Es befinden sich keine Datemsätze im System";die;
}
if($anzahl>1){sort($zeile);} // Sortierung absteigend
$cc=0; // Datensätze werden in Elemente gesplittet
for ($n=0;$n<$anzahl;$n++)
{
$element=split("#-#",$zeile[$n]);
foreach ($element as $split)
{
$data[$cc]=$split;
//echo "$n.$cc $data[$cc] ";
$cc++;
}
}
$anzahldata=$cc;
//echo " Das ergibt $anzahldata einzelne Daten ";
$durchlauf=$anzahldata;
$anzfelder=$anzahldata/$anzahl;
$count=0;
$xx=0;
$schritt=$anzfelder; // Schrittweite der Schleife
$oa=0;
for ($n=0;$n<$durchlauf;$n=$n+$schritt)
{
if ($anzfelder>$xx) {$d01[$count]=stripslashes($data[$n+$xx]);$xx++;$jamo[$count]=trim(substr($d01[$count],0,8));}
if ($anzfelder>$xx) {$d02[$count]=stripslashes($data[$n+$xx]);$xx++;}
if ($anzfelder>$xx) {$d03[$count]=stripslashes($data[$n+$xx]);$xx++;}
if ($anzfelder>$xx) {$d04[$count]=stripslashes($data[$n+$xx]);$xx++;}
if ($anzfelder>$xx) {$d05[$count]=stripslashes($data[$n+$xx]);$xx++;}
if ($anzfelder>$xx) {$d06[$count]=stripslashes($data[$n+$xx]);$xx++;}
if ($anzfelder>$xx) {$d07[$count]=stripslashes($data[$n+$xx]);$xx++;}
if ($anzfelder>$xx) {$d08[$count]=stripslashes($data[$n+$xx]);$xx++;}
if ($anzfelder>$xx) {$d09[$count]=stripslashes($data[$n+$xx]);$xx++;}
if ($anzfelder>$xx) {$d10[$count]=stripslashes($data[$n+$xx]);$xx++;}
if ($anzfelder>$xx) {$d11[$count]=stripslashes($data[$n+$xx]);$xx++;}
if ($anzfelder>$xx) {$d12[$count]=stripslashes($data[$n+$xx]);$xx++;}
if ($anzfelder>$xx) {$d13[$count]=stripslashes($data[$n+$xx]);$xx++;}
if ($anzfelder>$xx) {$d14[$count]=($data[$n+$xx]);$xx++;}
if ($anzfelder>$xx) {$d15[$count]=stripslashes($data[$n+$xx]);$xx++;}
if ($anzfelder>$xx) {$d16[$count]=stripslashes($data[$n+$xx]);$xx++;}
if ($anzfelder>$xx) {$d17[$count]=($data[$n+$xx]);$xx++;}
if ($anzfelder>$xx) {$d18[$count]=($data[$n+$xx]);$xx++;}
if (trim($d18[$count])=="ja"){$jahrmo[$oa]=$d04[$count].$d03[$count];$oa++;} // alle Temrine die online sind die Monate im Format JJJJMM erzeugen
if ($anzfelder>$xx) {$d19[$count]=stripslashes($data[$n+$xx]);$xx++;}
if ($anzfelder>$xx) {$d20[$count]=stripslashes($data[$n+$xx]);$xx++;}
if ($anzfelder>$xx) {$d21[$count]=stripslashes($data[$n+$xx]);$xx++;}
if ($anzfelder>$xx) {$d22[$count]=stripslashes($data[$n+$xx]);$xx++;}
if ($anzfelder>$xx) {$d23[$count]=stripslashes($data[$n+$xx]);$xx++;}
if ($anzfelder>$xx) {$d24[$count]=stripslashes($data[$n+$xx]);$xx++;}
if ($anzfelder>$xx) {$d25[$count]=stripslashes($data[$n+$xx]);$xx++;}
$count++;
$xx=0;
}
// **********************************************************************
// ********** DATEN AUSLESEN FERTIG *************************************
// Variablen: $d01[x] $d02[x] ...... $d45[x]
$monateuni = array_unique($jahrmo);
$anzmonate = count($monateuni);
sort($monateuni);
?>