/***************************************************************
*Author: Holger Lindemann
*Copyright: (c) 2004 Lx-System
*License: non free
*eMail: info@lx-system.de
*Version: 1.6
*Shop: osCommerce 2.2 ms2
*ERP: Lx-Office ERP 2.4.x
***************************************************************/
/*
* Noch einzubauen:
*/
?>
	
Lx-ERP Export der Shopartikel
	
0) {
			$sql="insert into customers_number (customers_id,kdnr) values(".$KID.",".$kdnr.")";
			$rc=query("shop",$sql,"getBestellKunde");
			if ($rc === -99) {
				echo "Kundennummer nicht im Shop gespeichert: $KID
";
			}
		} else {
			$neuKd++;
		}
	} else {
		$kdnr=$rs[0]["kdnr"];
	}
	chkKdData($kdnr,$BID,$OID);
	$gesKd++;
	return $kdnr;
}
/**********************************************
* getAttribut($oid,$pid)
*
**********************************************/
function getAttribut($oid,$pid) {
	$sql="select * from orders_products_attributes where orders_id=$oid and orders_products_id=$pid";
	$rs=getAll("shop",$sql,"getAttribut");
	$txt="";
	foreach ($rs as $zeile) {
		$txt.="\n - ".$zeile["products_options"].":".$zeile["products_options_values"];
	};
	return $txt;
}
function getTaxRate() {
	$sql="select tax_rate from tax_rates R left join configuration C on C.configuration_value=R.tax_class_id ";
	$sql.="where C.configuration_key like 'MODULE_SHIPPING%TAX%' limit 1";
	$rs=getAll("shop",$sql,"getTaxRate");
	if ($rs[0]["tax_rate"]) {
		return (100+$rs[0]["tax_rate"])/100 ;
	} else {
		echo "Bitte mind. eine Versandart mit Steuer anlegen.";
		return 1;
	}
}
function checkTaxIncl() {
	$sql="select * from configuration where  configuration_key = 'DISPLAY_PRICE_WITH_TAX'";
	$rs=getAll("shop",$sql,"checkTaxIncl");
	if ($rs[0]["configuration_value"]=="false") { return false; }
	else { return true; }
}
function getNetto($id) {
	$sql="select * from orders_total where orders_id=$id and class='ot_subtotal'";
	$rs=getAll("shop",$sql,"getNetto");
	return $rs[0]["value"];
}
/**********************************************
* getBrutto($id)
*
**********************************************/
function getBrutto($id) {
	$sql="select * from orders_total where orders_id=$id and class='ot_total'";
	$rs=getAll("shop",$sql,"getBrutto");
	return $rs[0]["value"];
}
/**********************************************
* getMwst($id)
*
**********************************************/
function getMwSt($id) {
global $TaxFactor;
	$mwst=0;
	$sql="select * from orders_total where orders_id=$id and class='ot_tax'";
	$rs=getAll("shop",$sql,"getMwSt");
	if ($rs) {
		foreach ($rs as $zeile) {
			$mwst+=$zeile["value"];
		}
	}
	return $mwst;
	//return $rs[0]["value"]/$TaxFactor;
}
/**********************************************
* getSonderkosten($id,$art)
*
**********************************************/
function getSonderkosten($id,$art) {
        $sql="select * from orders_total where orders_id=$id and class='".$GLOBALS["skosten"][$art]."'";
        $rs=getAll("shop",$sql,"getSonderkosten");
        if ($rs[0]["value"]) {
                $kosten=round($rs[0]["value"]/(100+$GLOBALS["versand"]["TAX"])*100,2);
        } else {
                $kosten=false;
        }
        return $kosten;
}
/**********************************************
* insBestArtikel($zeile,$transID)
*
**********************************************/
function insBestArtikel($ordersID,$transID) {
global $div07,$div16;
        $sql="select * from orders_products where orders_id=$ordersID";
        $rs=getAll("shop",$sql,"insBestArtikel");
        $ok=true;
        if ($rs) foreach ($rs as $zeile) {
        	$sql="select * from parts where partnumber='".$zeile["products_model"]."'";
                $rs2=getAll("erp",$sql,"insBestArtikel");
                if ( $rs2[0]["id"]) {
                		$artID=$rs2[0]["id"];
                		$artNr=$rs2[0]["partnumber"];
                } else {
                        if ($zeile["products_tax"]=="19.0000") {
                                $artID=$div16["ID"];
                                $artNr=$div16["NR"];
                        } else {
                                $artID=$div07["ID"];
                                $artNr=$div07["NR"];
                        };
                }
		$preis=$zeile["final_price"];
                $text=getAttribut($ordersID,$zeile["orders_products_id"]);
                $sql="insert into orderitems (trans_id, parts_id, description, qty, sellprice, unit, ship, discount) ";
		$sql.="values (";
                $sql.=$transID.",".$artID.",'".$zeile["products_name"].$text."',".$zeile["products_quantity"].",";
		$sql.=$preis.",'Stck',0,0)";
                echo " - Artikel:[ BuNr.:$artID ArtNr:$artNr ".$zeile["products_name"]." ]
";
                $rc=query("erp",$sql,"insBestArtikel");
                if ($rc === -99) { $ok=false; break; };
        }
        return $ok;
}
function insAuftrag($data) {
global $ERPusr,$versand,$nachn,$minder,$paypal,$auftrnr;
        $Zahlmethode=array("authorizenet"=>"Authorize.net","banktransfer"=>"Lastschriftverfahren","cc"=>"Kreditkarte",
                "cod"=>"Nachnahme","eustandardtransfer"=>"EU-Standard Bank Transfer","iclear"=>"iclear Rechnungskauf",
                "invoice"=>"Rechnung","ipayment"=>"iPayment","liberecobanktransfer"=>"Lastschriftverfahren",
                "liberecocc"=>"Kreditkarte","moneybookers"=>"Moneybookers.com","moneyorder"=>"Scheck/Vorkasse",
                "nochex"=>"NOCHEX","paypal"=>"PayPal","pm2checkout"=>"2CheckOut","psigate"=>"PSiGate",
                "qenta"=>"qenta.at","secpay"=>"SECPay");
        $brutto=getBrutto($data["orders_id"]);
        $mwst=getMwSt($data["orders_id"]);
        if ($GLOBALS["inclTax"]) {
		$netto=$brutto-$mwst;
	} else {
		$netto=getNetto($data["orders_id"]);
	}
        $versandK=getSonderkosten($data["orders_id"],"Versand");
        $nachnK  =getSonderkosten($data["orders_id"],"NachName");
        $mindermK=getSonderkosten($data["orders_id"],"Minder");
        $paypalK =getSonderkosten($data["orders_id"],"Paypal");
	$netto+=$versandK;
	$netto+=$nachnK;
	$netto+=$mindermK;
	$netto+=$paypalK;
        // Hier beginnt die Transaktion
	$rc=query("erp","BEGIN WORK","insAuftrag");
	if ($rc === -99) { echo "Probleme mit Transaktion. Abbruch!"; exit(); };
        if ($auftrnr) {
                $auftrag=$GLOBALS["preA"].getNextAnr();
        } else {
                $auftrag=$GLOBALS["preA"].$data["orders_id"];
        }
        $sql="select count(*) as cnt from oe where ordnumber = '$auftrag'";
        $rs=getAll("erp",$sql,"insAuftrag 1");
        if ($rs[0]["cnt"]>0) {
                $auftrag=$GLOBALS["preA"].getNextAnr();
        }
        $newID=uniqid (rand());
        $sql="insert into oe (notes,ordnumber,cusordnumber) values ('$newID','$auftrag','".$data["kdnr"]."')";
        $rc=query("erp",$sql,"insAuftrag 2");
	if ($rc === -99) {
		echo "Auftrag ".$data["orders_id"]." konnte nicht angelegt werden.
";
		$rc=query("erp","ROLLBACK WORK","chkKunde");
		if ($rc === -99) { echo "Probleme mit Transaktion. Abbruch!"; exit(); };
		return false;
	}
        $sql="select * from oe where notes = '$newID'";
        $rs2=getAll("erp",$sql,"insAuftrag 3");
	if (!$rs2>0) {
		echo "Auftrag ".$data["orders_id"]." konnte nicht angelegt werden.
";
		$rc=query("erp","ROLLBACK WORK","chkKunde");
		if ($rc === -99) { echo "Probleme mit Transaktion. Abbruch!"; exit(); };
		return false;
	}
	$zahlart=$data["payment_method"]."\n";
        if ($data["cc_type"]) $zahlart.=$data["cc_type"]."\n".$data["cc_owner"]."\n".$data["cc_number"]."\n".$data["cc_expires"]."\n";
        $sql="update oe set cusordnumber=".$data["orders_id"].", transdate='".$data["date_purchased"]."', customer_id=".$data["kdnr"].", ";
        $sql.="amount=".$brutto.", netamount=".$netto.", reqdate='".$data["date_purchased"]."', taxincluded='f', ";
	if ($data["shipto"]>0) $sql.="shipto_id=".$data["shipto"].", ";
        $sql.="intnotes='".$data["comments"]."',notes='".$zahlart."', curr='EUR',employee_id=".$ERPusr["ID"].", vendor_id=0 ";
        $sql.="where id=".$rs2[0]["id"];
        $rc=query("erp",$sql,"insAuftrag 4");
        if ($rc === -99) {
                echo "Auftrag ".$data["orders_id"]." konnte nicht angelegt werden.
";
		$rc=query("erp","ROLLBACK WORK","chkKunde");
		if ($rc === -99) { echo "Probleme mit Transaktion. Abbruch!"; exit(); };
                return false;
        }
        echo "Auftrag:[ Buchungsnummer:".$rs2[0]["id"]." AuftrNr:".$auftrag." ]
";
        if (!insBestArtikel($data["orders_id"],$rs2[0]["id"])) {
		echo "Auftrag ".$data["orders_id"]." konnte nicht angelegt werden.
";
		$rc=query("erp","ROLLBACK WORK","chkKunde");
		if ($rc === -99) { echo "Probleme mit Transaktion. Abbruch!"; exit(); };
                return false;
        };
        if ($versandK) {
                $sql="insert into orderitems (trans_id, parts_id, description, qty, sellprice, unit, ship, discount) values (";
                $sql.=$rs2[0]["id"].",".$versand["ID"].",'".$versand["TXT"]."',1,".$versandK.",'Stck',0,0)";
                $rc=query("erp",$sql,"insAuftrag 8");
                if ($rc === -99) echo "Auftrag $auftrag : Fehler bei den Versandkosten
";
        }
        if ($nachnK) {
                $sql="insert into orderitems (trans_id, parts_id, description, qty, sellprice, unit, ship, discount) values (";
                $sql.=$rs2[0]["id"].",".$nachn["ID"].",'".$nachn["TXT"]."',1,".$nachnK.",'Stck',0,0)";
                $rc=query("erp",$sql,"insAuftrag 9");
                if ($rc === -99) echo "Auftrag $auftrag : Fehler bei den Nachnamekosten
";
        }
        if ($mindermK) {
                $sql="insert into orderitems (trans_id, parts_id, description, qty, sellprice, unit, ship, discount) values (";
                $sql.=$rs2[0]["id"].",".$minder["ID"].",'".$minder["TXT"]."',1,".$mindermK.",'Stck',0,0)";
                $rc=query("erp",$sql,"insAuftrag 10");
                if ($rc === -99) echo "Auftrag $auftrag : Fehler beim Mindermengenzuschlag
";
        }
        if ($paypalK) {
                $sql="insert into orderitems (trans_id, parts_id, description, qty, sellprice, unit, ship, discount) values (";
                $sql.=$rs2[0]["id"].",".$paypal["ID"].",'".$paypal["TXT"]."',1,".$paypalK.",'Stck',0,0)";
                $rc=query("erp",$sql,"insAuftrag 11");
                if ($rc === -99) echo "Auftrag $auftrag : Fehler bei den PayPal-Kosten
";
        }
        $sql="update orders set orders_status ='3' WHERE orders_id =".$data["orders_id"];
        $rc=query("shop",$sql,"insBestArtikel 12");
	if ($rc === -99) echo "Bestellung im Shop nicht geschlossen";
	$rc=query("erp","COMMIT WORK","chkKunde");
	if ($rc === -99) { echo "Probleme mit Transaktion. Abbruch!"; exit(); };
	return true;
}
/**********************************************
* getBestellung()
*
**********************************************/
function getBestellung() {
	$sql="select o.*,h.comments,cn.kdnr from orders o left join orders_status_history h on h.orders_id=o.orders_id ";
	$sql.="left join customers_number cn on ";
	$sql.="cn.customers_id=o.customers_id where o.orders_status=1 order by o.orders_id";
	$rs=getAll("shop",$sql,"getBestellung");
	return $rs;
}
/**********************************************
* chkKdData()
*
**********************************************/
function chkKunden() {
	$felder=array("firstname","lastname","company","street_address","city","postcode","country");
	foreach ($GLOBALS["bestellungen"] as $bestellung) {
		$rc=query("erp","BEGIN WORK","chkKunden");
		if ($rc === -99) { echo "Probleme mit Transaktion. Abbruch!"; exit(); };
		if ($bestellung["kdnr"]>0) { // Bestandskunde; kdnr == ID in customers
			$msg="update ";
			$kdnr=chkOldKd($bestellung);
			if ($kdnr == -1) { //Kunde nicht gefunden, neu anlegen.
				$msg="insert ";
				$kdnr=insNewKd($bestellung);
				$GLOBALS["neuKd"]++;
			} else if (!$kdnr) {
				echo $msg." ".$bestellung["customers_name"]." fehlgeschlagen!
";
				$GLOBALS["gesKd"]++;
				continue;
			}
		} else { // Neukunde
			$msg="insert ";
			$kdnr=insNewKd($bestellung);
			$GLOBALS["neuKd"]++;
		}
		echo $bestellung["customers_company"]." ".$bestellung["customers_name"]." $kdnr
";
		$GLOBALS["bestellungen"][$GLOBALS["gesKd"]]["kdnr"]=$kdnr;
		$sql="delete from customers_number where customers_id=".$bestellung["customers_id"];
        	$rc=query("shop",$sql,"chkKunde");
        	$sql="insert into customers_number (customers_id,kdnr) values(".$bestellung["customers_id"].",".$kdnr.")";
        	$rc=query("shop",$sql,"chkKunde");
		if ($kdnr>0) {
			foreach($felder as $feld) {
				if ($bestellung["delivery_$feld"]<>$bestellung["customers_$feld"]) {
					$rc=insShData($bestellung,$kdnr);
					if ($rc>0) $GLOBALS["bestellungen"][$GLOBALS["gesKd"]]["shipto"]=$rc;
					break;
				}
			}
		}
		if (!$kdnr || $rc === -99) {
			echo $msg." ".$bestellung["customers_name"]." fehlgeschlagen! ($kdnr,$rc)
";
			$rc=query("erp","ROLLBACK WORK","chkKunde");
			if ($rc === -99) { echo "Probleme mit Transaktion. Abbruch!"; exit(); };
		} else {
			$rc=query("erp","COMMIT WORK","chkKunde");
			if ($rc === -99) { echo "Probleme mit Transaktion. Abbruch!"; exit(); };
		}
		$GLOBALS["gesKd"]++;
	}
	return true;
}
function chkOldKd($data) {
        $sql="select * from customer where id = ".$data["kdnr"];
        $rs=getAll("erp",$sql,"chkKdData");
        if (!$rs or count($rs)==0) { return -1; }; // Kunde nicht gefunden
        if ($rs[0]["zipcode"]<>$data["customers_postcode"]) $set.="zipcode='".$data["customers_postcode"]."',";
        if ($rs[0]["city"]<>$data["customers_city"]) $set.="city='".$data["customers_city"]."',";
        if ($rs[0]["country"]<>$GLOBALS["taxarray"][$data["billing_country"]]["code"]) $set.="country='".$GLOBALS["taxarray"][$data["billing_country"]]["code"]."',";
        if ($rs[0]["phone"]<>$data["customers_phone"])$set.="phone='".$data["customers_phone"]."',";
        if ($rs[0]["email"]<>$data["customers_email_address"])$set.="email='".$data["customers_email_address"]."',";
        if ($data["customers_company"]) {
                if ($rs[0]["name"]<>$data["customers_company"]) $set.="name='".$data["customers_company"]."',";
                if ($rs[0]["contact"]<>$data["customers_name"]) $set.="contact='".$data["customers_name"]."',";
        } else {
                if ($rs[0]["name"]<>$data["customers_name"]) $set.="name='".$data["customers_name"]."',";
        }
        if ($rs[0]["street"]<>$data["customers_street_address"]) $set.="street='".$data["customers_street_address"]."',";
        if ($set) {
        		$set=substr($set,0,-1);
                $sql="update customer set $set where id=".$data["kdnr"];
                $rc=query("erp",$sql,"chkKdData");
                if ($rc === -99) {
                        return false;
                } else {
                        return $data["kdnr"];
                }
        } else {
                return $data["kdnr"];
        }
}
/**********************************************
* insShData($data,$id)
*
**********************************************/
function insShData($data,$id) {
        $set=$id;
        if ($data["delivery_company"]) { $set.=",'".$data["delivery_company"]."','".$data["delivery_name"]."',"; }
        else { $set.=",'".$data["delivery_name"]."','',"; }
        $set.="'".$data["delivery_street_address"]."',";
        $set.="'".$data["delivery_postcode"]."',";
        $set.="'".$data["delivery_city"]."',";
	if (in_array($data["delivery_country"],$GLOBALS["LAND"])) {
		$set.="'".$GLOBALS["LAND"][$data["delivery_country"]]."',";
	} else {
		$set.="'".$data["delivery_country"]."',";
	}
        $set.="'".$data["customers_telephone"]."',";
        $set.="'".$data["customers_email_address"]."'";
        $sql="insert into shipto (trans_id,shiptoname,shiptodepartment_1,shiptostreet,shiptozipcode,shiptocity,";
        $sql.="shiptocountry,shiptophone,shiptoemail,module) values ($set,'CT')";
        $rc=query("erp",$sql,"insShData");
	if ($rc === -99) return false;
	$sql="select shipto_id from shipto where trans_id = $id and module='CT' order by itime desc limit 1";
	$rs=getAll("erp",$sql,"insKdData");
	if ($rs[0]["shipto_id"]>0) {
		$sid=$rs[0]["shipto_id"];
		$sql="update customers_number set shipto = $sid where kdnr = $id";
        	$rc2=query("shop",$sql,"insShData");
        	if ($rc2 === -99) {
        		//$sql="delete from shipto where shipto_id=$sid";
        		//$rc=query("shop",$sql,"insShData");
			return false;
		}
		return $sid;
	} else  {
		echo "Fehler bei abweichender Anschrift ".$data["delivery_name"];
		//$sql="delete from shipto where shipto_id=$sid";
        	//$rc=query("shop",$sql,"insShData");
		return false;
	}
}
/**********************************************
* insKdData($BID)
*
**********************************************/
function insNewKd($data) {
        $newID=uniqid(rand(time(),1));
        //Kundennummer generieren
        if ($GLOBALS["kdnum"]==1) { // von der ERP
                $kdnr=$GLOBALS["preK"].getNextKnr();
        } else {                    // durch Shop
                $kdnr=$GLOBALS["preK"].$data["customers_id"];
        }
        $sql="select count(*) as cnt from customer where customernumber = '$kdnr'";
        $rs=getAll("erp",$sql,"insKdData");
        if ($rs[0]["cnt"]>0) {  // Kundennummer gibt es schon, eine neue aus ERP
                $kdnr=$GLOBALS["preK"].getNextKnr();
        }
        $sql="insert into customer (name,customernumber) values ('$newID','$kdnr')";
        $rc=query("erp",$sql,"insKdData");
        if ($rc === -99) return false;
        $sql="select * from customer where name = '$newID'";
        $rs=getAll("erp",$sql,"insKdData");
        if (!$rs) return false;
        if ($data["customers_company"]) {
                $set.="set name='".$data["customers_company"]."',contact='".$data["customers_name"]."',";
        }else {
		$tmp=strrpos($data["customers_name"]," ");
		if ($tmp>0) {
	                $set.="set name='".substr($data["customers_name"],$tmp+1).", ".substr($data["customers_name"],0,$tmp)."',";
	                $set.="contact='".$data["customers_name"]."',";
		} else {
	                $set.="set name='".$data["customers_name"]."',";
		}
        }
        $set.="street='".$data["customers_street_address"]."',";
        $set.="zipcode='".$data["customers_postcode"]."',";
        $set.="city='".$data["customers_city"]."',";
        $set.="country='".$GLOBALS["taxarray"][$data["billing_country"]]["code"]."',";
        $set.="phone='".$data["customers_telephone"]."',";
        $set.="email='".$data["customers_email_address"]."',";
        $tid=(in_array($data["billing_country"],array_keys($GLOBALS["taxarray"])))?$GLOBALS["taxarray"][$data["billing_country"]]["tax"]:3;
        $set.="taxzone_id=$tid,";
        $set.="taxincluded='f' ";
        $sql="update customer ".$set;
        $sql.="where id=".$rs[0]["id"];
        $rc=query("erp",$sql,"insKdData");
        if ($rc === -99) {
		//$sql="delete from customer where id=".$rs[0]["id"];
		//$rc=query("shop",$sql,"insNewKd");
		return false;
	} else { return $rs[0]["id"]; }
}
$LAND=array("Germany"=>"D","Austria"=>"A","Switzerland"=>"CH");
$skosten=array("Versand"=>"ot_shipping","NachName"=>"ot_cod_fee","Paypal"=>"ot_cod_fee","Minder"=>"ot_loworderfee");
$inclTax=checkTaxIncl();
$TaxFactor=($inclTax)?getTaxRate():1;
$bestellungen=getBestellung();
$ok=count($bestellungen);
$gesKd=0;
$neuKd=0;
if ($ok) {
	echo "Es liegen $ok Bestellungen vor. 
";
	chkKunden();
    	echo $gesKd." Kunde(n), davon ".$neuKd." neue(r) Kunde(n).
";
    	foreach ($bestellungen as $bestellung) {
        	insAuftrag($bestellung);
    	}
} else { echo "Es liegen keine Bestellungen vor!
"; };
?>