tva_rate_mtable.class.php

Go to the documentation of this file.

<?php
 
/*
 *   This file is part of NOALYSS.
 *
 *   PhpCompta 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 2 of the License, or
 *   (at your option) any later version.
 *
 *   NOALYSS 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 PhpCompta; if not, write to the Free Software
 *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 */
// Copyright (2018) Author Dany De Bontridder <dany@alchimerys.be>
 
/**
 * @file
 * @brief Configure the tva : code , rate, label ...
 */
require_once NOALYSS_INCLUDE."/database/v_tva_rate_sql.class.php";
require_once NOALYSS_INCLUDE."/database/tva_rate_sql.class.php";
 
/**
 * @class Tva_Rate_MTable
 * @brief Configure the tva : code , rate, label ...
 * When using Manage_Table_SQL
 */
class Tva_Rate_MTable extends Manage_Table_SQL
{
 
    //!< previous tva_id, used to know if we update or insert,
    private $previous_id;
 
 
    /**
     * 
     * @param V_Tva_rate_SQL $p_table
     * @example tva_parameter.php
     */
    function __construct(V_Tva_rate_SQL $p_table)
    {
        parent::__construct($p_table);
        $this->set_col_label("tva_id", _("id"));
        $this->set_col_label("tva_label", _("label"));
        $this->set_col_label("tva_rate", _("taux"));
        $this->set_col_label("tva_comment", _("Description"));
        $this->set_col_label("tva_both_side", _("Autoliquidation"));
        $this->set_col_label("tva_sale", _("TVA Vente (C)"));
        $this->set_col_label("tva_purchase", _("TVA Achat (D)"));
        $this->set_col_type("tva_both_side", "select",
                array(
            ["value"=>0, "label"=>_("Non")],
            ["value"=>1, "label"=>_("Oui")]
        ));
        $this->set_property_updatable("tva_id", true);
        $this->set_col_label("tva_payment_purchase",_("Exigible achat"));
        $this->set_col_type("tva_payment_purchase","select",
                array(
                    array("value"=>'O',"label"=>"Opération"),
                    array("value"=>'P',"label"=>"Paiement")
                    )
                );
        $this->set_col_label("tva_payment_sale",_("Exigible vente"));
        $this->set_col_type("tva_payment_sale","select",
                array(
                    array("value"=>'O',"label"=>"Opération"),
                    array("value"=>'P',"label"=>"Paiement")
                    )
                );
        $this->a_info=["tva_purchase"=>44,"tva_both_side"=>43,"tva_sale"=>45
            ,"tva_payment_sale"=>74,"tva_payment_purchase"=>74];
        $this->previous_id=null;
    }
 
    /**
     * @return int or null
     */
    public function getPreviousId()
    {
        return $this->previous_id;
    }
 
    /**
     *
     * @param int $previous_id
     */
    public function setPreviousId($previous_id): Tva_Rate_MTable
    {
        $this->previous_id = $previous_id;
        return $this;
    }
 
