Impacc_CSV Class Reference

Used by all Import CSV Operation , contains the setting (delimiter,thousand ...) More...

Collaboration diagram for Impacc_CSV:

Public Member Functions
	__construct ()
	input_format ()
	Display a form to upload a CSV file with operation. More...
	set_import ($p_file_id)
	set_setting ()
	Get value from post , fill up the Impacc_Import_csv_SQL object. More...
	check_setting ()
	check (Impacc_File $p_file)
	Check that upload file is correct. More...
	save_setting ()
	Save the Impacc_Import_csv_SQL object into db. More...
	load_import ($p_import_id)
	Thank the import_file.id we find the corresponding record from import_csv and we load id. More...
	make_csv_class ($p_import_id)
	Create the right object for the import id and throw and exception if the ledger type can not be found. More...
	record (Impacc_File $p_file)
	Record the given csv file into impacc.import_detail , depending of the ledger type a different filter is used to import rows. More...
	result (Impacc_File $importfile)
	Display result from the table import_detail for CSV import. More...
	transfer ()
	Transfer the operation to the right ledger. More...

Data Fields
	$detail
	Object Impacc_Import_csv_SQL. More...
	$errcode
	Array of error code will be recorded in import_detail.id_message. More...

Detailed Description

Used by all Import CSV Operation , contains the setting (delimiter,thousand ...)

Definition at line 29 of file class_impacc_csv.php.

Constructor & Destructor Documentation

Impacc_CSV::__construct

(

)

Definition at line 35 of file class_impacc_csv.php.

References $cn.

    {
        $cn=Dossier::connect();
        $this->detail=new Impacc_Import_csv_SQL($cn);
        $this->detail->s_delimiter="2";
        $this->detail->s_surround='"';
        $this->detail->jrn_def_id=3;
        $this->detail->s_encoding="utf-8";
        $this->detail->s_decimal='1';
        $this->detail->s_thousand='0';
        $this->detail->s_date_format=1;
        $this->errcode=array(
            "CK_FORMAT_DATE"=>_("Format de date incorrect"),
            "CK_PERIODE_CLOSED"=>_("Période non trouvée"),
            "CK_INVALID_PERIODE"=>_("Période non trouvée"),
            "CK_INVALID_AMOUNT"=>_("Montant invalide"),
            "CK_INVALID_ACCOUNTING"=>_("Poste comptable ou Fiche non existante"),
            "CK_TVA_INVALID"=>_("Code TVA Invalide"),
            "CK_CARD_LEDGER"=>_("Fiche non disponible pour journal"),
            "CK_BALANCE"=>_("Balance incorrecte"),
            "CK_ERROR_DEBIT"=>_("Erreur D/C")
        );
    }

Member Function Documentation

Impacc_CSV::check

(

Impacc_File

$p_file

)

Check that upload file is correct.

• Check Service
• Check Service

Definition at line 136 of file class_impacc_csv.php.

