Merge branch 'master' of ssh://git-jbueren@lx-office.linet-services.de/~/lx-office-erp
[kivitendo-erp.git] / 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 <?
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
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"],$file.".csv")) {
58         $file=false;
59         echo "Upload von ".$_FILES["Datei"]["name"]." fehlerhaft. (".$_FILES["Datei"]["error"].")<br>";
60     }
61 } else if (is_file($_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
71 if (!file_exists("$file.csv")) ende("$file.csv nicht im Ordner oder leer");
72
73
74 if (!$db->chkcol($file)) ende("Importspalte kann nicht angelegt werden");
75
76 $employee=chkUsr($_SESSION["employee"]);
77 if (!$employee) ende("Ung&uuml;ltiger User");
78
79 $kunde_fld = array_keys($address);
80
81 $f=fopen("$file.csv","r");
82 $zeile=fgets($f,1200);
83 $infld=split($trenner,strtolower($zeile));
84 $first=true;
85 $ok=true;
86 foreach ($infld as $fld) {
87     $fld = strtolower(trim(strtr($fld,array("\""=>"","'"=>""))));
88     if ($fld=="branche" && !$crm) { $in_fld[]=""; continue; };
89     if ($fld=="sw" && !$crm) { $in_fld[]=""; continue; };
90     $in_fld[]=$fld;
91 }
92
93 $j=0;
94 $m=0;
95 $zeile=fgetcsv($f,1200,$trenner);
96 if ($ok) while (!feof($f)){
97     $i=0;
98     $m++;
99     $anrede="";
100     $Matchcode="";
101     $sql="insert into $file ";
102     $keys="(";
103     $vals=" values (";
104     $number=false;
105     foreach($zeile as $data) {
106         if (!in_array(trim($in_fld[$i]),$kunde_fld)) {
107             if ($in_fld[$i]=="anrede") {  $anrede=addslashes(trim($data)); }
108             $i++;
109             continue;
110         };
111         $data=trim($data);
112         // seit 2.6 ist die DB-Kodierung UTF-8 @holger Ansonsten einmal vorher die DB-Encoding auslesen
113         // Falls die Daten ISO-kodiert kommen entsprechend wandeln
114         // UTF-8 MUSS als erstes stehen, da ansonsten die Prüfung bei ISO-8859-1 aufhört ...
115         // TODO Umlaute am Anfang wurden bei meinem Test nicht übernommen (Österreich). S.a.:
116         // http://forum.de.selfhtml.org/archiv/2007/1/t143904/
117
118         $encoding = mb_detect_encoding($data,"UTF-8,ISO-8859-1,ISO-8859-15");
119         if ($encoding != "UTF-8"){
120           $data=mb_convert_encoding($data, "UTF-8","$encoding");
121         }
122         //$data=htmlentities($data);
123         $data=addslashes($data);
124         if ($in_fld[$i]==$file."number") {  // customernumber || vendornumber
125             if (empty($data) or !$data) {
126                 $data=getKdId();
127                 $number=true;
128             } else {
129                 $data=chkKdId($data);
130                 $number=true;
131             }
132         } else if ($in_fld[$i]=="taxincluded"){
133             $data=strtolower(substr($data,0,1));
134             if ($data!="f" && $data!="t") $data="f";
135         } else if ($in_fld[$i]=="ustid"){
136             $data=strtr(" ","",$data);
137         } /*else if ($in_fld[$i]=="matchcode") {
138                   $matchcode=$data;
139                   $i++;
140                   continue;
141                 if ($data==false or empty($data) or !$data) {
142             if (in_array($in_fld[$i],array("name"))) {
143                 $data=$matchcode;
144             }
145         }
146             }*/
147
148         $keys.=$in_fld[$i].",";
149         if ($data==false or empty($data) or !$data) {
150             $vals.="null,";
151         } else {
152             if ($in_fld[$i]=="contact"){
153                 if ($anrede) {
154                     $vals.="'$anrede $data',";
155                 } else {
156                     $vals.="'$data',";
157                 }
158             } else {
159                 $vals.="'".$data."',";
160             }
161         }
162         $i++;
163     }
164     if (!$number) {
165         $keys.=$file."number,";
166         $vals.="'".getKdId()."',";
167     }
168     if ($keys<>"(") {
169         if ($test) {
170             if ($first) {
171                 echo "<table border='1'>\n";
172                 echo "<tr><th>".str_replace(",","</th><th>",substr($keys,1,-1))."</th></tr>\n";
173                 $first=false;
174             };
175             $vals=str_replace("',","'</td><td>",substr($vals,9,-1));
176             echo "<tr><td>".str_replace("null,","null</td><td>",$vals)."</td></tr>\n";
177             //echo "Import $j<br>\n";
178             flush();
179         } else {
180             $sql.=$keys."taxzone_id,import)";
181             $sql.=$vals."0,$nun)";
182             $rc=$db->query($sql);
183             if (!$rc) echo "Fehler: ".$sql."<br>";
184         }
185         $j++;
186     } else {
187           $vals=str_replace("',","'</td><td>",substr($vals,9,-1));
188           echo "<tr><td style=\"color:red\">".str_replace("null,","null</td><td style=\"color:red\">",$vals)."</td></tr>\n";
189           flush();
190         }
191     $zeile=fgetcsv($f,1200,$trenner);
192 }
193 fclose($f);
194 if ($test) echo "</table>\n ##### = Neue Kunden-/Lieferantennummer\n<br>";
195 echo $j." $file importiert.\n";
196 } else {
197 ?>
198
199 <p class="listtop">Adressimport f&uuml;r die ERP<p>
200 <br>
201 <form name="import" method="post" enctype="multipart/form-data" action="addressB.php">
202 <!--form name="import" method="post"  action="addressB.php"-->
203 <input type="hidden" name="MAX_FILE_SIZE" value="2000000">
204 <input type="hidden" name="login" value="<?= $login ?>">
205 <table>
206 <tr><td></td><td><input type="submit" name="ok" value="Hilfe"></td></tr>
207 <tr><td>Zieltabelle</td><td><input type="radio" name="ziel" value="customer" checked>customer <input type="radio" name="ziel" value="vendor">vendor</td></tr>
208 <tr><td>Trennzeichen</td><td><input type="text" size="2" maxlength="1" name="trenner" value=";"></td></tr>
209 <tr><td>Test</td><td><input type="checkbox" name="test" value="1">ja</td></tr>
210 <tr><td>Daten</td><td><input type="file" name="Datei"></td></tr>
211 <tr><td></td><td><input type="submit" name="ok" value="Import"></td></tr>
212 </table>
213 </form>
214 <? }; ?>