Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision f73d3b5e

Von Holger Lindemann vor mehr als 15 Jahren hinzugefügt

  • ID f73d3b5eb1bce45abf8609753de9270fca5abc86
  • Vorgänger fbe32862
  • Nachfolger bd8bd95b

Bereinigt um rev-Einträge

Unterschiede anzeigen:

lxo-import/blz.php
7 7 
Holger Lindemann <hli@lx-system.de>
8 8 
*/
9 9 

  		




  10
  
  
    
if ($_POST) {


  		




  11
  10
  
    

  		




  12
  
  
    
function ende($nr) {


  		




  13
  
  
    
	echo "Abbruch: $nr<br>";


  		




  14
  
  
    
	echo "Fehlende oder falsche Daten.";


  		




  15
  
  
    
	exit(1);


  		




  16
  
  
    
}


  		




  17
  
  
    

  		




  18
  
  
    
if (!$_SESSION["db"]) {


  		




  19
  
  
    
	$conffile="../config/authentication.pl";


  		




  20
  
  
    
	if (!is_file($conffile)) {


  		




  21
  
  
    
		ende(4);


  		




  22
  
  
    
	}


  		




  23
  
  
    
}


  		




  24
  
  
    
require ("import_lib.php");


  		




  25
  
  
    

  		




  26
  
  
    
function l2u($str) {


  		




  27
  
  
    
	return iconv("ISO-8859-1", "UTF-8",$str);


  		




  28
  
  
    
}


  		




  29
  
  
    

  		




  30
  
  
    
if (!anmelden()) ende(5);


  		




  31
  
  
    
/* get DB instance */


  		




  32
  
  
    
$db=$_SESSION["db"]; //new myDB($login);


  		




  33
  
  
    

  		




  34
  
  
    

  		




  35
  
  
    
<<<<<<< .mine


  		




  36
  
  
    
=======


  		




  37
  11
  
    
/* display help */


  		




  38
  12
  
    
if ($_POST["ok"]=="Hilfe") {


  		




  39
  13
  
    
	echo "<br>Die erste Zeile enth&auml;lt keine Feldnamen der Daten.<br>";


  		




  ......




  43
  17
  
    
	echo "http://www.bundesbank.de/zahlungsverkehr/zahlungsverkehr_bankleitzahlen_download.php</a>";


  		




  44
  18
  
    
	exit(0);


  		




  45
  19
  
    
} else if ($_POST) {


  		




  46
  
  
    
>>>>>>> .r3649


  		




  
  20
  
    
	function ende($nr) {


  		




  
  21
  
    
		echo "Abbruch: $nr<br>";


  		




  
  22
  
    
		echo "Fehlende oder falsche Daten.";


  		




  
  23
  
    
		exit(1);


  		




  
  24
  
    
	}


  		




  
  25
  
    

  		




  
  26
  
    
	function l2u($str) {


  		




  
  27
  
    
		return iconv("ISO-8859-1", "UTF-8",$str);


  		




  
  28
  
    
	}


  		




  
  29
  
    

  		




  
  30
  
    
	require ("import_lib.php");


  		




  
  31
  
    

  		




  
  32
  
    
	if (!$_SESSION["db"]) {


  		




  
  33
  
    
		$conffile="../config/authentication.pl";


  		




  
  34
  
    
		if (!is_file($conffile)) {


  		




  
  35
  
    
			ende(4);


  		




  
  36
  
    
		}


  		




  
  37
  
    
		if (!anmelden()) ende(5);


  		




  
  38
  
    
	}


  		




  
  39
  
    

  		




  
  40
  
    

  		




  
  41
  
    
	/* get DB instance */


  		




  
  42
  
    
	$db=$_SESSION["db"]; 


  		




  
  43
  
    

  		




  47
  44
  
    
	$test=$_POST["test"];


  		




  48
  45
  
    

  		




  49
  46
  
    
	clearstatcache ();


  		




  ......




  67
  64
  
    

  		




  68
  65
  
    
	$sqlins="INSERT INTO blz_data (blz,fuehrend,bezeichnung,plz,ort,kurzbez,pan,bic,pzbm,nummer,aekz,bl,folgeblz) ";


  		




  69
  66
  
    
	$sqlins.="VALUES ('%s','%s','%s','%s','%s','%s','%s','%s','%s',%d,'%s','%s','%s')";


  		




  70
  
  
    
	$teststr="<tr><td>%s</td><td>%s</td><td>%s</td><td>%s</td><td>%s</td><td>%s</td><td>%s</td><td>%s</td><td>%s</td><td>%d</td><td>%s</td><td>%s</td><td>%s</td></tr>\n";


  		




  
  67
  
    
	$teststr="<tr><td>%s</td><td>%s</td><td>%s</td><td>%s</td><td>%s</td><td>%s</td><td>%s</td>";


  		




  
  68
  
    
	$teststr.="<td>%s</td><td>%s</td><td>%d</td><td>%s</td><td>%s</td><td>%s</td></tr>\n";


  		




  71
  69
  
    
	$sqldel="delete from blz_data";


  		




  72
  70
  
    
	$ok="true";


  		




  73
  71
  
    
	$cnt=0;


  		




  ......




  80
  78
  
    
	$rs = $db->getAll("SELECT current_setting('client_encoding')");


  		




  81
  79
  
    
	$cliencoding = $rs[0]['current_setting'];


  		




  82
  80
  
    
	echo "SRV: $srvencoding - - CLI: $cliencoding<br>";


  		




  83
  
  
    
	//Datenfile ist immer Latin!!


  		




  84
  
  
    
	//zwei Möglichkeiten der Zeichenwandlung. Was ist besser??


  		




  85
  81
  
    
	if ($f) {


  		




  86
  
  
    
		//Cliententcoding nicht umstellen:


  		




  87
  
  
    
		//if (!$test) { $rc=$db->query("BEGIN");};


  		




  88
  82
  
    
		//Cliententcoding auf Latin:


  		




  89
  83
  
    
		if (!$test) { $rc=$db->query("BEGIN"); if ($cliencoding=="UTF8") $db->query("SET CLIENT_ENCODING TO 'latin-9'"); };


  		




  90
  84
  
    
		if (!$test) $rc=$db->query($sqldel);


  		




  91
  85
  
    
		while (($zeile=fgets($f,256)) != FALSE) {


  		




  92
  86
  
    
			$cnt++;


  		




  93
  
  
    
			if (!$test) {


  		




  
  87
  
    
			if (!$test){


  		




  
  88
  
    
				//Datenfile ist immer Latin!!


  		




  
  89
  
    
				//zwei Möglichkeiten der Zeichenwandlung. Was ist besser??


  		




  94
  90
  
    
				//Client nicht umgestellt, Zeichen wandeln


  		




  95
  91
  
    
				/*$sql=sprintf($sqlins,substr($zeile,0,8),substr($zeile,8,1),l2u(substr($zeile,9,58)),substr($zeile,67,5),


  		




  96
  92
  
    
						l2u(substr($zeile,72,35)),l2u(substr($zeile,107,27)),substr($zeile,134,5),substr($zeile,139,11),


  		




  ......




  101
  97
  
    
						substr($zeile,72,35),substr($zeile,107,27),substr($zeile,134,5),substr($zeile,139,11),


  		




  102
  98
  
    
						substr($zeile,150,2),substr($zeile,152,6),substr($zeile,158,1),substr($zeile,159,1),


  		




  103
  99
  
    
						substr($zeile,160,8));


  		




  104
  
  
    
<<<<<<< .mine


  		




  105
  
  
    
			if (!$test){


  		




  106
  100
  
    
				$rc=$db->query($sql);


  		




  107
  
  
    
				 if(DB::isError($rc)) {


  		




  108
  
  
    
                        		echo $sql."<br><pre>";


  		




  
  101
  
    
				if(DB::isError($rc)) {


  		




  
  102
  
    
					echo $sql."<br><pre>";


  		




  109
  103
  
    
					echo $rc->getMessage()."</pre><br>";


  		




  110
  104
  
    
					$ok=false;


  		




  111
  105
  
    
					break;


  		




  112
  106
  
    
				}


  		




  113
  
  
    
=======


  		




  114
  
  
    
				$rc=$db->query($sql);


  		




  115
  107
  
    
				if ($cnt % 10 == 0) { 


  		




  116
  108
  
    
					if ($cnt % 1000 == 0) { $x=time()-$start; echo sprintf("%dsec %6d<br>",$x,$cnt); }


  		




  117
  109
  
    
					else if ($cnt % 100 == 0) { echo "!"; }


  		




  ......




  128
  120
  
    
			if (!$rc) { 


  		




  129
  121
  
    
				$ok=false;


  		




  130
  122
  
    
				break;


  		




  131
  
  
    
>>>>>>> .r3649


  		




  132
  123
  
    
			}


  		




  133
  124
  
    
			$i++;


  		




  134
  125
  
    
		}


  		




  ......




  147
  138
  
    
	} else {


  		




  148
  139
  
    
		ende(4);


  		




  149
  140
  
    
	}


  		




  150
  
  
    
<<<<<<< .mine


  		




  151
  
  
    
} 


  		




  152
  
  
    
=======


  		




  153
  
  
    
	echo "</table>";


  		




  
  141
  
    
	echo "</table><br>Fertig. $i Banken importiert.";


  		




  154
  142
  
    
} else {


  		




  155
  
  
    
>>>>>>> .r3649


  		




  156
  143
  
    
?>


  		




  157
  144
  
    
<p class="listtop">BLZ-Import f&uuml;r die ERP<p>


  		




  158
  145
  
    
<br>Die erste Zeile enth&auml;lt keine Feldnamen der Daten.<br>


  		




  ......




  160
  147
  
    
Die Daten k&ouml;nnen hier bezogen werden:<br>


  		




  161
  148
  
    
<a http='http://www.bundesbank.de/zahlungsverkehr/zahlungsverkehr_bankleitzahlen_download.php'>


  		




  162
  149
  
    
http://www.bundesbank.de/zahlungsverkehr/zahlungsverkehr_bankleitzahlen_download.php</a><br><br>


  		




  163
  
  
    
ggf. das File vorher noch auf UTF8 wandeln: iconv -f latin1 -t  utf8 blz.txt -o blz1.txt<br><br>


  		




  
  150
  
    
Das File vorher <b>nicht</b> auf UTF8 wandeln!<br><br>


  		




  164
  151
  
    
Achtung!! Die bestehenden BLZ-Daten werden zun&auml;chst gel&ouml;scht.


  		




  165
  152
  
    
<br>


  		




  166
  153
  
    
<form name="import" method="post" enctype="multipart/form-data" action="blz.php">


  		




  ......




  172
  159
  
    
<tr><td></td><td><input type="submit" name="ok" value="Import"></td></tr>


  		




  173
  160
  
    
</table>


  		




  174
  161
  
    
</form>


  		




  
  162
  
    
<?php } ?>


  		












Auch abrufbar als:  Unified diff