References $aformat_date, $array, $cn, $date_format, $ledger, $per, $sql, Impacc_Csv_Sale_Purchase\check(), Impacc_Verify\check_card(), Impacc_Tool\convert_amount(), and load_import().

    {
        global $aformat_date;

        $this->load_import($p_file->impid);
        $cn=Dossier::connect();
        $ledger=new Acc_Ledger($cn, $this->detail->jrn_def_id);
        $ledger_type=$ledger->get_type();

        // connect to DB
        $cn=Dossier::connect();

        // load all rows where status != -1
        $t1=new Impacc_Import_detail_SQL($cn);
        $array=$t1->collect_objects(" where import_id = $1 and coalesce(id_status,0) <> -1 ",
                array($p_file->impid));
        // for each row check 
        $nb_array=count($array);
        $date_format=$aformat_date[$this->detail->s_date_format-1]['format'];
        $date_format_sql=$aformat_date[$this->detail->s_date_format-1]['label'];

        for ($i=0; $i<$nb_array; $i++)
        {
            $and=($array[$i]->id_message=="")?"":",";
            $array[$i]->id_status=0;
            if (trim($array[$i]->id_code_group)=="")
            {
                $array[$i]->id_status=-1;
                $array[$i]->id_message .= $and."CK_CODE_GROUP";
                $and=",";
            }
            //------------------------------------
            //Check date format
            //------------------------------------
            $test=DateTime::createFromFormat($date_format, $array[$i]->id_date);
            if ($test==false)
            {
                $array[$i]->id_status=-1;
                $array[$i]->id_message .= $and."CK_FORMAT_DATE";
                $and=",";
            }
            else
            {
                $array[$i]->id_date_conv=$test->format('d.m.Y');
                $array[$i]->id_date_format_conv=$test->format('Ymd');
                // Check if date exist and in a open periode
                $sql=sprintf("select p_id from parm_periode where p_start <= to_date($1,'%s') and p_end >= to_date($1,'%s') ",
                        $date_format_sql, $date_format_sql);
                $periode_id=$cn->get_value($sql, array($array[$i]->id_date));
                if ($cn->size()==0)
                {
                    $array[$i]->id_message.=$and."CK_INVALID_PERIODE";
                    $and=",";
                }
                else
                // Check that this periode is open for this ledger
                {
                    $per=new Periode($cn, $periode_id);
                    $per->jrn_def_id=$this->detail->jrn_def_id;
                    if ($per->is_open()==0)
                    {
                        $array[$i]->id_message.=$and."CK_PERIODE_CLOSED";
                        $and=",";
                    }
                }
            }
            //----------------------------------------------------------------
            // Check that first id_acc does exist , for ODS it could be an
            // accounting, the card must be accessible for the ledger
            //----------------------------------------------------------------
            $card=Impacc_Verify::check_card($array[$i]->id_acc);
            if ($ledger_type=='ODS'&&$card==false)
            {
                // For ODS it could be an accounting
                $poste=new Acc_Account_Ledger($cn, $array[$i]->id_acc);
                if ($poste->do_exist()==0)
                {
                    $array[$i]->id_message.=$and."CK_INVALID_ACCOUNTING";
                    $and=",";
                }
            }
            if ($ledger_type!='ODS'&&$card==false)
            {
                $array[$i]->id_message.=$and."CK_INVALID_ACCOUNTING";
                $and=",";
            }
            // If card is valid check if belong to ledger
            if ($card instanceof Fiche)
            {
                if ($card->belong_ledger($this->detail->jrn_def_id)!=1)
                {
                    $array[$i]->id_message.=$and."CK_CARD_LEDGER";
                    $and=",";
                }
            }
            //---------------------------------------------------------------
            // Check amount
            // --------------------------------------------------------------

            $array[$i]->id_amount_novat_conv=Impacc_Tool::convert_amount($array[$i]->id_amount_novat,
                            $this->detail->s_thousand, $this->detail->s_decimal);
            if (isNumber($array[$i]->id_amount_novat_conv)==0)
            {
                $array[$i]->id_message.=$and."CK_INVALID_AMOUNT";
                $and=",";
            }

            //----------------------------------------------------------------
            // Test for specific filter
            //----------------------------------------------------------------
            switch ($ledger_type)
            {
                case 'ACH':
                    //-----------------
                    ///- Check Service
                    //-----------------
                    $card=Impacc_Verify::check_card($array[$i]->id_acc_second);
                    if ($card==false)
                    {
                        $array[$i]->id_message=$and."CK_INVALID_ACCOUNTING";
                        $and=",";
                    }
                    if ($card instanceof Fiche&&$card->belong_ledger($this->detail->jrn_def_id)!=1)
                    {
                        $array[$i]->id_message.=$and."CK_CARD_LEDGER";
                        $and=",";
                    }
                    Impacc_Csv_Sale_Purchase::check($array[$i], $date_format,
                            $this->detail->s_thousand, $this->detail->s_decimal);
                    break;
                case 'VEN':
                    //-----------------
                    ///- Check Service
                    //-----------------
                    $card=Impacc_Verify::check_card($array[$i]->id_acc_second);
                    if ($card==false)
                    {
                        $array[$i]->id_message=$and."CK_INVALID_ACCOUNTING";
                        $and=",";
                    }
                    if ($card instanceof Fiche&&$card->belong_ledger($this->detail->jrn_def_id)!=1)
                    {
                        $array[$i]->id_message.=$and."CK_CARD_LEDGER";
                        $and=",";
                    }
                    Impacc_Csv_Sale_Purchase::check($array[$i], $date_format,
                            $this->detail->s_thousand, $this->detail->s_decimal);
                    break;
                case 'ODS':
                    // Check that colonne id_debit is C or D
                    if ($array[$i]->id_debit!="D"&&$array[$i]->id_debit!="C")
                    {
                        $array[$i]->id_message.=$and."CK_ERROR_DEBIT";
                        $and=",";
                    }
                    break;
                case 'FIN':

                    break;
                default :
                    throw new Exception(_('type journal inconnu'));
            }
            // update status
            $array[$i]->update();
        }
        if ($ledger_type=="ODS")
        {
            // Check that D == C for each group
            $array=$cn->get_array("
with deb as (
        select sum(coalesce(id_amount_novat_conv::numeric,0)) as sum_debit,
            id_code_group 
        from 
            impacc.import_detail 
        where 
            import_id = $1 
            and id_debit='D' 
        group by id_code_group
) ,cred as (
        select sum(coalesce(id_amount_novat_conv::numeric,0)) as sum_credit,
        id_code_group 
        from 
            impacc.import_detail 
        where 
            import_id = $1 and 
            id_debit='C' 
        group by id_code_group)
        select id_code_group,sum_debit-sum_credit
        from
        deb join cred using(id_code_group)
        where
        sum_debit <> sum_credit
        ", array($p_file->impid));
            $nb_array=count($array);
            for ($e=0; $e<$nb_array; $e++)
            {
                $cn->exec_sql("update impacc.import_detail set id_message = id_message||',CK_BALANCE' where id_code_group=$1 ",
                        array($array[$e]['id_code_group']));
            }
        }
    }

Impacc_CSV::check_setting

(

)

Definition at line 124 of file class_impacc_csv.php.

    {
// Check if valid
// 1 sep for thousand and decimal MUST be different
        if ($this->detail->s_thousand==$this->detail->s_decimal)
            throw new Exception(_("Séparateur de décimal et milliers doivent être différent"));
//2 encoding and delimiter can not be empty
//3 ledger must be writable for user
//4 Check Date format
    }

Impacc_CSV::input_format

(

)

Display a form to upload a CSV file with operation.

Definition at line 60 of file class_impacc_csv.php.

References $adecimal, $aformat_date, $aseparator, $athousand, $cn, and $ledger.

    {
        global $cn, $adecimal, $athousand, $aseparator, $aformat_date;
        $in_delimiter=new ISelect('in_delimiter');
        $in_delimiter->value=$aseparator;
        $in_delimiter->selected=$this->detail->s_delimiter;
        $in_delimiter->size=1;

        $in_surround=new IText('in_surround', $this->detail->s_surround);
        $in_surround->size=1;

        $ledger=new Acc_Ledger($cn, $this->detail->jrn_def_id);
        $in_ledger=$ledger->select_ledger('ALL', 3);
        $in_ledger->name='in_ledger';

        $in_encoding=new ISelect('in_encoding');
        $in_encoding->value=array(
            array('value'=>"utf-8", 'label'=>_('Unicode')),
            array('value'=>"latin1", 'label'=>_('Latin'))
        );
        $in_encoding->selected=$this->detail->s_encoding;

        $in_decimal=new ISelect('in_decimal');
        $in_decimal->value=$adecimal;
        $in_decimal->selected=$this->detail->s_decimal;
        $in_decimal->size=1;

        $in_thousand=new ISelect('in_thousand');
        $in_thousand->selected=$this->detail->s_thousand;
        $in_thousand->value=$athousand;
        $in_thousand->size=1;

        $in_date_format=new ISelect("in_date_format");
        $in_date_format->value=$aformat_date;
        $in_date_format->selected=$this->detail->s_date_format;

        require_once DIR_IMPORT_ACCOUNT.'/template/upload_operation.php';
    }

Impacc_CSV::load_import

(

$p_import_id

)

Thank the import_file.id we find the corresponding record from import_csv and we load id.

Parameters

$p_import_id

is impacc.import_file.id

Definition at line 347 of file class_impacc_csv.php.

References $cn, and $id.

Referenced by check(), and make_csv_class().

    {
        try
        {
            $cn=Dossier::connect();
            $id=$cn->get_value('select id from impacc.import_csv where import_id=$1',
                    array($p_import_id));
            $this->detail=new Impacc_Import_csv_SQL($cn, $id);
            $this->detail->load();
        }
        catch (Exception $e)
        {
            echo $e->getMessage();
        }
    }

Impacc_CSV::make_csv_class

(

$p_import_id

)

Create the right object for the import id and throw and exception if the ledger type can not be found.

Definition at line 366 of file class_impacc_csv.php.

References $cn, $errcode, $ledger, $obj, and load_import().

Referenced by record(), result(), and transfer().

    {
        $this->load_import($p_import_id);
        $cn=Dossier::connect();
        $ledger=new Acc_Ledger($cn, $this->detail->jrn_def_id);

        switch ($ledger->get_type())
        {
            case 'ACH':
                $obj=new Impacc_Csv_Purchase();
                break;
            case 'VEN':
                $obj=new Impacc_Csv_Sale();
                break;
            case 'ODS':
                $obj=new Impacc_Csv_Misc_Operation();
                break;
            case 'FIN':
                $obj=new Impacc_Csv_Bank();
                break;
            default :
                throw new Exception(_('type journal inconnu'));
        }
        $obj->errcode=$this->errcode;
        return $obj;
    }

Impacc_CSV::record

(

Impacc_File

$p_file

)

Record the given csv file into impacc.import_detail , depending of the ledger type a different filter is used to import rows.

Parameters

$p_file

is an Impacc_File , use to open the temporary file

Definition at line 396 of file class_impacc_csv.php.

References make_csv_class().

    {
        try
        {
            $csv_class=$this->make_csv_class($p_file->impid);
            $csv_class->record($this, $p_file);
        }
        catch (Exception $ex)
        {
            error_log($ex->getTraceAsString());
            echo _("Echec dans record")." ".$ex->getMessage();
            throw $ex;
        }
    }

Impacc_CSV::result

(

Impacc_File

$importfile

)

Display result from the table import_detail for CSV import.

Parameters

$importfile

is an Impacc_File object

Definition at line 413 of file class_impacc_csv.php.

References $cn, $ret, and make_csv_class().

    {
        try
        {
            $csv_class=$this->make_csv_class($importfile->impid);
        }
        catch (Exception $ex)
        {
            error_log($ex->getTraceAsString());
            echo _("Echec dans result");
            throw $ex;
        }
        $cn=Dossier::connect();
        $display=new Impacc_Import_detail_SQL($cn);
        $ret=$display->seek(" where import_id = $1 order by id",
                array($importfile->impid));
        $nb=Database::num_row($ret);
        require DIR_IMPORT_ACCOUNT."/template/operation_result.php";
    }

Impacc_CSV::save_setting

(

)

Save the Impacc_Import_csv_SQL object into db.

Definition at line 339 of file class_impacc_csv.php.

    {
        $this->detail->save();
    }

Impacc_CSV::set_import

(

$p_file_id

)

Definition at line 99 of file class_impacc_csv.php.

    {
        $this->detail->import_id=$p_file_id;
    }

Impacc_CSV::set_setting

(

)

Get value from post , fill up the Impacc_Import_csv_SQL object.

Definition at line 108 of file class_impacc_csv.php.

    {
        $this->detail->s_delimiter=HtmlInput::default_value_post("in_delimiter",
                        "");
        $this->detail->s_surround=HtmlInput::default_value_post("in_surround",
                        "");
        $this->detail->jrn_def_id=HtmlInput::default_value_post("in_ledger", "");
        $this->detail->s_encoding=HtmlInput::default_value_post("in_encoding",
                        " ");
        $this->detail->s_decimal=HtmlInput::default_value_post("in_decimal", "");
        $this->detail->s_thousand=HtmlInput::default_value_post("in_thousand",
                        "");
        $this->detail->s_date_format=HtmlInput::default_value_post("in_date_format",
                        4);
    }

Impacc_CSV::transfer

(

)

Transfer the operation to the right ledger.

• Create the right object
• Create the ledger object
• Load only the correct group (all the rows in the group must be valid)
• Call the function insert from a child classs

Definition at line 434 of file class_impacc_csv.php.

References $array, $cn, $ledger, $sql, Impacc_Tool\ledger_factory(), and make_csv_class().

    {
        $cn=Dossier::connect();
        try
        {
            ///- Create the right object
            $csv_class=$this->make_csv_class($this->detail->import_id);

            ///- Create the ledger object
            $ledger=Impacc_Tool::ledger_factory($this->detail->jrn_def_id);

            ///- Load only the correct group (all the rows in the group must be valid)
            $sql="
                with rejected as ( SELECT distinct id_code_group 
                                    FROM impacc.import_detail a
                                    where 
                                    import_id=$1
                                    and (id_status != 0 or trim(COALESCE(id_message,'')) !='')
                                    ) 
                select distinct id_code_group ,id_date_format_conv, import_id
                from 
                    impacc.import_detail 
                where 
                    import_id=$1 
                    and id_code_group not in (select coalesce(id_code_group,'') from rejected)
                
                order by id_date_format_conv asc
                ";

            $array=$cn->get_array($sql, array($this->detail->import_id));
            ///- Call the function insert from a child classs
            $csv_class->insert($array, $ledger);
        }
        catch (Exception $ex)
        {
            error_log($ex->getTraceAsString());
            echo _("Echec dans transfer")." ".$ex->getMessage();
            throw $ex;
        }
    }

Field Documentation

Impacc_CSV::$detail

Object Impacc_Import_csv_SQL.

Definition at line 32 of file class_impacc_csv.php.

Impacc_CSV::$errcode

Array of error code will be recorded in import_detail.id_message.

Definition at line 33 of file class_impacc_csv.php.

Referenced by make_csv_class().

---

The documentation for this class was generated from the following file:

• import_account/include/class_impacc_csv.php