{
$error++;
$mesg='<div class="error">'.$product->error.'</div>';
}
}
if (! $error)
{
if ($_POST["qty"])
{
if ($_POST["price"] >= 0)
{
$supplier=new Fournisseur($db);
$result=$supplier->fetch($id_fourn);
$ret=$product->update_buyprice($_POST["qty"], $_POST["price"], $user, $_POST["price_base_type"], $supplier);
if ($ret < 0)
{
$error++;
$mesg='<div class="error">'.$product->error.'</div>';
}
}
else
{
$error++;
$mesg='<div class="error">'.$langs->trans("ErrorFieldRequired",$langs->transnoentities("Price")).'</div>';
}
}
else
{
$error++;
$productLink = $product->getNomUrl(1, 'supplier');
setEventMessage($langs->trans("ReferenceSupplierIsAlreadyAssociatedWithAProduct", $productLink), 'errors');
} else {
if ($ret < 0) {
$error++;
setEventMessage($product->error, 'errors');
}
}
}
if (!$error) {
$supplier = new Fournisseur($db);
$result = $supplier->fetch($id_fourn);
if (isset($_POST['ref_fourn_price_id'])) {
$product->fetch_product_fournisseur_price($_POST['ref_fourn_price_id']);
}
$ret = $product->update_buyprice($quantity, $_POST["price"], $user, $_POST["price_base_type"], $supplier, $_POST["oselDispo"], $ref_fourn, $tva_tx, $_POST["charges"], $remise_percent, 0, $npr, $delivery_time_days);
if ($ret < 0) {
$error++;
setEventMessage($product->error, $product->errors, 'errors');
} else {
if ($price_expression !== '') {
//Check the expression validity by parsing it
$priceparser = new PriceParser($db);
$price_result = $priceparser->parseProductSupplier($id, $price_expression, $quantity, $tva_tx);
if ($price_result < 0) {
//Expression is not valid
$error++;
setEventMessage($priceparser->translatedError(), 'errors');
}
}
if (!$error && !empty($conf->dynamicprices->enabled)) {
// $newminprice=$objectstatic2->price_min_ttc;
//}
//else
//{
$newprice = price2num($obj->price, 'MU');
// Second param must be MU (we want a unit price so 'MU'. If unit price was on 4 decimal, we must keep 4 decimals)
//$newminprice=$objectstatic2->fourn_price_min;
//}
//if ($newminprice > $newprice) $newminprice=$newprice;
$newvat = str_replace('*', '', $newvatrate);
//$newnpr=$objectstatic2->recuperableonly;
$newlevel = 0;
if (!empty($price_base_type) && !$updatelevel1) {
//print "$objectstatic2->id $newprice, $price_base_type, $newvat, $newminprice, $newlevel, $newnpr<br>\n";
$fourn->id = $obj->fk_soc;
$ret = $objectstatic2->update_buyprice($obj->qty, $newprice, $user, $price_base_type, $fourn, $obj->fk_availability, $obj->ref_fourn, $newvat);
}
if ($ret < 0 || $retm < 0) {
$error++;
} else {
$nbrecordsmodified++;
}
}
$i++;
}
} else {
dol_print_error($db);
}
if (!$error) {
$db->commit();
} else {
else if ($ret < 0)
{
$error++;
$mesg='<div class="error">'.$product->error.'</div>';
}
}
if (! $error)
{
$supplier=new Fournisseur($db);
$result=$supplier->fetch($id_fourn);
if (isset($_POST['ref_fourn_price_id']))
$product->fetch_product_fournisseur_price($_POST['ref_fourn_price_id']);
$ret=$product->update_buyprice($quantity, $_POST["price"], $user, $_POST["price_base_type"], $supplier, $_POST["oselDispo"], $ref_fourn, $tva_tx, $_POST["charges"]);
if ($ret < 0)
{
$error++;
$mesg='<div class="error">'.$product->error.'</div>';
}
}
if (! $error)
{
$db->commit();
$action='';
}
else
{
$db->rollback();
<?php
require "../config.php";
dol_include_once('/product/class/product.class.php');
dol_include_once('/fourn/class/fournisseur.product.class.php');
$get = GETPOST('get');
$put = GETPOST('put');
switch ($put) {
case 'updateprice':
ob_start();
$product = new ProductFournisseur($db);
$id_prod = (int) GETPOST('idprod');
$ref_search = GETPOST('ref_search');
$product->fetch($id_prod, $ref_search);
$npr = preg_match('/\\*/', GETPOST('tvatx')) ? 1 : 0;
$fourn = new Fournisseur($db);
$fourn->fetch(GETPOST('fk_supplier'));
$ret = $product->update_buyprice(GETPOST('qty'), GETPOST("price"), $user, 'HT', $fourn, 1, GETPOST('ref'), GETPOST('tvatx'), 0, 0, 0);
$res = $db->query("SELECT MAX(rowid) as 'rowid' FROM " . MAIN_DB_PREFIX . "product_fournisseur_price WHERE fk_product=" . $product->id);
$obj = $db->fetch_object($res);
ob_clean();
if ($ret != 0) {
print json_encode(array('id' => $ret, 'error' => $product->error));
} else {
print json_encode(array('id' => $obj->rowid, 'error' => '', 'dp_desc' => $product->description));
}
break;
}
function import2Dolibarr($object, $typeimport)
{
global $conf;
global $langs;
$this->process_msg = '';
$error = 0;
$fp = @fopen($this->filename, "r");
if ($fp) {
switch ($object) {
case 'ImportStock':
$doliprod = new Product($this->db);
$i = 0;
while ($ligne = fgetcsv($fp, 1000, ";")) {
$doliprod->id = '';
$i++;
if ($this->firstline && $i == 1) {
continue;
}
if ($conf->global->IMPORT_BARCODE) {
$ligne[0] = $this->get_product_by_barcode($ligne[0]);
}
if ($doliprod->fetch('', $ligne[0]) <= 0) {
$this->process_msg .= $langs->trans("ErrProdNoExist", $ligne[0], $doliprod->error) . "\n";
} else {
$pid = $doliprod->id;
$doliprod->ref = $ligne[0];
$entrepot = $ligne[1];
$newstock = $ligne[2];
$price = $ligne[3];
if ($conf->global->IMPORT_TOTAL_STOCK) {
$doliprod->load_stock();
dol_syslog("stock produit " . $doliprod->stock_warehouse[$entrepot]->real . " entrepot " . $entrepot . " " . $doliprod->stock_reel, LOG_DEBUG);
// correction de stock
$delta = 0;
if ($newstock > $doliprod->stock_warehouse[$entrepot]->real) {
$delta = $newstock - $doliprod->stock_warehouse[$entrepot]->real;
$sens = 0;
} elseif ($newstock < $doliprod->stock_warehouse[$entrepot]->real) {
$delta = $doliprod->stock_warehouse[$entrepot]->real - $newstock;
$sens = 1;
}
if ($delta) {
$res = $doliprod->correct_stock($this->user, $entrepot, $delta, $sens, $langs->trans("StockCorrection"), $price);
if ($res < 0) {
$this->process_msg .= $langs->trans("ErrMovStock", $ligne[0], $doliprod->error) . "\n";
$error++;
}
}
dol_syslog("maj stock delta = " . $delta . " sens " . $sens, LOG_DEBUG);
} else {
$res = $doliprod->correct_stock($this->user, $entrepot, abs($newstock), $newstock > 0 ? 0 : 1, $langs->trans("StockCorrection"), $price);
if ($res < 0) {
$this->process_msg .= $langs->trans("ErrMovStock", $ligne[0], $doliprod->error) . "\n";
$error++;
}
}
}
}
break;
case 'ImportProduct':
//$doliprod = new Product($this->db);
$i = 0;
while ($ligne = fgetcsv($fp, 1000, ";")) {
$i++;
$doliprod = new Product($this->db);
$doliprod->id = '';
if ($this->firstline && $i == 1) {
continue;
}
if ($doliprod->fetch('', $ligne[0]) < 0) {
$this->process_msg .= $langs->trans("ErrProdNoExist", $ligne[0], $doliprod->error) . "\n";
} else {
$pid = $doliprod->id;
$doliprod->ref = $ligne[0];
if (!empty($ligne[1])) {
$doliprod->libelle = $ligne[1];
}
if (!empty($ligne[2])) {
$doliprod->status = $ligne[2];
}
$doliprod->status_buy = 1;
if (!empty($ligne[3])) {
$doliprod->description = $ligne[3];
}
if (!empty($ligne[4])) {
$doliprod->price = $ligne[4];
}
if (!empty($ligne[5])) {
$doliprod->tva_tx = $ligne[5];
}
if (!empty($ligne[6])) {
$doliprod->weight = $ligne[6];
}
if (!empty($ligne[7])) {
$doliprod->volume = $ligne[7];
}
if (!empty($ligne[9])) {
$doliprod->barcode = $ligne[9];
}
if (!empty($ligne[9])) {
$doliprod->barcode_type = dol_getIdFromCode($this->db, $ligne[10], 'c_barcode_type', 'libelle', 'rowid');
}
if (!empty($ligne[10])) {
$doliprod->type = $ligne[11];
}
$doliprod->price_base_type = 'HT';
$this->db->begin;
switch ($typeimport) {
case 'C':
if ($pid > 0) {
if ($doliprod->update($pid, $this->user) < 0) {
$this->process_msg .= $langs->trans("ErrProductUpdate", $ligne[0], $doliprod->error) . "\n";
$error++;
}
if ($doliprod->updatePrice($doliprod->price, $doliprod->price_base_type, $this->user) < 0) {
$this->process_msg .= $langs->trans("ErrProductUpdate", $ligne[0], $doliprod->error) . "\n";
$error++;
}
} else {
if ($doliprod->create($this->user) < 0) {
$this->process_msg .= $langs->trans("ErrProductCreate", $ligne[0], $doliprod->error) . "\n";
$error++;
} else {
// image et code barre
if ($ligne[8]) {
$this->add_photo_web($conf->produit->dir_output, $ligne[8], $doliprod->id);
}
/*if ($ligne[9]) {
if ($doliprod->setValueFrom('fk_barcode_type', 2) < 0){
$this->process_msg .= $langs->trans("ErrProductCreate", $ligne[0], $doliprod->error)."\n"; // TODO paramétrer
$error++;
}
if ($doliprod->setValueFrom('barcode', $ligne[9]) < 0 ){
$this->process_msg .= $langs->trans("ErrProductCreate", $ligne[0], $doliprod->error)."\n";
$error++;
}
}*/
}
}
break;
/*case 'M':
if ($pid>0)
{
if ($doliprod->update($pid, $this->user) < 0){
$this->process_msg .= $langs->trans("ErrProductUpdate", $ligne[0], $doliprod->error)."\n";
$error++;
}
if (version_compare(DOL_VERSION, 3.5) >= 0){
if ($doliprod->updatePrice($doliprod->price, $doliprod->price_base_type, $this->user) < 0){
$this->process_msg .= $langs->trans("ErrProductUpdate", $ligne[0], $doliprod->error)."\n";
$error++;
}
}
else{
if ($doliprod->updatePrice($doliprod->id, $doliprod->price, $doliprod->price_base_type, $this->user) < 0){
$this->process_msg .= $langs->trans("ErrProductUpdate", $ligne[0], $doliprod->error)."\n";
$error++;
}
}
}
else $this->process_msg .= $langs->trans("Untreated", $i).' '.$langs->trans("ErrProdNoExist", $ligne[0])."\n";
break;*/
/*case 'M':
if ($pid>0)
{
if ($doliprod->update($pid, $this->user) < 0){
$this->process_msg .= $langs->trans("ErrProductUpdate", $ligne[0], $doliprod->error)."\n";
$error++;
}
if (version_compare(DOL_VERSION, 3.5) >= 0){
if ($doliprod->updatePrice($doliprod->price, $doliprod->price_base_type, $this->user) < 0){
$this->process_msg .= $langs->trans("ErrProductUpdate", $ligne[0], $doliprod->error)."\n";
$error++;
}
}
else{
if ($doliprod->updatePrice($doliprod->id, $doliprod->price, $doliprod->price_base_type, $this->user) < 0){
$this->process_msg .= $langs->trans("ErrProductUpdate", $ligne[0], $doliprod->error)."\n";
$error++;
}
}
}
else $this->process_msg .= $langs->trans("Untreated", $i).' '.$langs->trans("ErrProdNoExist", $ligne[0])."\n";
break;*/
case 'D':
if ($pid > 0) {
if ($doliprod->delete($pid) < 0) {
$this->process_msg .= $langs->trans("ErrProductDelete", $ligne[0], $doliprod->error) . "\n";
$error++;
}
} else {
$this->process_msg .= $langs->trans("Untreated", $i) . ' ' . $langs->trans("ErrProdNoExist", $ligne[0]) . "\n";
}
}
if (!$error) {
$this->db->commit();
} else {
$this->db->rollback();
}
}
}
// while
break;
case 'ImportThirtdparty':
$i = 0;
//$societe = new Societe($this->db);
while ($ligne = fgetcsv($fp, 1000, ";")) {
$i++;
$societe = new Societe($this->db);
if ($this->firstline && $i == 1) {
continue;
}
if (!$ligne[0]) {
$this->process_msg .= $langs->trans("Untreated", $i) . " " . $langs->trans("ErrNameRequired") . "\n";
continue;
}
// vérifier par code_client
if ($ligne[13]) {
$sid = $this->get_socbyclientcode($ligne[13]);
} else {
if ($ligne[14]) {
$sid = $this->get_socbysuplliercode($ligne[14]);
}
}
if ($sid > 0) {
$societe->fetch($sid);
} else {
$sid = $societe->fetch('', $ligne[0]);
}
if ($ligne[12]) {
$pid = dol_getIdFromCode($this->db, $ligne[12], "c_pays", "code", "rowid");
} else {
$pid = '';
}
if ($pid <= 0) {
$pid = '';
}
$did = '';
$societe->id = $sid;
$societe->name = $ligne[0];
$societe->particulier = 0;
//Société
$societe->address = $ligne[1] . "\n" . $ligne[2] . "\n" . $ligne[3];
$societe->zip = $ligne[4];
$societe->town = $ligne[5];
$societe->state_id = $did;
if ($ligne[12]) {
$societe->country_code = $ligne[12];
}
$societe->country_id = $pid;
dol_syslog("codes {$pid} " . $lige[12], LOG_DEBUG);
$societe->phone = $ligne[6];
$societe->fax = $ligne[7];
$societe->email = $ligne[8];
$societe->url = $ligne[9];
$societe->idprof1 = $ligne[10];
switch ($ligne[11]) {
case '0':
$societe->fournisseur = 0;
$societe->client = $ligne[11];
break;
case '1':
$societe->fournisseur = 0;
$societe->client = $ligne[11];
break;
case '2':
$societe->fournisseur = 0;
$societe->client = $ligne[11];
break;
case '10':
$societe->client = 0;
$societe->fournisseur = 1;
break;
default:
break;
}
if ($ligne[13]) {
$societe->code_client = $ligne[13];
}
if ($ligne[14]) {
$societe->code_fournisseur = $ligne[14];
}
/*if ($ligne[15]) $societe->array_options["options_zone"]=$ligne[15];
if (!empty($ligne[16])) $societe->array_options["options_CA"]=$ligne[16];
if (!empty($ligne[17]))
{
if ($ligne[17] <= 5) $societe->effectif_id = 1;
elseif ($ligne[17] <= 10) $societe->effectif_id = 2;
elseif ($ligne[17] <= 50) $societe->effectif_id = 3;
elseif ($ligne[17] <= 100) $societe->effectif_id = 4;
elseif ($ligne[17] <= 500) $societe->effectif_id = 5;
else $societe->effectif_id = 7;
}
dol_syslog("effectif " . $lige[17].' '.$societe->effectif_id." ".print_r($societe->array_options, true), LOG_DEBUG);*/
$this->db->begin;
switch ($typeimport) {
case 'C':
if ($sid > 0) {
if ($societe->update($sid, $this->user) < 0) {
$this->process_msg .= $langs->trans("ErrCompanyUpdate", $ligne[0], $societe->error) . "\n";
$error++;
}
} elseif ($societe->create($this->user) < 0) {
$this->process_msg .= $langs->trans("ErrCompanyCreate", $ligne[0], $societe->error) . "\n";
$error++;
}
break;
/*case 'M':
if ($sid>0)
{
if ($societe->update($sid, $this->user) < 0){
$this->process_msg .= $langs->trans("ErrCompanyUpdate", $ligne[0], $societe->error)."\n";
$error++;
}
}
else $this->process_msg .= $langs->trans("Untreated", $i).' '.$langs->trans("CompanyNoExist", $ligne[0])."\n";
break;*/
/*case 'M':
if ($sid>0)
{
if ($societe->update($sid, $this->user) < 0){
$this->process_msg .= $langs->trans("ErrCompanyUpdate", $ligne[0], $societe->error)."\n";
$error++;
}
}
else $this->process_msg .= $langs->trans("Untreated", $i).' '.$langs->trans("CompanyNoExist", $ligne[0])."\n";
break;*/
case 'D':
if ($sid > 0) {
if ($societe->delete($sid) < 0) {
$this->process_msg .= $langs->trans("ErrCompanyDelete", $ligne[0], $societe->error) . "\n";
$error++;
}
} else {
$this->process_msg .= $langs->trans("Untreated", $i) . ' ' . $langs->trans("CompanyNoExist", $ligne[0]) . "\n";
}
}
if (!$error) {
$this->db->commit();
} else {
$this->db->rollback();
}
}
break;
case 'ImportContact':
$i = 0;
//$contact=new Contact($this->db);
//$societe = new Societe($this->db);
while ($ligne = fgetcsv($fp, 1000, ";")) {
$i++;
$contact = new Contact($this->db);
$societe = new Societe($this->db);
if ($this->firstline && $i == 1) {
continue;
}
//if ($societe->fetch('',$ligne[0]) < 0 ) $this->process_msg .= "erreur lecture Société "."\n";
if ($ligne[0]) {
$socid = $this->get_socbyclientcode($ligne[0]);
} else {
if ($ligne[1]) {
$socid = $this->get_socbysuplliercode($ligne[1]);
}
}
if ($socid < 0) {
$this->process_msg .= $i . " " . $langs->trans("ErrCompanyRequired") . "\n";
} else {
$societe->fetch($socid);
}
if (!$societe->id) {
$this->process_msg .= $langs->trans("ErrCompanyNoExist", $ligne[0] . " " . $ligne[1]) . "\n";
continue;
}
if (empty($ligne[2])) {
$this->process_msg .= $langs->trans("Untreated", $i) . " " . $langs->trans("ErrNameRequired") . "\n";
continue;
}
$contactid = $this->get_contact_id($socid, $ligne[2], $ligne[3]);
$contact->id = $contactid;
$contact->civilite_id = $ligne[4];
$contact->lastname = $ligne[2];
$contact->firstname = $ligne[3];
if ($ligne[5] || $ligne[6] || $ligne[7]) {
$contact->address = $ligne[5] . "\n" . $ligne[6] . "\n" . $ligne[7];
} else {
$contact->address = $societe->address;
}
if ($ligne[8]) {
$contact->zip = $ligne[8];
} else {
$contact->zip = $societe->zip;
}
if ($ligne[9]) {
$contact->town = $ligne[9];
} else {
$contact->town = $societe->town;
}
if ($ligne[10]) {
$pid = dol_getIdFromCode($this->db, $ligne[10], "c_pays", "code", "rowid");
if ($pid <= 0) {
$pid = '';
}
$contact->country_id = $pid;
$contact->country_code = $ligne[10];
} else {
$contact->country_id = $societe->country_id;
$contact->country_code = $societe->country_code;
}
$contact->socid = $socid;
// fk_soc
$contact->status = 1;
$contact->email = $ligne[11];
$contact->phone_pro = $ligne[12];
$contact->fax = $ligne[13];
$contact->phone_mobile = $ligne[14];
$contact->priv = 0;
$this->db - begin;
switch ($typeimport) {
case 'C':
if ($contactid > 0) {
if ($contact->update($contactid, $this->user) < 0) {
$this->process_msg .= $langs->trans("ErrContactUpdate", $ligne[2], $contact->error) . "\n";
$error++;
}
} elseif ($contact->create($this->user) < 0) {
$this->process_msg .= $langs->trans("ErrContactCreate", $ligne[2], $contact->error) . "\n";
$error++;
}
break;
/*case 'M':
if ($contactid>0)
{
if ($contact->update($contactid, $this->user) < 0){
$this->process_msg .= $langs->trans("ErrContactUpdate", $ligne[2], $contact->error)."\n";
$error++;
}
}
else $this->process_msg .= $langs->trans("Untreated", $i).' '.$langs->trans("ContactNoExist", $ligne[2])."\n";
break;*/
/*case 'M':
if ($contactid>0)
{
if ($contact->update($contactid, $this->user) < 0){
$this->process_msg .= $langs->trans("ErrContactUpdate", $ligne[2], $contact->error)."\n";
$error++;
}
}
else $this->process_msg .= $langs->trans("Untreated", $i).' '.$langs->trans("ContactNoExist", $ligne[2])."\n";
break;*/
case 'D':
if ($contactid > 0) {
if ($contact->delete($contactid) < 0) {
$this->process_msg .= $langs->trans("ErrContactDelete", $ligne[2], $contact->error) . "\n";
$error++;
}
} else {
$this->process_msg .= $langs->trans("Untreated", $i) . ' ' . $langs->trans("ContactNoExist", $ligne[2]) . "\n";
}
}
if (!$error) {
$this->db->commit();
} else {
$this->db->rollback();
}
}
break;
/*case 'ImportActions':
$i=0;
$contact=new Contact($this->db);
$societe = new Societe($this->db);
$actioncomm = new ActionComm($this->db);
$actuser = new User($this->db);
while ($ligne = fgetcsv($fp,1000,";"))
{
$i++;
if ($this->firstline && $i== 1) continue;
//if ($societe->fetch('',$ligne[0]) < 0 ) $this->process_msg .= "erreur lecture Société "."\n";
//else $socid = $societe->id;
$socid = $this->get_socbyclientcode($ligne[0]);
if ($socid < 0 ) $this->process_msg .= $langs->trans("Untreated", $i).' '.$langs->trans("ErrCompanyRequired")."\n";
else $societe->fetch($socid);
$socid = $societe->id;
if (!$socid)
{
$this->process_msg .= $langs->trans("ErrCompanyNoExist", $ligne[0])."\n";
continue;
}
//action sur un contact de la soc
if ($ligne[1])
{
$contactid = $this->get_contact_id($socid, $ligne[1], $ligne[2]) ;
if ($contactid < 0) {
$this->process_msg .= $langs->trans("Untreated", $i).' '.$langs->trans("ContactNoExist", $ligne[1].' '. $ligne[2])."\n";
// réinitialiser ??
continue;
}
else $contact->fetch($contactid);
}
$usertodo = '';
if ($ligne[9])
{
$usertodo=new User($this->db);
if ( $usertodo->fetch('',$ligne[9]) < 0 ) $this->process_msg .= $langs->trans("ErrUserNoExist", $ligne[9])."\n";
}
$userdone= '' ;
if ($ligne[10])
{
$usertodo=new User($this->db);
if ( $usertodo->fetch('',$ligne[10]) < 0 ) $this->process_msg .= $langs->trans("ErrUserNoExist", $ligne[10])."\n";
}
$datep = '';
if ($ligne[6])
{
// voir date
$n = sscanf($ligne[6],"%02d/%02d/%04d", $d_day, $d_mon, $d_year);
if ($n==3) $datep=dol_mktime(12, 0, 0, $d_mon, $d_day, $d_year);
if (!$datep) $this->process_msg .= $langs->trans("ErrDateConversion", $ligne[6])."\n";
}
else $datep ='';
$datef='';
if ($ligne[7])
{
// voir la date
$n = sscanf($ligne[7],"%02d/%02d/%04d", $d_day, $d_mon, $d_year);
if ($n==3)$datef=dol_mktime(12, 0, 0, $d_mon, $d_day, $d_year);
if (!$datef) $this->process_msg .= $langs->trans("ErrDateConversion", $ligne[7])."\n";
}
else $datef ='';
//$datef='';
$actioncomm->societe = $societe;
if ($ligne[1]) $actioncomm->contact = $contact;
else $actioncomm->contact = '';
$actioncomm->type_code = $ligne[3];
$actioncomm->priority = $ligne[4];
$actioncomm->location = '' ;
$actioncomm->label = $ligne[5];
$actioncomm->datep = $datep;
$actioncomm->datef = $datef;
$actioncomm->percentage = $ligne[8];
$actioncomm->usertodo = $usertodo;
$actioncomm->userdone = $userdone;
$actioncomm->note =$ligne[11];
switch ($typeimport)
{
case 'C':
$this->db->begin();
if ($actioncomm->add($this->user) < 0)
{
$this->process_msg .= $langs->trans("ErrActionCreate", $ligne[5], $actioncomm->error)."\n";
$this->db->rollback();
}
else $this->db->commit();
break;
case 'M':
$this->db->begin();
if($actioncomm->update($user) < 0){
$this->process_msg .= $langs->trans("ErrActionUpdate", $ligne[5], $actioncomm->error)."\n";
$this->db->rollback();
}
else $this->db->commit();
break;
case 'D':
$this->db->begin();
if($actioncomm->delete() < 0){
$this->process_msg .= $langs->trans("ErrActionDelete", $ligne[5], $actioncomm->error)."\n";
$this->db->rollback();
}
else $this->db->commit();
break;
}
}
break;*/
/*case 'ImportActions':
$i=0;
$contact=new Contact($this->db);
$societe = new Societe($this->db);
$actioncomm = new ActionComm($this->db);
$actuser = new User($this->db);
while ($ligne = fgetcsv($fp,1000,";"))
{
$i++;
if ($this->firstline && $i== 1) continue;
//if ($societe->fetch('',$ligne[0]) < 0 ) $this->process_msg .= "erreur lecture Société "."\n";
//else $socid = $societe->id;
$socid = $this->get_socbyclientcode($ligne[0]);
if ($socid < 0 ) $this->process_msg .= $langs->trans("Untreated", $i).' '.$langs->trans("ErrCompanyRequired")."\n";
else $societe->fetch($socid);
$socid = $societe->id;
if (!$socid)
{
$this->process_msg .= $langs->trans("ErrCompanyNoExist", $ligne[0])."\n";
continue;
}
//action sur un contact de la soc
if ($ligne[1])
{
$contactid = $this->get_contact_id($socid, $ligne[1], $ligne[2]) ;
if ($contactid < 0) {
$this->process_msg .= $langs->trans("Untreated", $i).' '.$langs->trans("ContactNoExist", $ligne[1].' '. $ligne[2])."\n";
// réinitialiser ??
continue;
}
else $contact->fetch($contactid);
}
$usertodo = '';
if ($ligne[9])
{
$usertodo=new User($this->db);
if ( $usertodo->fetch('',$ligne[9]) < 0 ) $this->process_msg .= $langs->trans("ErrUserNoExist", $ligne[9])."\n";
}
$userdone= '' ;
if ($ligne[10])
{
$usertodo=new User($this->db);
if ( $usertodo->fetch('',$ligne[10]) < 0 ) $this->process_msg .= $langs->trans("ErrUserNoExist", $ligne[10])."\n";
}
$datep = '';
if ($ligne[6])
{
// voir date
$n = sscanf($ligne[6],"%02d/%02d/%04d", $d_day, $d_mon, $d_year);
if ($n==3) $datep=dol_mktime(12, 0, 0, $d_mon, $d_day, $d_year);
if (!$datep) $this->process_msg .= $langs->trans("ErrDateConversion", $ligne[6])."\n";
}
else $datep ='';
$datef='';
if ($ligne[7])
{
// voir la date
$n = sscanf($ligne[7],"%02d/%02d/%04d", $d_day, $d_mon, $d_year);
if ($n==3)$datef=dol_mktime(12, 0, 0, $d_mon, $d_day, $d_year);
if (!$datef) $this->process_msg .= $langs->trans("ErrDateConversion", $ligne[7])."\n";
}
else $datef ='';
//$datef='';
$actioncomm->societe = $societe;
if ($ligne[1]) $actioncomm->contact = $contact;
else $actioncomm->contact = '';
$actioncomm->type_code = $ligne[3];
$actioncomm->priority = $ligne[4];
$actioncomm->location = '' ;
$actioncomm->label = $ligne[5];
$actioncomm->datep = $datep;
$actioncomm->datef = $datef;
$actioncomm->percentage = $ligne[8];
$actioncomm->usertodo = $usertodo;
$actioncomm->userdone = $userdone;
$actioncomm->note =$ligne[11];
switch ($typeimport)
{
case 'C':
$this->db->begin();
if ($actioncomm->add($this->user) < 0)
{
$this->process_msg .= $langs->trans("ErrActionCreate", $ligne[5], $actioncomm->error)."\n";
$this->db->rollback();
}
else $this->db->commit();
break;
case 'M':
$this->db->begin();
if($actioncomm->update($user) < 0){
$this->process_msg .= $langs->trans("ErrActionUpdate", $ligne[5], $actioncomm->error)."\n";
$this->db->rollback();
}
else $this->db->commit();
break;
case 'D':
$this->db->begin();
if($actioncomm->delete() < 0){
$this->process_msg .= $langs->trans("ErrActionDelete", $ligne[5], $actioncomm->error)."\n";
$this->db->rollback();
}
else $this->db->commit();
break;
}
}
break;*/
case 'Importtarif':
// ref four
$i = 0;
$this->process_msg = '';
$error = 0;
/*$doliprod = new Product($this->db);
$product = new ProductFournisseur($this->db);
$societe = new Societe($this->db);*/
while ($ligne = fgetcsv($fp, 1000, ";")) {
$doliprod->id = '';
$i++;
$doliprod = new Product($this->db);
$product = new ProductFournisseur($this->db);
$societe = new Societe($this->db);
if ($this->firstline && $i == 1) {
continue;
}
// recherche du fournisseur
if ($societe->fetch('', $ligne[2]) > 0) {
$sid = $societe->id;
} else {
$this->process_msg .= $langs->trans("Untreated", $i) . " " . $langs->trans("ErrComppanyNoExist", $ligne[2]) . "\n";
$sid = '';
}
if ($doliprod->fetch('', $ligne[0]) > 0) {
$pid = $doliprod->id;
} else {
$this->process_msg .= $langs->trans("Untreated", $i) . " " . $langs->trans("ErrProductNoExist", $ligne[0], $doliprod->error) . "\n";
$pid = '';
}
if ($sid > 0 && $pid > 0) {
$result = $product->fetch($doliprod->id);
if ($result > 0) {
$this->db->begin();
switch ($typeimport) {
case 'C':
$ret = $product->add_fournisseur($this->user, $sid, $ligne[1], $ligne[3]);
if ($ret < 0 && $ret != -3) {
$this->process_msg .= $langs->trans("Untreated", $i) . " " . $langs->trans("ErrCreatePrice", $product->error) . "\n";
$error++;
}
$ret = $product->update_buyprice($ligne[3], $ligne[4], $this->user, 'HT', $supplier, '', $ligne[1], $ligne[5]);
if ($ret < 0 && $ret != -3) {
$this->process_msg .= $langs->trans("Untreated", $i) . " " . $langs->trans("ErrCreatePrice", $product->error) . "\n";
$error++;
}
break;
/*case 'M':
{
// gestion du prix obligatoire
$supplier=new Fournisseur($this->db);
$result=$supplier->fetch($sid);
$ret=$product->update_buyprice($ligne[3], $ligne[4] , $this->user, 'HT', $supplier, '', $ligne[1], $ligne[5] );
if ($ret < 0)
{
$this->process_msg .= $langs->trans("Untreated", $i)." ".$langs->trans("Qty").$ligne[3]. ", ".$langs->trans("Price").$ligne[4]." ".$langs->trans("ErrUpdatePrice", $product->error)."\n";
$error ++;
}
}
break;*/
/*case 'M':
{
// gestion du prix obligatoire
$supplier=new Fournisseur($this->db);
$result=$supplier->fetch($sid);
$ret=$product->update_buyprice($ligne[3], $ligne[4] , $this->user, 'HT', $supplier, '', $ligne[1], $ligne[5] );
if ($ret < 0)
{
$this->process_msg .= $langs->trans("Untreated", $i)." ".$langs->trans("Qty").$ligne[3]. ", ".$langs->trans("Price").$ligne[4]." ".$langs->trans("ErrUpdatePrice", $product->error)."\n";
$error ++;
}
}
break;*/
case 'D':
// suprresion de la ligne avec le même nb d'article et le même prix
$sql = "SELECT pfp.rowid FROM " . MAIN_DB_PREFIX . "product_fournisseur_price as pfp";
$sql .= " WHERE pfp.quantity = '" . $ligne[3] . "' AND pfp.ref_fourn = '" . $ligne[1];
$sql .= "' AND pfp.fk_soc = '" . $sid . "' AND pfp.fk_product='" . $pid . "'";
$sql .= " AND pfp.entity = " . $conf->entity;
$resql = $this->db->query($sql);
if ($resql) {
$obj = $this->db->fetch_object($resql);
if ($obj->rowid > 0) {
$result = $product->remove_product_fournisseur_price($obj->rowid);
} else {
$this->process_msg .= $langs->trans("Untreated", $i) . ' ' . $langs->trans("ErrDeletePrice", $product->error) . "\n";
$error++;
}
} else {
$this->process_msg .= "Error SQL= " . $sql . "\n";
$error++;
}
break;
}
//switch
}
if (!$error) {
$this->db->commit();
} else {
$this->db->rollback();
}
}
// fournisseur trouvé
}
// traitement ligne
// while reffour
break;
}
// fin switch
fclose($fp);
} else {
$this->error = $langs->trans("ErrOpenFile") . $nomfich;
$error = -1;
}
return $error;
}
/**
* testCommandeFournisseurCreate
*
* @return void
*/
public function testCommandeFournisseurCreate()
{
global $conf, $user, $langs, $db;
$conf = $this->savconf;
$user = $this->savuser;
$langs = $this->savlangs;
$db = $this->savdb;
// Set supplier and product to use
$socid = 1;
$societe = new Societe($db);
$societe->fetch($socid);
$product = new ProductFournisseur($db);
$product->fetch(0, 'PIDRESS');
if ($product->id <= 0) {
print "\n" . __METHOD__ . " A product with ref PIDRESS must exists into database";
die;
}
$quantity = 10;
$ref_fourn = 'SUPPLIER_REF_PHPUNIT';
$tva_tx = 19.6;
// Create supplier price
$result = $product->add_fournisseur($user, $societe->id, $ref_fourn, $quantity);
// This insert record with no value for price. Values are update later with update_buyprice
$this->assertGreaterThanOrEqual(1, $result);
$result = $product->update_buyprice($quantity, 10, $user, 'HT', $societe, '', $ref_fourn, $tva_tx, 0, 0);
$this->assertGreaterThanOrEqual(0, $result);
// Create supplier order with a too low quantity
$localobject = new CommandeFournisseur($db);
$localobject->initAsSpecimen();
$localobject->lines = array();
// Overwrite lines of order
$line = new CommandeFournisseurLigne($db);
$line->desc = $langs->trans("Description") . " specimen line too low";
$line->qty = 1;
// So lower than $quantity
$line->fk_product = $product->id;
$line->ref_fourn = $ref_fourn;
$localobject->lines[] = $line;
$result = $localobject->create($user);
print __METHOD__ . " result=" . $result . "\n";
$this->assertEquals(-1, $result);
// must be -1 because quantity is lower than minimum of supplier price
$sql = "DELETE FROM " . MAIN_DB_PREFIX . "commande_fournisseur where ref=''";
$db->query($sql);
// Create supplier order
$localobject2 = new CommandeFournisseur($db);
$localobject2->initAsSpecimen();
// This create 5 lines of first product found for socid 1
$localobject2->lines = array();
// Overwrite lines of order
$line = new CommandeFournisseurLigne($db);
$line->desc = $langs->trans("Description") . " specimen line ok";
$line->qty = 10;
// So enough quantity
$line->fk_product = $product->id;
$line->ref_fourn = $ref_fourn;
$localobject2->lines[] = $line;
$result = $localobject2->create($user);
print __METHOD__ . " result=" . $result . "\n";
$this->assertGreaterThanOrEqual(0, $result);
return $result;
}
if ($conf->global->DISPATCH_UPDATE_ORDER_PRICE_ON_RECEPTION) {
$sup_price = $item['supplier_price'];
$lineprod = searchProductInCommandeLine($commandefourn->lines, $id_prod);
$unitaire = $sup_price / $lineprod->qty;
$prix = $unitaire * $lineprod->qty;
if ($conf->global->DISPATCH_CREATE_SUPPLIER_PRICE) {
$sup_qty = $item['supplier_qty'];
$generate = $item['generate_supplier_tarif'] == 'on' ? true : false;
// On va générer le prix s'il est coché
if ($generate) {
$fourn = new Fournisseur($db);
$fourn->fetch($commandefourn->socid);
$prix = $unitaire * $sup_qty;
$fournisseurproduct = new ProductFournisseur($db);
$fournisseurproduct->id = $id_prod;
$fournisseurproduct->update_buyprice($sup_qty, $prix, $user, 'HT', $fourn, 0, $lineprod->ref_supplier, '20');
}
} else {
$sup_qty += $lineprod->qty;
}
if ($lineprod->subprice != $unitaire && $unitaire > 0) {
$prixtva = $prix * ($lineprod->tva_tx / 100);
$total = $prix + $prixtva;
$lineprod->subprice = '' . $unitaire;
$lineprod->total_ht = '' . $prix;
$lineprod->total_tva = '' . $prixtva;
$lineprod->total_ttc = '' . $total;
$_REQUEST['lineid'] = $line->id;
$commandefourn->brouillon = true;
// obligatoire pour mettre a jour les lignes
$commandefourn->updateline($lineprod->id, $lineprod->desc, $lineprod->subprice, $lineprod->qty, $lineprod->remise_percent, $lineprod->tva_tx, $lineprod->localtax1_tx, $lineprod->localtax2_tx, 'HT', 0, 0, 0, false, null, null, 0, null);
