30require_once DOL_DOCUMENT_ROOT.
'/core/class/commonobject.class.php';
42 public $element =
'tva';
47 public $table_element =
'tva';
52 public $picto =
'payment';
125 public $fk_user_creat;
130 public $fk_user_modif;
135 public $paiementtype;
138 const STATUS_UNPAID = 0;
139 const STATUS_PAID = 1;
160 global
$conf, $langs;
166 $this->amount = (float)
price2num($this->amount);
167 $this->label = trim($this->label);
168 $this->type_payment = (int) $this->type_payment;
169 $this->note = trim($this->note);
170 $this->fk_account = (int) $this->fk_account;
171 $this->fk_user_creat = (int) $this->fk_user_creat;
172 $this->fk_user_modif = (int) $this->fk_user_modif;
180 $sql =
"INSERT INTO ".MAIN_DB_PREFIX.
"tva(";
188 $sql .=
"fk_account,";
189 $sql .=
"fk_typepayment,";
190 $sql .=
"fk_user_creat,";
191 $sql .=
"fk_user_modif";
192 $sql .=
") VALUES (";
193 $sql .=
" ".((int)
$conf->entity).
", ";
194 $sql .=
" '".$this->db->idate($now).
"',";
195 $sql .=
" '".$this->db->idate($this->datep).
"',";
196 $sql .=
" '".$this->db->idate($this->datev).
"',";
197 $sql .=
" '".$this->db->escape((
string) $this->amount).
"',";
198 $sql .=
" '".$this->db->escape($this->label).
"',";
199 $sql .=
" '".$this->db->escape($this->note).
"',";
200 $sql .=
" '".$this->db->escape((
string) $this->fk_account).
"',";
201 $sql .=
" '".$this->db->escape((
string) $this->type_payment).
"',";
202 $sql .=
" ".($this->fk_user_creat > 0 ? (int) $this->fk_user_creat : (int) $user->id).
",";
203 $sql .=
" ".($this->fk_user_modif > 0 ? (int) $this->fk_user_modif : (int) $user->id);
206 dol_syslog(get_class($this).
"::create", LOG_DEBUG);
207 $resql = $this->db->query($sql);
209 $this->
id = $this->db->last_insert_id(MAIN_DB_PREFIX.
"tva");
222 $this->db->rollback();
226 $this->error =
"Error ".$this->db->lasterror();
227 $this->db->rollback();
239 public function update($user, $notrigger = 0)
241 global
$conf, $langs;
246 $this->amount = (float)
price2num($this->amount);
247 $this->label = trim($this->label);
248 $this->note = trim($this->note);
249 $this->fk_user_creat = (int) $this->fk_user_creat;
250 $this->fk_user_modif = (int) $this->fk_user_modif;
258 $sql =
"UPDATE ".MAIN_DB_PREFIX.
"tva SET";
259 $sql .=
" tms='".$this->db->idate($this->tms).
"',";
260 $sql .=
" datep='".$this->db->idate($this->datep).
"',";
261 $sql .=
" datev='".$this->db->idate($this->datev).
"',";
262 $sql .=
" amount=".price2num($this->amount).
",";
263 $sql .=
" label='".$this->db->escape($this->label).
"',";
264 $sql .=
" note='".$this->db->escape($this->note).
"',";
265 $sql .=
" fk_user_creat=".((int) $this->fk_user_creat).
",";
266 $sql .=
" fk_user_modif=".((int) ($this->fk_user_modif > 0 ? $this->fk_user_modif : $user->id));
267 $sql .=
" WHERE rowid=".((int) $this->
id);
269 dol_syslog(get_class($this).
"::update", LOG_DEBUG);
270 $resql = $this->db->query($sql);
272 $this->error =
"Error ".$this->db->lasterror();
276 if (!$error && !$notrigger) {
289 $this->db->rollback();
303 $sql =
"UPDATE ".MAIN_DB_PREFIX.
"tva SET";
305 $sql .=
" WHERE rowid = ".((int) $this->
id);
306 $resql = $this->db->query($sql);
323 $sql =
"UPDATE ".MAIN_DB_PREFIX.
"tva SET";
325 $sql .=
" WHERE rowid = ".((int) $this->
id);
326 $resql = $this->db->query($sql);
342 public function fetch($id, $ref =
'')
349 $sql .=
" t.amount,";
350 $sql .=
" t.fk_typepayment,";
351 $sql .=
" t.num_payment,";
355 $sql .=
" t.fk_user_creat,";
356 $sql .=
" t.fk_user_modif,";
357 $sql .=
" t.fk_account";
358 $sql .=
" FROM ".MAIN_DB_PREFIX.
"tva as t";
359 $sql .=
" WHERE t.rowid = ".((int) $id);
361 dol_syslog(get_class($this).
"::fetch", LOG_DEBUG);
363 $resql = $this->db->query($sql);
365 if ($this->db->num_rows($resql)) {
366 $obj = $this->db->fetch_object($resql);
368 $this->
id = $obj->rowid;
369 $this->
ref = $obj->rowid;
370 $this->tms = $this->db->jdate($obj->tms);
371 $this->datep = $this->db->jdate($obj->datep);
372 $this->datev = $this->db->jdate($obj->datev);
373 $this->amount = $obj->amount;
374 $this->type_payment = $obj->fk_typepayment;
375 $this->num_payment = $obj->num_payment;
376 $this->label = $obj->label;
377 $this->paye = $obj->paye;
378 $this->note = $obj->note;
379 $this->fk_user_creat = $obj->fk_user_creat;
380 $this->fk_user_modif = $obj->fk_user_modif;
381 $this->fk_account = $obj->fk_account;
382 $this->fk_type = empty($obj->fk_type) ?
"" : $obj->fk_type;
383 $this->rappro = empty($obj->rappro) ?
"" : $obj->rappro;
385 $this->db->free($resql);
389 $this->error =
"Error ".$this->db->lasterror();
405 if ($totalpaid < 0) {
408 return (empty($totalpaid) ? 1 : 0);
417 public function delete($user)
419 global
$conf, $langs;
424 $this->error =
'ErrorRecordHasChildren';
435 $sql =
"DELETE FROM ".MAIN_DB_PREFIX.
"tva";
436 $sql .=
" WHERE rowid=".((int) $this->
id);
438 dol_syslog(get_class($this).
"::delete", LOG_DEBUG);
439 $resql = $this->db->query($sql);
441 $this->error =
"Error ".$this->db->lasterror();
464 $this->amount = 100.0;
468 $this->fk_user_creat = 0;
469 $this->fk_user_modif = 0;
488 $solde = $reglee - ($collectee - $payee);
504 $sql =
"SELECT sum(f.total_tva) as amount";
505 $sql .=
" FROM ".MAIN_DB_PREFIX.
"facture as f WHERE f.paye = 1";
507 $sql .=
" AND f.datef >= '".((int) $year).
"-01-01' AND f.datef <= '".((int) $year).
"-12-31' ";
510 $result = $this->db->query($sql);
512 if ($this->db->num_rows($result)) {
513 $obj = $this->db->fetch_object($result);
515 $this->db->free($result);
518 $this->db->free($result);
522 print $this->db->lasterror();
538 $sql =
"SELECT sum(f.total_tva) as total_tva";
539 $sql .=
" FROM ".MAIN_DB_PREFIX.
"facture_fourn as f";
541 $sql .=
" WHERE f.datef >= '".((int) $year).
"-01-01' AND f.datef <= '".((int) $year).
"-12-31' ";
544 $result = $this->db->query($sql);
546 if ($this->db->num_rows($result)) {
547 $obj = $this->db->fetch_object($result);
548 $ret = $obj->total_tva;
549 $this->db->free($result);
552 $this->db->free($result);
556 print $this->db->lasterror();
573 $sql =
"SELECT sum(f.amount) as amount";
574 $sql .=
" FROM ".MAIN_DB_PREFIX.
"tva as f";
577 $sql .=
" WHERE f.datev >= '".((int) $year).
"-01-01' AND f.datev <= '".((int) $year).
"-12-31' ";
580 $result = $this->db->query($sql);
582 if ($this->db->num_rows($result)) {
583 $obj = $this->db->fetch_object($result);
585 $this->db->free($result);
588 $this->db->free($result);
592 print $this->db->lasterror();
606 global
$conf, $langs;
611 $this->amount = (float)
price2num($this->amount);
612 $this->label = trim($this->label);
613 $this->note = trim($this->note);
614 $this->num_payment = trim($this->num_payment);
615 $this->fk_bank = (int) $this->fk_bank;
616 $this->fk_user_creat = (int) $this->fk_user_creat;
617 $this->fk_user_modif = (int) $this->fk_user_modif;
618 if (empty($this->datec)) {
624 $this->error = $langs->trans(
"ErrorFieldRequired", $langs->transnoentities(
"Label"));
627 if ($this->amount ==
'') {
628 $this->error = $langs->trans(
"ErrorFieldRequired", $langs->transnoentities(
"Amount"));
631 if (isModEnabled(
"bank") && (empty($this->accountid) || $this->accountid <= 0)) {
632 $this->error = $langs->trans(
"ErrorFieldRequired", $langs->transnoentities(
"BankAccount"));
635 if (isModEnabled(
"bank") && (empty($this->type_payment) || $this->type_payment <= 0)) {
636 $this->error = $langs->trans(
"ErrorFieldRequired", $langs->transnoentities(
"PaymentMode"));
641 $sql =
"INSERT INTO ".MAIN_DB_PREFIX.
"tva (";
646 $sql .=
", fk_typepayment";
647 $sql .=
", num_payment";
654 $sql .=
", fk_user_creat";
659 $sql .=
" '".$this->db->idate($this->datec).
"'";
660 $sql .=
", '".$this->db->idate($this->datep).
"'";
661 $sql .=
", '".$this->db->idate($this->datev).
"'";
662 $sql .=
", ".((float) $this->amount);
663 $sql .=
", '".$this->db->escape((
string) $this->type_payment).
"'";
664 $sql .=
", '".$this->db->escape($this->num_payment).
"'";
666 $sql .=
", '".$this->db->escape($this->note).
"'";
669 $sql .=
", '".$this->db->escape($this->label).
"'";
671 $sql .=
", '".$this->db->escape((
string) $user->id).
"'";
673 $sql .=
", ".((int)
$conf->entity);
676 dol_syslog(get_class($this).
"::addPayment", LOG_DEBUG);
677 $result = $this->db->query($sql);
679 $this->
id = $this->db->last_insert_id(MAIN_DB_PREFIX.
"tva");
692 if (isModEnabled(
"bank") && !empty($this->amount)) {
694 require_once DOL_DOCUMENT_ROOT.
'/compta/bank/class/account.class.php';
697 $result = $acc->fetch($this->accountid);
702 if ($this->amount > 0) {
703 $bank_line_id = $acc->addline($this->datep, (
string) $this->type_payment, $this->label, -abs((
float) $this->amount), $this->num_payment, 0, $user);
705 $bank_line_id = $acc->addline($this->datep, (
string) $this->type_payment, $this->label, abs((
float) $this->amount), $this->num_payment, 0, $user);
709 if ($bank_line_id > 0) {
712 $this->error = $acc->error;
717 $result = $acc->add_url_line($bank_line_id, $this->
id, DOL_URL_ROOT.
'/compta/tva/card.php?id=',
"(VATPayment)",
"payment_vat");
719 $this->error = $acc->error;
728 $this->db->rollback();
732 $this->db->rollback();
736 $this->error = $this->db->error();
737 $this->db->rollback();
752 $sql =
'UPDATE '.MAIN_DB_PREFIX.
'tva SET fk_bank = '.(int) $id_bank;
753 $sql .=
' WHERE rowid = '.(int) $this->
id;
754 $result = $this->db->query($sql);
773 public function getNomUrl($withpicto = 0, $option =
'', $notooltip = 0, $morecss =
'', $save_lastsearch_value = -1)
775 global $langs,
$conf;
777 if (!empty(
$conf->dol_no_mouse_hover)) {
783 $label =
'<u>'.$langs->trans(
"ShowVatPayment").
'</u>';
785 $label .=
'<b>'.$langs->trans(
'Ref').
':</b> '.$this->ref;
786 if (!empty($this->label)) {
787 $label .=
'<br><b>'.$langs->trans(
'Label').
':</b> '.$this->label;
790 $url = DOL_URL_ROOT.
'/compta/tva/card.php?id='.$this->id;
792 if ($option !=
'nolink') {
794 $add_save_lastsearch_values = ($save_lastsearch_value == 1 ? 1 : 0);
795 if ($save_lastsearch_value == -1 && isset($_SERVER[
"PHP_SELF"]) && preg_match(
'/list\.php/', $_SERVER[
"PHP_SELF"])) {
796 $add_save_lastsearch_values = 1;
798 if ($add_save_lastsearch_values) {
799 $url .=
'&save_lastsearch_values=1';
804 if (empty($notooltip)) {
806 $label = $langs->trans(
"ShowMyObject");
807 $linkclose .=
' alt="'.dolPrintHTMLForAttribute($label).
'"';
809 $linkclose .=
' title="'.dolPrintHTMLForAttribute($label).
'"';
810 $linkclose .=
' class="classfortooltip'.($morecss ?
' '.$morecss :
'').
'"';
812 $linkclose = ($morecss ?
' class="'.$morecss.
'"' :
'');
815 $linkstart =
'<a href="'.$url.
'"';
816 $linkstart .= $linkclose.
'>';
821 $result .= $linkstart;
823 $result .=
img_object(($notooltip ?
'' : $label), ($this->picto ? $this->picto :
'generic'), ($notooltip ? (($withpicto != 2) ?
'class="paddingright"' :
'') :
'class="'.(($withpicto != 2) ?
'paddingright ' :
'').
'classfortooltip"'), 0, 0, $notooltip ? 0 : 1);
825 if ($withpicto != 2) {
826 $result .= $this->ref;
840 $table =
'payment_vat';
843 $sql =
'SELECT sum(amount) as amount';
844 $sql .=
' FROM '.MAIN_DB_PREFIX.$table;
845 $sql .=
" WHERE ".$field.
" = ".((int) $this->
id);
847 dol_syslog(get_class($this).
"::getSommePaiement", LOG_DEBUG);
848 $resql = $this->db->query($sql);
852 $obj = $this->db->fetch_object($resql);
854 $amount = $obj->amount ? $obj->amount : 0;
857 $this->db->free($resql);
872 $sql =
"SELECT t.rowid, t.tms, t.fk_user_modif, t.datec, t.fk_user_creat";
873 $sql .=
" FROM ".MAIN_DB_PREFIX.
"tva as t";
874 $sql .=
" WHERE t.rowid = ".(int) $id;
876 dol_syslog(get_class($this).
"::info", LOG_DEBUG);
877 $result = $this->db->query($sql);
879 if ($this->db->num_rows($result)) {
880 $obj = $this->db->fetch_object($result);
882 $this->
id = $obj->rowid;
884 $this->user_creation_id = $obj->fk_user_creat;
885 $this->user_modification_id = $obj->fk_user_modif;
886 $this->date_creation = $this->db->jdate($obj->datec);
887 $this->date_modification = $this->db->jdate($obj->tms);
890 $this->db->free($result);
905 return $this->
LibStatut($this->paye, $mode, $alreadypaid);
917 public function LibStatut($status, $mode = 0, $alreadypaid = -1)
923 $langs->loadLangs(array(
"customers",
"bills"));
926 $this->labelStatus = array();
927 $this->labelStatusShort = array();
929 if (empty($this->labelStatus) || empty($this->labelStatusShort)) {
932 $this->labelStatus[self::STATUS_UNPAID] = $langs->transnoentitiesnoconv(
'BillStatusNotPaid');
933 $this->labelStatus[self::STATUS_PAID] = $langs->transnoentitiesnoconv(
'BillStatusPaid');
934 if ($status == self::STATUS_UNPAID && $alreadypaid != 0) {
935 $this->labelStatus[self::STATUS_UNPAID] = $langs->transnoentitiesnoconv(
"BillStatusStarted");
937 $this->labelStatusShort[self::STATUS_UNPAID] = $langs->transnoentitiesnoconv(
'BillStatusNotPaid');
938 $this->labelStatusShort[self::STATUS_PAID] = $langs->transnoentitiesnoconv(
'BillStatusPaid');
939 if ($status == self::STATUS_UNPAID && $alreadypaid != 0) {
940 $this->labelStatusShort[self::STATUS_UNPAID] = $langs->transnoentitiesnoconv(
"BillStatusStarted");
944 $statusType =
'status1';
945 if ($status == 0 && $alreadypaid != 0) {
946 $statusType =
'status3';
949 $statusType =
'status6';
952 return dolGetStatus($this->labelStatus[$status], $this->labelStatusShort[$status],
'', $statusType, $mode);
966 $selected = (empty($arraydata[
'selected']) ? 0 : $arraydata[
'selected']);
968 $return =
'<div class="box-flex-item box-flex-grow-zero">';
969 $return .=
'<div class="info-box info-box-sm">';
970 $return .=
'<span class="info-box-icon bg-infobox-action">';
973 $return .=
'</span>';
974 $return .=
'<div class="info-box-content">';
975 $return .=
'<span class="info-box-ref inline-block tdoverflowmax150 valignmiddle">'.(method_exists($this,
'getNomUrl') ? $this->
getNomUrl(1) : $this->ref).
'</span>';
976 if ($selected >= 0) {
977 $return .=
'<input id="cb'.$this->id.
'" class="flat checkforselect fright" type="checkbox" name="toselect[]" value="'.$this->
id.
'"'.($selected ?
' checked="checked"' :
'').
'>';
979 if (property_exists($this,
'amount')) {
980 $return .=
' | <span class="opacitymedium">'.$langs->trans(
"Amount").
'</span> : <span class="info-box-label amount">'.
price($this->amount).
'</span>';
982 if (property_exists($this,
'type_payment')) {
983 $return .=
'<br><span class="opacitymedium">'.$langs->trans(
"Payement").
'</span> : <span class="info-box-label">'.$this->type_payment.
'</span>';
985 if (property_exists($this,
'datev')) {
986 $return .=
'<br><span class="opacitymedium">'.$langs->trans(
"DateEnd").
'</span> : <span class="info-box-label" >'.
dol_print_date($this->datev).
'</span>';
988 if (method_exists($this,
'LibStatut')) {
989 $return .=
'<br><div class="info-box-status margintoponly">'.$this->getLibStatut(3, $this->alreadypaid).
'</div>';
Class to manage bank accounts.
Parent class of all other business classes (invoices, contracts, proposals, orders,...
call_trigger($triggerName, $user)
Call trigger based on this instance.
Class to manage VAT - Value-added tax (also known in French as TVA - Taxe sur la valeur ajoutée)
is_erasable()
Return if a VAT declaration can be deleted: not once a payment exists, as for invoices.
getKanbanView($option='', $arraydata=null)
Return clickable link of object (with eventually picto)
tva_sum_collectee($year=0)
Total of the VAT from invoices emitted by the thirdparty.
LibStatut($status, $mode=0, $alreadypaid=-1)
Return the label of a given VAT status.
tva_sum_payee($year=0)
VAT paid.
setUnpaid($user)
Remove tag paid on TVA.
__construct($db)
Constructor.
update($user, $notrigger=0)
Update database.
solde($year=0)
Balance of VAT.
getSommePaiement()
Return amount of payments already done.
addPayment($user)
Create in database.
getLibStatut($mode=0, $alreadypaid=-1)
Return the label of the VAT status f object.
getNomUrl($withpicto=0, $option='', $notooltip=0, $morecss='', $save_lastsearch_value=-1)
Send name clickable (with possibly the picto)
fetch($id, $ref='')
Load object in memory from database.
update_fk_bank($id_bank)
Update link between payment tva and line generate into llx_bank.
setPaid($user)
Tag TVA as paid completely.
initAsSpecimen()
Initialise an instance with random values.
info($id)
Information of vat payment object.
create($user)
Create in database.
tva_sum_reglee($year=0)
Total of the VAT paid.
img_picto($titlealt, $picto, $moreatt='', $pictoisfullpath=0, $srconly=0, $notitle=0, $alt='', $morecss='', $marginleftonlyshort=2, $allowothertags=array())
Show picto whatever it's its name (generic function)
price2num($amount, $rounding='', $option=0)
Function that return a number with universal decimal format (decimal separator is '.
img_object($titlealt, $picto, $moreatt='', $pictoisfullpath=0, $srconly=0, $notitle=0, $allowothertags=array())
Show a picto called object_picto (generic function)
price($amount, $form=0, $outlangs='', $trunc=1, $rounding=-1, $forcerounding=-1, $currency_code='')
Function to format a value into an amount for visual output Function used into PDF and HTML pages.
dol_now($mode='auto')
Return date for now.
dol_print_date($time, $format='', $tzoutput='auto', $outputlangs=null, $encodetooutput=false)
Output date in a string format according to outputlangs (or langs if not defined).
dolGetStatus($statusLabel='', $statusLabelShort='', $html='', $statusType='status0', $displayMode=0, $url='', $params=array())
Output the badge of a status.
dol_print_error($db=null, $error='', $errors=null)
Displays error message system with all the information to facilitate the diagnosis and the escalation...
getDolGlobalString($key, $default='')
Return a Dolibarr global constant string value.
dol_syslog($message, $level=LOG_INFO, $ident=0, $suffixinfilename='', $restricttologhandler='', $logcontext=null)
Write log message into outputs.
global $conf
The following vars must be defined: $type2label $form $conf, $lang, The following vars may also be de...