## CSV - GESTALTUNG   und AUSGABE                                                                                                                                 #
#--------------------------------------------------------------------------

{

#-------------------------------------------------------------------------

{

$_header="Content-disposition: filename=$hersteller - csv-manager.csv\n\n";

else {

out "<table width='100%' CELLPADDING='2' CELLSPACING='2' BORDER='0' ALIGN='CENTER'>";
out "<TR>";
out "<TD ALIGN='RIGHT' WIDTH='50%' VALIGN='TOP' BGCOLOR='#003399'><FONT FACE='Arial' SIZE='2' COLOR='#FFFFFF'><STRONG><B>CSV - MANAGER Datenausgabe</FONT></B></STRONG> </fOnt></TD>";
out "<TD ALIGN='RIGHT' WIDTH='50%' VALIGN='TOP' BGCOLOR='#003399'><FONT FACE='Arial' SIZE='3' COLOR='#FFFFFF'><STRONG><B><FONT SIZE='+3'>UNI-FIT</FONT></B></STRONG> &reg;</FONT></TD>";
out "</TR>";
out "<TR>";
out "<TD ALIGN='RIGHT' WIDTH='50%' VALIGN='TOP' BGCOLOR='#003399'><FONT FACE='Arial' SIZE='2' COLOR='#FFFFFF'></fOnt></TD>";
out "<TD ALIGN='RIGHT' WIDTH='50%' VALIGN='TOP' BGCOLOR='#003399'><a href='http://www.UNI-FIT.de/cgi-bin/baseportal.pl?htx=/unifit-daten.de/csv_manager/csv_manager&uid=$uid&sid=$_session' target='_self'><FONT FACE='Arial' SIZE='1' COLOR='#FFFFFF'>zurück</FONT></a></TD>";
out "</TR>";
out "</table>";

# CSV - BELEGUNG ==> EBAY KOPFZELLE 

#------------------------------------------------------------------------get ["Hersteller" , "==" , "$hersteller"] , "../master_kfz/master_kfz_unifit" , "fahrzeuge_holen";

{

   my($k1,$k2,$k3,$k4,$k5,$k6,$k7,$k8,$k9,$k10,$k11,$k12)=split /<Br>/i,$Kfz_typ; #oder split(/<Br>/i,$Kfz_typ);
   my($von_k1,$bis_k1)=split /\ -\ /,$k1;
$von_k1=~s/Baujahr:\ //g; #
   my($von_k3,$bis_k3)=split /\ -\ /,$k3;
$von_k3=~s/Baujahr:\ //g; #
   my($von_k5,$bis_k5)=split /\ -\ /,$k5;
$von_k5=~s/Baujahr:\ //g; #
   my($von_k7,$bis_k7)=split /\ -\ /,$k7;
$von_k7=~s/Baujahr:\ //g; #
   my($von_k9,$bis_k9)=split /\ -\ /,$k9;
$von_k9=~s/Baujahr:\ //g; #
   my($von_k11,$bis_k11)=split /\ -\ /,$k11;
$von_k11=~s/Baujahr:\ //g; #

# AB HIER WERDEN DIE ARTIKELGRUPPEN UND ZUSATZTEXTE GENERIERT

{
  my($p1,$p2,$p3,$p4,$p5,$p6,$p7)=split /\*/,$tmp_artikel;   ### DIE WERTE WERDEN GETRENNT UND FÜRS GET VORBEREITET
#    $p1 = Artikelname
#    $p2 = Text 2
#    $p3 = Katalysator, Lambdasonde, Flexrohr, Hosenrohr
#    $p4 = Text 4
#    $p5 = Text für ebay Titel anfang
#    $p6 = Text für ebay Subtitel
#    $p7 = Wert für EbayKategorie
#################################################################################################################
get ["Name" , "==" , "$p1"] , "../shop_de/artikel";

{

#                                                                                                               #
### A U S G A B E - D E F I N I T I O N
$yatego_titel="$p2 ","$Name für $Hersteller $Modell";
$ebay_titel="$p2 "," für $Hersteller $Modell";
######## ABFRAGE NACH TEXTLÄNGE ==> T I T E L  #############
$tmp_laenge_titel=length($yatego_titel);
if ($tmp_laenge_titel<=250)
   { $font_color_titel="red"; }
   else 
   {$font_color_titel="green";}
############# HIER WERDEN DIE EBAY KATEGORIEN VERBUNDEN     

#  UND DA LIEGT DER FEHLER ich bekomme zwar die datenbank angesprochen, aber nicht die richtigen werte geholt. die datenbank hat ein feld 'auto_name' wird richtig angzeigt, dann kommen 4 felder (katalysator, lambdasonde, flexrohr, hosenrohr) diese werte steht in $p7 drinnen. gebe ich $p7 direkt aus, steht der korrekte wert drinnen, nun will ich aber das feld des inhalt anzeigen, und das klappt nicht. wo liegt den der fehler ?
#---------------------------------------------------------------------------
get ["auto_name" , "==" , "$hersteller"] , "autonamen";
out "<br><br>================= $auto_name / $p7<br>";
#out "KATEGORIE - KATALYSATOR: $katalysator - p3: $p3 - $p7<br>";
#out "KATEGORIE - LAMBDASONDE: $lambdasonde - p3: $p3 - $p7<br>";
#out "KATEGORIE - FLEXROHR: $flexrohr - p3: $p3 - $p7<br>";
#out "KATEGORIE - HOSENROHR: $hosenrohr - p3: $p3 - $p7<br>";
$tmp_kategorie="$p7";
out "\$tmp_kategorie: $tmp_kategorie<br><br>";
 out "$tmp_status;$p5 für $Hersteller $Modell;Subtitel: $p6;KATEGORIE: $p3 oder $p7 \n" if $k1 ne "";
 out "$tmp_status;$p5 für $Hersteller $Modell;Subtitel: $p6;KATEGORIE: $p3 oder $p7 \n" if $k3 ne "";
 out "$tmp_status;$p5 für $Hersteller $Modell;Subtitel: $p6;KATEGORIE: $p3 oder $p7 \n" if $k5 ne "";