    /**
     * @brief display into a dialog box the datarow in order 
     * to be appended or modified. Can be override if you need
     * a more complex form
     */
    function input()
    {
        $nb_order=count($this->a_order);
        echo "<table>";
        for ($i=0; $i<$nb_order; $i++)
        {
            echo "<tr>";
            $key=$this->a_order[$i];
            $label=$this->a_label_displaid[$key];
            $value=$this->table->get($key);
            $error=$this->get_error($key);
            $error=($error=="")?"":HtmlInput::errorbulle($error);
 
            if ($this->get_property_visible($key)===TRUE)
            {
                $info="";
                if ( isset($this->a_info[$key])) {
                    $info=Icon_Action::infobulle($this->a_info[$key]);
                }
                // Label
                echo "<td> {$label} {$info} {$error}</td>";
 
                if ($this->get_property_updatable($key)==TRUE)
                {
                    echo "<td>";
                    if ($this->a_type[$key]=="select")
                    {
                        $select=new ISelect($key);
                        $select->value=$this->a_select[$key];
                        $select->selected=$value;
                        echo $select->input();
                    }
                    elseif ($key=="tva_rate")
                    {
                        $text=new INum($key);
                        $text->value=$value;
                        $text->prec=4;
                        $min_size=(strlen($value??"")<10)?10:strlen($value)+1;
                        $text->size=$min_size;
                        echo $text->input();
                    }
                    elseif ($key=='tva_purchase')
                    {
                        $text=new IPoste("tva_purchase");
                        $text->value=$value;
                        $min_size=10;
                        $text->size=$min_size;
                        $text->set_attribute('gDossier', Dossier::id());
                        $text->set_attribute('jrn', 0);
                        $text->set_attribute('account', 'tva_purchase');
                        echo $text->input();
                        $url="do.php?".http_build_query(array("gDossier"=>Dossier::id(),"ac"=>'CFGPCMN','p_start'=>4));
                        echo HtmlInput::anchor(_("Configuration poste comptable"),$url,"",'target="_blank"');
                    }
                    elseif ($key=='tva_sale')
                    {
                        $text=new IPoste("tva_sale");
                        $text->value=$value;
                        $min_size=10;
                        $text->set_attribute('gDossier', Dossier::id());
                        $text->set_attribute('jrn', 0);
                        $text->set_attribute('account', 'tva_sale');
                        $text->size=$min_size;
                        echo $text->input();
                    }
                    elseif ($this->a_type[$key]=="text")
                    {
                        $text=new IText($key);
                        $text->value=$value;
                        $min_size=(strlen($value??"")<30)?30:strlen($value)+5;
                        $text->size=$min_size;
                        echo $text->input();
                    } elseif ($key == "tva_id") {
                        $inum=new INum($key,$value);
                        echo $inum->input();
                        echo \HtmlInput::hidden("old_tva_id",$value);
 
                    }
                    echo "</td>";
                }
                else
                {
                    printf('<td>%s %s</td>', h($value),
                            HtmlInput::hidden($key, $value)
                    );
                }
            }
            echo "</tr>";
        }
        echo "</table>";
    }
 
