* Copyright (C) 2005-2012 Laurent Destailleur * Copyright (C) 2005-2012 Regis Houssin * Copyright (C) 2012-2015 Juanjo Menent * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 3 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ /** * \file htdocs/expedition/shipment.php * \ingroup expedition */ require '../main.inc.php'; require_once DOL_DOCUMENT_ROOT.'/core/class/html.formfile.class.php'; require_once DOL_DOCUMENT_ROOT.'/expedition/class/expedition.class.php'; require_once DOL_DOCUMENT_ROOT.'/product/class/html.formproduct.class.php'; require_once DOL_DOCUMENT_ROOT.'/core/lib/order.lib.php'; require_once DOL_DOCUMENT_ROOT.'/core/lib/sendings.lib.php'; require_once DOL_DOCUMENT_ROOT.'/commande/class/commande.class.php'; if (! empty($conf->projet->enabled)) require_once DOL_DOCUMENT_ROOT.'/projet/class/project.class.php'; if (! empty($conf->stock->enabled)) require_once DOL_DOCUMENT_ROOT.'/product/stock/class/entrepot.class.php'; if (! empty($conf->propal->enabled)) require_once DOL_DOCUMENT_ROOT.'/comm/propal/class/propal.class.php'; if (! empty($conf->product->enabled) || ! empty($conf->service->enabled)) require_once DOL_DOCUMENT_ROOT.'/product/class/product.class.php'; $langs->load('orders'); $langs->load("companies"); $langs->load("bills"); $langs->load('propal'); $langs->load('deliveries'); $langs->load('stocks'); $id=GETPOST('id','int'); // id of order $ref= GETPOST('ref','alpha'); $action=GETPOST('action','alpha'); // Security check $socid=0; if (! empty($user->societe_id)) $socid=$user->societe_id; $result=restrictedArea($user,'commande',$id); /* * Actions */ // Categorisation dans projet if ($action == 'classin') { $commande = new Commande($db); $commande->fetch($id); $commande->setProject(GETPOST('projectid','int')); } if ($action == 'confirm_cloture' && GETPOST('confirm','alpha') == 'yes') { $commande = new Commande($db); $commande->fetch($id); $result = $commande->cloture($user); } // Positionne ref commande client if ($action == 'setrefcustomer' && $user->rights->commande->creer) { $commande = new Commande($db); $commande->fetch($id); $commande->set_ref_client($user,GETPOST('ref_customer','alpha')); } if ($action == 'setdatedelivery' && $user->rights->commande->creer) { //print "x ".$_POST['liv_month'].", ".$_POST['liv_day'].", ".$_POST['liv_year']; $datelivraison=dol_mktime(0, 0, 0, GETPOST('liv_month','int'), GETPOST('liv_day','int'),GETPOST('liv_year','int')); $commande = new Commande($db); $commande->fetch($id); $result=$commande->set_date_livraison($user,$datelivraison); if ($result < 0) { $mesg='
'.$commande->error.'
'; } } if ($action == 'setdeliveryaddress' && $user->rights->commande->creer) { $commande = new Commande($db); $commande->fetch($id); $commande->setDeliveryAddress(GETPOST('delivery_address_id','int')); } if ($action == 'setmode' && $user->rights->commande->creer) { $commande = new Commande($db); $commande->fetch($id); $result = $commande->setPaymentMethods(GETPOST('mode_reglement_id','int')); if ($result < 0) dol_print_error($db,$commande->error); } if ($action == 'setconditions' && $user->rights->commande->creer) { $commande = new Commande($db); $commande->fetch($id); $result=$commande->setPaymentTerms(GETPOST('cond_reglement_id','int')); if ($result < 0) dol_print_error($db,$commande->error); } // shipping method if ($action == 'setshippingmethod' && $user->rights->commande->creer) { $commande = new Commande($db); $commande->fetch($id); $result=$commande->setShippingMethod(GETPOST('shipping_method_id', 'int')); } /* * View */ $form = new Form($db); $formfile = new FormFile($db); $formproduct = new FormProduct($db); llxHeader('',$langs->trans('OrderCard'),''); if ($id > 0 || ! empty($ref)) { $commande = new Commande($db); if ( $commande->fetch($id,$ref) > 0) { $commande->loadExpeditions(1); $product_static=new Product($db); $soc = new Societe($db); $soc->fetch($commande->socid); $author = new User($db); $author->fetch($commande->user_author_id); $head = commande_prepare_head($commande); dol_fiche_head($head, 'shipping', $langs->trans("CustomerOrder"), 0, 'order'); /* * Confirmation de la validation */ if ($action == 'cloture') { print $form->formconfirm($_SERVER['PHP_SELF']."?id=".$id,$langs->trans("CloseShipment"),$langs->trans("ConfirmCloseShipment"),"confirm_cloture"); } // Onglet commande $nbrow=8; if (! empty($conf->projet->enabled)) $nbrow++; print ''; // Ref print ''; print ''; print ''; // Ref commande client print ''; print ''; // Third party print ''; print ''; print ''; // Discounts for third party print ''; // Date print ''; print ''; print ''; // Delivery date planned print ''; // Note on several rows //print ''; print ''; // Shipping Method print ''; print ''; // Terms of payment print ''; // Mode of payment print ''; // Availability print ''; // Source print ''; } // Lignes de 3 colonnes // Total HT print ''; print ''; print ''; // Total TVA print ''; print ''; // Total TTC print ''; print ''; // Statut print ''; print ''; print ''; print '
'.$langs->trans('Ref').''; print $form->showrefnav($commande,'ref','',1,'ref','ref'); print '
'; print ''; if ($action != 'RefCustomerOrder' && $commande->brouillon) print ''; print '
'; print $langs->trans('RefCustomer').''; print ''.img_edit($langs->trans('Modify')).'
'; print '		'; if ($user->rights->commande->creer && $action == 'RefCustomerOrder') { print '
'; print ''; print ''; print ''; print ' '; print '
'; } else { print $commande->ref_client; } print '
'.$langs->trans('Company').''.$soc->getNomUrl(1).'
'.$langs->trans('Discounts').''; if ($soc->remise_percent) print $langs->trans("CompanyHasRelativeDiscount",$soc->remise_percent); else print $langs->trans("CompanyHasNoRelativeDiscount"); print '. '; $absolute_discount=$soc->getAvailableDiscounts('','fk_facture_source IS NULL'); $absolute_creditnote=$soc->getAvailableDiscounts('','fk_facture_source IS NOT NULL'); $absolute_discount=price2num($absolute_discount,'MT'); $absolute_creditnote=price2num($absolute_creditnote,'MT'); if ($absolute_discount) { if ($commande->statut > Commande::STATUS_DRAFT) { print $langs->trans("CompanyHasAbsoluteDiscount",price($absolute_discount),$langs->transnoentities("Currency".$conf->currency)); } else { // Remise dispo de type non avoir $filter='fk_facture_source IS NULL'; print '
'; $form->form_remise_dispo($_SERVER["PHP_SELF"].'?id='.$commande->id,0,'remise_id',$soc->id,$absolute_discount,$filter); } } if ($absolute_creditnote) { print $langs->trans("CompanyHasCreditNote",price($absolute_creditnote),$langs->transnoentities("Currency".$conf->currency)).'. '; } if (! $absolute_discount && ! $absolute_creditnote) print $langs->trans("CompanyHasNoAbsoluteDiscount").'.'; print '
'.$langs->trans('Date').''.dol_print_date($commande->date,'daytext').'
'; print ''; if ($action != 'editdate_livraison') print ''; print '
'; print $langs->trans('DateDeliveryPlanned'); print 'id.'">'.img_edit($langs->trans('SetDeliveryDate'),1).'
'; print '		'; if ($action == 'editdate_livraison') { print '
'; print ''; print ''; $form->select_date($commande->date_livraison>0?$commande->date_livraison:-1,'liv_','','','',"setdatedelivery"); print ''; print '
'; } else { print dol_print_date($commande->date_livraison,'daytext'); } print '		'.$langs->trans('NotePublic').' :
'; //print nl2br($commande->note_public); //print '
'; print ''; if ($action != 'editshippingmethod' && $user->rights->expedition->creer) print ''; print '
'; print $langs->trans('SendingMethod'); print 'id.'">'.img_edit($langs->trans('SetShippingMode'),1).'
'; print '		'; if ($action == 'editshippingmethod') { $form->formSelectShippingMethod($_SERVER['PHP_SELF'].'?id='.$commande->id, $commande->shipping_method_id, 'shipping_method_id', 1); } else { $form->formSelectShippingMethod($_SERVER['PHP_SELF'].'?id='.$commande->id, $commande->shipping_method_id, 'none'); } print '
'; print ''; if ($action != 'editconditions' && ! empty($commande->brouillon)) print ''; print '
'; print $langs->trans('PaymentConditionsShort'); print 'id.'">'.img_edit($langs->trans('SetConditions'),1).'
'; print '		'; if ($action == 'editconditions') { $form->form_conditions_reglement($_SERVER['PHP_SELF'].'?id='.$commande->id,$commande->cond_reglement_id,'cond_reglement_id'); } else { $form->form_conditions_reglement($_SERVER['PHP_SELF'].'?id='.$commande->id,$commande->cond_reglement_id,'none'); } print '
'; print ''; if ($action != 'editmode' && ! empty($commande->brouillon)) print ''; print '
'; print $langs->trans('PaymentMode'); print 'id.'">'.img_edit($langs->trans('SetMode'),1).'
'; print '		'; if ($action == 'editmode') { $form->form_modes_reglement($_SERVER['PHP_SELF'].'?id='.$commande->id,$commande->mode_reglement_id,'mode_reglement_id'); } else { $form->form_modes_reglement($_SERVER['PHP_SELF'].'?id='.$commande->id,$commande->mode_reglement_id,'none'); } print '
'; print ''; if ($action != 'editavailability') print ''; print '
'; print $langs->trans('AvailabilityPeriod'); print 'id . '">' . img_edit($langs->trans('SetAvailability'), 1) . '
'; print '		'; if ($action == 'editavailability') { $form->form_availability($_SERVER['PHP_SELF'] . '?id=' . $commande->id, $commande->availability_id, 'availability_id', 1); } else { $form->form_availability($_SERVER['PHP_SELF'] . '?id=' . $commande->id, $commande->availability_id, 'none', 1); } print '
'; print ''; if ($action != 'editdemandreason') print ''; print '
'; print $langs->trans('Source'); print 'id . '">' . img_edit($langs->trans('SetDemandReason'), 1) . '
'; print '		'; if ($action == 'editdemandreason') { $form->formInputReason($_SERVER['PHP_SELF'] . '?id=' . $commande->id, $commande->demand_reason_id, 'demand_reason_id', 1); } else { $form->formInputReason($_SERVER['PHP_SELF'] . '?id=' . $commande->id, $commande->demand_reason_id, 'none'); } // Project if (! empty($conf->projet->enabled)) { $langs->load('projects'); print '
'; print ''; if ($action != 'classify') print ''; print '
'; print $langs->trans('Project'); print ''.img_edit($langs->trans('SetProject')).'
'; print '		'; if ($action == 'classify') { $form->form_project($_SERVER['PHP_SELF'].'?id='.$commande->id, $commande->socid, $commande->fk_project, 'projectid', 0, 0, 1); } else { $form->form_project($_SERVER['PHP_SELF'].'?id='.$commande->id, $commande->socid, $commande->fk_project, 'none', 0, 0); } print '
'.$langs->trans('AmountHT').''.price($commande->total_ht, 0, '', 1, -1, -1, $conf->currency).'
'.$langs->trans('AmountVAT').''.price($commande->total_tva, 0, '', 1, -1, -1, $conf->currency).'
'.$langs->trans('AmountTTC').''.price($commande->total_ttc, 0, '', 1, -1, -1, $conf->currency).'
'.$langs->trans('Status').''.$commande->getLibStatut(4).'

