12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466146714681469147014711472147314741475147614771478147914801481148214831484148514861487148814891490149114921493149414951496149714981499150015011502150315041505150615071508150915101511151215131514151515161517151815191520152115221523152415251526152715281529153015311532153315341535153615371538153915401541154215431544154515461547154815491550155115521553155415551556155715581559156015611562156315641565156615671568156915701571157215731574157515761577157815791580158115821583158415851586158715881589159015911592159315941595159615971598159916001601160216031604160516061607160816091610161116121613161416151616161716181619162016211622162316241625162616271628162916301631163216331634163516361637163816391640164116421643164416451646164716481649165016511652165316541655165616571658165916601661166216631664166516661667166816691670167116721673167416751676167716781679168016811682168316841685168616871688168916901691169216931694169516961697169816991700170117021703170417051706170717081709171017111712171317141715171617171718171917201721172217231724172517261727172817291730173117321733173417351736173717381739174017411742174317441745174617471748174917501751175217531754175517561757175817591760176117621763176417651766176717681769177017711772177317741775177617771778177917801781178217831784178517861787178817891790179117921793179417951796179717981799180018011802180318041805180618071808180918101811181218131814181518161817181818191820182118221823182418251826182718281829183018311832183318341835183618371838183918401841184218431844184518461847184818491850185118521853185418551856185718581859186018611862186318641865186618671868186918701871187218731874187518761877187818791880188118821883188418851886188718881889189018911892189318941895189618971898189919001901190219031904190519061907190819091910191119121913191419151916191719181919192019211922192319241925192619271928192919301931193219331934193519361937193819391940194119421943194419451946194719481949195019511952195319541955195619571958195919601961196219631964196519661967196819691970197119721973197419751976197719781979198019811982198319841985198619871988198919901991199219931994199519961997199819992000200120022003200420052006200720082009201020112012201320142015201620172018201920202021202220232024202520262027202820292030203120322033203420352036203720382039204020412042204320442045204620472048204920502051205220532054205520562057205820592060206120622063206420652066206720682069207020712072207320742075207620772078207920802081208220832084208520862087208820892090209120922093209420952096209720982099210021012102210321042105210621072108210921102111211221132114211521162117211821192120212121222123212421252126212721282129213021312132213321342135213621372138213921402141214221432144214521462147214821492150215121522153215421552156215721582159216021612162216321642165216621672168216921702171217221732174217521762177217821792180218121822183218421852186218721882189219021912192219321942195219621972198219922002201220222032204220522062207220822092210221122122213221422152216221722182219222022212222222322242225222622272228222922302231223222332234223522362237223822392240224122422243224422452246224722482249225022512252225322542255225622572258225922602261226222632264226522662267226822692270227122722273227422752276227722782279228022812282228322842285228622872288228922902291229222932294229522962297229822992300230123022303230423052306230723082309231023112312231323142315231623172318231923202321232223232324232523262327232823292330233123322333233423352336233723382339234023412342234323442345234623472348234923502351235223532354235523562357235823592360236123622363236423652366236723682369237023712372237323742375237623772378237923802381238223832384238523862387238823892390239123922393239423952396239723982399240024012402240324042405240624072408240924102411241224132414241524162417241824192420242124222423242424252426242724282429243024312432243324342435243624372438243924402441244224432444244524462447244824492450245124522453245424552456245724582459246024612462246324642465246624672468246924702471247224732474247524762477247824792480248124822483248424852486248724882489249024912492249324942495249624972498249925002501250225032504250525062507250825092510251125122513251425152516251725182519252025212522252325242525252625272528252925302531253225332534253525362537253825392540254125422543254425452546254725482549255025512552255325542555255625572558255925602561256225632564256525662567256825692570257125722573257425752576257725782579258025812582258325842585258625872588258925902591259225932594259525962597259825992600260126022603260426052606260726082609261026112612261326142615261626172618261926202621262226232624262526262627262826292630263126322633263426352636263726382639264026412642264326442645264626472648264926502651265226532654265526562657265826592660266126622663266426652666266726682669267026712672267326742675267626772678267926802681268226832684268526862687268826892690269126922693269426952696269726982699270027012702270327042705270627072708270927102711271227132714271527162717271827192720272127222723272427252726272727282729273027312732273327342735273627372738273927402741274227432744274527462747274827492750275127522753275427552756275727582759276027612762276327642765276627672768276927702771277227732774277527762777277827792780278127822783278427852786278727882789279027912792279327942795279627972798279928002801280228032804280528062807280828092810281128122813281428152816281728182819282028212822282328242825282628272828282928302831283228332834283528362837283828392840284128422843284428452846284728482849285028512852285328542855285628572858285928602861286228632864286528662867286828692870287128722873287428752876287728782879288028812882288328842885288628872888288928902891289228932894289528962897289828992900290129022903290429052906290729082909291029112912291329142915291629172918291929202921292229232924292529262927292829292930293129322933293429352936293729382939294029412942294329442945294629472948294929502951295229532954295529562957295829592960296129622963296429652966296729682969297029712972297329742975297629772978297929802981298229832984298529862987298829892990299129922993299429952996299729982999300030013002300330043005300630073008300930103011301230133014301530163017301830193020302130223023302430253026302730283029303030313032303330343035303630373038303930403041304230433044304530463047304830493050305130523053305430553056305730583059306030613062306330643065306630673068306930703071307230733074307530763077307830793080308130823083308430853086308730883089309030913092309330943095309630973098309931003101310231033104310531063107310831093110311131123113311431153116311731183119312031213122312331243125312631273128312931303131313231333134313531363137313831393140314131423143314431453146314731483149315031513152315331543155315631573158315931603161316231633164316531663167316831693170317131723173317431753176317731783179318031813182318331843185318631873188318931903191319231933194319531963197319831993200320132023203320432053206320732083209321032113212321332143215321632173218321932203221322232233224322532263227322832293230323132323233323432353236323732383239324032413242324332443245324632473248324932503251325232533254325532563257325832593260326132623263326432653266326732683269327032713272327332743275327632773278327932803281328232833284328532863287328832893290329132923293329432953296329732983299330033013302330333043305330633073308330933103311331233133314331533163317331833193320332133223323332433253326332733283329333033313332333333343335333633373338333933403341334233433344334533463347334833493350335133523353335433553356335733583359336033613362336333643365336633673368336933703371337233733374337533763377337833793380338133823383338433853386338733883389339033913392339333943395339633973398339934003401340234033404340534063407340834093410341134123413341434153416341734183419342034213422342334243425342634273428342934303431343234333434343534363437343834393440344134423443344434453446344734483449345034513452345334543455345634573458345934603461346234633464346534663467346834693470347134723473347434753476347734783479348034813482348334843485348634873488348934903491349234933494349534963497349834993500350135023503350435053506350735083509351035113512351335143515351635173518351935203521352235233524352535263527352835293530353135323533353435353536353735383539354035413542 |
- <?php
- /* Copyright (C) 2002-2004 Rodolphe Quiedeville <rodolphe@quiedeville.org>
- * Copyright (C) 2004 Eric Seigne <eric.seigne@ryxeo.com>
- * Copyright (C) 2004-2011 Laurent Destailleur <eldy@users.sourceforge.net>
- * Copyright (C) 2005 Marc Barilley <marc@ocebo.com>
- * Copyright (C) 2005-2013 Regis Houssin <regis.houssin@capnetworks.com>
- * Copyright (C) 2006 Andre Cianfarani <acianfa@free.fr>
- * Copyright (C) 2008 Raphael Bertrand <raphael.bertrand@resultic.fr>
- * Copyright (C) 2010-2014 Juanjo Menent <jmenent@2byte.es>
- * Copyright (C) 2010-2011 Philippe Grand <philippe.grand@atoo-net.com>
- * Copyright (C) 2012-2014 Christophe Battarel <christophe.battarel@altairis.fr>
- * Copyright (C) 2012 Cedric Salvador <csalvador@gpcsolutions.fr>
- * Copyright (C) 2013 Florian Henry <florian.henry@open-concept.pro>
- * Copyright (C) 2014-2015 Marcos García <marcosgdf@gmail.com>
- *
- * 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 <http://www.gnu.org/licenses/>.
- */
- /**
- * \file htdocs/comm/propal/class/propal.class.php
- * \brief File of class to manage proposals
- */
- require_once DOL_DOCUMENT_ROOT .'/core/class/commonobject.class.php';
- require_once DOL_DOCUMENT_ROOT ."/core/class/commonobjectline.class.php";
- require_once DOL_DOCUMENT_ROOT .'/product/class/product.class.php';
- require_once DOL_DOCUMENT_ROOT .'/contact/class/contact.class.php';
- require_once DOL_DOCUMENT_ROOT .'/margin/lib/margins.lib.php';
- require_once DOL_DOCUMENT_ROOT .'/multicurrency/class/multicurrency.class.php';
- /**
- * Class to manage proposals
- */
- class Propal extends CommonObject
- {
- public $element='propal';
- public $table_element='propal';
- public $table_element_line='propaldet';
- public $fk_element='fk_propal';
- protected $ismultientitymanaged = 1; // 0=No test on entity, 1=Test with field entity, 2=Test with link by societe
- /**
- * {@inheritdoc}
- */
- protected $table_ref_field = 'ref';
- /**
- * ID of the client
- * @var int
- */
- var $socid;
- var $contactid;
- var $author;
- var $ref_client;
- /**
- * Status of the quote
- * @var int
- * @see Propal::STATUS_DRAFT, Propal::STATUS_VALIDATED, Propal::STATUS_SIGNED, Propal::STATUS_NOTSIGNED, Propal::STATUS_BILLED
- */
- var $statut;
- /**
- * @deprecated
- * @see date_creation
- */
- var $datec;
- /**
- * Creation date
- * @var int
- */
- public $date_creation;
- /**
- * @deprecated
- * @see date_validation
- */
- var $datev;
- /**
- * Validation date
- * @var int
- */
- public $date_validation;
- /**
- * Date of the quote
- * @var
- */
- var $date;
- /**
- * @deprecated
- * @see date
- */
- var $datep;
- var $date_livraison;
- var $fin_validite;
- var $user_author_id;
- var $user_valid_id;
- var $user_close_id;
- /**
- * @deprecated
- * @see total_ht
- */
- var $price;
- /**
- * @deprecated
- * @see total_tva
- */
- var $tva;
- /**
- * @deprecated
- * @see total_ttc
- */
- var $total;
- var $cond_reglement_code;
- var $mode_reglement_code;
- var $remise;
- var $remise_percent;
- var $remise_absolue;
- var $fk_address;
- var $address_type;
- var $address;
- var $availability_id;
- var $availability_code;
- var $demand_reason_id;
- var $demand_reason_code;
- var $products=array();
- var $extraparams=array();
- /**
- * @var PropaleLigne[]
- */
- var $lines = array();
- var $line;
- var $labelstatut=array();
- var $labelstatut_short=array();
- var $specimen;
- // Multicurrency
- var $fk_multicurrency;
- var $multicurrency_code;
- var $multicurrency_tx;
- var $multicurrency_total_ht;
- var $multicurrency_total_tva;
- var $multicurrency_total_ttc;
-
- /**
- * Draft status
- */
- const STATUS_DRAFT = 0;
- /**
- * Validated status
- */
- const STATUS_VALIDATED = 1;
- /**
- * Signed quote
- */
- const STATUS_SIGNED = 2;
- /**
- * Not signed quote
- */
- const STATUS_NOTSIGNED = 3;
- /**
- * Billed or processed quote
- */
- const STATUS_BILLED = 4;
- /**
- * Constructor
- *
- * @param DoliDB $db Database handler
- * @param int $socid Id third party
- * @param int $propalid Id proposal
- */
- function __construct($db, $socid="", $propalid=0)
- {
- global $conf,$langs;
- $this->db = $db;
- $this->socid = $socid;
- $this->id = $propalid;
- $this->products = array();
- $this->remise = 0;
- $this->remise_percent = 0;
- $this->remise_absolue = 0;
- $this->duree_validite=$conf->global->PROPALE_VALIDITY_DURATION;
- $langs->load("propal");
- $this->labelstatut[0]=(! empty($conf->global->PROPAL_STATUS_DRAFT_LABEL) ? $conf->global->PROPAL_STATUS_DRAFT_LABEL : $langs->trans("PropalStatusDraft"));
- $this->labelstatut[1]=(! empty($conf->global->PROPAL_STATUS_VALIDATED_LABEL) ? $conf->global->PROPAL_STATUS_VALIDATED_LABEL : $langs->trans("PropalStatusValidated"));
- $this->labelstatut[2]=(! empty($conf->global->PROPAL_STATUS_SIGNED_LABEL) ? $conf->global->PROPAL_STATUS_SIGNED_LABEL : $langs->trans("PropalStatusSigned"));
- $this->labelstatut[3]=(! empty($conf->global->PROPAL_STATUS_NOTSIGNED_LABEL) ? $conf->global->PROPAL_STATUS_NOTSIGNED_LABEL : $langs->trans("PropalStatusNotSigned"));
- $this->labelstatut[4]=(! empty($conf->global->PROPAL_STATUS_BILLED_LABEL) ? $conf->global->PROPAL_STATUS_BILLED_LABEL : $langs->trans("PropalStatusBilled"));
- $this->labelstatut_short[0]=(! empty($conf->global->PROPAL_STATUS_DRAFTSHORT_LABEL) ? $conf->global->PROPAL_STATUS_DRAFTSHORT_LABEL : $langs->trans("PropalStatusDraftShort"));
- $this->labelstatut_short[1]=(! empty($conf->global->PROPAL_STATUS_VALIDATEDSHORT_LABEL) ? $conf->global->PROPAL_STATUS_VALIDATEDSHORT_LABEL : $langs->trans("Opened"));
- $this->labelstatut_short[2]=(! empty($conf->global->PROPAL_STATUS_SIGNEDSHORT_LABEL) ? $conf->global->PROPAL_STATUS_SIGNEDSHORT_LABEL : $langs->trans("PropalStatusSignedShort"));
- $this->labelstatut_short[3]=(! empty($conf->global->PROPAL_STATUS_NOTSIGNEDSHORT_LABEL) ? $conf->global->PROPAL_STATUS_NOTSIGNEDSHORT_LABEL : $langs->trans("PropalStatusNotSignedShort"));
- $this->labelstatut_short[4]=(! empty($conf->global->PROPAL_STATUS_BILLEDSHORT_LABEL) ? $conf->global->PROPAL_STATUS_BILLEDSHORT_LABEL : $langs->trans("PropalStatusBilledShort"));
- }
- /**
- * Add line into array products
- * $this->client doit etre charge
- *
- * @param int $idproduct Product Id to add
- * @param int $qty Quantity
- * @param int $remise_percent Discount effected on Product
- * @return int <0 if KO, >0 if OK
- *
- * TODO Remplacer les appels a cette fonction par generation objet Ligne
- * insere dans tableau $this->products
- */
- function add_product($idproduct, $qty, $remise_percent=0)
- {
- global $conf, $mysoc;
- if (! $qty) $qty = 1;
- dol_syslog(get_class($this)."::add_product $idproduct, $qty, $remise_percent");
- if ($idproduct > 0)
- {
- $prod=new Product($this->db);
- $prod->fetch($idproduct);
- $productdesc = $prod->description;
- $tva_tx = get_default_tva($mysoc,$this->thirdparty,$prod->id);
- $tva_npr = get_default_npr($mysoc,$this->thirdparty,$prod->id);
- if (empty($tva_tx)) $tva_npr=0;
- $localtax1_tx = get_localtax($tva_tx,1,$mysoc,$this->thirdparty,$tva_npr);
- $localtax2_tx = get_localtax($tva_tx,2,$mysoc,$this->thirdparty,$tva_npr);
- // multiprix
- if($conf->global->PRODUIT_MULTIPRICES && $this->thirdparty->price_level)
- {
- $price = $prod->multiprices[$this->thirdparty->price_level];
- }
- else
- {
- $price = $prod->price;
- }
- $line = new PropaleLigne($this->db);
- $line->fk_product=$idproduct;
- $line->desc=$productdesc;
- $line->qty=$qty;
- $line->subprice=$price;
- $line->remise_percent=$remise_percent;
- $line->tva_tx=$tva_tx;
- $line->fk_unit=$prod->fk_unit;
- if ($tva_npr) $line->info_bits = 1;
-
- $this->lines[]=$line;
- }
- }
- /**
- * Adding line of fixed discount in the proposal in DB
- *
- * @param int $idremise Id of fixed discount
- * @return int >0 if OK, <0 if KO
- */
- function insert_discount($idremise)
- {
- global $langs;
- include_once DOL_DOCUMENT_ROOT.'/core/lib/price.lib.php';
- include_once DOL_DOCUMENT_ROOT.'/core/class/discount.class.php';
- $this->db->begin();
- $remise=new DiscountAbsolute($this->db);
- $result=$remise->fetch($idremise);
- if ($result > 0)
- {
- if ($remise->fk_facture) // Protection against multiple submission
- {
- $this->error=$langs->trans("ErrorDiscountAlreadyUsed");
- $this->db->rollback();
- return -5;
- }
- $line=new PropaleLigne($this->db);
- $this->line->context = $this->context;
- $line->fk_propal=$this->id;
- $line->fk_remise_except=$remise->id;
- $line->desc=$remise->description; // Description ligne
- $line->tva_tx=$remise->tva_tx;
- $line->subprice=-$remise->amount_ht;
- $line->fk_product=0; // Id produit predefini
- $line->qty=1;
- $line->remise=0;
- $line->remise_percent=0;
- $line->rang=-1;
- $line->info_bits=2;
- // TODO deprecated
- $line->price=-$remise->amount_ht;
- $line->total_ht = -$remise->amount_ht;
- $line->total_tva = -$remise->amount_tva;
- $line->total_ttc = -$remise->amount_ttc;
- $result=$line->insert();
- if ($result > 0)
- {
- $result=$this->update_price(1);
- if ($result > 0)
- {
- $this->db->commit();
- return 1;
- }
- else
- {
- $this->db->rollback();
- return -1;
- }
- }
- else
- {
- $this->error=$line->error;
- $this->db->rollback();
- return -2;
- }
- }
- else
- {
- $this->db->rollback();
- return -2;
- }
- }
- /**
- * Add a proposal line into database (linked to product/service or not)
- * Les parametres sont deja cense etre juste et avec valeurs finales a l'appel
- * de cette methode. Aussi, pour le taux tva, il doit deja avoir ete defini
- * par l'appelant par la methode get_default_tva(societe_vendeuse,societe_acheteuse,'',produit)
- * et le desc doit deja avoir la bonne valeur (a l'appelant de gerer le multilangue)
- *
- * @param string $desc Description de la ligne
- * @param float $pu_ht Prix unitaire
- * @param float $qty Quantite
- * @param float $txtva Taux de tva
- * @param float $txlocaltax1 Local tax 1 rate
- * @param float $txlocaltax2 Local tax 2 rate
- * @param int $fk_product Id du produit/service predefini
- * @param float $remise_percent Pourcentage de remise de la ligne
- * @param string $price_base_type HT or TTC
- * @param float $pu_ttc Prix unitaire TTC
- * @param int $info_bits Bits de type de lignes
- * @param int $type Type of line (0=product, 1=service). Not used if fk_product is defined, the type of product is used.
- * @param int $rang Position of line
- * @param int $special_code Special code (also used by externals modules!)
- * @param int $fk_parent_line Id of parent line
- * @param int $fk_fournprice Id supplier price
- * @param int $pa_ht Buying price without tax
- * @param string $label ???
- * @param int $date_start Start date of the line
- * @param int $date_end End date of the line
- * @param array $array_options extrafields array
- * @param string $fk_unit Code of the unit to use. Null to use the default one
- * @param string $origin 'order', ...
- * @param int $origin_id Id of origin object
- * @return int >0 if OK, <0 if KO
- *
- * @see add_product
- */
- function addline($desc, $pu_ht, $qty, $txtva, $txlocaltax1=0.0, $txlocaltax2=0.0, $fk_product=0, $remise_percent=0.0, $price_base_type='HT', $pu_ttc=0.0, $info_bits=0, $type=0, $rang=-1, $special_code=0, $fk_parent_line=0, $fk_fournprice=0, $pa_ht=0, $label='',$date_start='', $date_end='',$array_options=0, $fk_unit=null, $origin='', $origin_id=0)
- {
- global $mysoc, $conf, $langs;
- dol_syslog(get_class($this)."::addline propalid=$this->id, desc=$desc, pu_ht=$pu_ht, qty=$qty, txtva=$txtva, fk_product=$fk_product, remise_except=$remise_percent, price_base_type=$price_base_type, pu_ttc=$pu_ttc, info_bits=$info_bits, type=$type");
- include_once DOL_DOCUMENT_ROOT.'/core/lib/price.lib.php';
- // Clean parameters
- if (empty($remise_percent)) $remise_percent=0;
- if (empty($qty)) $qty=0;
- if (empty($info_bits)) $info_bits=0;
- if (empty($rang)) $rang=0;
- if (empty($fk_parent_line) || $fk_parent_line < 0) $fk_parent_line=0;
- $remise_percent=price2num($remise_percent);
- $qty=price2num($qty);
- $pu_ht=price2num($pu_ht);
- $pu_ttc=price2num($pu_ttc);
- $txtva=price2num($txtva);
- $txlocaltax1=price2num($txlocaltax1);
- $txlocaltax2=price2num($txlocaltax2);
- $pa_ht=price2num($pa_ht);
- if ($price_base_type=='HT')
- {
- $pu=$pu_ht;
- }
- else
- {
- $pu=$pu_ttc;
- }
- // Check parameters
- if ($type < 0) return -1;
- if ($this->statut == self::STATUS_DRAFT)
- {
- $this->db->begin();
- $product_type=$type;
- if (!empty($fk_product))
- {
- $product=new Product($this->db);
- $result=$product->fetch($fk_product);
- $product_type=$product->type;
- if (! empty($conf->global->STOCK_MUST_BE_ENOUGH_FOR_PROPOSAL) && $product_type == 0 && $product->stock_reel < $qty) {
- $langs->load("errors");
- $this->error=$langs->trans('ErrorStockIsNotEnoughToAddProductOnProposal', $product->ref);
- $this->db->rollback();
- return -3;
- }
- }
-
- // Calcul du total TTC et de la TVA pour la ligne a partir de
- // qty, pu, remise_percent et txtva
- // TRES IMPORTANT: C'est au moment de l'insertion ligne qu'on doit stocker
- // la part ht, tva et ttc, et ce au niveau de la ligne qui a son propre taux tva.
- $localtaxes_type=getLocalTaxesFromRate($txtva,0,$this->thirdparty,$mysoc);
- $txtva = preg_replace('/\s*\(.*\)/','',$txtva); // Remove code into vatrate.
-
- $tabprice=calcul_price_total($qty, $pu, $remise_percent, $txtva, $txlocaltax1, $txlocaltax2, 0, $price_base_type, $info_bits, $product_type, $mysoc, $localtaxes_type, 100, $this->multicurrency_tx);
- $total_ht = $tabprice[0];
- $total_tva = $tabprice[1];
- $total_ttc = $tabprice[2];
- $total_localtax1 = $tabprice[9];
- $total_localtax2 = $tabprice[10];
- // MultiCurrency
- $multicurrency_total_ht = $tabprice[16];
- $multicurrency_total_tva = $tabprice[17];
- $multicurrency_total_ttc = $tabprice[18];
- // Rang to use
- $rangtouse = $rang;
- if ($rangtouse == -1)
- {
- $rangmax = $this->line_max($fk_parent_line);
- $rangtouse = $rangmax + 1;
- }
- // TODO A virer
- // Anciens indicateurs: $price, $remise (a ne plus utiliser)
- $price = $pu;
- $remise = 0;
- if ($remise_percent > 0)
- {
- $remise = round(($pu * $remise_percent / 100), 2);
- $price = $pu - $remise;
- }
- // Insert line
- $this->line=new PropaleLigne($this->db);
- $this->line->context = $this->context;
- $this->line->fk_propal=$this->id;
- $this->line->label=$label;
- $this->line->desc=$desc;
- $this->line->qty=$qty;
- $this->line->tva_tx=$txtva;
- $this->line->localtax1_tx=$txlocaltax1;
- $this->line->localtax2_tx=$txlocaltax2;
- $this->line->localtax1_type = $localtaxes_type[0];
- $this->line->localtax2_type = $localtaxes_type[2];
- $this->line->fk_product=$fk_product;
- $this->line->remise_percent=$remise_percent;
- $this->line->subprice=$pu_ht;
- $this->line->rang=$rangtouse;
- $this->line->info_bits=$info_bits;
- $this->line->total_ht=$total_ht;
- $this->line->total_tva=$total_tva;
- $this->line->total_localtax1=$total_localtax1;
- $this->line->total_localtax2=$total_localtax2;
- $this->line->total_ttc=$total_ttc;
- $this->line->product_type=$type;
- $this->line->special_code=$special_code;
- $this->line->fk_parent_line=$fk_parent_line;
- $this->line->fk_unit=$fk_unit;
- $this->line->date_start=$date_start;
- $this->line->date_end=$date_end;
- $this->line->fk_fournprice = $fk_fournprice;
- $this->line->pa_ht = $pa_ht;
- $this->line->origin_id = $origin_id;
- $this->line->origin = $origin;
- // Multicurrency
- $this->line->fk_multicurrency = $this->fk_multicurrency;
- $this->line->multicurrency_code = $this->multicurrency_code;
- $this->line->multicurrency_subprice = price2num($pu_ht * $this->multicurrency_tx);
- $this->line->multicurrency_total_ht = $multicurrency_total_ht;
- $this->line->multicurrency_total_tva = $multicurrency_total_tva;
- $this->line->multicurrency_total_ttc = $multicurrency_total_ttc;
-
- // Mise en option de la ligne
- if (empty($qty) && empty($special_code)) $this->line->special_code=3;
- // TODO deprecated
- $this->line->price=$price;
- $this->line->remise=$remise;
- if (is_array($array_options) && count($array_options)>0) {
- $this->line->array_options=$array_options;
- }
- $result=$this->line->insert();
- if ($result > 0)
- {
- // Reorder if child line
- if (! empty($fk_parent_line)) $this->line_order(true,'DESC');
- // Mise a jour informations denormalisees au niveau de la propale meme
- $result=$this->update_price(1,'auto',0,$mysoc); // This method is designed to add line from user input so total calculation must be done using 'auto' mode.
- if ($result > 0)
- {
- $this->db->commit();
- return $this->line->rowid;
- }
- else
- {
- $this->error=$this->db->error();
- $this->db->rollback();
- return -1;
- }
- }
- else
- {
- $this->error=$this->line->error;
- $this->db->rollback();
- return -2;
- }
- }
- }
- /**
- * Update a proposal line
- *
- * @param int $rowid Id de la ligne
- * @param float $pu Prix unitaire (HT ou TTC selon price_base_type)
- * @param float $qty Quantity
- * @param float $remise_percent Remise effectuee sur le produit
- * @param float $txtva Taux de TVA
- * @param float $txlocaltax1 Local tax 1 rate
- * @param float $txlocaltax2 Local tax 2 rate
- * @param string $desc Description
- * @param string $price_base_type HT ou TTC
- * @param int $info_bits Miscellaneous informations
- * @param int $special_code Special code (also used by externals modules!)
- * @param int $fk_parent_line Id of parent line (0 in most cases, used by modules adding sublevels into lines).
- * @param int $skip_update_total Keep fields total_xxx to 0 (used for special lines by some modules)
- * @param int $fk_fournprice Id of origin supplier price
- * @param int $pa_ht Price (without tax) of product when it was bought
- * @param string $label ???
- * @param int $type 0/1=Product/service
- * @param int $date_start Start date of the line
- * @param int $date_end End date of the line
- * @param array $array_options extrafields array
- * @param string $fk_unit Code of the unit to use. Null to use the default one
- * @return int 0 if OK, <0 if KO
- */
- function updateline($rowid, $pu, $qty, $remise_percent, $txtva, $txlocaltax1=0.0, $txlocaltax2=0.0, $desc='', $price_base_type='HT', $info_bits=0, $special_code=0, $fk_parent_line=0, $skip_update_total=0, $fk_fournprice=0, $pa_ht=0, $label='', $type=0, $date_start='', $date_end='', $array_options=0, $fk_unit=null)
- {
- global $mysoc;
- dol_syslog(get_class($this)."::updateLine rowid=$rowid, pu=$pu, qty=$qty, remise_percent=$remise_percent,
- txtva=$txtva, desc=$desc, price_base_type=$price_base_type, info_bits=$info_bits, special_code=$special_code, fk_parent_line=$fk_parent_line, pa_ht=$pa_ht, type=$type, date_start=$date_start, date_end=$date_end");
- include_once DOL_DOCUMENT_ROOT.'/core/lib/price.lib.php';
- // Clean parameters
- $remise_percent=price2num($remise_percent);
- $qty=price2num($qty);
- $pu = price2num($pu);
- $txtva = price2num($txtva);
- $txlocaltax1=price2num($txlocaltax1);
- $txlocaltax2=price2num($txlocaltax2);
- $pa_ht=price2num($pa_ht);
- if (empty($qty) && empty($special_code)) $special_code=3; // Set option tag
- if (! empty($qty) && $special_code == 3) $special_code=0; // Remove option tag
- if ($this->statut == self::STATUS_DRAFT)
- {
- $this->db->begin();
- // Calcul du total TTC et de la TVA pour la ligne a partir de
- // qty, pu, remise_percent et txtva
- // TRES IMPORTANT: C'est au moment de l'insertion ligne qu'on doit stocker
- // la part ht, tva et ttc, et ce au niveau de la ligne qui a son propre taux tva.
- $localtaxes_type=getLocalTaxesFromRate($txtva,0,$this->thirdparty,$mysoc);
- $txtva = preg_replace('/\s*\(.*\)/','',$txtva); // Remove code into vatrate.
-
- $tabprice=calcul_price_total($qty, $pu, $remise_percent, $txtva, $txlocaltax1, $txlocaltax2, 0, $price_base_type, $info_bits, $type, $mysoc, $localtaxes_type, 100, $this->multicurrency_tx);
- $total_ht = $tabprice[0];
- $total_tva = $tabprice[1];
- $total_ttc = $tabprice[2];
- $total_localtax1 = $tabprice[9];
- $total_localtax2 = $tabprice[10];
- // MultiCurrency
- $multicurrency_total_ht = $tabprice[16];
- $multicurrency_total_tva = $tabprice[17];
- $multicurrency_total_ttc = $tabprice[18];
-
- // Anciens indicateurs: $price, $remise (a ne plus utiliser)
- $price = $pu;
- if ($remise_percent > 0)
- {
- $remise = round(($pu * $remise_percent / 100), 2);
- $price = $pu - $remise;
- }
- //Fetch current line from the database and then clone the object and set it in $oldline property
- $line = new PropaleLigne($this->db);
- $line->fetch($rowid);
- $staticline = clone $line;
- $line->oldline = $staticline;
- $this->line = $line;
- $this->line->context = $this->context;
- // Reorder if fk_parent_line change
- if (! empty($fk_parent_line) && ! empty($staticline->fk_parent_line) && $fk_parent_line != $staticline->fk_parent_line)
- {
- $rangmax = $this->line_max($fk_parent_line);
- $this->line->rang = $rangmax + 1;
- }
- $this->line->rowid = $rowid;
- $this->line->label = $label;
- $this->line->desc = $desc;
- $this->line->qty = $qty;
- $this->line->product_type = $type;
- $this->line->tva_tx = $txtva;
- $this->line->localtax1_tx = $txlocaltax1;
- $this->line->localtax2_tx = $txlocaltax2;
- $this->line->localtax1_type = $localtaxes_type[0];
- $this->line->localtax2_type = $localtaxes_type[2];
- $this->line->remise_percent = $remise_percent;
- $this->line->subprice = $pu;
- $this->line->info_bits = $info_bits;
- $this->line->total_ht = $total_ht;
- $this->line->total_tva = $total_tva;
- $this->line->total_localtax1 = $total_localtax1;
- $this->line->total_localtax2 = $total_localtax2;
- $this->line->total_ttc = $total_ttc;
- $this->line->special_code = $special_code;
- $this->line->fk_parent_line = $fk_parent_line;
- $this->line->skip_update_total = $skip_update_total;
- $this->line->fk_unit = $fk_unit;
- $this->line->fk_fournprice = $fk_fournprice;
- $this->line->pa_ht = $pa_ht;
- $this->line->date_start=$date_start;
- $this->line->date_end=$date_end;
- // TODO deprecated
- $this->line->price=$price;
- $this->line->remise=$remise;
- if (is_array($array_options) && count($array_options)>0) {
- $this->line->array_options=$array_options;
- }
- // Multicurrency
- $this->line->multicurrency_subprice = price2num($pu * $this->multicurrency_tx);
- $this->line->multicurrency_total_ht = $multicurrency_total_ht;
- $this->line->multicurrency_total_tva = $multicurrency_total_tva;
- $this->line->multicurrency_total_ttc = $multicurrency_total_ttc;
- $result=$this->line->update();
- if ($result > 0)
- {
- // Reorder if child line
- if (! empty($fk_parent_line)) $this->line_order(true,'DESC');
- $this->update_price(1);
- $this->fk_propal = $this->id;
- $this->rowid = $rowid;
- $this->db->commit();
- return $result;
- }
- else
- {
- $this->error=$this->line->error;
- $this->db->rollback();
- return -1;
- }
- }
- else
- {
- dol_syslog(get_class($this)."::updateline Erreur -2 Propal en mode incompatible pour cette action");
- return -2;
- }
- }
- /**
- * Delete detail line
- *
- * @param int $lineid Id of line to delete
- * @return int >0 if OK, <0 if KO
- */
- function deleteline($lineid)
- {
- if ($this->statut == self::STATUS_DRAFT)
- {
- $line=new PropaleLigne($this->db);
- // For triggers
- $line->fetch($lineid);
- if ($line->delete() > 0)
- {
- $this->update_price(1);
- return 1;
- }
- else
- {
- return -1;
- }
- }
- else
- {
- return -2;
- }
- }
- /**
- * Create commercial proposal into database
- * this->ref can be set or empty. If empty, we will use "(PROVid)"
- *
- * @param User $user User that create
- * @param int $notrigger 1=Does not execute triggers, 0= execuete triggers
- * @return int <0 if KO, >=0 if OK
- */
- function create($user, $notrigger=0)
- {
- global $conf,$hookmanager;
- $error=0;
- $now=dol_now();
- // Clean parameters
- if (empty($this->date)) $this->date=$this->datep;
- $this->fin_validite = $this->date + ($this->duree_validite * 24 * 3600);
- if (empty($this->availability_id)) $this->availability_id=0;
- if (empty($this->demand_reason_id)) $this->demand_reason_id=0;
- // Multicurrency
- if (!empty($this->multicurrency_code)) list($this->fk_multicurrency,$this->multicurrency_tx) = MultiCurrency::getIdAndTxFromCode($this->db, $this->multicurrency_code);
- if (empty($this->fk_multicurrency))
- {
- $this->multicurrency_code = $conf->currency;
- $this->fk_multicurrency = 0;
- $this->multicurrency_tx = 1;
- }
-
- dol_syslog(get_class($this)."::create");
- // Check parameters
- $result=$this->fetch_thirdparty();
- if ($result < 0)
- {
- $this->error="Failed to fetch company";
- dol_syslog(get_class($this)."::create ".$this->error, LOG_ERR);
- return -3;
- }
- // Check parameters
- if (! empty($this->ref)) // We check that ref is not already used
- {
- $result=self::isExistingObject($this->element, 0, $this->ref); // Check ref is not yet used
- if ($result > 0)
- {
- $this->error='ErrorRefAlreadyExists';
- dol_syslog(get_class($this)."::create ".$this->error,LOG_WARNING);
- $this->db->rollback();
- return -1;
- }
- }
- if (empty($this->date))
- {
- $this->error="Date of proposal is required";
- dol_syslog(get_class($this)."::create ".$this->error, LOG_ERR);
- return -4;
- }
- $this->db->begin();
- // Insert into database
- $sql = "INSERT INTO ".MAIN_DB_PREFIX."propal (";
- $sql.= "fk_soc";
- $sql.= ", price";
- $sql.= ", remise";
- $sql.= ", remise_percent";
- $sql.= ", remise_absolue";
- $sql.= ", tva";
- $sql.= ", total";
- $sql.= ", datep";
- $sql.= ", datec";
- $sql.= ", ref";
- $sql.= ", fk_user_author";
- $sql.= ", note_private";
- $sql.= ", note_public";
- $sql.= ", model_pdf";
- $sql.= ", fin_validite";
- $sql.= ", fk_cond_reglement";
- $sql.= ", fk_mode_reglement";
- $sql.= ", fk_account";
- $sql.= ", ref_client";
- $sql.= ", date_livraison";
- $sql.= ", fk_shipping_method";
- $sql.= ", fk_availability";
- $sql.= ", fk_input_reason";
- $sql.= ", fk_projet";
- $sql.= ", fk_incoterms";
- $sql.= ", location_incoterms";
- $sql.= ", entity";
- $sql.= ", fk_multicurrency";
- $sql.= ", multicurrency_code";
- $sql.= ", multicurrency_tx";
- $sql.= ") ";
- $sql.= " VALUES (";
- $sql.= $this->socid;
- $sql.= ", 0";
- $sql.= ", ".$this->remise;
- $sql.= ", ".($this->remise_percent?$this->db->escape($this->remise_percent):'null');
- $sql.= ", ".($this->remise_absolue?$this->db->escape($this->remise_absolue):'null');
- $sql.= ", 0";
- $sql.= ", 0";
- $sql.= ", '".$this->db->idate($this->date)."'";
- $sql.= ", '".$this->db->idate($now)."'";
- $sql.= ", '(PROV)'";
- $sql.= ", ".($user->id > 0 ? "'".$user->id."'":"null");
- $sql.= ", '".$this->db->escape($this->note_private)."'";
- $sql.= ", '".$this->db->escape($this->note_public)."'";
- $sql.= ", '".$this->db->escape($this->modelpdf)."'";
- $sql.= ", ".($this->fin_validite!=''?"'".$this->db->idate($this->fin_validite)."'":"null");
- $sql.= ", ".$this->cond_reglement_id;
- $sql.= ", ".$this->mode_reglement_id;
- $sql.= ", ".($this->fk_account>0?$this->fk_account:'NULL');
- $sql.= ", '".$this->db->escape($this->ref_client)."'";
- $sql.= ", ".($this->date_livraison!=''?"'".$this->db->idate($this->date_livraison)."'":"null");
- $sql.= ", ".($this->shipping_method_id>0?$this->shipping_method_id:'NULL');
- $sql.= ", ".$this->availability_id;
- $sql.= ", ".$this->demand_reason_id;
- $sql.= ", ".($this->fk_project?$this->fk_project:"null");
- $sql.= ", ".(int) $this->fk_incoterms;
- $sql.= ", '".$this->db->escape($this->location_incoterms)."'";
- $sql.= ", ".$conf->entity;
- $sql.= ", ".(int) $this->fk_multicurrency;
- $sql.= ", '".$this->db->escape($this->multicurrency_code)."'";
- $sql.= ", ".(double) $this->multicurrency_tx;
- $sql.= ")";
- dol_syslog(get_class($this)."::create", LOG_DEBUG);
- $resql=$this->db->query($sql);
- if ($resql)
- {
- $this->id = $this->db->last_insert_id(MAIN_DB_PREFIX."propal");
- if ($this->id)
- {
- $this->ref='(PROV'.$this->id.')';
- $sql = 'UPDATE '.MAIN_DB_PREFIX."propal SET ref='".$this->ref."' WHERE rowid=".$this->id;
- dol_syslog(get_class($this)."::create", LOG_DEBUG);
- $resql=$this->db->query($sql);
- if (! $resql) $error++;
- /*
- * Insertion du detail des produits dans la base
- */
- if (! $error)
- {
- $fk_parent_line=0;
- $num=count($this->lines);
- for ($i=0;$i<$num;$i++)
- {
- // Reset fk_parent_line for no child products and special product
- if (($this->lines[$i]->product_type != 9 && empty($this->lines[$i]->fk_parent_line)) || $this->lines[$i]->product_type == 9) {
- $fk_parent_line = 0;
- }
- $result = $this->addline(
- $this->lines[$i]->desc,
- $this->lines[$i]->subprice,
- $this->lines[$i]->qty,
- $this->lines[$i]->tva_tx,
- $this->lines[$i]->localtax1_tx,
- $this->lines[$i]->localtax2_tx,
- $this->lines[$i]->fk_product,
- $this->lines[$i]->remise_percent,
- 'HT',
- 0,
- 0,
- $this->lines[$i]->product_type,
- $this->lines[$i]->rang,
- $this->lines[$i]->special_code,
- $fk_parent_line,
- $this->lines[$i]->fk_fournprice,
- $this->lines[$i]->pa_ht,
- $this->lines[$i]->label,
- $this->lines[$i]->date_start,
- $this->lines[$i]->date_end,
- $this->lines[$i]->array_options,
- $this->lines[$i]->fk_unit,
- $this->element,
- $this->lines[$i]->id
- );
- if ($result < 0)
- {
- $error++;
- $this->error=$this->db->error;
- dol_print_error($this->db);
- break;
- }
- // Defined the new fk_parent_line
- if ($result > 0 && $this->lines[$i]->product_type == 9) {
- $fk_parent_line = $result;
- }
- }
- }
- // Add linked object
- if (! $error && $this->origin && $this->origin_id)
- {
- $ret = $this->add_object_linked();
- if (! $ret) dol_print_error($this->db);
- }
- // Set delivery address
- if (! $error && $this->fk_delivery_address)
- {
- $sql = "UPDATE ".MAIN_DB_PREFIX."propal";
- $sql.= " SET fk_delivery_address = ".$this->fk_delivery_address;
- $sql.= " WHERE ref = '".$this->ref."'";
- $sql.= " AND entity = ".$conf->entity;
- $result=$this->db->query($sql);
- }
- if (! $error)
- {
- // Mise a jour infos denormalisees
- $resql=$this->update_price(1);
- if ($resql)
- {
- $action='update';
- // Actions on extra fields (by external module or standard code)
- // TODO le hook fait double emploi avec le trigger !!
- $hookmanager->initHooks(array('propaldao'));
- $parameters=array('socid'=>$this->id);
- $reshook=$hookmanager->executeHooks('insertExtraFields',$parameters,$this,$action); // Note that $action and $object may have been modified by some hooks
- if (empty($reshook))
- {
- if (empty($conf->global->MAIN_EXTRAFIELDS_DISABLED)) // For avoid conflicts if trigger used
- {
- $result=$this->insertExtraFields();
- if ($result < 0)
- {
- $error++;
- }
- }
- }
- else if ($reshook < 0) $error++;
- if (! $notrigger)
- {
- // Call trigger
- $result=$this->call_trigger('PROPAL_CREATE',$user);
- if ($result < 0) { $error++; }
- // End call triggers
- }
- }
- else
- {
- $this->error=$this->db->lasterror();
- $error++;
- }
- }
- }
- else
- {
- $this->error=$this->db->lasterror();
- $error++;
- }
- if (! $error)
- {
- $this->db->commit();
- dol_syslog(get_class($this)."::create done id=".$this->id);
- return $this->id;
- }
- else
- {
- $this->db->rollback();
- return -2;
- }
- }
- else
- {
- $this->error=$this->db->lasterror();
- $this->db->rollback();
- return -1;
- }
- }
- /**
- * Insert into DB a proposal object completely defined by its data members (ex, results from copy).
- *
- * @param User $user User that create
- * @return int Id of the new object if ok, <0 if ko
- * @see create
- */
- function create_from($user)
- {
- // i love this function because $this->products is not used in create function...
- $this->products=$this->lines;
- return $this->create($user);
- }
- /**
- * Load an object from its id and create a new one in database
- *
- * @param int $socid Id of thirdparty
- * @return int New id of clone
- */
- function createFromClone($socid=0)
- {
- global $user,$conf,$hookmanager;
- dol_include_once('/projet/class/project.class.php');
- $this->context['createfromclone']='createfromclone';
- $error=0;
- $now=dol_now();
- $this->db->begin();
- // get extrafields so they will be clone
- foreach($this->lines as $line)
- $line->fetch_optionals($line->rowid);
- // Load dest object
- $clonedObj = clone $this;
- $objsoc=new Societe($this->db);
- // Change socid if needed
- if (! empty($socid) && $socid != $clonedObj->socid)
- {
- if ($objsoc->fetch($socid) > 0)
- {
- $clonedObj->socid = $objsoc->id;
- $clonedObj->cond_reglement_id = (! empty($objsoc->cond_reglement_id) ? $objsoc->cond_reglement_id : 0);
- $clonedObj->mode_reglement_id = (! empty($objsoc->mode_reglement_id) ? $objsoc->mode_reglement_id : 0);
- $clonedObj->fk_delivery_address = '';
-
- /*if (!empty($conf->projet->enabled))
- {
- $project = new Project($db);
- if ($this->fk_project > 0 && $project->fetch($this->fk_project)) {
- if ($project->socid <= 0) $clonedObj->fk_project = $this->fk_project;
- else $clonedObj->fk_project = '';
- } else {
- $clonedObj->fk_project = '';
- }
- }*/
- $clonedObj->fk_project = ''; // A cloned proposal is set by default to no project.
- }
- // reset ref_client
- $clonedObj->ref_client = '';
- // TODO Change product price if multi-prices
- }
- else
- {
- $objsoc->fetch($clonedObj->socid);
- }
- $clonedObj->id=0;
- $clonedObj->statut=self::STATUS_DRAFT;
- if (empty($conf->global->PROPALE_ADDON) || ! is_readable(DOL_DOCUMENT_ROOT ."/core/modules/propale/".$conf->global->PROPALE_ADDON.".php"))
- {
- $this->error='ErrorSetupNotComplete';
- return -1;
- }
- // Clear fields
- $clonedObj->user_author = $user->id;
- $clonedObj->user_valid = '';
- $clonedObj->date = $now;
- $clonedObj->datep = $now; // deprecated
- $clonedObj->fin_validite = $clonedObj->date + ($clonedObj->duree_validite * 24 * 3600);
- if (empty($conf->global->MAIN_KEEP_REF_CUSTOMER_ON_CLONING)) $clonedObj->ref_client = '';
- // Set ref
- require_once DOL_DOCUMENT_ROOT ."/core/modules/propale/".$conf->global->PROPALE_ADDON.'.php';
- $obj = $conf->global->PROPALE_ADDON;
- $modPropale = new $obj;
- $clonedObj->ref = $modPropale->getNextValue($objsoc,$clonedObj);
- // Create clone
- $result=$clonedObj->create($user);
- if ($result < 0) $error++;
- else
- {
- // copy internal contacts
- if ($clonedObj->copy_linked_contact($this, 'internal') < 0)
- $error++;
- // copy external contacts if same company
- elseif ($this->socid == $clonedObj->socid)
- {
- if ($clonedObj->copy_linked_contact($this, 'external') < 0)
- $error++;
- }
- }
- if (! $error)
- {
- // Hook of thirdparty module
- if (is_object($hookmanager))
- {
- $parameters=array('objFrom'=>$this,'clonedObj'=>$clonedObj);
- $action='';
- $reshook=$hookmanager->executeHooks('createFrom',$parameters,$clonedObj,$action); // Note that $action and $object may have been modified by some hooks
- if ($reshook < 0) $error++;
- }
- // Call trigger
- $result=$clonedObj->call_trigger('PROPAL_CLONE',$user);
- if ($result < 0) { $error++; }
- // End call triggers
- }
- unset($this->context['createfromclone']);
- // End
- if (! $error)
- {
- $this->db->commit();
- return $clonedObj->id;
- }
- else
- {
- $this->db->rollback();
- return -1;
- }
- }
- /**
- * Load a proposal from database and its ligne array
- *
- * @param int $rowid id of object to load
- * @param string $ref Ref of proposal
- * @return int >0 if OK, <0 if KO
- */
- function fetch($rowid,$ref='')
- {
- $sql = "SELECT p.rowid, p.ref, p.remise, p.remise_percent, p.remise_absolue, p.fk_soc";
- $sql.= ", p.total, p.tva, p.localtax1, p.localtax2, p.total_ht";
- $sql.= ", p.datec";
- $sql.= ", p.date_valid as datev";
- $sql.= ", p.datep as dp";
- $sql.= ", p.fin_validite as dfv";
- $sql.= ", p.date_livraison as date_livraison";
- $sql.= ", p.model_pdf, p.ref_client, p.extraparams";
- $sql.= ", p.note_private, p.note_public";
- $sql.= ", p.fk_projet, p.fk_statut";
- $sql.= ", p.fk_user_author, p.fk_user_valid, p.fk_user_cloture";
- $sql.= ", p.fk_delivery_address";
- $sql.= ", p.fk_availability";
- $sql.= ", p.fk_input_reason";
- $sql.= ", p.fk_cond_reglement";
- $sql.= ", p.fk_mode_reglement";
- $sql.= ', p.fk_account';
- $sql.= ", p.fk_shipping_method";
- $sql.= ", p.fk_incoterms, p.location_incoterms";
- $sql.= ", p.fk_multicurrency, p.multicurrency_code, p.multicurrency_tx, p.multicurrency_total_ht, p.multicurrency_total_tva, p.multicurrency_total_ttc";
- $sql.= ", i.libelle as libelle_incoterms";
- $sql.= ", c.label as statut_label";
- $sql.= ", ca.code as availability_code, ca.label as availability";
- $sql.= ", dr.code as demand_reason_code, dr.label as demand_reason";
- $sql.= ", cr.code as cond_reglement_code, cr.libelle as cond_reglement, cr.libelle_facture as cond_reglement_libelle_doc";
- $sql.= ", cp.code as mode_reglement_code, cp.libelle as mode_reglement";
- $sql.= " FROM ".MAIN_DB_PREFIX."c_propalst as c, ".MAIN_DB_PREFIX."propal as p";
- $sql.= ' LEFT JOIN '.MAIN_DB_PREFIX.'c_paiement as cp ON p.fk_mode_reglement = cp.id';
- $sql.= ' LEFT JOIN '.MAIN_DB_PREFIX.'c_payment_term as cr ON p.fk_cond_reglement = cr.rowid';
- $sql.= ' LEFT JOIN '.MAIN_DB_PREFIX.'c_availability as ca ON p.fk_availability = ca.rowid';
- $sql.= ' LEFT JOIN '.MAIN_DB_PREFIX.'c_input_reason as dr ON p.fk_input_reason = dr.rowid';
- $sql.= ' LEFT JOIN '.MAIN_DB_PREFIX.'c_incoterms as i ON p.fk_incoterms = i.rowid';
- $sql.= " WHERE p.fk_statut = c.id";
- $sql.= " AND p.entity IN (".getEntity('propal', 1).")";
- if ($ref) $sql.= " AND p.ref='".$ref."'";
- else $sql.= " AND p.rowid=".$rowid;
- dol_syslog(get_class($this)."::fetch", LOG_DEBUG);
- $resql=$this->db->query($sql);
- if ($resql)
- {
- if ($this->db->num_rows($resql))
- {
- $obj = $this->db->fetch_object($resql);
- $this->id = $obj->rowid;
- $this->ref = $obj->ref;
- $this->ref_client = $obj->ref_client;
- $this->remise = $obj->remise;
- $this->remise_percent = $obj->remise_percent;
- $this->remise_absolue = $obj->remise_absolue;
- $this->total = $obj->total; // TODO deprecated
- $this->total_ht = $obj->total_ht;
- $this->total_tva = $obj->tva;
- $this->total_localtax1 = $obj->localtax1;
- $this->total_localtax2 = $obj->localtax2;
- $this->total_ttc = $obj->total;
- $this->socid = $obj->fk_soc;
- $this->fk_project = $obj->fk_projet;
- $this->modelpdf = $obj->model_pdf;
- $this->note = $obj->note_private; // TODO deprecated
- $this->note_private = $obj->note_private;
- $this->note_public = $obj->note_public;
- $this->statut = $obj->fk_statut;
- $this->statut_libelle = $obj->statut_label;
- $this->datec = $this->db->jdate($obj->datec); // TODO deprecated
- $this->datev = $this->db->jdate($obj->datev); // TODO deprecated
- $this->date_creation = $this->db->jdate($obj->datec); //Creation date
- $this->date_validation = $this->db->jdate($obj->datev); //Validation date
- $this->date = $this->db->jdate($obj->dp); // Proposal date
- $this->datep = $this->db->jdate($obj->dp); // deprecated
- $this->fin_validite = $this->db->jdate($obj->dfv);
- $this->date_livraison = $this->db->jdate($obj->date_livraison);
- $this->shipping_method_id = ($obj->fk_shipping_method>0)?$obj->fk_shipping_method:null;
- $this->availability_id = $obj->fk_availability;
- $this->availability_code = $obj->availability_code;
- $this->availability = $obj->availability;
- $this->demand_reason_id = $obj->fk_input_reason;
- $this->demand_reason_code = $obj->demand_reason_code;
- $this->demand_reason = $obj->demand_reason;
- $this->fk_address = $obj->fk_delivery_address;
- $this->mode_reglement_id = $obj->fk_mode_reglement;
- $this->mode_reglement_code = $obj->mode_reglement_code;
- $this->mode_reglement = $obj->mode_reglement;
- $this->fk_account = ($obj->fk_account>0)?$obj->fk_account:null;
- $this->cond_reglement_id = $obj->fk_cond_reglement;
- $this->cond_reglement_code = $obj->cond_reglement_code;
- $this->cond_reglement = $obj->cond_reglement;
- $this->cond_reglement_doc = $obj->cond_reglement_libelle_doc;
- $this->extraparams = (array) json_decode($obj->extraparams, true);
- $this->user_author_id = $obj->fk_user_author;
- $this->user_valid_id = $obj->fk_user_valid;
- $this->user_close_id = $obj->fk_user_cloture;
- //Incoterms
- $this->fk_incoterms = $obj->fk_incoterms;
- $this->location_incoterms = $obj->location_incoterms;
- $this->libelle_incoterms = $obj->libelle_incoterms;
- // Multicurrency
- $this->fk_multicurrency = $obj->fk_multicurrency;
- $this->multicurrency_code = $obj->multicurrency_code;
- $this->multicurrency_tx = $obj->multicurrency_tx;
- $this->multicurrency_total_ht = $obj->multicurrency_total_ht;
- $this->multicurrency_total_tva = $obj->multicurrency_total_tva;
- $this->multicurrency_total_ttc = $obj->multicurrency_total_ttc;
- if ($obj->fk_statut == self::STATUS_DRAFT)
- {
- $this->brouillon = 1;
- }
- // Retreive all extrafield for invoice
- // fetch optionals attributes and labels
- require_once DOL_DOCUMENT_ROOT.'/core/class/extrafields.class.php';
- $extrafields=new ExtraFields($this->db);
- $extralabels=$extrafields->fetch_name_optionals_label($this->table_element,true);
- $this->fetch_optionals($this->id,$extralabels);
- $this->db->free($resql);
- $this->lines = array();
- /*
- * Lignes propales liees a un produit ou non
- */
- $sql = "SELECT d.rowid, d.fk_propal, d.fk_parent_line, d.label as custom_label, d.description, d.price, d.tva_tx, d.localtax1_tx, d.localtax2_tx, d.qty, d.fk_remise_except, d.remise_percent, d.subprice, d.fk_product,";
- $sql.= " d.info_bits, d.total_ht, d.total_tva, d.total_localtax1, d.total_localtax2, d.total_ttc, d.fk_product_fournisseur_price as fk_fournprice, d.buy_price_ht as pa_ht, d.special_code, d.rang, d.product_type,";
- $sql.= " d.fk_unit,";
- $sql.= ' p.ref as product_ref, p.description as product_desc, p.fk_product_type, p.label as product_label,';
- $sql.= ' d.date_start, d.date_end';
- $sql.= ' ,d.fk_multicurrency, d.multicurrency_code, d.multicurrency_subprice, d.multicurrency_total_ht, d.multicurrency_total_tva, d.multicurrency_total_ttc';
- $sql.= " FROM ".MAIN_DB_PREFIX."propaldet as d";
- $sql.= " LEFT JOIN ".MAIN_DB_PREFIX."product as p ON d.fk_product = p.rowid";
- $sql.= " WHERE d.fk_propal = ".$this->id;
- $sql.= " ORDER by d.rang";
- $result = $this->db->query($sql);
- if ($result)
- {
- require_once DOL_DOCUMENT_ROOT.'/core/class/extrafields.class.php';
- $extrafieldsline=new ExtraFields($this->db);
- $line = new PropaleLigne($this->db);
- $extralabelsline=$extrafieldsline->fetch_name_optionals_label($line->table_element,true);
- $num = $this->db->num_rows($result);
- $i = 0;
- while ($i < $num)
- {
- $objp = $this->db->fetch_object($result);
- $line = new PropaleLigne($this->db);
- $line->rowid = $objp->rowid; //Deprecated
- $line->id = $objp->rowid;
- $line->fk_propal = $objp->fk_propal;
- $line->fk_parent_line = $objp->fk_parent_line;
- $line->product_type = $objp->product_type;
- $line->label = $objp->custom_label;
- $line->desc = $objp->description; // Description ligne
- $line->qty = $objp->qty;
- $line->tva_tx = $objp->tva_tx;
- $line->localtax1_tx = $objp->localtax1_tx;
- $line->localtax2_tx = $objp->localtax2_tx;
- $line->subprice = $objp->subprice;
- $line->fk_remise_except = $objp->fk_remise_except;
- $line->remise_percent = $objp->remise_percent;
- $line->price = $objp->price; // TODO deprecated
- $line->info_bits = $objp->info_bits;
- $line->total_ht = $objp->total_ht;
- $line->total_tva = $objp->total_tva;
- $line->total_localtax1 = $objp->total_localtax1;
- $line->total_localtax2 = $objp->total_localtax2;
- $line->total_ttc = $objp->total_ttc;
- $line->fk_fournprice = $objp->fk_fournprice;
- $marginInfos = getMarginInfos($objp->subprice, $objp->remise_percent, $objp->tva_tx, $objp->localtax1_tx, $objp->localtax2_tx, $line->fk_fournprice, $objp->pa_ht);
- $line->pa_ht = $marginInfos[0];
- $line->marge_tx = $marginInfos[1];
- $line->marque_tx = $marginInfos[2];
- $line->special_code = $objp->special_code;
- $line->rang = $objp->rang;
- $line->fk_product = $objp->fk_product;
- $line->ref = $objp->product_ref; // TODO deprecated
- $line->product_ref = $objp->product_ref;
- $line->libelle = $objp->product_label; // TODO deprecated
- $line->product_label = $objp->product_label;
- $line->product_desc = $objp->product_desc; // Description produit
- $line->fk_product_type = $objp->fk_product_type;
- $line->fk_unit = $objp->fk_unit;
- $line->date_start = $this->db->jdate($objp->date_start);
- $line->date_end = $this->db->jdate($objp->date_end);
- // Multicurrency
- $line->fk_multicurrency = $objp->fk_multicurrency;
- $line->multicurrency_code = $objp->multicurrency_code;
- $line->multicurrency_subprice = $objp->multicurrency_subprice;
- $line->multicurrency_total_ht = $objp->multicurrency_total_ht;
- $line->multicurrency_total_tva = $objp->multicurrency_total_tva;
- $line->multicurrency_total_ttc = $objp->multicurrency_total_ttc;
- $line->fetch_optionals($line->id,$extralabelsline);
- $this->lines[$i] = $line;
- //dol_syslog("1 ".$line->fk_product);
- //print "xx $i ".$this->lines[$i]->fk_product;
- $i++;
- }
- $this->db->free($result);
- }
- else
- {
- $this->error=$this->db->lasterror();
- return -1;
- }
- return 1;
- }
- $this->error="Record Not Found";
- return 0;
- }
- else
- {
- $this->error=$this->db->lasterror();
- return -1;
- }
- }
- /**
- * Update value of extrafields on the proposal
- *
- * @param User $user Object user that modify
- * @return int <0 if ko, >0 if ok
- */
- function update_extrafields($user)
- {
- global $conf, $hookmanager;
- $action='update';
- $error = 0;
- // Actions on extra fields (by external module or standard code)
- // TODO le hook fait double emploi avec le trigger !!
- $hookmanager->initHooks(array('propaldao'));
- $parameters=array('id'=>$this->id);
- $reshook=$hookmanager->executeHooks('insertExtraFields',$parameters,$this,$action); // Note that $action and $object may have been modified by some hooks
- if (empty($reshook))
- {
- if (empty($conf->global->MAIN_EXTRAFIELDS_DISABLED)) // For avoid conflicts if trigger used
- {
- $result=$this->insertExtraFields();
- if ($result < 0)
- {
- $error++;
- }
- }
- }
- else if ($reshook < 0) $error++;
- if (!$error)
- {
- return 1;
- }
- else
- {
- return -1;
- }
- }
- /**
- * Set status to validated
- *
- * @param User $user Object user that validate
- * @param int $notrigger 1=Does not execute triggers, 0= execuete triggers
- * @return int <0 if KO, >=0 if OK
- */
- function valid($user, $notrigger=0)
- {
- require_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php';
- global $conf;
- $error=0;
- $now=dol_now();
- if ((empty($conf->global->MAIN_USE_ADVANCED_PERMS) && ! empty($user->rights->propal->creer))
- || (! empty($conf->global->MAIN_USE_ADVANCED_PERMS) && ! empty($user->rights->propal->propal_advance->validate)))
- {
- $this->db->begin();
- // Numbering module definition
- $soc = new Societe($this->db);
- $soc->fetch($this->socid);
- // Define new ref
- if (! $error && (preg_match('/^[\(]?PROV/i', $this->ref) || empty($this->ref))) // empty should not happened, but when it occurs, the test save life
- {
- $num = $this->getNextNumRef($soc);
- }
- else
- {
- $num = $this->ref;
- }
- $this->newref = $num;
- $sql = "UPDATE ".MAIN_DB_PREFIX."propal";
- $sql.= " SET ref = '".$num."',";
- $sql.= " fk_statut = ".self::STATUS_VALIDATED.", date_valid='".$this->db->idate($now)."', fk_user_valid=".$user->id;
- $sql.= " WHERE rowid = ".$this->id." AND fk_statut = ".self::STATUS_DRAFT;
- dol_syslog(get_class($this)."::valid", LOG_DEBUG);
- $resql=$this->db->query($sql);
- if (! $resql)
- {
- dol_print_error($this->db);
- $error++;
- }
- // Trigger calls
- if (! $error && ! $notrigger)
- {
- // Call trigger
- $result=$this->call_trigger('PROPAL_VALIDATE',$user);
- if ($result < 0) { $error++; }
- // End call triggers
- }
- if (! $error)
- {
- $this->oldref = $this->ref;
- // Rename directory if dir was a temporary ref
- if (preg_match('/^[\(]?PROV/i', $this->ref))
- {
- // Rename of propal directory ($this->ref = old ref, $num = new ref)
- // to not lose the linked files
- $oldref = dol_sanitizeFileName($this->ref);
- $newref = dol_sanitizeFileName($num);
- $dirsource = $conf->propal->dir_output.'/'.$oldref;
- $dirdest = $conf->propal->dir_output.'/'.$newref;
- if (file_exists($dirsource))
- {
- dol_syslog(get_class($this)."::validate rename dir ".$dirsource." into ".$dirdest);
- if (@rename($dirsource, $dirdest))
- {
- dol_syslog("Rename ok");
- // Rename docs starting with $oldref with $newref
- $listoffiles=dol_dir_list($conf->propal->dir_output.'/'.$newref, 'files', 1, '^'.preg_quote($oldref,'/'));
- foreach($listoffiles as $fileentry)
- {
- $dirsource=$fileentry['name'];
- $dirdest=preg_replace('/^'.preg_quote($oldref,'/').'/',$newref, $dirsource);
- $dirsource=$fileentry['path'].'/'.$dirsource;
- $dirdest=$fileentry['path'].'/'.$dirdest;
- @rename($dirsource, $dirdest);
- }
- }
- }
- }
- $this->ref=$num;
- $this->brouillon=0;
- $this->statut = self::STATUS_VALIDATED;
- $this->user_valid_id=$user->id;
- $this->datev=$now;
- $this->db->commit();
- return 1;
- }
- else
- {
- $this->db->rollback();
- return -1;
- }
- }
- }
- /**
- * Define proposal date
- *
- * @param User $user Object user that modify
- * @param int $date Date
- * @return int <0 if KO, >0 if OK
- */
- function set_date($user, $date)
- {
- if (empty($date))
- {
- $this->error='ErrorBadParameter';
- dol_syslog(get_class($this)."::set_date ".$this->error, LOG_ERR);
- return -1;
- }
- if (! empty($user->rights->propal->creer))
- {
- $sql = "UPDATE ".MAIN_DB_PREFIX."propal SET datep = '".$this->db->idate($date)."'";
- $sql.= " WHERE rowid = ".$this->id." AND fk_statut = ".self::STATUS_DRAFT;
- dol_syslog(get_class($this)."::set_date", LOG_DEBUG);
- if ($this->db->query($sql) )
- {
- $this->date = $date;
- $this->datep = $date; // deprecated
- return 1;
- }
- else
- {
- $this->error=$this->db->lasterror();
- return -1;
- }
- }
- }
- /**
- * Define end validity date
- *
- * @param User $user Object user that modify
- * @param int $date_fin_validite End of validity date
- * @return int <0 if KO, >0 if OK
- */
- function set_echeance($user, $date_fin_validite)
- {
- if (! empty($user->rights->propal->creer))
- {
- $sql = "UPDATE ".MAIN_DB_PREFIX."propal SET fin_validite = ".($date_fin_validite!=''?"'".$this->db->idate($date_fin_validite)."'":'null');
- $sql.= " WHERE rowid = ".$this->id." AND fk_statut = ".self::STATUS_DRAFT;
- if ($this->db->query($sql) )
- {
- $this->fin_validite = $date_fin_validite;
- return 1;
- }
- else
- {
- $this->error=$this->db->error();
- return -1;
- }
- }
- }
- /**
- * Set delivery date
- *
- * @param User $user Object user that modify
- * @param int $date_livraison Delivery date
- * @return int <0 if ko, >0 if ok
- */
- function set_date_livraison($user, $date_livraison)
- {
- if (! empty($user->rights->propal->creer))
- {
- $sql = "UPDATE ".MAIN_DB_PREFIX."propal ";
- $sql.= " SET date_livraison = ".($date_livraison!=''?"'".$this->db->idate($date_livraison)."'":'null');
- $sql.= " WHERE rowid = ".$this->id;
- if ($this->db->query($sql))
- {
- $this->date_livraison = $date_livraison;
- return 1;
- }
- else
- {
- $this->error=$this->db->error();
- dol_syslog(get_class($this)."::set_date_livraison Erreur SQL");
- return -1;
- }
- }
- }
- /**
- * Set delivery
- *
- * @param User $user Object user that modify
- * @param int $id Availability id
- * @return int <0 if KO, >0 if OK
- */
- function set_availability($user, $id)
- {
- if (! empty($user->rights->propal->creer))
- {
- $sql = "UPDATE ".MAIN_DB_PREFIX."propal ";
- $sql.= " SET fk_availability = '".$id."'";
- $sql.= " WHERE rowid = ".$this->id;
- if ($this->db->query($sql))
- {
- $this->fk_availability = $id;
- return 1;
- }
- else
- {
- $this->error=$this->db->error();
- dol_syslog(get_class($this)."::set_availability Erreur SQL");
- return -1;
- }
- }
- }
- /**
- * Set source of demand
- *
- * @param User $user Object user that modify
- * @param int $id Input reason id
- * @return int <0 if KO, >0 if OK
- */
- function set_demand_reason($user, $id)
- {
- if (! empty($user->rights->propal->creer))
- {
- $sql = "UPDATE ".MAIN_DB_PREFIX."propal ";
- $sql.= " SET fk_input_reason = '".$id."'";
- $sql.= " WHERE rowid = ".$this->id;
- if ($this->db->query($sql))
- {
- $this->fk_input_reason = $id;
- return 1;
- }
- else
- {
- $this->error=$this->db->error();
- dol_syslog(get_class($this)."::set_demand_reason Erreur SQL");
- return -1;
- }
- }
- }
- /**
- * Set customer reference number
- *
- * @param User $user Object user that modify
- * @param string $ref_client Customer reference
- * @return int <0 if ko, >0 if ok
- */
- function set_ref_client($user, $ref_client)
- {
- if (! empty($user->rights->propal->creer))
- {
- dol_syslog('Propale::set_ref_client this->id='.$this->id.', ref_client='.$ref_client);
- $sql = 'UPDATE '.MAIN_DB_PREFIX.'propal SET ref_client = '.(empty($ref_client) ? 'NULL' : '\''.$this->db->escape($ref_client).'\'');
- $sql.= ' WHERE rowid = '.$this->id;
- if ($this->db->query($sql) )
- {
- $this->ref_client = $ref_client;
- return 1;
- }
- else
- {
- $this->error=$this->db->error();
- dol_syslog('Propale::set_ref_client Erreur '.$this->error.' - '.$sql);
- return -2;
- }
- }
- else
- {
- return -1;
- }
- }
- /**
- * Set an overall discount on the proposal
- *
- * @param User $user Object user that modify
- * @param double $remise Amount discount
- * @return int <0 if ko, >0 if ok
- */
- function set_remise_percent($user, $remise)
- {
- $remise=trim($remise)?trim($remise):0;
- if (! empty($user->rights->propal->creer))
- {
- $remise = price2num($remise);
- $sql = "UPDATE ".MAIN_DB_PREFIX."propal SET remise_percent = ".$remise;
- $sql.= " WHERE rowid = ".$this->id." AND fk_statut = ".self::STATUS_DRAFT;
- if ($this->db->query($sql) )
- {
- $this->remise_percent = $remise;
- $this->update_price(1);
- return 1;
- }
- else
- {
- $this->error=$this->db->error();
- return -1;
- }
- }
- }
- /**
- * Set an absolute overall discount on the proposal
- *
- * @param User $user Object user that modify
- * @param double $remise Amount discount
- * @return int <0 if ko, >0 if ok
- */
- function set_remise_absolue($user, $remise)
- {
- $remise=trim($remise)?trim($remise):0;
- if (! empty($user->rights->propal->creer))
- {
- $remise = price2num($remise);
- $sql = "UPDATE ".MAIN_DB_PREFIX."propal ";
- $sql.= " SET remise_absolue = ".$remise;
- $sql.= " WHERE rowid = ".$this->id." AND fk_statut = ".self::STATUS_DRAFT;
- if ($this->db->query($sql) )
- {
- $this->remise_absolue = $remise;
- $this->update_price(1);
- return 1;
- }
- else
- {
- $this->error=$this->db->error();
- return -1;
- }
- }
- }
- /**
- * Reopen the commercial proposal
- *
- * @param User $user Object user that close
- * @param int $statut Statut
- * @param string $note Comment
- * @param int $notrigger 1=Does not execute triggers, 0= execuete triggers
- * @return int <0 if KO, >0 if OK
- */
- function reopen($user, $statut, $note='', $notrigger=0)
- {
- $this->statut = $statut;
- $error=0;
- $sql = "UPDATE ".MAIN_DB_PREFIX."propal";
- $sql.= " SET fk_statut = ".$this->statut.",";
- if (! empty($note)) $sql.= " note_private = '".$this->db->escape($note)."',";
- $sql.= " date_cloture=NULL, fk_user_cloture=NULL";
- $sql.= " WHERE rowid = ".$this->id;
- $this->db->begin();
- dol_syslog(get_class($this)."::reopen", LOG_DEBUG);
- $resql = $this->db->query($sql);
- if (! $resql) {
- $error++; $this->errors[]="Error ".$this->db->lasterror();
- }
- if (! $error)
- {
- if (! $notrigger)
- {
- // Call trigger
- $result=$this->call_trigger('PROPAL_REOPEN',$user);
- if ($result < 0) { $error++; }
- // End call triggers
- }
- }
- // Commit or rollback
- if ($error)
- {
- if (!empty($this->errors))
- {
- foreach($this->errors as $errmsg)
- {
- dol_syslog(get_class($this)."::update ".$errmsg, LOG_ERR);
- $this->error.=($this->error?', '.$errmsg:$errmsg);
- }
- }
- $this->db->rollback();
- return -1*$error;
- }
- else
- {
- $this->db->commit();
- return 1;
- }
- }
- /**
- * Close the commercial proposal
- *
- * @param User $user Object user that close
- * @param int $statut Statut
- * @param string $note Comment
- * @return int <0 if KO, >0 if OK
- */
- function cloture($user, $statut, $note)
- {
- global $langs,$conf;
- $error=0;
- $now=dol_now();
- $this->db->begin();
- $sql = "UPDATE ".MAIN_DB_PREFIX."propal";
- $sql.= " SET fk_statut = ".$statut.", note_private = '".$this->db->escape($note)."', date_cloture='".$this->db->idate($now)."', fk_user_cloture=".$user->id;
- $sql.= " WHERE rowid = ".$this->id;
- $resql=$this->db->query($sql);
- if ($resql)
- {
- $modelpdf=$conf->global->PROPALE_ADDON_PDF_ODT_CLOSED?$conf->global->PROPALE_ADDON_PDF_ODT_CLOSED:$this->modelpdf;
- $trigger_name='PROPAL_CLOSE_REFUSED';
- if ($statut == self::STATUS_SIGNED)
- {
- $trigger_name='PROPAL_CLOSE_SIGNED';
- $modelpdf=$conf->global->PROPALE_ADDON_PDF_ODT_TOBILL?$conf->global->PROPALE_ADDON_PDF_ODT_TOBILL:$this->modelpdf;
- // The connected company is classified as a client
- $soc=new Societe($this->db);
- $soc->id = $this->socid;
- $result=$soc->set_as_client();
- if ($result < 0)
- {
- $this->error=$this->db->lasterror();
- $this->db->rollback();
- return -2;
- }
- }
- if ($statut == self::STATUS_BILLED)
- {
- $trigger_name='PROPAL_CLASSIFY_BILLED';
- }
- if (empty($conf->global->MAIN_DISABLE_PDF_AUTOUPDATE))
- {
- // Define output language
- $outputlangs = $langs;
- if (! empty($conf->global->MAIN_MULTILANGS))
- {
- $outputlangs = new Translate("",$conf);
- $newlang=(GETPOST('lang_id') ? GETPOST('lang_id') : $this->thirdparty->default_lang);
- $outputlangs->setDefaultLang($newlang);
- }
- //$ret=$object->fetch($id); // Reload to get new records
- $this->generateDocument($modelpdf, $outputlangs);
- }
- // Call trigger
- $result=$this->call_trigger($trigger_name,$user);
- if ($result < 0) { $error++; }
- // End call triggers
- if ( ! $error )
- {
- $this->statut = $statut;
- $this->db->commit();
- return 1;
- }
- else
- {
- $this->db->rollback();
- return -1;
- }
- }
- else
- {
- $this->error=$this->db->lasterror();
- $this->db->rollback();
- return -1;
- }
- }
- /**
- * Class invoiced the Propal
- *
- * @return int <0 si ko, >0 si ok
- */
- function classifyBilled()
- {
- $sql = 'UPDATE '.MAIN_DB_PREFIX.'propal SET fk_statut = '.self::STATUS_BILLED;
- $sql .= ' WHERE rowid = '.$this->id.' AND fk_statut > '.self::STATUS_DRAFT.' ;';
- if ($this->db->query($sql) )
- {
- $this->statut=self::STATUS_BILLED;
- return 1;
- }
- else
- {
- dol_print_error($this->db);
- }
- }
- /**
- * Class invoiced the Propal
- *
- * @return int <0 si ko, >0 si ok
- * @deprecated
- * @see classifyBilled()
- */
- function classer_facturee()
- {
- global $user;
- dol_syslog(__METHOD__ . " is deprecated", LOG_WARNING);
- return $this->classifyBilled($user);
- }
- /**
- * Set draft status
- *
- * @param User $user Object user that modify
- * @return int <0 if KO, >0 if OK
- */
- function set_draft($user)
- {
- $sql = "UPDATE ".MAIN_DB_PREFIX."propal SET fk_statut = ".self::STATUS_DRAFT;
- $sql.= " WHERE rowid = ".$this->id;
- if ($this->db->query($sql))
- {
- $this->statut = self::STATUS_DRAFT;
- $this->brouillon = 1;
- return 1;
- }
- else
- {
- return -1;
- }
- }
- /**
- * Return list of proposal (eventually filtered on user) into an array
- *
- * @param int $shortlist 0=Return array[id]=ref, 1=Return array[](id=>id,ref=>ref,name=>name)
- * @param int $draft 0=not draft, 1=draft
- * @param int $notcurrentuser 0=all user, 1=not current user
- * @param int $socid Id third pary
- * @param int $limit For pagination
- * @param int $offset For pagination
- * @param string $sortfield Sort criteria
- * @param string $sortorder Sort order
- * @return int -1 if KO, array with result if OK
- */
- function liste_array($shortlist=0, $draft=0, $notcurrentuser=0, $socid=0, $limit=0, $offset=0, $sortfield='p.datep', $sortorder='DESC')
- {
- global $user;
- $ga = array();
- $sql = "SELECT s.rowid, s.nom as name, s.client,";
- $sql.= " p.rowid as propalid, p.fk_statut, p.total_ht, p.ref, p.remise, ";
- $sql.= " p.datep as dp, p.fin_validite as datelimite";
- if (! $user->rights->societe->client->voir && ! $socid) $sql .= ", sc.fk_soc, sc.fk_user";
- $sql.= " FROM ".MAIN_DB_PREFIX."societe as s, ".MAIN_DB_PREFIX."propal as p, ".MAIN_DB_PREFIX."c_propalst as c";
- if (! $user->rights->societe->client->voir && ! $socid) $sql .= ", ".MAIN_DB_PREFIX."societe_commerciaux as sc";
- $sql.= " WHERE p.entity IN (".getEntity('propal', 1).")";
- $sql.= " AND p.fk_soc = s.rowid";
- $sql.= " AND p.fk_statut = c.id";
- if (! $user->rights->societe->client->voir && ! $socid) //restriction
- {
- $sql.= " AND s.rowid = sc.fk_soc AND sc.fk_user = " .$user->id;
- }
- if ($socid) $sql.= " AND s.rowid = ".$socid;
- if ($draft) $sql.= " AND p.fk_statut = ".self::STATUS_DRAFT;
- if ($notcurrentuser > 0) $sql.= " AND p.fk_user_author <> ".$user->id;
- $sql.= $this->db->order($sortfield,$sortorder);
- $sql.= $this->db->plimit($limit,$offset);
- $result=$this->db->query($sql);
- if ($result)
- {
- $num = $this->db->num_rows($result);
- if ($num)
- {
- $i = 0;
- while ($i < $num)
- {
- $obj = $this->db->fetch_object($result);
- if ($shortlist == 1)
- {
- $ga[$obj->propalid] = $obj->ref;
- }
- else if ($shortlist == 2)
- {
- $ga[$obj->propalid] = $obj->ref.' ('.$obj->name.')';
- }
- else
- {
- $ga[$i]['id'] = $obj->propalid;
- $ga[$i]['ref'] = $obj->ref;
- $ga[$i]['name'] = $obj->name;
- }
- $i++;
- }
- }
- return $ga;
- }
- else
- {
- dol_print_error($this->db);
- return -1;
- }
- }
- /**
- * Returns an array with the numbers of related invoices
- *
- * @return array Array of invoices
- */
- function getInvoiceArrayList()
- {
- return $this->InvoiceArrayList($this->id);
- }
- /**
- * Returns an array with id and ref of related invoices
- *
- * @param int $id Id propal
- * @return array Array of invoices id
- */
- function InvoiceArrayList($id)
- {
- $ga = array();
- $linkedInvoices = array();
- $this->fetchObjectLinked($id,$this->element);
- foreach($this->linkedObjectsIds as $objecttype => $objectid)
- {
- // Nouveau système du comon object renvoi des rowid et non un id linéaire de 1 à n
- // On parcourt donc une liste d'objets en tant qu'objet unique
- foreach($objectid as $key => $object)
- {
- // Cas des factures liees directement
- if ($objecttype == 'facture')
- {
- $linkedInvoices[] = $object;
- }
- // Cas des factures liees par un autre objet (ex: commande)
- else
- {
- $this->fetchObjectLinked($object,$objecttype);
- foreach($this->linkedObjectsIds as $subobjecttype => $subobjectid)
- {
- foreach($subobjectid as $subkey => $subobject)
- {
- if ($subobjecttype == 'facture')
- {
- $linkedInvoices[] = $subobject;
- }
- }
- }
- }
- }
- }
- if (count($linkedInvoices) > 0)
- {
- $sql= "SELECT rowid as facid, facnumber, total, datef as df, fk_user_author, fk_statut, paye";
- $sql.= " FROM ".MAIN_DB_PREFIX."facture";
- $sql.= " WHERE rowid IN (".implode(',',$linkedInvoices).")";
- dol_syslog(get_class($this)."::InvoiceArrayList", LOG_DEBUG);
- $resql=$this->db->query($sql);
- if ($resql)
- {
- $tab_sqlobj=array();
- $nump = $this->db->num_rows($resql);
- for ($i = 0;$i < $nump;$i++)
- {
- $sqlobj = $this->db->fetch_object($resql);
- $tab_sqlobj[] = $sqlobj;
- }
- $this->db->free($resql);
- $nump = count($tab_sqlobj);
- if ($nump)
- {
- $i = 0;
- while ($i < $nump)
- {
- $obj = array_shift($tab_sqlobj);
- $ga[$i] = $obj;
- $i++;
- }
- }
- return $ga;
- }
- else
- {
- return -1;
- }
- }
- else return $ga;
- }
- /**
- * Delete proposal
- *
- * @param User $user Object user that delete
- * @param int $notrigger 1=Does not execute triggers, 0= execuete triggers
- * @return int 1 if ok, otherwise if error
- */
- function delete($user, $notrigger=0)
- {
- global $conf;
- require_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php';
- $error=0;
- $this->db->begin();
- if (! $notrigger)
- {
- // Call trigger
- $result=$this->call_trigger('PROPAL_DELETE',$user);
- if ($result < 0) { $error++; }
- // End call triggers
- }
- if (! $error)
- {
- $sql = "DELETE FROM ".MAIN_DB_PREFIX."propaldet WHERE fk_propal = ".$this->id;
- if ($this->db->query($sql))
- {
- $sql = "DELETE FROM ".MAIN_DB_PREFIX."propal WHERE rowid = ".$this->id;
- if ($this->db->query($sql))
- {
- // Delete linked object
- $res = $this->deleteObjectLinked();
- if ($res < 0) $error++;
- // Delete linked contacts
- $res = $this->delete_linked_contact();
- if ($res < 0) $error++;
- if (! $error)
- {
- // We remove directory
- $ref = dol_sanitizeFileName($this->ref);
- if ($conf->propal->dir_output && !empty($this->ref))
- {
- $dir = $conf->propal->dir_output . "/" . $ref ;
- $file = $dir . "/" . $ref . ".pdf";
- if (file_exists($file))
- {
- dol_delete_preview($this);
- if (! dol_delete_file($file,0,0,0,$this)) // For triggers
- {
- $this->error='ErrorFailToDeleteFile';
- $this->errors=array('ErrorFailToDeleteFile');
- $this->db->rollback();
- return 0;
- }
- }
- if (file_exists($dir))
- {
- $res=@dol_delete_dir_recursive($dir);
- if (! $res)
- {
- $this->error='ErrorFailToDeleteDir';
- $this->errors=array('ErrorFailToDeleteDir');
- $this->db->rollback();
- return 0;
- }
- }
- }
- }
- // Removed extrafields
- if (! $error)
- {
- if (empty($conf->global->MAIN_EXTRAFIELDS_DISABLED)) // For avoid conflicts if trigger used
- {
- $result=$this->deleteExtraFields();
- if ($result < 0)
- {
- $error++;
- $errorflag=-4;
- dol_syslog(get_class($this)."::delete erreur ".$errorflag." ".$this->error, LOG_ERR);
- }
- }
- }
- if (! $error)
- {
- dol_syslog(get_class($this)."::delete ".$this->id." by ".$user->id, LOG_DEBUG);
- $this->db->commit();
- return 1;
- }
- else
- {
- $this->error=$this->db->lasterror();
- $this->db->rollback();
- return 0;
- }
- }
- else
- {
- $this->error=$this->db->lasterror();
- $this->db->rollback();
- return -3;
- }
- }
- else
- {
- $this->error=$this->db->lasterror();
- $this->db->rollback();
- return -2;
- }
- }
- else
- {
- $this->db->rollback();
- return -1;
- }
- }
- /**
- * Change the delivery time
- *
- * @param int $availability_id Id of new delivery time
- * @return int >0 if OK, <0 if KO
- */
- function availability($availability_id)
- {
- dol_syslog('Propale::availability('.$availability_id.')');
- if ($this->statut >= self::STATUS_DRAFT)
- {
- $sql = 'UPDATE '.MAIN_DB_PREFIX.'propal';
- $sql .= ' SET fk_availability = '.$availability_id;
- $sql .= ' WHERE rowid='.$this->id;
- if ( $this->db->query($sql) )
- {
- $this->availability_id = $availability_id;
- return 1;
- }
- else
- {
- dol_syslog('Propale::availability Erreur '.$sql.' - '.$this->db->error());
- $this->error=$this->db->error();
- return -1;
- }
- }
- else
- {
- dol_syslog('Propale::availability, etat propale incompatible');
- $this->error='Etat propale incompatible '.$this->statut;
- return -2;
- }
- }
- /**
- * Change source demand
- *
- * @param int $demand_reason_id Id of new source demand
- * @return int >0 si ok, <0 si ko
- */
- function demand_reason($demand_reason_id)
- {
- dol_syslog('Propale::demand_reason('.$demand_reason_id.')');
- if ($this->statut >= self::STATUS_DRAFT)
- {
- $sql = 'UPDATE '.MAIN_DB_PREFIX.'propal';
- $sql .= ' SET fk_input_reason = '.$demand_reason_id;
- $sql .= ' WHERE rowid='.$this->id;
- if ( $this->db->query($sql) )
- {
- $this->demand_reason_id = $demand_reason_id;
- return 1;
- }
- else
- {
- dol_syslog('Propale::demand_reason Erreur '.$sql.' - '.$this->db->error());
- $this->error=$this->db->error();
- return -1;
- }
- }
- else
- {
- dol_syslog('Propale::demand_reason, etat propale incompatible');
- $this->error='Etat propale incompatible '.$this->statut;
- return -2;
- }
- }
- /**
- * Object Proposal Information
- *
- * @param int $id Proposal id
- * @return void
- */
- function info($id)
- {
- $sql = "SELECT c.rowid, ";
- $sql.= " c.datec, c.date_valid as datev, c.date_cloture as dateo,";
- $sql.= " c.fk_user_author, c.fk_user_valid, c.fk_user_cloture";
- $sql.= " FROM ".MAIN_DB_PREFIX."propal as c";
- $sql.= " WHERE c.rowid = ".$id;
- $result = $this->db->query($sql);
- if ($result)
- {
- if ($this->db->num_rows($result))
- {
- $obj = $this->db->fetch_object($result);
- $this->id = $obj->rowid;
- $this->date_creation = $this->db->jdate($obj->datec);
- $this->date_validation = $this->db->jdate($obj->datev);
- $this->date_cloture = $this->db->jdate($obj->dateo);
- $cuser = new User($this->db);
- $cuser->fetch($obj->fk_user_author);
- $this->user_creation = $cuser;
- if ($obj->fk_user_valid)
- {
- $vuser = new User($this->db);
- $vuser->fetch($obj->fk_user_valid);
- $this->user_validation = $vuser;
- }
- if ($obj->fk_user_cloture)
- {
- $cluser = new User($this->db);
- $cluser->fetch($obj->fk_user_cloture);
- $this->user_cloture = $cluser;
- }
- }
- $this->db->free($result);
- }
- else
- {
- dol_print_error($this->db);
- }
- }
- /**
- * Return label of status of proposal (draft, validated, ...)
- *
- * @param int $mode 0=long label, 1=short label, 2=Picto + short label, 3=Picto, 4=Picto + long label, 5=Short label + Picto
- * @return string Label
- */
- function getLibStatut($mode=0)
- {
- return $this->LibStatut($this->statut,$mode);
- }
- /**
- * Return label of a status (draft, validated, ...)
- *
- * @param int $statut id statut
- * @param int $mode 0=long label, 1=short label, 2=Picto + short label, 3=Picto, 4=Picto + long label, 5=Short label + Picto
- * @return string Label
- */
- function LibStatut($statut,$mode=1)
- {
- global $langs;
- $langs->load("propal");
- if ($statut==self::STATUS_DRAFT) $statuttrans='statut0';
- if ($statut==self::STATUS_VALIDATED) $statuttrans='statut1';
- if ($statut==self::STATUS_SIGNED) $statuttrans='statut3';
- if ($statut==self::STATUS_NOTSIGNED) $statuttrans='statut5';
- if ($statut==self::STATUS_BILLED) $statuttrans='statut6';
- if ($mode == 0) return $this->labelstatut[$statut];
- if ($mode == 1) return $this->labelstatut_short[$statut];
- if ($mode == 2) return img_picto($this->labelstatut_short[$statut], $statuttrans).' '.$this->labelstatut_short[$statut];
- if ($mode == 3) return img_picto($this->labelstatut[$statut], $statuttrans);
- if ($mode == 4) return img_picto($this->labelstatut[$statut],$statuttrans).' '.$this->labelstatut[$statut];
- if ($mode == 5) return '<span class="hideonsmartphone">'.$this->labelstatut_short[$statut].' </span>'.img_picto($this->labelstatut_short[$statut],$statuttrans);
- }
- /**
- * Load indicators for dashboard (this->nbtodo and this->nbtodolate)
- *
- * @param User $user Object user
- * @param int $mode "opened" for proposal to close, "signed" for proposal to invoice
- * @return WorkboardResponse|int <0 if KO, WorkboardResponse if OK
- */
- function load_board($user,$mode)
- {
- global $conf, $langs;
- $clause = " WHERE";
- $sql = "SELECT p.rowid, p.ref, p.datec as datec, p.fin_validite as datefin";
- $sql.= " FROM ".MAIN_DB_PREFIX."propal as p";
- if (!$user->rights->societe->client->voir && !$user->societe_id)
- {
- $sql.= " LEFT JOIN ".MAIN_DB_PREFIX."societe_commerciaux as sc ON p.fk_soc = sc.fk_soc";
- $sql.= " WHERE sc.fk_user = " .$user->id;
- $clause = " AND";
- }
- $sql.= $clause." p.entity IN (".getEntity('propal', 1).")";
- if ($mode == 'opened') $sql.= " AND p.fk_statut = ".self::STATUS_VALIDATED;
- if ($mode == 'signed') $sql.= " AND p.fk_statut = ".self::STATUS_SIGNED;
- if ($user->societe_id) $sql.= " AND p.fk_soc = ".$user->societe_id;
- $resql=$this->db->query($sql);
- if ($resql)
- {
- $langs->load("propal");
- $now=dol_now();
- if ($mode == 'opened') {
- $delay_warning=$conf->propal->cloture->warning_delay;
- $statut = self::STATUS_VALIDATED;
- $label = $langs->trans("PropalsToClose");
- }
- if ($mode == 'signed') {
- $delay_warning=$conf->propal->facturation->warning_delay;
- $statut = self::STATUS_SIGNED;
- $label = $langs->trans("PropalsToBill"); // We set here bill but may be billed or ordered
- }
- $response = new WorkboardResponse();
- $response->warning_delay = $delay_warning/60/60/24;
- $response->label = $label;
- $response->url = DOL_URL_ROOT.'/comm/propal/list.php?viewstatut='.$statut.'&mainmenu=commercial&leftmenu=propals';
- $response->img = img_object($langs->trans("Propals"),"propal");
- // This assignment in condition is not a bug. It allows walking the results.
- while ($obj=$this->db->fetch_object($resql))
- {
- $response->nbtodo++;
- if ($mode == 'opened')
- {
- $datelimit = $this->db->jdate($obj->datefin);
- if ($datelimit < ($now - $delay_warning))
- {
- $response->nbtodolate++;
- }
- }
- // TODO Definir regle des propales a facturer en retard
- // if ($mode == 'signed' && ! count($this->FactureListeArray($obj->rowid))) $this->nbtodolate++;
- }
- return $response;
- }
- else
- {
- $this->error=$this->db->error();
- return -1;
- }
- }
- /**
- * Initialise an instance with random values.
- * Used to build previews or test instances.
- * id must be 0 if object instance is a specimen.
- *
- * @return void
- */
- function initAsSpecimen()
- {
- global $langs;
- // Load array of products prodids
- $num_prods = 0;
- $prodids = array();
- $sql = "SELECT rowid";
- $sql.= " FROM ".MAIN_DB_PREFIX."product";
- $sql.= " WHERE entity IN (".getEntity('product', 1).")";
- $resql = $this->db->query($sql);
- if ($resql)
- {
- $num_prods = $this->db->num_rows($resql);
- $i = 0;
- while ($i < $num_prods)
- {
- $i++;
- $row = $this->db->fetch_row($resql);
- $prodids[$i] = $row[0];
- }
- }
- // Initialise parametres
- $this->id=0;
- $this->ref = 'SPECIMEN';
- $this->ref_client='NEMICEPS';
- $this->specimen=1;
- $this->socid = 1;
- $this->date = time();
- $this->fin_validite = $this->date+3600*24*30;
- $this->cond_reglement_id = 1;
- $this->cond_reglement_code = 'RECEP';
- $this->mode_reglement_id = 7;
- $this->mode_reglement_code = 'CHQ';
- $this->availability_id = 1;
- $this->availability_code = 'AV_NOW';
- $this->demand_reason_id = 1;
- $this->demand_reason_code = 'SRC_00';
- $this->note_public='This is a comment (public)';
- $this->note_private='This is a comment (private)';
- // Lines
- $nbp = 5;
- $xnbp = 0;
- while ($xnbp < $nbp)
- {
- $line=new PropaleLigne($this->db);
- $line->desc=$langs->trans("Description")." ".$xnbp;
- $line->qty=1;
- $line->subprice=100;
- $line->price=100;
- $line->tva_tx=19.6;
- $line->localtax1_tx=0;
- $line->localtax2_tx=0;
- if ($xnbp == 2)
- {
- $line->total_ht=50;
- $line->total_ttc=59.8;
- $line->total_tva=9.8;
- $line->remise_percent=50;
- }
- else
- {
- $line->total_ht=100;
- $line->total_ttc=119.6;
- $line->total_tva=19.6;
- $line->remise_percent=00;
- }
- if ($num_prods > 0)
- {
- $prodid = mt_rand(1, $num_prods);
- $line->fk_product=$prodids[$prodid];
- }
-
- $this->lines[$xnbp]=$line;
- $this->total_ht += $line->total_ht;
- $this->total_tva += $line->total_tva;
- $this->total_ttc += $line->total_ttc;
- $xnbp++;
- }
- }
- /**
- * Charge indicateurs this->nb de tableau de bord
- *
- * @return int <0 if ko, >0 if ok
- */
- function load_state_board()
- {
- global $user;
- $this->nb=array();
- $clause = "WHERE";
- $sql = "SELECT count(p.rowid) as nb";
- $sql.= " FROM ".MAIN_DB_PREFIX."propal as p";
- $sql.= " LEFT JOIN ".MAIN_DB_PREFIX."societe as s ON p.fk_soc = s.rowid";
- if (!$user->rights->societe->client->voir && !$user->societe_id)
- {
- $sql.= " LEFT JOIN ".MAIN_DB_PREFIX."societe_commerciaux as sc ON s.rowid = sc.fk_soc";
- $sql.= " WHERE sc.fk_user = " .$user->id;
- $clause = "AND";
- }
- $sql.= " ".$clause." p.entity IN (".getEntity('propal', 1).")";
- $resql=$this->db->query($sql);
- if ($resql)
- {
- // This assignment in condition is not a bug. It allows walking the results.
- while ($obj=$this->db->fetch_object($resql))
- {
- $this->nb["proposals"]=$obj->nb;
- }
- $this->db->free($resql);
- return 1;
- }
- else
- {
- dol_print_error($this->db);
- $this->error=$this->db->error();
- return -1;
- }
- }
- /**
- * Returns the reference to the following non used Proposal used depending on the active numbering module
- * defined into PROPALE_ADDON
- *
- * @param Societe $soc Object thirdparty
- * @return string Reference libre pour la propale
- */
- function getNextNumRef($soc)
- {
- global $conf,$langs;
- $langs->load("propal");
- if (! empty($conf->global->PROPALE_ADDON))
- {
- $mybool=false;
- $file = $conf->global->PROPALE_ADDON.".php";
- $classname = $conf->global->PROPALE_ADDON;
- // Include file with class
- $dirmodels = array_merge(array('/'), (array) $conf->modules_parts['models']);
- foreach ($dirmodels as $reldir) {
- $dir = dol_buildpath($reldir."core/modules/propale/");
- // Load file with numbering class (if found)
- $mybool|=@include_once $dir.$file;
- }
- if (! $mybool)
- {
- dol_print_error('',"Failed to include file ".$file);
- return '';
- }
- $obj = new $classname();
- $numref = "";
- $numref = $obj->getNextValue($soc,$this);
- if ($numref != "")
- {
- return $numref;
- }
- else
- {
- $this->error=$obj->error;
- //dol_print_error($db,"Propale::getNextNumRef ".$obj->error);
- return "";
- }
- }
- else
- {
- $langs->load("errors");
- print $langs->trans("Error")." ".$langs->trans("ErrorModuleSetupNotComplete");
- return "";
- }
- }
- /**
- * Return clicable link of object (with eventually picto)
- *
- * @param int $withpicto Add picto into link
- * @param string $option Where point the link ('expedition', 'document', ...)
- * @param string $get_params Parametres added to url
- * @return string String with URL
- */
- function getNomUrl($withpicto=0,$option='', $get_params='')
- {
- global $langs, $conf;
- $result='';
- $label = '<u>' . $langs->trans("ShowPropal") . '</u>';
- if (! empty($this->ref))
- $label.= '<br><b>'.$langs->trans('Ref').':</b> '.$this->ref;
- if (! empty($this->ref_client))
- $label.= '<br><b>'.$langs->trans('RefCustomer').':</b> '.$this->ref_client;
- if (! empty($this->total_ht))
- $label.= '<br><b>' . $langs->trans('AmountHT') . ':</b> ' . price($this->total_ht, 0, $langs, 0, -1, -1, $conf->currency);
- if (! empty($this->total_tva))
- $label.= '<br><b>' . $langs->trans('VAT') . ':</b> ' . price($this->total_tva, 0, $langs, 0, -1, -1, $conf->currency);
- if (! empty($this->total_ttc))
- $label.= '<br><b>' . $langs->trans('AmountTTC') . ':</b> ' . price($this->total_ttc, 0, $langs, 0, -1, -1, $conf->currency);
- $linkclose = '" title="'.dol_escape_htmltag($label, 1).'" class="classfortooltip">';
- if ($option == '') {
- $link = '<a href="'.DOL_URL_ROOT.'/comm/propal/card.php?id='.$this->id. $get_params .$linkclose;
- }
- if ($option == 'compta') { // deprecated
- $link = '<a href="'.DOL_URL_ROOT.'/comm/propal/card.php?id='.$this->id. $get_params .$linkclose;
- }
- if ($option == 'expedition') {
- $link = '<a href="'.DOL_URL_ROOT.'/expedition/propal.php?id='.$this->id. $get_params .$linkclose;
- }
- if ($option == 'document') {
- $link = '<a href="'.DOL_URL_ROOT.'/comm/propal/document.php?id='.$this->id. $get_params .$linkclose;
- }
- $linkend='</a>';
- $picto='propal';
- if ($withpicto)
- $result.=($link.img_object($label, $picto, 'class="classfortooltip"').$linkend);
- if ($withpicto && $withpicto != 2)
- $result.=' ';
- $result.=$link.$this->ref.$linkend;
- return $result;
- }
- /**
- * Retrieve an array of propal lines
- *
- * @return int >0 if OK, <0 if KO
- */
- function getLinesArray()
- {
- // For other object, here we call fetch_lines. But fetch_lines does not exists on proposal
-
- $sql = 'SELECT pt.rowid, pt.label as custom_label, pt.description, pt.fk_product, pt.fk_remise_except,';
- $sql.= ' pt.qty, pt.tva_tx, pt.remise_percent, pt.subprice, pt.info_bits,';
- $sql.= ' pt.total_ht, pt.total_tva, pt.total_ttc, pt.fk_product_fournisseur_price as fk_fournprice, pt.buy_price_ht as pa_ht, pt.special_code, pt.localtax1_tx, pt.localtax2_tx,';
- $sql.= ' pt.date_start, pt.date_end, pt.product_type, pt.rang, pt.fk_parent_line,';
- $sql.= ' pt.fk_unit,';
- $sql.= ' p.label as product_label, p.ref, p.fk_product_type, p.rowid as prodid,';
- $sql.= ' p.description as product_desc,';
- $sql.= ' p.entity';
- $sql.= ' ,pt.fk_multicurrency, pt.multicurrency_code, pt.multicurrency_subprice, pt.multicurrency_total_ht, pt.multicurrency_total_tva, pt.multicurrency_total_ttc';
- $sql.= ' FROM '.MAIN_DB_PREFIX.'propaldet as pt';
- $sql.= ' LEFT JOIN '.MAIN_DB_PREFIX.'product as p ON pt.fk_product=p.rowid';
- $sql.= ' WHERE pt.fk_propal = '.$this->id;
- $sql.= ' ORDER BY pt.rang ASC, pt.rowid';
- dol_syslog(get_class($this).'::getLinesArray', LOG_DEBUG);
- $resql = $this->db->query($sql);
- if ($resql)
- {
- $num = $this->db->num_rows($resql);
- $i = 0;
- while ($i < $num)
- {
- $obj = $this->db->fetch_object($resql);
- $this->lines[$i] = new PropaleLigne($this->db);
- $this->lines[$i]->id = $obj->rowid; // for backward compatibility
- $this->lines[$i]->rowid = $obj->rowid;
- $this->lines[$i]->label = $obj->custom_label;
- $this->lines[$i]->desc = $obj->description;
- $this->lines[$i]->description = $obj->description;
- $this->lines[$i]->fk_product = $obj->fk_product;
- $this->lines[$i]->ref = $obj->ref;
- $this->lines[$i]->product_ref = $obj->ref;
- $this->lines[$i]->entity = $obj->entity; // Product entity
- $this->lines[$i]->product_label = $obj->product_label;
- $this->lines[$i]->product_desc = $obj->product_desc;
- $this->lines[$i]->fk_product_type = $obj->fk_product_type; // deprecated
- $this->lines[$i]->product_type = $obj->product_type;
- $this->lines[$i]->qty = $obj->qty;
- $this->lines[$i]->subprice = $obj->subprice;
- $this->lines[$i]->fk_remise_except = $obj->fk_remise_except;
- $this->lines[$i]->remise_percent = $obj->remise_percent;
- $this->lines[$i]->tva_tx = $obj->tva_tx;
- $this->lines[$i]->info_bits = $obj->info_bits;
- $this->lines[$i]->total_ht = $obj->total_ht;
- $this->lines[$i]->total_tva = $obj->total_tva;
- $this->lines[$i]->total_ttc = $obj->total_ttc;
- $this->lines[$i]->fk_fournprice = $obj->fk_fournprice;
- $marginInfos = getMarginInfos($obj->subprice, $obj->remise_percent, $obj->tva_tx, $obj->localtax1_tx, $obj->localtax2_tx, $this->lines[$i]->fk_fournprice, $obj->pa_ht);
- $this->lines[$i]->pa_ht = $marginInfos[0];
- $this->lines[$i]->marge_tx = $marginInfos[1];
- $this->lines[$i]->marque_tx = $marginInfos[2];
- $this->lines[$i]->fk_parent_line = $obj->fk_parent_line;
- $this->lines[$i]->special_code = $obj->special_code;
- $this->lines[$i]->rang = $obj->rang;
- $this->lines[$i]->date_start = $this->db->jdate($obj->date_start);
- $this->lines[$i]->date_end = $this->db->jdate($obj->date_end);
- $this->lines[$i]->fk_unit = $obj->fk_unit;
-
- // Multicurrency
- $this->lines[$i]->fk_multicurrency = $obj->fk_multicurrency;
- $this->lines[$i]->multicurrency_code = $obj->multicurrency_code;
- $this->lines[$i]->multicurrency_subprice = $obj->multicurrency_subprice;
- $this->lines[$i]->multicurrency_total_ht = $obj->multicurrency_total_ht;
- $this->lines[$i]->multicurrency_total_tva = $obj->multicurrency_total_tva;
- $this->lines[$i]->multicurrency_total_ttc = $obj->multicurrency_total_ttc;
- $i++;
- }
- $this->db->free($resql);
- return 1;
- }
- else
- {
- $this->error=$this->db->error();
- return -1;
- }
- }
- /**
- * Create a document onto disk according to template module.
- *
- * @param string $modele Force model to use ('' to not force)
- * @param Translate $outputlangs Object langs to use for output
- * @param int $hidedetails Hide details of lines
- * @param int $hidedesc Hide description
- * @param int $hideref Hide ref
- * @return int 0 if KO, 1 if OK
- */
- public function generateDocument($modele, $outputlangs, $hidedetails=0, $hidedesc=0, $hideref=0)
- {
- global $conf,$langs;
- $langs->load("propale");
- // Positionne le modele sur le nom du modele a utiliser
- if (! dol_strlen($modele))
- {
- if (! empty($conf->global->PROPALE_ADDON_PDF))
- {
- $modele = $conf->global->PROPALE_ADDON_PDF;
- }
- else
- {
- $modele = 'azur';
- }
- }
- $modelpath = "core/modules/propale/doc/";
- return $this->commonGenerateDocument($modelpath, $modele, $outputlangs, $hidedetails, $hidedesc, $hideref);
- }
- /**
- * Function used to replace a thirdparty id with another one.
- *
- * @param DoliDB $db Database handler
- * @param int $origin_id Old thirdparty id
- * @param int $dest_id New thirdparty id
- * @return bool
- */
- public static function replaceThirdparty(DoliDB $db, $origin_id, $dest_id)
- {
- $tables = array(
- 'propal'
- );
- return CommonObject::commonReplaceThirdparty($db, $origin_id, $dest_id, $tables);
- }
- }
- /**
- * Class to manage commercial proposal lines
- */
- class PropaleLigne extends CommonObjectLine
- {
- public $element='propaldet';
- public $table_element='propaldet';
- var $oldline;
- // From llx_propaldet
- var $fk_propal;
- var $fk_parent_line;
- var $desc; // Description ligne
- var $fk_product; // Id produit predefini
- /**
- * @deprecated
- * @see product_type
- */
- var $fk_product_type;
- /**
- * Product type.
- * @var int
- * @see Product::TYPE_PRODUCT, Product::TYPE_SERVICE
- */
- var $product_type = Product::TYPE_PRODUCT;
- var $qty;
- var $tva_tx;
- var $subprice;
- var $remise_percent;
- var $fk_remise_except;
- var $rang = 0;
- var $fk_fournprice;
- var $pa_ht;
- var $marge_tx;
- var $marque_tx;
- var $special_code; // Tag for special lines (exlusive tags)
- // 1: frais de port
- // 2: ecotaxe
- // 3: option line (when qty = 0)
- var $info_bits = 0; // Liste d'options cumulables:
- // Bit 0: 0 si TVA normal - 1 si TVA NPR
- // Bit 1: 0 ligne normale - 1 si ligne de remise fixe
- var $total_ht; // Total HT de la ligne toute quantite et incluant la remise ligne
- var $total_tva; // Total TVA de la ligne toute quantite et incluant la remise ligne
- var $total_ttc; // Total TTC de la ligne toute quantite et incluant la remise ligne
- /**
- * @deprecated
- * @see $remise_percent, $fk_remise_except
- */
- var $remise;
- /**
- * @deprecated
- * @see subprice
- */
- var $price;
- // From llx_product
- /**
- * @deprecated
- * @see product_ref
- */
- var $ref;
- /**
- * Product reference
- * @var string
- */
- public $product_ref;
- /**
- * @deprecated
- * @see product_label
- */
- var $libelle;
- /**
- * Product label
- * @var string
- */
- public $product_label;
- /**
- * Product description
- * @var string
- */
- public $product_desc;
- var $localtax1_tx; // Local tax 1
- var $localtax2_tx; // Local tax 2
- var $localtax1_type; // Local tax 1 type
- var $localtax2_type; // Local tax 2 type
- var $total_localtax1; // Line total local tax 1
- var $total_localtax2; // Line total local tax 2
- var $date_start;
- var $date_end;
- var $skip_update_total; // Skip update price total for special lines
- // Multicurrency
- var $fk_multicurrency;
- var $multicurrency_code;
- var $multicurrency_subprice;
- var $multicurrency_total_ht;
- var $multicurrency_total_tva;
- var $multicurrency_total_ttc;
-
- /**
- * Class line Contructor
- *
- * @param DoliDB $db Database handler
- */
- function __construct($db)
- {
- $this->db= $db;
- }
- /**
- * Retrieve the propal line object
- *
- * @param int $rowid Propal line id
- * @return int <0 if KO, >0 if OK
- */
- function fetch($rowid)
- {
- $sql = 'SELECT pd.rowid, pd.fk_propal, pd.fk_parent_line, pd.fk_product, pd.label as custom_label, pd.description, pd.price, pd.qty, pd.tva_tx,';
- $sql.= ' pd.remise, pd.remise_percent, pd.fk_remise_except, pd.subprice,';
- $sql.= ' pd.info_bits, pd.total_ht, pd.total_tva, pd.total_ttc, pd.fk_product_fournisseur_price as fk_fournprice, pd.buy_price_ht as pa_ht, pd.special_code, pd.rang,';
- $sql.= ' pd.fk_unit,';
- $sql.= ' pd.localtax1_tx, pd.localtax2_tx, pd.total_localtax1, pd.total_localtax2,';
- $sql.= ' pd.fk_multicurrency, pd.multicurrency_code, pd.multicurrency_subprice, pd.multicurrency_total_ht, pd.multicurrency_total_tva, pd.multicurrency_total_ttc,';
- $sql.= ' p.ref as product_ref, p.label as product_label, p.description as product_desc,';
- $sql.= ' pd.date_start, pd.date_end, pd.product_type';
- $sql.= ' FROM '.MAIN_DB_PREFIX.'propaldet as pd';
- $sql.= ' LEFT JOIN '.MAIN_DB_PREFIX.'product as p ON pd.fk_product = p.rowid';
- $sql.= ' WHERE pd.rowid = '.$rowid;
- $result = $this->db->query($sql);
- if ($result)
- {
- $objp = $this->db->fetch_object($result);
- $this->id = $objp->rowid;
- $this->rowid = $objp->rowid; // deprecated
- $this->fk_propal = $objp->fk_propal;
- $this->fk_parent_line = $objp->fk_parent_line;
- $this->label = $objp->custom_label;
- $this->desc = $objp->description;
- $this->qty = $objp->qty;
- $this->price = $objp->price; // deprecated
- $this->subprice = $objp->subprice;
- $this->tva_tx = $objp->tva_tx;
- $this->remise = $objp->remise; // deprecated
- $this->remise_percent = $objp->remise_percent;
- $this->fk_remise_except = $objp->fk_remise_except;
- $this->fk_product = $objp->fk_product;
- $this->info_bits = $objp->info_bits;
- $this->total_ht = $objp->total_ht;
- $this->total_tva = $objp->total_tva;
- $this->total_ttc = $objp->total_ttc;
- $this->fk_fournprice = $objp->fk_fournprice;
- $marginInfos = getMarginInfos($objp->subprice, $objp->remise_percent, $objp->tva_tx, $objp->localtax1_tx, $objp->localtax2_tx, $this->fk_fournprice, $objp->pa_ht);
- $this->pa_ht = $marginInfos[0];
- $this->marge_tx = $marginInfos[1];
- $this->marque_tx = $marginInfos[2];
- $this->special_code = $objp->special_code;
- $this->product_type = $objp->product_type;
- $this->rang = $objp->rang;
- $this->ref = $objp->product_ref; // deprecated
- $this->product_ref = $objp->product_ref;
- $this->libelle = $objp->product_label; // deprecated
- $this->product_label = $objp->product_label;
- $this->product_desc = $objp->product_desc;
- $this->fk_unit = $objp->fk_unit;
- $this->date_start = $this->db->jdate($objp->date_start);
- $this->date_end = $this->db->jdate($objp->date_end);
- // Multicurrency
- $this->fk_multicurrency = $objp->fk_multicurrency;
- $this->multicurrency_code = $objp->multicurrency_code;
- $this->multicurrency_subprice = $objp->multicurrency_subprice;
- $this->multicurrency_total_ht = $objp->multicurrency_total_ht;
- $this->multicurrency_total_tva = $objp->multicurrency_total_tva;
- $this->multicurrency_total_ttc = $objp->multicurrency_total_ttc;
-
- $this->db->free($result);
- return 1;
- }
- else
- {
- return -1;
- }
- }
- /**
- * Insert object line propal in database
- *
- * @param int $notrigger 1=Does not execute triggers, 0= execuete triggers
- * @return int <0 if KO, >0 if OK
- */
- function insert($notrigger=0)
- {
- global $conf,$user;
- $error=0;
- dol_syslog(get_class($this)."::insert rang=".$this->rang);
- $pa_ht_isemptystring = (empty($this->pa_ht) && $this->pa_ht == ''); // If true, we can use a default value. If this->pa_ht = '0', we must use '0'.
-
- // Clean parameters
- if (empty($this->tva_tx)) $this->tva_tx=0;
- if (empty($this->localtax1_tx)) $this->localtax1_tx=0;
- if (empty($this->localtax2_tx)) $this->localtax2_tx=0;
- if (empty($this->localtax1_type)) $this->localtax1_type=0;
- if (empty($this->localtax2_type)) $this->localtax2_type=0;
- if (empty($this->total_localtax1)) $this->total_localtax1=0;
- if (empty($this->total_localtax2)) $this->total_localtax2=0;
- if (empty($this->rang)) $this->rang=0;
- if (empty($this->remise)) $this->remise=0;
- if (empty($this->remise_percent) || ! is_numeric($this->remise_percent)) $this->remise_percent=0;
- if (empty($this->info_bits)) $this->info_bits=0;
- if (empty($this->special_code)) $this->special_code=0;
- if (empty($this->fk_parent_line)) $this->fk_parent_line=0;
- if (empty($this->fk_fournprice)) $this->fk_fournprice=0;
- if (! is_numeric($this->qty)) $this->qty = 0;
- if (empty($this->pa_ht)) $this->pa_ht=0;
- // if buy price not defined, define buyprice as configured in margin admin
- if ($this->pa_ht == 0 && $pa_ht_isemptystring)
- {
- if (($result = $this->defineBuyPrice($this->subprice, $this->remise_percent, $this->fk_product)) < 0)
- {
- return $result;
- }
- else
- {
- $this->pa_ht = $result;
- }
- }
- // Check parameters
- if ($this->product_type < 0) return -1;
- $this->db->begin();
- // Insert line into database
- $sql = 'INSERT INTO '.MAIN_DB_PREFIX.'propaldet';
- $sql.= ' (fk_propal, fk_parent_line, label, description, fk_product, product_type,';
- $sql.= ' fk_remise_except, qty, tva_tx, localtax1_tx, localtax2_tx, localtax1_type, localtax2_type,';
- $sql.= ' subprice, remise_percent, ';
- $sql.= ' info_bits, ';
- $sql.= ' total_ht, total_tva, total_localtax1, total_localtax2, total_ttc, fk_product_fournisseur_price, buy_price_ht, special_code, rang,';
- $sql.= ' fk_unit,';
- $sql.= ' date_start, date_end';
- $sql.= ', fk_multicurrency, multicurrency_code, multicurrency_subprice, multicurrency_total_ht, multicurrency_total_tva, multicurrency_total_ttc)';
- $sql.= " VALUES (".$this->fk_propal.",";
- $sql.= " ".($this->fk_parent_line>0?"'".$this->fk_parent_line."'":"null").",";
- $sql.= " ".(! empty($this->label)?"'".$this->db->escape($this->label)."'":"null").",";
- $sql.= " '".$this->db->escape($this->desc)."',";
- $sql.= " ".($this->fk_product?"'".$this->fk_product."'":"null").",";
- $sql.= " '".$this->product_type."',";
- $sql.= " ".($this->fk_remise_except?"'".$this->fk_remise_except."'":"null").",";
- $sql.= " ".price2num($this->qty).",";
- $sql.= " ".price2num($this->tva_tx).",";
- $sql.= " ".price2num($this->localtax1_tx).",";
- $sql.= " ".price2num($this->localtax2_tx).",";
- $sql.= " '".$this->localtax1_type."',";
- $sql.= " '".$this->localtax2_type."',";
- $sql.= " ".($this->subprice?price2num($this->subprice):"null").",";
- $sql.= " ".price2num($this->remise_percent).",";
- $sql.= " ".(isset($this->info_bits)?"'".$this->info_bits."'":"null").",";
- $sql.= " ".price2num($this->total_ht).",";
- $sql.= " ".price2num($this->total_tva).",";
- $sql.= " ".price2num($this->total_localtax1).",";
- $sql.= " ".price2num($this->total_localtax2).",";
- $sql.= " ".price2num($this->total_ttc).",";
- $sql.= " ".(!empty($this->fk_fournprice)?"'".$this->fk_fournprice."'":"null").",";
- $sql.= " ".(isset($this->pa_ht)?"'".price2num($this->pa_ht)."'":"null").",";
- $sql.= ' '.$this->special_code.',';
- $sql.= ' '.$this->rang.',';
- $sql.= ' '.(!$this->fk_unit ? 'NULL' : $this->fk_unit).',';
- $sql.= " ".(! empty($this->date_start)?"'".$this->db->idate($this->date_start)."'":"null").',';
- $sql.= " ".(! empty($this->date_end)?"'".$this->db->idate($this->date_end)."'":"null");
- $sql.= ", ".($this->fk_multicurrency > 0?$this->fk_multicurrency:'null');
- $sql.= ", '".$this->db->escape($this->multicurrency_code)."'";
- $sql.= ", ".$this->multicurrency_subprice;
- $sql.= ", ".$this->multicurrency_total_ht;
- $sql.= ", ".$this->multicurrency_total_tva;
- $sql.= ", ".$this->multicurrency_total_ttc;
- $sql.= ')';
- dol_syslog(get_class($this).'::insert', LOG_DEBUG);
- $resql=$this->db->query($sql);
- if ($resql)
- {
- $this->rowid=$this->db->last_insert_id(MAIN_DB_PREFIX.'propaldet');
- if (empty($conf->global->MAIN_EXTRAFIELDS_DISABLED)) // For avoid conflicts if trigger used
- {
- $this->id=$this->rowid;
- $result=$this->insertExtraFields();
- if ($result < 0)
- {
- $error++;
- }
- }
- if (! $notrigger)
- {
- // Call trigger
- $result=$this->call_trigger('LINEPROPAL_INSERT',$user);
- if ($result < 0)
- {
- $this->db->rollback();
- return -1;
- }
- // End call triggers
- }
- $this->db->commit();
- return 1;
- }
- else
- {
- $this->error=$this->db->error()." sql=".$sql;
- $this->db->rollback();
- return -1;
- }
- }
- /**
- * Delete line in database
- *
- * @return int <0 if ko, >0 if ok
- */
- function delete()
- {
- global $conf,$user;
- $error=0;
- $this->db->begin();
- $sql = "DELETE FROM ".MAIN_DB_PREFIX."propaldet WHERE rowid = ".$this->rowid;
- dol_syslog("PropaleLigne::delete", LOG_DEBUG);
- if ($this->db->query($sql) )
- {
- // Remove extrafields
- if ((! $error) && (empty($conf->global->MAIN_EXTRAFIELDS_DISABLED))) // For avoid conflicts if trigger used
- {
- $this->id=$this->rowid;
- $result=$this->deleteExtraFields();
- if ($result < 0)
- {
- $error++;
- dol_syslog(get_class($this)."::delete error -4 ".$this->error, LOG_ERR);
- }
- }
- // Call trigger
- $result=$this->call_trigger('LINEPROPAL_DELETE',$user);
- if ($result < 0)
- {
- $this->db->rollback();
- return -1;
- }
- // End call triggers
- $this->db->commit();
- return 1;
- }
- else
- {
- $this->error=$this->db->error()." sql=".$sql;
- $this->db->rollback();
- return -1;
- }
- }
- /**
- * Update propal line object into DB
- *
- * @param int $notrigger 1=Does not execute triggers, 0= execute triggers
- * @return int <0 if ko, >0 if ok
- */
- function update($notrigger=0)
- {
- global $conf,$user;
- $error=0;
- $pa_ht_isemptystring = (empty($this->pa_ht) && $this->pa_ht == ''); // If true, we can use a default value. If this->pa_ht = '0', we must use '0'.
-
- // Clean parameters
- if (empty($this->tva_tx)) $this->tva_tx=0;
- if (empty($this->localtax1_tx)) $this->localtax1_tx=0;
- if (empty($this->localtax2_tx)) $this->localtax2_tx=0;
- if (empty($this->total_localtax1)) $this->total_localtax1=0;
- if (empty($this->total_localtax2)) $this->total_localtax2=0;
- if (empty($this->localtax1_type)) $this->localtax1_type=0;
- if (empty($this->localtax2_type)) $this->localtax2_type=0;
- if (empty($this->marque_tx)) $this->marque_tx=0;
- if (empty($this->marge_tx)) $this->marge_tx=0;
- if (empty($this->price)) $this->price=0; // TODO A virer
- if (empty($this->remise)) $this->remise=0; // TODO A virer
- if (empty($this->remise_percent)) $this->remise_percent=0;
- if (empty($this->info_bits)) $this->info_bits=0;
- if (empty($this->special_code)) $this->special_code=0;
- if (empty($this->fk_parent_line)) $this->fk_parent_line=0;
- if (empty($this->fk_fournprice)) $this->fk_fournprice=0;
- if (empty($this->subprice)) $this->subprice=0;
- if (empty($this->pa_ht)) $this->pa_ht=0;
- // if buy price not defined, define buyprice as configured in margin admin
- if ($this->pa_ht == 0 && $pa_ht_isemptystring)
- {
- if (($result = $this->defineBuyPrice($this->subprice, $this->remise_percent, $this->fk_product)) < 0)
- {
- return $result;
- }
- else
- {
- $this->pa_ht = $result;
- }
- }
- $this->db->begin();
- // Mise a jour ligne en base
- $sql = "UPDATE ".MAIN_DB_PREFIX."propaldet SET";
- $sql.= " description='".$this->db->escape($this->desc)."'";
- $sql.= " , label=".(! empty($this->label)?"'".$this->db->escape($this->label)."'":"null");
- $sql.= " , product_type=".$this->product_type;
- $sql.= " , tva_tx='".price2num($this->tva_tx)."'";
- $sql.= " , localtax1_tx=".price2num($this->localtax1_tx);
- $sql.= " , localtax2_tx=".price2num($this->localtax2_tx);
- $sql.= " , localtax1_type='".$this->localtax1_type."'";
- $sql.= " , localtax2_type='".$this->localtax2_type."'";
- $sql.= " , qty='".price2num($this->qty)."'";
- $sql.= " , subprice=".price2num($this->subprice)."";
- $sql.= " , remise_percent=".price2num($this->remise_percent)."";
- $sql.= " , price=".price2num($this->price).""; // TODO A virer
- $sql.= " , remise=".price2num($this->remise).""; // TODO A virer
- $sql.= " , info_bits='".$this->info_bits."'";
- if (empty($this->skip_update_total))
- {
- $sql.= " , total_ht=".price2num($this->total_ht)."";
- $sql.= " , total_tva=".price2num($this->total_tva)."";
- $sql.= " , total_ttc=".price2num($this->total_ttc)."";
- $sql.= " , total_localtax1=".price2num($this->total_localtax1)."";
- $sql.= " , total_localtax2=".price2num($this->total_localtax2)."";
- }
- $sql.= " , fk_product_fournisseur_price=".(! empty($this->fk_fournprice)?"'".$this->fk_fournprice."'":"null");
- $sql.= " , buy_price_ht=".price2num($this->pa_ht);
- if (strlen($this->special_code)) $sql.= " , special_code=".$this->special_code;
- $sql.= " , fk_parent_line=".($this->fk_parent_line>0?$this->fk_parent_line:"null");
- if (! empty($this->rang)) $sql.= ", rang=".$this->rang;
- $sql.= " , date_start=".(! empty($this->date_start)?"'".$this->db->idate($this->date_start)."'":"null");
- $sql.= " , date_end=".(! empty($this->date_end)?"'".$this->db->idate($this->date_end)."'":"null");
- $sql.= " , fk_unit=".(!$this->fk_unit ? 'NULL' : $this->fk_unit);
-
- // Multicurrency
- $sql.= " , multicurrency_subprice=".price2num($this->multicurrency_subprice)."";
- $sql.= " , multicurrency_total_ht=".price2num($this->multicurrency_total_ht)."";
- $sql.= " , multicurrency_total_tva=".price2num($this->multicurrency_total_tva)."";
- $sql.= " , multicurrency_total_ttc=".price2num($this->multicurrency_total_ttc)."";
-
- $sql.= " WHERE rowid = ".$this->rowid;
- dol_syslog(get_class($this)."::update", LOG_DEBUG);
- $resql=$this->db->query($sql);
- if ($resql)
- {
- if (empty($conf->global->MAIN_EXTRAFIELDS_DISABLED)) // For avoid conflicts if trigger used
- {
- $this->id=$this->rowid;
- $result=$this->insertExtraFields();
- if ($result < 0)
- {
- $error++;
- }
- }
- if (! $notrigger)
- {
- // Call trigger
- $result=$this->call_trigger('LINEPROPAL_UPDATE',$user);
- if ($result < 0)
- {
- $this->db->rollback();
- return -1;
- }
- // End call triggers
- }
- $this->db->commit();
- return 1;
- }
- else
- {
- $this->error=$this->db->error();
- $this->db->rollback();
- return -2;
- }
- }
- /**
- * Update DB line fields total_xxx
- * Used by migration
- *
- * @return int <0 if ko, >0 if ok
- */
- function update_total()
- {
- $this->db->begin();
- // Mise a jour ligne en base
- $sql = "UPDATE ".MAIN_DB_PREFIX."propaldet SET";
- $sql.= " total_ht=".price2num($this->total_ht,'MT')."";
- $sql.= ",total_tva=".price2num($this->total_tva,'MT')."";
- $sql.= ",total_ttc=".price2num($this->total_ttc,'MT')."";
- $sql.= " WHERE rowid = ".$this->rowid;
- dol_syslog("PropaleLigne::update_total", LOG_DEBUG);
- $resql=$this->db->query($sql);
- if ($resql)
- {
- $this->db->commit();
- return 1;
- }
- else
- {
- $this->error=$this->db->error();
- $this->db->rollback();
- return -2;
- }
- }
- }
|