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 function ende($txt) {
  18   echo "Abbruch: $txt<br>";
  19   exit(1);
  20 }
  21
  22 if (!$_SESSION["db"]) {
  23     $conffile="../config/lx_office.conf";
  24     if (!is_file($conffile)) {
  25         ende("lx_office.conf nicht gefunden oder unlesbar");
  26     }
  27 }
  28
  29 if (!anmelden()) ende("Anmeldung fehlgeschlagen");
  30
  31 if ($_POST["ok"]=="Hilfe") {
  32     echo "Importfelder:<br>";
  33     echo "Feldname => Bedeutung<br>";
  34     foreach($address as $key=>$val) {
  35         echo "$key => $val<br>";
  36     }
  37     $header=implode(";",array_keys($address));
  38     echo $header;
  39     exit(0);
  40 };
  41
  42 if ($_POST["ok"]) {
  43
  44 $nun=time();
  45
  46
  47 /* get DB instance */
  48 $db=$_SESSION["db"]; //new myDB($login);
  49
  50 $crm=checkCRM();
  51
  52 $dir = "../users/";
  53 clearstatcache ();
  54 //print_r($_FILES);
  55 $test=$_POST["test"];
  56 if (!empty($_FILES["Datei"]["name"])) {
  57     $file=$_POST["ziel"];
  58     if (!move_uploaded_file($_FILES["Datei"]["tmp_name"],$dir.$file.".csv")) {
  59         $file=false;
  60         echo "Upload von ".$_FILES["Datei"]["name"]." fehlerhaft. (".$_FILES["Datei"]["error"].")<br>";
  61     }
  62 } else if (is_file($dir.$_POST["ziel"].".csv")) {
  63     $file=$_POST["ziel"];
  64 } else {
  65     $file=false;
  66 }
  67
  68 if (!$file) ende ("Kein Datenfile");
  69
  70 $trenner=($_POST["trenner"])?$_POST["trenner"]:",";
  71 if ($trenner=="other") {
  72     $trenner=trim($trennzeichen);
  73 }
  74 if (substr($trenner,0,1)=="#") if (strlen($trenner)>1) $trenner=chr(substr($trenner,1));
  75
  76 if (!file_exists($dir.$file.".csv")) ende("$file.csv nicht im Ordner oder leer");
  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 function chkBusiness($data,$id=true) {
 118 global $db;
 119     if ($id) {
 120         $rs = $db->getAll("select id from business where id =$data");
 121     } else {
 122         $rs = $db->getAll("select id from business where decription ilike '$data'");
 123     }
 124     if ($rs[0]["id"]) {
 125         return $rs[0]["id"];
 126     } else {
 127         return "null";
 128     }
 129 }
 130
 131 function chkSalesman($data,$id=true) {
 132 global $db;
 133     if ($id) {
 134         $rs = $db->getAll("select id from employee where id =$data");
 135     } else {
 136         $rs = $db->getAll("select id from employee where login ilike '$data'");
 137     }
 138     if ($rs[0]["id"]) {
 139         return $rs[0]["id"];
 140     } else {
 141         return "null";
 142     }
 143 }
 144
 145 $f=fopen($dir.$file.".csv","r");
 146 $zeile=fgets($f,1200);
 147 $infld=explode($trenner,strtolower($zeile));
 148 $first=true;
 149 $ok=true;
 150 $p=0;
 151 foreach ($infld as $fld) {
 152     $fld = strtolower(trim(strtr($fld,array("\""=>"","'"=>""))));
 153     if (in_array($fld,$kunde_fld)) {
 154         if ($fld=="branche" && !$crm) {  continue; };
 155         if ($fld=="sw" && !$crm) {  continue; };
 156         $in_fld[$fld]=$p;
 157         //$fldpos[$fld]=$p;
 158         //$in_fld[]=$fld;
 159     }
 160     $p++;
 161 }
 162 $infld = array_keys($in_fld);
 163 $infld[] = "import";
 164 $infld = implode(",",$infld);
 165 $j=0;
 166 $m=0;
 167 $zeile=fgetcsv($f,1200,$trenner);
 168 if ($ok) while (!feof($f)){
 169     $i=0;
 170     $m++;
 171     $anrede="";
 172     $Matchcode="";
 173     $sql="insert into $file ";
 174     $keys=array();
 175     $vals=array();
 176     $number=false;
 177     //foreach($zeile as $data) {
 178
 179     foreach($in_fld as $fld => $pos) {
 180         switch ($fld) {
 181             case "name"         :
 182             case "department_1" :
 183             case "department_2" :
 184             case "matchcode"    :
 185             case "street"       :
 186             case "city"         :
 187             case "notes"        :
 188             case "sw"           :
 189             case "branche"      :
 190             case "country"      :
 191             case "contact"      :
 192             case "homepage"     :
 193             case "email"        :
 194             case "bank"         : $data = addslashes(trim($zeile[$pos]));
 195                                   if (Translate) translate($data);
 196             case "ustid"        : $data = strtr(trim($zeile[$pos])," ","");
 197             case "bank_code"    : $data = trim($zeile[$pos]);
 198             case "account_number":
 199             case "greeting"     :
 200             case "taxnumber"    :
 201             case "zipcode"      :
 202             case "phone"        :
 203             case "fax"          : $data = trim($zeile[$pos]);
 204                                   $data = "'$data'";
 205                                   if ($data=="''") {
 206                                         $vals[] = "null";
 207                                   } else {
 208                                         $vals[] = $data;
 209                                   }
 210                                   break;
 211             case "business_id"  : $vals[] = chkBusiness(trim($zeile[$pos]));
 212                                   break;
 213             case "salesman_id"  : $vals[] = chkSalesman(trim($zeile[$pos]));
 214                                   break;
 215             case "taxincluded"  : $data = strtolower(substr($zeile[$pos],0,1));
 216                                   if ($data!="f" && $data!="t") { $vals[] = "'f'"; }
 217                                   else { $vals[] = "'".$data."'";}
 218                                   break;
 219             case "taxzone_id"   : $data = trim($zeile[$pos])*1;
 220                                   if ($data>3 && $data<0) $data = 0;
 221                                   $vals[] = $data;
 222                                   break;
 223             case "creditlimit"  :
 224             case "discount"     :
 225             case "terms"        : $vals[] = trim($zeile[$pos])*1;
 226                                   break;
 227             case "customernumber":
 228             case "vendornumber" : $data = trim($zeile[$pos]);
 229                                   if (empty($data) or !$data) {
 230                                       $vals[] = getKdId();
 231                                       $number = true;
 232                                   } else {
 233                                       $vals[] = chkKdId($data);
 234                                       $number = true;
 235                                   }
 236                                   break;
 237         }
 238     };
 239     if (!in_array("taxzone_id",$in_fld)) {
 240         $in_fld[] = "taxzone_id";
 241         $vals[] = 0;
 242     }
 243         // seit 2.6 ist die DB-Kodierung UTF-8 @holger Ansonsten einmal vorher die DB-Encoding auslesen
 244         // Falls die Daten ISO-kodiert kommen entsprechend wandeln
 245         // done!
 246         // UTF-8 MUSS als erstes stehen, da ansonsten die Prüfung bei ISO-8859-1 aufhört ...
 247         // die blöde mb_detect... tut leider nicht immer, daher die Möglichkeit der Auswahl
 248         // TODO Umlaute am Anfang wurden bei meinem Test nicht übernommen (Österreich). S.a.:
 249         // http://forum.de.selfhtml.org/archiv/2007/1/t143904/
 250     if ($test) {
 251             if ($first) {
 252                 echo "<table border='1'>\n<tr><td>";
 253                 echo implode('</th><th>',array_keys($in_fld));
 254                 echo "</td></tr>\n";
 255                 $first=false;
 256             };
 257             echo "<tr><td>";
 258             echo implode('</td><td>',$vals);
 259             echo "</td></tr>\n";
 260             //echo "Import $j<br>\n";
 261             flush();
 262     } else {
 263             $vals[] = $nun;
 264             $sql = "INSERT INTO $file (".$infld.") values (".implode(",",$vals).")";
 265             $rc=$db->query($sql);
 266             if ($j % 10 == 0) { echo "."; flush(); };
 267             if (!$rc) {  echo "<br />Fehler: ".$sql."<br />"; flush(); };
 268     }
 269     $j++;
 270     $zeile=fgetcsv($f,1200,$trenner);
 271 }
 272 fclose($f);
 273 if ($test) echo "</table>\n ##### = Neue Kunden-/Lieferantennummer\n<br>";
 274 echo $j." $file importiert.\n";
 275 } else {
 276 ?>
 277
 278 <p class="listtop">Adressimport f&uuml;r die ERP<p>
 279 <br>
 280 <form name="import" method="post" enctype="multipart/form-data" action="addressB.php">
 281 <!--form name="import" method="post"  action="addressB.php"-->
 282 <input type="hidden" name="MAX_FILE_SIZE" value="2000000">
 283 <input type="hidden" name="login" value="<?php echo  $login ?>">
 284 <table>
 285 <tr><td></td><td><input type="submit" name="ok" value="Hilfe"></td></tr>
 286 <tr><td>Zieltabelle</td><td><input type="radio" name="ziel" value="customer" checked>customer <input type="radio" name="ziel" value="vendor">vendor</td></tr>
 287 <tr><td>Trennzeichen</td><td>
 288         <input type="radio" name="trenner" value=";" checked>Semikolon
 289         <input type="radio" name="trenner" value=",">Komma
 290         <input type="radio" name="trenner" value="#9" checked>Tabulator
 291         <input type="radio" name="trenner" value=" ">Leerzeichen
 292         <input type="radio" name="trenner" value="other">
 293         <input type="text" size="2" name="trennzeichen" value="">
 294 </td></tr>
 295 <tr><td>Test</td><td><input type="checkbox" name="test" value="1">ja</td></tr>
 296 <tr><td>Daten</td><td><input type="file" name="Datei"></td></tr>
 297 <tr><td>Verwendete<br />Zeichecodierung</td><td>
 298         <select name="encoding">
 299         <option value="auto">Automatisch (versuchen)</option>
 300         <option value="UTF-8">UTF-8</option>
 301         <option value="ISO-8859-1">ISO-8859-1</option>
 302         <option value="ISO-8859-15">ISO-8859-15</option>
 303         <option value="Windows-1252">Windows-1252</option>
 304         <option value="ASCII">ASCII</option>
 305         </select>
 306 </td></tr>
 307 <tr><td></td><td><input type="submit" name="ok" value="Import"></td></tr>
 308 </table>
 309 </form>
 310 <?php }; ?>