'; /** * Lignes de commandes avec quantite livrees et reste a livrer * Les quantites livrees sont stockees dans $commande->expeditions[fk_product] */ print ''; $sql = "SELECT cd.rowid, cd.fk_product, cd.product_type as type, cd.label, cd.description,"; $sql.= " cd.price, cd.tva_tx, cd.subprice,"; $sql.= " cd.qty,"; $sql.= ' cd.date_start,'; $sql.= ' cd.date_end,'; $sql.= ' p.rowid as prodid, p.label as product_label, p.entity, p.ref, p.fk_product_type as product_type, p.description as product_desc'; $sql.= " FROM ".MAIN_DB_PREFIX."commandedet as cd"; $sql.= " LEFT JOIN ".MAIN_DB_PREFIX."product as p ON cd.fk_product = p.rowid"; $sql.= " WHERE cd.fk_commande = ".$commande->id; $sql.= " ORDER BY cd.rang, cd.rowid"; //print $sql; dol_syslog("shipment.php", LOG_DEBUG); $resql = $db->query($sql); if ($resql) { $num = $db->num_rows($resql); $i = 0; print ''; print ''; print ''; print ''; print ''; if (! empty($conf->stock->enabled)) { print ''; } else { print ''; } print "\n"; $var=true; $toBeShipped=array(); $toBeShippedTotal=0; while ($i < $num) { $objp = $db->fetch_object($resql); $var=!$var; // Show product and description $type=isset($objp->type)?$objp->type:$objp->product_type; // Try to enhance type detection using date_start and date_end for free lines where type // was not saved. if (! empty($objp->date_start)) $type=1; if (! empty($objp->date_end)) $type=1; print ""; // Product label if ($objp->fk_product > 0) { // Define output language if (! empty($conf->global->MAIN_MULTILANGS) && ! empty($conf->global->PRODUIT_TEXTS_IN_THIRDPARTY_LANGUAGE)) { $commande->fetch_thirdparty(); $prod = new Product($db); $prod->id = $objp->fk_product; $prod->entity = $objp->entity; $prod->getMultiLangs(); $outputlangs = $langs; $newlang=''; if (empty($newlang) && ! empty($_REQUEST['lang_id'])) $newlang=$_REQUEST['lang_id']; if (empty($newlang)) $newlang=$commande->client->default_lang; if (! empty($newlang)) { $outputlangs = new Translate("",$conf); $outputlangs->setDefaultLang($newlang); } $label = (! empty($prod->multilangs[$outputlangs->defaultlang]["label"])) ? $prod->multilangs[$outputlangs->defaultlang]["label"] : $objp->product_label; } else $label = (! empty($objp->label)?$objp->label:$objp->product_label); print ''; } else { print "\n"; } // Qty ordered print ''; // Qty already shipped $qtyProdCom=$objp->qty; print ''; // Qty remains to ship print ''; if ($objp->fk_product > 0) { $product = new Product($db); $product->fetch($objp->fk_product); $product->load_stock(); } if ($objp->fk_product > 0 && $type == 0 && ! empty($conf->stock->enabled)) { print ''; } else { print ''; } print "\n"; // Show subproducts lines if ($objp->fk_product > 0 && ! empty($conf->global->PRODUIT_SOUSPRODUITS)) { // Set tree of subproducts in product->sousprods $product->get_sousproduits_arbo(); //var_dump($product->sousprods);exit; // Define a new tree with quantiies recalculated $prods_arbo = $product->get_arbo_each_prod($qtyProdCom); //var_dump($prods_arbo); if (count($prods_arbo) > 0) { foreach($prods_arbo as $key => $value) { $img=''; if ($value['stock'] < $value['stock_alert']) { $img=img_warning($langs->trans("StockTooLow")); } print ''; print ''; print ''; print ''; print ''."\n"; } } } $i++; } $db->free($resql); if (! $num) { print '
'.$langs->trans("Description").''.$langs->trans("QtyOrdered").''.$langs->trans("QtyShipped").''.$langs->trans("KeepToShip").''.$langs->trans("RealStock").' 
'; print ''; // ancre pour retourner sur la ligne // Show product and description $product_static->type=$type; $product_static->id=$objp->fk_product; $product_static->ref=$objp->ref; $product_static->entity = $objp->entity; $text=$product_static->getNomUrl(1); $text.= ' - '.$label; $description=($conf->global->PRODUIT_DESC_IN_FORM?'':dol_htmlentitiesbr($objp->description)).'
'; $description.= $product_static->show_photos($conf->product->multidir_output[$product_static->entity],1,1,0,0,0,80); print $form->textwithtooltip($text,$description,3,'','',$i); // Show range print_date_range($db->jdate($objp->date_start),$db->jdate($objp->date_end)); // Add description in form if (! empty($conf->global->PRODUIT_DESC_IN_FORM)) { print ($objp->description && $objp->description!=$objp->product_label)?'
'.dol_htmlentitiesbr($objp->description):''; } print '		"; if ($type==1) $text = img_object($langs->trans('Service'),'service'); else $text = img_object($langs->trans('Product'),'product'); if (! empty($objp->label)) { $text.= ' '.$objp->label.''; print $form->textwithtooltip($text,$objp->description,3,'','',$i); } else { print $text.' '.nl2br($objp->description); } // Show range print_date_range($db->jdate($objp->date_start),$db->jdate($objp->date_end)); print "'.$objp->qty.''; // Nb of sending products for this line of order $qtyAlreadyShipped = (! empty($commande->expeditions[$objp->rowid])?$commande->expeditions[$objp->rowid]:0); print $qtyAlreadyShipped; print ''; if ($type == 0 || ! empty($conf->global->STOCK_SUPPORTS_SERVICES)) { $toBeShipped[$objp->fk_product] = $objp->qty - $qtyAlreadyShipped; $toBeShippedTotal += $toBeShipped[$objp->fk_product]; print $toBeShipped[$objp->fk_product]; } else { print '0 ('.$langs->trans("Service").')'; } print ''; print $product->stock_reel; if ($product->stock_reel < $toBeShipped[$objp->fk_product]) { print ' '.img_warning($langs->trans("StockTooLow")); } print ' 
      -> '.$value['fullpath'].' ('.$value['nb'].') '.$value['nb_total'].'  '.$value['stock'].' '.$img.'
