31require_once DOL_DOCUMENT_ROOT.
'/core/class/commonobject.class.php';
43 public $element =
'tva';
48 public $table_element =
'tva';
53 public $picto =
'payment';
126 public $fk_user_creat;
131 public $fk_user_modif;
136 public $paiementtype;
139 const STATUS_UNPAID = 0;
140 const STATUS_PAID = 1;
161 global
$conf, $langs;
168 $this->label = trim($this->label);
169 $this->type_payment = (int) $this->type_payment;
170 $this->note = trim($this->note);
171 $this->fk_account = (int) $this->fk_account;
172 $this->fk_user_creat = (int) $this->fk_user_creat;
173 $this->fk_user_modif = (int) $this->fk_user_modif;
181 $sql =
"INSERT INTO ".MAIN_DB_PREFIX.
"tva(";
189 $sql .=
"fk_account,";
190 $sql .=
"fk_typepayment,";
191 $sql .=
"fk_user_creat,";
192 $sql .=
"fk_user_modif";
193 $sql .=
") VALUES (";
194 $sql .=
" ".((int)
$conf->entity).
", ";
195 $sql .=
" '".$this->db->idate($now).
"',";
196 $sql .=
" '".$this->db->idate($this->datep).
"',";
197 $sql .=
" '".$this->db->idate($this->datev).
"',";
198 $sql .=
" '".$this->db->escape((
string) $this->
amount).
"',";
199 $sql .=
" '".$this->db->escape($this->label).
"',";
200 $sql .=
" '".$this->db->escape($this->note).
"',";
201 $sql .=
" '".$this->db->escape((
string) $this->fk_account).
"',";
202 $sql .=
" '".$this->db->escape((
string) $this->type_payment).
"',";
203 $sql .=
" ".($this->fk_user_creat > 0 ? (int) $this->fk_user_creat : (int) $user->id).
",";
204 $sql .=
" ".($this->fk_user_modif > 0 ? (int) $this->fk_user_modif : (int) $user->id);
207 dol_syslog(get_class($this).
"::create", LOG_DEBUG);
208 $resql = $this->db->query($sql);
210 $this->
id = $this->db->last_insert_id(MAIN_DB_PREFIX.
"tva");
213 $result = $this->call_trigger(
'TVA_CREATE', $user);
223 $this->db->rollback();
227 $this->error =
"Error ".$this->db->lasterror();
228 $this->db->rollback();
240 public function update($user, $notrigger = 0)
242 global
$conf, $langs;
248 $this->label = trim($this->label);
249 $this->note = trim($this->note);
250 $this->fk_user_creat = (int) $this->fk_user_creat;
251 $this->fk_user_modif = (int) $this->fk_user_modif;
259 $sql =
"UPDATE ".MAIN_DB_PREFIX.
"tva SET";
260 if (!empty($this->tms)) {
261 $sql .=
" tms='".$this->db->idate($this->tms).
"',";
263 $sql .=
" datep = '".$this->db->idate($this->datep).
"',";
264 $sql .=
" datev = '".$this->db->idate($this->datev).
"',";
266 $sql .=
" label = '".$this->db->escape($this->label).
"',";
267 $sql .=
" note = '".$this->db->escape($this->note).
"',";
268 $sql .=
" fk_user_creat = ".((int) $this->fk_user_creat).
",";
269 $sql .=
" fk_user_modif = ".((int) ($this->fk_user_modif > 0 ? ((
int) $this->fk_user_modif) : ((int) $user->id)));
270 $sql .=
" WHERE rowid=".((int) $this->
id);
272 dol_syslog(get_class($this).
"::update", LOG_DEBUG);
273 $resql = $this->db->query($sql);
275 $this->error =
"Error ".$this->db->lasterror();
279 if (!$error && !$notrigger) {
281 $result = $this->call_trigger(
'TVA_MODIFY', $user);
292 $this->db->rollback();
306 $sql =
"UPDATE ".MAIN_DB_PREFIX.
"tva SET";
308 $sql .=
" WHERE rowid = ".((int) $this->
id);
309 $resql = $this->db->query($sql);
326 $sql =
"UPDATE ".MAIN_DB_PREFIX.
"tva SET";
328 $sql .=
" WHERE rowid = ".((int) $this->
id);
329 $resql = $this->db->query($sql);
345 public function fetch($id, $ref =
'')
352 $sql .=
" t.amount,";
353 $sql .=
" t.fk_typepayment,";
354 $sql .=
" t.num_payment,";
358 $sql .=
" t.fk_user_creat,";
359 $sql .=
" t.fk_user_modif,";
360 $sql .=
" t.fk_account";
361 $sql .=
" FROM ".MAIN_DB_PREFIX.
"tva as t";
362 $sql .=
" WHERE t.rowid = ".((int) $id);
364 dol_syslog(get_class($this).
"::fetch", LOG_DEBUG);
366 $resql = $this->db->query($sql);
368 if ($this->db->num_rows($resql)) {
369 $obj = $this->db->fetch_object($resql);
371 $this->
id = $obj->rowid;
372 $this->
ref = $obj->rowid;
373 $this->tms = $this->db->jdate($obj->tms);
374 $this->datep = $this->db->jdate($obj->datep);
375 $this->datev = $this->db->jdate($obj->datev);
376 $this->
amount = $obj->amount;
377 $this->type_payment = $obj->fk_typepayment;
378 $this->num_payment = $obj->num_payment;
379 $this->label = $obj->label;
380 $this->paye = $obj->paye;
381 $this->note = $obj->note;
382 $this->fk_user_creat = $obj->fk_user_creat;
383 $this->fk_user_modif = $obj->fk_user_modif;
384 $this->fk_account = $obj->fk_account;
385 $this->fk_type = empty($obj->fk_type) ?
"" : $obj->fk_type;
386 $this->rappro = empty($obj->rappro) ?
"" : $obj->rappro;
388 $this->db->free($resql);
392 $this->error =
"Error ".$this->db->lasterror();
404 public function delete($user)
406 global
$conf, $langs;
411 $result = $this->call_trigger(
'TVA_DELETE', $user);
417 $sql =
"DELETE FROM ".MAIN_DB_PREFIX.
"tva";
418 $sql .=
" WHERE rowid=".((int) $this->
id);
420 dol_syslog(get_class($this).
"::delete", LOG_DEBUG);
421 $resql = $this->db->query($sql);
423 $this->error =
"Error ".$this->db->lasterror();
450 $this->fk_user_creat = 0;
451 $this->fk_user_modif = 0;
470 $solde = $reglee - ($collectee - $payee);
486 $sql =
"SELECT sum(f.total_tva) as amount";
487 $sql .=
" FROM ".MAIN_DB_PREFIX.
"facture as f WHERE f.paye = 1";
489 $sql .=
" AND f.datef >= '".((int) $year).
"-01-01' AND f.datef <= '".((int) $year).
"-12-31' ";
492 $result = $this->db->query($sql);
494 if ($this->db->num_rows($result)) {
495 $obj = $this->db->fetch_object($result);
497 $this->db->free($result);
500 $this->db->free($result);
504 print $this->db->lasterror();
520 $sql =
"SELECT sum(f.total_tva) as total_tva";
521 $sql .=
" FROM ".MAIN_DB_PREFIX.
"facture_fourn as f";
523 $sql .=
" WHERE f.datef >= '".((int) $year).
"-01-01' AND f.datef <= '".((int) $year).
"-12-31' ";
526 $result = $this->db->query($sql);
528 if ($this->db->num_rows($result)) {
529 $obj = $this->db->fetch_object($result);
530 $ret = $obj->total_tva;
531 $this->db->free($result);
534 $this->db->free($result);
538 print $this->db->lasterror();
555 $sql =
"SELECT sum(f.amount) as amount";
556 $sql .=
" FROM ".MAIN_DB_PREFIX.
"tva as f";
559 $sql .=
" WHERE f.datev >= '".((int) $year).
"-01-01' AND f.datev <= '".((int) $year).
"-12-31' ";
562 $result = $this->db->query($sql);
564 if ($this->db->num_rows($result)) {
565 $obj = $this->db->fetch_object($result);
567 $this->db->free($result);
570 $this->db->free($result);
574 print $this->db->lasterror();
588 global
$conf, $langs;
594 $this->label = trim($this->label);
595 $this->note = trim($this->note);
596 $this->num_payment = trim($this->num_payment);
597 $this->fk_bank = (int) $this->fk_bank;
598 $this->fk_user_creat = (int) $this->fk_user_creat;
599 $this->fk_user_modif = (int) $this->fk_user_modif;
600 if (empty($this->datec)) {
606 $this->error = $langs->trans(
"ErrorFieldRequired", $langs->transnoentities(
"Label"));
609 if ($this->
amount ==
'') {
610 $this->error = $langs->trans(
"ErrorFieldRequired", $langs->transnoentities(
"Amount"));
613 if (
isModEnabled(
"bank") && (empty($this->accountid) || $this->accountid <= 0)) {
614 $this->error = $langs->trans(
"ErrorFieldRequired", $langs->transnoentities(
"BankAccount"));
617 if (
isModEnabled(
"bank") && (empty($this->type_payment) || $this->type_payment <= 0)) {
618 $this->error = $langs->trans(
"ErrorFieldRequired", $langs->transnoentities(
"PaymentMode"));
623 $sql =
"INSERT INTO ".MAIN_DB_PREFIX.
"tva (";
628 $sql .=
", fk_typepayment";
629 $sql .=
", num_payment";
636 $sql .=
", fk_user_creat";
641 $sql .=
" '".$this->db->idate($this->datec).
"'";
642 $sql .=
", '".$this->db->idate($this->datep).
"'";
643 $sql .=
", '".$this->db->idate($this->datev).
"'";
644 $sql .=
", ".((float) $this->
amount);
645 $sql .=
", '".$this->db->escape((
string) $this->type_payment).
"'";
646 $sql .=
", '".$this->db->escape($this->num_payment).
"'";
648 $sql .=
", '".$this->db->escape($this->note).
"'";
651 $sql .=
", '".$this->db->escape($this->label).
"'";
653 $sql .=
", '".$this->db->escape((
string) $user->id).
"'";
655 $sql .=
", ".((int)
$conf->entity);
658 dol_syslog(get_class($this).
"::addPayment", LOG_DEBUG);
659 $result = $this->db->query($sql);
661 $this->
id = $this->db->last_insert_id(MAIN_DB_PREFIX.
"tva");
665 $result = $this->call_trigger(
'TVA_ADDPAYMENT', $user);
676 require_once DOL_DOCUMENT_ROOT.
'/compta/bank/class/account.class.php';
679 $result = $acc->fetch($this->accountid);
685 $bank_line_id = $acc->addline($this->datep, (
string) $this->type_payment, $this->label, -abs((
float) $this->
amount), $this->num_payment, 0, $user);
687 $bank_line_id = $acc->addline($this->datep, (
string) $this->type_payment, $this->label, abs((
float) $this->
amount), $this->num_payment, 0, $user);
691 if ($bank_line_id > 0) {
694 $this->error = $acc->error;
699 $result = $acc->add_url_line($bank_line_id, $this->
id, DOL_URL_ROOT.
'/compta/tva/card.php?id=',
"(VATPayment)",
"payment_vat");
701 $this->error = $acc->error;
710 $this->db->rollback();
714 $this->db->rollback();
718 $this->error = $this->db->error();
719 $this->db->rollback();
734 $sql =
'UPDATE '.MAIN_DB_PREFIX.
'tva SET fk_bank = '.(int) $id_bank;
735 $sql .=
' WHERE rowid = '.(int) $this->
id;
736 $result = $this->db->query($sql);
755 public function getNomUrl($withpicto = 0, $option =
'', $notooltip = 0, $morecss =
'', $save_lastsearch_value = -1)
757 global $langs,
$conf;
759 if (!empty(
$conf->dol_no_mouse_hover)) {
765 $label =
'<u>'.$langs->trans(
"ShowVatPayment").
'</u>';
767 $label .=
'<b>'.$langs->trans(
'Ref').
':</b> '.$this->ref;
768 if (!empty($this->label)) {
769 $label .=
'<br><b>'.$langs->trans(
'Label').
':</b> '.$this->label;
772 $url = DOL_URL_ROOT.
'/compta/tva/card.php?id='.$this->id;
774 if ($option !=
'nolink') {
776 $add_save_lastsearch_values = ($save_lastsearch_value == 1 ? 1 : 0);
777 if ($save_lastsearch_value == -1 && isset($_SERVER[
"PHP_SELF"]) && preg_match(
'/list\.php/', $_SERVER[
"PHP_SELF"])) {
778 $add_save_lastsearch_values = 1;
780 if ($add_save_lastsearch_values) {
781 $url .=
'&save_lastsearch_values=1';
786 if (empty($notooltip)) {
788 $label = $langs->trans(
"ShowMyObject");
789 $linkclose .=
' alt="'.dolPrintHTMLForAttribute($label).
'"';
791 $linkclose .=
' title="'.dolPrintHTMLForAttribute($label).
'"';
792 $linkclose .=
' class="classfortooltip'.($morecss ?
' '.$morecss :
'').
'"';
794 $linkclose = ($morecss ?
' class="'.$morecss.
'"' :
'');
797 $linkstart =
'<a href="'.$url.
'"';
798 $linkstart .= $linkclose.
'>';
803 $result .= $linkstart;
805 $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);
807 if ($withpicto != 2) {
808 $result .= $this->ref;
822 $sql =
'SELECT sum(amount) as amount';
823 $sql .=
' FROM '.MAIN_DB_PREFIX.
"payment_vat";
824 $sql .=
" WHERE fk_tva = ".((int) $this->
id);
826 dol_syslog(get_class($this).
"::getSommePaiement", LOG_DEBUG);
827 $resql = $this->db->query($sql);
831 $obj = $this->db->fetch_object($resql);
833 $amount = $obj->amount ? $obj->amount : 0;
836 $this->db->free($resql);
851 $sql =
"SELECT t.rowid, t.tms, t.fk_user_modif, t.datec, t.fk_user_creat";
852 $sql .=
" FROM ".MAIN_DB_PREFIX.
"tva as t";
853 $sql .=
" WHERE t.rowid = ".(int) $id;
855 dol_syslog(get_class($this).
"::info", LOG_DEBUG);
856 $result = $this->db->query($sql);
858 if ($this->db->num_rows($result)) {
859 $obj = $this->db->fetch_object($result);
861 $this->
id = $obj->rowid;
863 $this->user_creation_id = $obj->fk_user_creat;
864 $this->user_modification_id = $obj->fk_user_modif;
865 $this->date_creation = $this->db->jdate($obj->datec);
866 $this->date_modification = $this->db->jdate($obj->tms);
869 $this->db->free($result);
884 return $this->
LibStatut($this->paye, $mode, $alreadypaid);
896 public function LibStatut($status, $mode = 0, $alreadypaid = -1)
902 $langs->loadLangs(array(
"customers",
"bills"));
905 $this->labelStatus = array();
906 $this->labelStatusShort = array();
908 if (empty($this->labelStatus) || empty($this->labelStatusShort)) {
911 $this->labelStatus[self::STATUS_UNPAID] = $langs->transnoentitiesnoconv(
'BillStatusNotPaid');
912 $this->labelStatus[self::STATUS_PAID] = $langs->transnoentitiesnoconv(
'BillStatusPaid');
913 if ($status == self::STATUS_UNPAID && $alreadypaid != 0) {
914 $this->labelStatus[self::STATUS_UNPAID] = $langs->transnoentitiesnoconv(
"BillStatusStarted");
916 $this->labelStatusShort[self::STATUS_UNPAID] = $langs->transnoentitiesnoconv(
'BillStatusNotPaid');
917 $this->labelStatusShort[self::STATUS_PAID] = $langs->transnoentitiesnoconv(
'BillStatusPaid');
918 if ($status == self::STATUS_UNPAID && $alreadypaid != 0) {
919 $this->labelStatusShort[self::STATUS_UNPAID] = $langs->transnoentitiesnoconv(
"BillStatusStarted");
923 $statusType =
'status1';
924 if ($status == 0 && $alreadypaid != 0) {
925 $statusType =
'status3';
928 $statusType =
'status6';
931 return dolGetStatus($this->labelStatus[$status], $this->labelStatusShort[$status],
'', $statusType, $mode);
945 $selected = (empty($arraydata[
'selected']) ? 0 : $arraydata[
'selected']);
947 $return =
'<div class="box-flex-item box-flex-grow-zero">';
948 $return .=
'<div class="info-box info-box-sm">';
949 $return .=
'<span class="info-box-icon bg-infobox-action">';
952 $return .=
'</span>';
953 $return .=
'<div class="info-box-content">';
954 $return .=
'<span class="info-box-ref inline-block tdoverflowmax150 valignmiddle">'.(method_exists($this,
'getNomUrl') ? $this->
getNomUrl(1) : $this->ref).
'</span>';
955 if ($selected >= 0) {
956 $return .=
'<input id="cb'.$this->id.
'" class="flat checkforselect fright" type="checkbox" name="toselect[]" value="'.$this->
id.
'"'.($selected ?
' checked="checked"' :
'').
'>';
958 if (property_exists($this,
'amount')) {
959 $return .=
' | <span class="opacitymedium">'.$langs->trans(
"Amount").
'</span> : <span class="info-box-label amount">'.
price($this->
amount).
'</span>';
961 if (property_exists($this,
'type_payment')) {
962 $return .=
'<br><span class="opacitymedium">'.$langs->trans(
"Payment").
'</span> : <span class="info-box-label">'.$this->type_payment.
'</span>';
964 if (property_exists($this,
'datev')) {
965 $return .=
'<br><span class="opacitymedium">'.$langs->trans(
"DateEnd").
'</span> : <span class="info-box-label" >'.
dol_print_date($this->datev).
'</span>';
967 if (method_exists($this,
'LibStatut')) {
968 $return .=
'<br><div class="info-box-status margintoponly">'.$this->getLibStatut(3, (
float) $this->alreadypaid).
'</div>';
985 $sql =
"SELECT t.rowid";
986 $sql .=
" FROM ".MAIN_DB_PREFIX.
"tva as t";
987 $sql .=
" WHERE t.label = '".$this->db->escape($label).
"'";
989 dol_syslog(get_class($this).
"::getIdForLabel", LOG_DEBUG);
990 $result = $this->db->query($sql);
992 if ($this->db->num_rows($result)) {
993 $obj = $this->db->fetch_object($result);
996 $this->db->free($result);
Class to manage bank accounts.
Class to manage VAT - Value-added tax (also known in French as TVA)
getIdForLabel($label)
Id of vat payment object.
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.
dol_now($mode='gmt')
Return date for now.
price2num($amount, $rounding='', $option=0)
Function that return a number with universal decimal format (decimal separator is '.
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_print_date($time, $format='', $tzoutput='auto', $outputlangs=null, $encodetooutput=false, $decorate=0)
Output date in a string format according to outputlangs (or langs if not defined).
getDolGlobalString($key, $default='')
Return a Dolibarr global constant string value.
isModEnabled($module)
Is Dolibarr module enabled.
dol_syslog($message, $level=LOG_INFO, $ident=0, $suffixinfilename='', $restricttologhandler='', $logcontext=null)
Write log message into outputs.
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)
img_object($titlealt, $picto, $moreatt='', $pictoisfullpath=0, $srconly=0, $notitle=0, $allowothertags=array())
Show a picto called object_picto (generic function)
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...
print $langs trans('Date')." left Ref Label right Qty right Price right TotalHT right TotalTTC right right right right right right right right right centpercent right TotalHT right n right VAT right n right TotalVAT right n No sujeto a RE IRPF right TotalLT1 right n right TotalLT2 right n right TotalTTC right n takeposcustomercurrency takeposcustomercurrency takeposcustomercurrency takeposcustomercurrency right TotalTTC takeposcustomercurrency right takeposcustomercurrency n right Paid right PaymentTypeShortLIQ right SELECT p pos_change as p datep as p p num_paiement as f pf amount as amount