lxo-import/addressB.php

   1 <html>
   2 <LINK REL="stylesheet" HREF="../css/lx-office-erp.css" TYPE="text/css" TITLE="Lx-Office stylesheet">
   3 <body>
   4 <?php
   5 /*
   6 Kunden- bzw. Lieferantenimport mit Browser nach Lx-Office ERP
   7
   8 Copyright (C) 2005
   9 Author: Holger Lindemann
  10 Email: hli@lx-system.de
  11 Web: http://lx-system.de
  12
  13 */
  14
  15 require ("import_lib.php");
  16
  17 if (!$_SESSION["db"]) {
  18     $conffile="../config/authentication.pl";
  19     if (!is_file($conffile)) {
  20         ende("authentication.pl nicht gefunden oder unlesbar");
  21     }
  22 }
  23
  24 if (!anmelden()) ende("Anmeldung fehlgeschlagen");
  25
  26 if ($_POST["ok"]=="Hilfe") {
  27     echo "Importfelder:<br>";
  28     echo "Feldname => Bedeutung<br>";
  29     foreach($address as $key=>$val) {
  30         echo "$key => $val<br>";
  31     }
  32     $header=implode(";",array_keys($address));
  33     echo $header;
  34     exit(0);
  35 };
  36
  37 if ($_POST["ok"]) {
  38
  39 $nun=time();
  40
  41
  42 /* get DB instance */
  43 $db=$_SESSION["db"]; //new myDB($login);
  44
  45 $crm=checkCRM();
  46
  47 function ende($txt) {
  48     echo "Abbruch: $txt<br>";
  49     exit(1);
  50 }
  51 $dir = "../users/";
  52 clearstatcache ();
  53 //print_r($_FILES);
  54 $test=$_POST["test"];
  55 if (!empty($_FILES["Datei"]["name"])) {
  56     $file=$_POST["ziel"];
  57     if (!move_uploaded_file($_FILES["Datei"]["tmp_name"],$dir.$file.".csv")) {
  58         $file=false;
  59         echo "Upload von ".$_FILES["Datei"]["name"]." fehlerhaft. (".$_FILES["Datei"]["error"].")<br>";
  60     }
  61 } else if (is_file($dir.$_POST["ziel"].".csv")) {
  62     $file=$_POST["ziel"];
  63 } else {
  64     $file=false;
  65 }
  66
  67 if (!$file) ende ("Kein Datenfile");
  68
  69 $trenner=($_POST["trenner"])?$_POST["trenner"]:",";
  70 if ($trenner=="other") {
  71     $trenner=trim($trennzeichen);
  72     if (substr($trenner,0,1)=="#") if (strlen($trenner)>1) $trenner=chr(substr($trenner,1));
  73 }
  74
  75 if (!file_exists($dir.$file.".csv")) ende("$file.csv nicht im Ordner oder leer");
  76
  77
  78 if (!$db->chkcol($file)) ende("Importspalte kann nicht angelegt werden");
  79
  80 $employee=chkUsr($_SESSION["employee"]);
  81 if (!$employee) ende("Ung&uuml;ltiger User");
  82
  83 $kunde_fld = array_keys($address);
  84
  85     //Zeichencodierung des Servers
  86     $tmpcode = $db->getServerCode();
  87     //Leider sind die Benennungen vom Server anders als von mb_detect_encoding
  88     if ($tmpcode == "UTF8") {
  89          define("ServerCode","UTF-8");
  90     } else if ($tmpcode == "LATIN9") {
  91          define("ServerCode","ISO-8859-15");
  92     } else if ($tmpcode == "LATIN1") {
  93          define("ServerCode","ISO-8859-1");
  94     } else {
  95          define("ServerCode",$tmpcode);
  96     }
  97     //Zeichensatz sollte gleich sein, sonst ist die Datenkonvertierung nutzlos
  98     //DB und LxO müssen ja nicht auf der gleichen Maschiene sein.
  99     if($tmpcode<>$db->getClientCode()) {
 100         $rc = $db->setClientCode($tmpcode);
 101     }
 102
 103     // Zeichenkodierung File
 104     if ($_POST["encoding"] == "auto") {
 105          define("Auto",true);
 106          define("Translate",true);
 107     } else {
 108          define("Auto",false);
 109          if ($_POST["encoding"] == ServerCode) {
 110             define("Translate",false);
 111          } else {
 112             define("Translate",true);
 113             define("FileCode",$_POST["encoding"]);
 114          }
 115     }
 116
 117 $f=fopen($dir.$file.".csv","r");
 118 $zeile=fgets($f,1200);
 119 $infld=split($trenner,strtolower($zeile));
 120 $first=true;
 121 $ok=true;
 122 foreach ($infld as $fld) {
 123     $fld = strtolower(trim(strtr($fld,array("\""=>"","'"=>""))));
 124     if ($fld=="branche" && !$crm) { $in_fld[]=""; continue; };
 125     if ($fld=="sw" && !$crm) { $in_fld[]=""; continue; };
 126     $in_fld[]=$fld;
 127 }
 128
 129 $j=0;
 130 $m=0;
 131 $zeile=fgetcsv($f,1200,$trenner);
 132 if ($ok) while (!feof($f)){
 133     $i=0;
 134     $m++;
 135     $anrede="";
 136     $Matchcode="";
 137     $sql="insert into $file ";
 138     $keys="(";
 139     $vals=" values (";
 140     $number=false;
 141     foreach($zeile as $data) {
 142         if (!in_array(trim($in_fld[$i]),$kunde_fld)) {
 143             if ($in_fld[$i]=="anrede") {  $anrede=addslashes(trim($data)); }
 144             $i++;
 145             continue;
 146         };
 147         $data=trim($data);
 148         // seit 2.6 ist die DB-Kodierung UTF-8 @holger Ansonsten einmal vorher die DB-Encoding auslesen
 149         // Falls die Daten ISO-kodiert kommen entsprechend wandeln
 150         // done!
 151         // UTF-8 MUSS als erstes stehen, da ansonsten die Prüfung bei ISO-8859-1 aufhört ...
 152         // die blöde mb_detect... tut leider nicht immer, daher die Möglichkeit der Auswahl
 153         // TODO Umlaute am Anfang wurden bei meinem Test nicht übernommen (Österreich). S.a.:
 154         // http://forum.de.selfhtml.org/archiv/2007/1/t143904/
 155
 156         if (Translate) translate($data);
 157
 158         //$data=htmlentities($data);
 159         $data=addslashes($data);
 160         if ($in_fld[$i]==$file."number") {  // customernumber || vendornumber
 161             if (empty($data) or !$data) {
 162                 $data=getKdId();
 163                 $number=true;
 164             } else {
 165                 $data=chkKdId($data);
 166                 $number=true;
 167             }
 168         } else if ($in_fld[$i]=="taxincluded"){
 169             $data=strtolower(substr($data,0,1));
 170             if ($data!="f" && $data!="t") $data="f";
 171         } else if ($in_fld[$i]=="ustid"){
 172             $data=strtr($data," ","");
 173         } /*else if ($in_fld[$i]=="matchcode") {
 174                   $matchcode=$data;
 175                   $i++;
 176                   continue;
 177                 if ($data==false or empty($data) or !$data) {
 178             if (in_array($in_fld[$i],array("name"))) {
 179                 $data=$matchcode;
 180             }
 181         }
 182             }*/
 183
 184         $keys.=$in_fld[$i].",";
 185         if ($data==false or empty($data) or !$data) {
 186             $vals.="null,";
 187         } else {
 188             if ($in_fld[$i]=="contact"){
 189                 if ($anrede) {
 190                     $vals.="'$anrede $data',";
 191                 } else {
 192                     $vals.="'$data',";
 193                 }
 194             } else {
 195                 $vals.="'".$data."',";
 196             }
 197         }
 198         $i++;
 199     }
 200     if (!$number) {
 201         $keys.=$file."number,";
 202         $vals.="'".getKdId()."',";
 203     }
 204     if ($keys<>"(") {
 205         if ($test) {
 206             if ($first) {
 207                 echo "<table border='1'>\n";
 208                 echo "<tr><th>".str_replace(",","</th><th>",substr($keys,1,-1))."</th></tr>\n";
 209                 $first=false;
 210             };
 211             $vals=str_replace("',","'</td><td>",substr($vals,9,-1));
 212             echo "<tr><td>".str_replace("null,","null</td><td>",$vals)."</td></tr>\n";
 213             //echo "Import $j<br>\n";
 214             flush();
 215         } else {
 216             $sql.=$keys."taxzone_id,import)";
 217             $sql.=$vals."0,$nun)";
 218             $rc=$db->query($sql);
 219             if (!$rc) echo "Fehler: ".$sql."<br>";
 220         }
 221         $j++;
 222     } else {
 223           $vals=str_replace("',","'</td><td>",substr($vals,9,-1));
 224           echo "<tr><td style=\"color:red\">".str_replace("null,","null</td><td style=\"color:red\">",$vals)."</td></tr>\n";
 225           flush();
 226         }
 227     $zeile=fgetcsv($f,1200,$trenner);
 228 }
 229 fclose($f);
 230 if ($test) echo "</table>\n ##### = Neue Kunden-/Lieferantennummer\n<br>";
 231 echo $j." $file importiert.\n";
 232 } else {
 233 ?>
 234
 235 <p class="listtop">Adressimport f&uuml;r die ERP<p>
 236 <br>
 237 <form name="import" method="post" enctype="multipart/form-data" action="addressB.php">
 238 <!--form name="import" method="post"  action="addressB.php"-->
 239 <input type="hidden" name="MAX_FILE_SIZE" value="2000000">
 240 <input type="hidden" name="login" value="<?php echo  $login ?>">
 241 <table>
 242 <tr><td></td><td><input type="submit" name="ok" value="Hilfe"></td></tr>
 243 <tr><td>Zieltabelle</td><td><input type="radio" name="ziel" value="customer" checked>customer <input type="radio" name="ziel" value="vendor">vendor</td></tr>
 244 <tr><td>Trennzeichen</td><td>
 245         <input type="radio" name="trenner" value=";" checked>Semikolon
 246         <input type="radio" name="trenner" value=",">Komma
 247         <input type="radio" name="trenner" value="#9" checked>Tabulator
 248         <input type="radio" name="trenner" value=" ">Leerzeichen
 249         <input type="radio" name="trenner" value="other">
 250         <input type="text" size="2" name="trennzeichen" value="">
 251 </td></tr>
 252 <tr><td>Test</td><td><input type="checkbox" name="test" value="1">ja</td></tr>
 253 <tr><td>Daten</td><td><input type="file" name="Datei"></td></tr>
 254 <tr><td>Verwendete<br />Zeichecodierung</td><td>
 255         <select name="encoding">
 256         <option value="auto">Automatisch (versuchen)</option>
 257         <option value="UTF-8">UTF-8</option>
 258         <option value="ISO-8859-1">ISO-8859-1</option>
 259         <option value="ISO-8859-15">ISO-8859-15</option>
 260         <option value="Windows-1252">Windows-1252</option>
 261         <option value="ASCII">ASCII</option>
 262         </select>
 263 </td></tr>
 264 <tr><td></td><td><input type="submit" name="ok" value="Import"></td></tr>
 265 </table>
 266 </form>
 267 <?php }; ?>