'.$langs->trans("NoArticleOfTypeProduct").'
'; } print "
"; } else { dol_print_error($db); } print ''; /* * Boutons Actions */ if (empty($user->societe_id)) { print '
'; // Bouton expedier sans gestion des stocks if (empty($conf->stock->enabled) && ($commande->statut > Commande::STATUS_DRAFT && $commande->statut < Commande::STATUS_CLOSED)) { if ($user->rights->expedition->creer) { print ''.$langs->trans("NewSending").''; if ($toBeShippedTotal <= 0) { print ' '.img_warning($langs->trans("WarningNoQtyLeftToSend")); } } else { print ''.$langs->trans("NewSending").''; } } print "
"; } // Bouton expedier avec gestion des stocks if (! empty($conf->stock->enabled) && ($commande->statut > Commande::STATUS_DRAFT && $commande->statut < Commande::STATUS_CLOSED)) { if ($user->rights->expedition->creer) { print_titre($langs->trans("NewSending")); print '
'; print ''; //print ''; print ''; print ''; print ''; print ''; $langs->load("stocks"); print ''; if (! empty($conf->stock->enabled)) { $warehousecanbeselectedlater=1; if (! empty($conf->productbatch->enabled)) $warehousecanbeselectedlater=0; print ''.$langs->trans("WarehouseSource").''; print ''; } print ''; print "
'; print $formproduct->selectWarehouses(-1,'entrepot_id','',1); if (count($formproduct->cache_warehouses) <= 0) { print '   '.$langs->trans("WarehouseSourceNotDefined").' '.$langs->trans("AddOne").''; } print ''; print ''; if ($toBeShippedTotal <= 0) { print ' '.img_warning($langs->trans("WarningNoQtyLeftToSend")); } print '
"; print "
\n"; print '
'; $somethingshown=1; } else { print '
'; print ''.$langs->trans("NewSending").''; print '
'; } } show_list_sending_receive('commande',$commande->id); } else { /* Commande non trouvee */ print "Commande inexistante"; } } llxFooter(); $db->close();