    /**
     * @brief save the data in TVA_RATE
     * if tva_both_side is 1 and tva_purchase or tva_sale is empty then
        it is equal to the other value
     * 
     */
    function save()
    {
        if ( $this->previous_id == null ) {
            throw new \Exception ("TVA184: no previous TVA id");
        }
        $cn=Dossier::connect();
        // if tva_both_side is 1 and tva_purchase or tva_sale is empty then
        // it is equal to the other value
        if ($this->table->tva_both_side==1)
        {
            if ($this->table->tva_purchase=="#"||trim($this->table->tva_purchase)
                    =="#")
            {
                $this->table->tva_purchase=$this->table->tva_sale;
            }
            if ($this->table->tva_sale=="#"||trim($this->table->tva_sale)=="#")
            {
                $this->table->tva_sale=$this->table->tva_purchase;
            }
        }
        $new_tva_id=$this->table->tva_id;
        $tva_rate=new Tva_rate_SQL($cn);
        $tva_rate->setp("tva_id",$new_tva_id);
        $tva_rate->setp("tva_rate", $this->table->tva_rate);
        $tva_rate->setp("tva_label", $this->table->tva_label);
        $tva_rate->setp("tva_comment", $this->table->tva_comment);
        $tva_rate->setp("tva_both_side", $this->table->tva_both_side);
 
        // TVA accounting must be joined and separated with a comma
        $tva_purchase=(trim($this->table->tva_purchase)=="")?"#":$this->table->tva_purchase;
        $tva_sale=(trim($this->table->tva_sale)=="")?"#":$this->table->tva_sale;
        $tva_rate->setp("tva_poste", $tva_purchase.",".$tva_sale);
        $tva_rate->setp("tva_payment_sale", $this->table->tva_payment_sale);
        $tva_rate->setp("tva_payment_purchase", $this->table->tva_payment_purchase);
        if ( $this->previous_id == -1 ) {
            $tva_rate->insert();
        } else {
            $tva_rate->update();
        }
        if ( $this->previous_id != - 1 && $this->previous_id != $new_tva_id) {
            $cn->exec_sql("update tva_rate set tva_id = $1 where tva_id = $2",[$new_tva_id,$this->previous_id]);
            $this->table->setp("tva_id",$new_tva_id);
        }else        $this->table->setp("tva_id",$tva_rate->getp("tva_id"));
 
    }
    /**
     * Check data are valid 
     *   1. tva_rate between 0 & 1
     *   2. label is uniq
     *   3. accounting must exist
     * @return boolean
     */
    function check()
    {
        $cn=Dossier::connect();
        if ( $this->previous_id == null ) {
            throw new \Exception ("TVA184: no previous TVA id");
        }
        // both accounting can not be empty
        if (trim($this->table->tva_purchase)==""&&trim($this->table->tva_sale)=="")
        {
            $this->set_error("tva_purchase",
                    _("Les 2 postes comptables ne peuvent être nuls"));
            $this->set_error("tva_sale",
                    _("Les 2 postes comptables ne peuvent être nuls"));
        }
 
        // Check the tva rate
        if (trim($this->table->tva_rate)==""||isNumber($this->table->tva_rate)==0||$this->table->tva_rate>1)
        {
            $this->set_error("tva_rate", _("Taux de TVA invalide"));
        }
 
        //Check the label must be unique
        $count=$cn->get_value("select count(*) from tva_rate where tva_id<>$1 and lower(tva_label)=lower($2)",
                [$this->getPreviousId(), $this->table->tva_label]);
        if ($count>0)
        {
            $this->set_error("tva_label", _("Ce nom est déjà utilisé"));
        }
 
        // Check accounting exists for purchase
        if (trim($this->table->tva_purchase)!=""&&$this->table->tva_purchase!="#")
        {
            $count=$cn->get_value("select count(*) from tmp_pcmn where pcm_val = $1",
                    [$this->table->tva_purchase]);
            if ($count==0)
            {
                $this->set_error("tva_purchase", _("Poste comptable inexistant"));
            }
        }
        // Check accounting exists for sale
        if (trim($this->table->tva_sale)!=""&&$this->table->tva_sale!="#")
        {
            $count=$cn->get_value("select count(*) from tmp_pcmn where pcm_val = $1",
                    [$this->table->tva_sale]);
            if ($count==0)
            {
                $this->set_error("tva_sale", _("Poste comptable inexistant"));
            }
        }
 
        // check if tva_both_side is valid
        if ($this->table->tva_both_side!=0&&$this->table->tva_both_side!=1)
        {
            $this->set_error("tva_both_side", _("Choix incorrect"));
        }
        $flag = true;
        if ( isNumber($this->table->tva_id) == 0 || $this->table->tva_id != round($this->table->tva_id) )
        {
            $this->set_error("tva_id",_("Valeur invalide"));
            $flag=false;
        }
        // Check if old tva_id was not overwritting something
        if ( $flag && $this->previous_id != $this->table->tva_id && $cn->get_value("select count(*) from tva_rate where tva_id=$1",[$this->table->tva_id]) > 0)
        {
            $this->set_error("tva_id",_("Code TVA déjà utilisé"));
        }
        // Check that tva_id is a integer not a float
 
        if ($this->count_error()!=0)
            return false;
        return true;
    }
    /**
     * delete if not used anywhere
     */
    function delete()
    {
        $cn=Dossier::connect();
        $count_purchase=$cn->get_value("select count(*) from quant_purchase where qp_vat_code = $1",[$this->table->tva_id]);
        $count_sale=$cn->get_value("select count(*) from quant_sold where qs_vat_code = $1",[$this->table->tva_id]);
        if ( $count_purchase > 0 || $count_sale > 0) {
            throw new Exception(_("Effacement interdit : TVA utilisée"));
        }
        
        // Forbid to remove all tva 
        $count=$cn->get_value("select count(*) from tva_rate");
        if ( $count < 2) {
            throw new Exception(_("Vous ne pouvez pas effacer tous les taux. Si votre société n'utilise pas la TVA, changer dans le menu société"));
        }
        $cn->exec_sql("delete from tva_rate where tva_id=$1", [$this->table->tva_id]);
    }
 
}