print DATEIA 
$satz1[0],";",$satz1[1],"\n",
$satz2[0],";",$satz1[1],"\n",
$satz3[0],";",$satz1[1],"\n",
$satz4[0],";",$satz1[1],"\n",
$satz5[0],";",$satz1[1],"\n",
$satz6[0],";",$satz1[1],"\n",
$satz7[0],";",$satz1[1],"\n",
$satz8[0],";",$satz1[1],"\n";