this class is used to show the form for entering an operation only FOR analytic operation to save it, to display or to get a list from a certain period More...

Collaboration diagram for Anc_Operation:

Public Member Functions
	__construct ($p_cn, $p_id=0)
	constructor More...

	__toString ()

	add ($p_seq=0)
	add a row to the table operation_analytique More...

	delete ()
	delete a row from the table operation_analytique More...

	delete_by_jid ($p_jid)
	delete from operation_analytique More...

	display_form_plan ($p_array, $p_null, $p_mode, $p_seq, $p_amount, $p_id='', $p_add_button=true)
	display the form for PA More...

	display_table ($p_mode, $p_amount, $p_id)
	Display a table with analytic accounting in detail of operation. More...

	get_balance ($p_from, $p_to, $p_plan_id)

	get_by_jid ($p_jid)
	retrieve an operation thanks a jrnx.j_id More...

	get_currency_rate ()

	get_jrid ()
	retrieve the jr_id thanks the oa_group More...

	get_list ($p_from, $p_to, $p_from_poste="", $p_to_poste="")
	get a list of row from a certain periode More...

	get_list_simple ($p_from, $p_to)

	html_table ($p_from)

	save_form_plan ($p_array, $p_item, $p_j_id)
	it called for each item, the data are taken from $p_array data and set before in this. Amount will be transformed thanks the $this->currency_rate; More...

	save_form_plan_vat_nd ($p_array, $p_item, $p_j_id, $p_nd)
	Save the ND VAT with prorata. More...

	save_update_form ($p_array)
	save a whole form from a update box More...

	set_currency_rate ($currency_rate)

	test_me ()

	to_request ($p_array, $p_line)

	update_from_jrnx ($p_po_id)
	modify an op from modify_op.php More...

Data Fields
	$card

	$db

	$has_data

	$id

	$in_div

	$j_id

	$list

	$oa_amount

	$oa_date

	$oa_debit

	$oa_description

	$oa_group

	$oa_id

	$oa_jrnx_id_source
	In the case, the amount comes from a ND VAT, the variable contents the jrnx.j_id of the source which was used to compute the amount. More...

	$oa_positive
	signed of the amount More...

	$oa_row

	$pa_id

	$po_id

	$row

Private Attributes
	$currency_rate

Detailed Description

this class is used to show the form for entering an operation only FOR analytic operation to save it, to display or to get a list from a certain period

Definition at line 32 of file anc_operation.class.php.

Constructor & Destructor Documentation

◆ __construct()

Anc_Operation::__construct	(	$p_cn,
		$p_id = `0`
	)

constructor

Definition at line 100 of file anc_operation.class.php.

    {
        $this->db=$p_cn;
        $this->id=$p_id;
        $this->oa_jrnx_id_source=null;
        $this->oa_positive='Y';
        $this->has_data=0;
        $this->in_div="";
        $this->card="";
        $this->currency_rate=1;
    }

References $p_id, and db.

Member Function Documentation

◆ __toString()

Anc_Operation::__toString ( )

Definition at line 63 of file anc_operation.class.php.

                                : string
    {
     $r=<<<EOF
Object Anc_Operation [
     \$row=>$this->row, 
     \$list=> $this->list,      
     \$id  => $this->id,        
     \$po_id => $this->po_id,
     \$oa_amount $this->oa_amount,
     \$oa_description => $this->oa_description, 
     \$oa_debit => $this->oa_debit,     
     \$j_id => $this->j_id,     
     \$oa_group => $this->oa_group,  
     \$oa_date => $this->oa_date,       
     \$pa_id => $this->pa_id,
     \$card => $this->card , 
    private \$currency_rate => $this->currency_rate,
    ]    
EOF;
     return $r;
 
    }

References $card, $currency_rate, $id, $j_id, $list, $oa_amount, $oa_date, $oa_debit, $oa_description, $oa_group, $pa_id, $po_id, $r, and $row.

◆ add()

Anc_Operation::add ( $p_seq = 0 )

add a row to the table operation_analytique

Note: if $this->oa_group == 0 then a sequence id will be computed for the oa_group, if $this->j_id=0 then it will be null

Definition at line 116 of file anc_operation.class.php.

    {
 
        if ( $this->oa_group == 0)
        {
            $this->oa_group=$this->db->get_next_seq('s_oa_group');
        }
 
        if ( $this->j_id == 0 )
        {
            $this->j_id=null;
        } else {
            // must be the same side than the operation
            if ( $this->oa_jrnx_id_source == null)
            {
                $side=$this->db->get_value('select j_debit from jrnx where j_id=$1',
                    array($this->j_id));
            } else 
            {
                $side=$this->db->get_value('select j_debit from jrnx where j_id=$1',
                    array($this->oa_jrnx_id_source));
            }
            $this->oa_debit=$side;
        }
 
 
        // we don't save null operations
        if ( $this->oa_amount == 0 || $this->po_id==-1)
            return;
        
        if ( $this->oa_amount< 0) 
        {
            // if negatif must be oa_positive='N'
            $this->oa_positive='N';
            $this->oa_debit=($this->oa_debit=='t')?'f':'t';
        }
        
        // Retrieve the f_id of the card
        $n_fid=0;
        if ( $this->card != "") {
            $fiche=new Fiche($this->db);
            $fiche->get_by_qcode($this->card);
            $n_fid=$fiche->id;
        }
        $n_fid=($n_fid!=0)?$n_fid:NULL;
        $oa_row=(isset($this->oa_row))?$this->oa_row:null;
        $sql="insert into operation_analytique (
             po_id, 
             oa_amount,
             oa_description,
             oa_debit,
             oa_group,
             j_id,
             oa_date,
             oa_row,
             oa_jrnx_id_source,
             oa_positive,
             f_id
             ) values ($1,$2,$3,$4,$5,$6,to_date($7,'DD.MM.YYYY'),$8,$9,$10,$11)";
 
        $this->db->exec_sql($sql,array(
                $this->po_id, // 1
                abs($this->oa_amount), //2
                $this->oa_description, //3
                $this->oa_debit, //4
                $this->oa_group, //5
                $this->j_id, //6
                $this->oa_date, //7
                $oa_row, //8
                $this->oa_jrnx_id_source, //8
                $this->oa_positive,
                $n_fid // fiche.f_id , can be null
                ));
 
    }

References $fiche, $oa_row, $side, $sql, and db.

Referenced by update_from_jrnx().

◆ delete()

Anc_Operation::delete ( )

delete a row from the table operation_analytique

Note: be carefull : do not delete a row when we have a group

Definition at line 194 of file anc_operation.class.php.

    {
        $sql="delete from operation_analytique where oa_id=$1";
 
        $this->db->exec_sql($sql,array($this->oa_id));
    }

References $sql, and db.

◆ delete_by_jid()

Anc_Operation::delete_by_jid ( $p_jid )

delete from operation_analytique

Parameters

$p_jid the operation_analytique.j_id field

Returns: none

Definition at line 1045 of file anc_operation.class.php.

    {
        $sql="delete from operation_analytique where j_id=$1";
        $this->db->exec_sql($sql,array($p_jid));
    }

References $sql, and db.

◆ display_form_plan()

Anc_Operation::display_form_plan	(	$p_array,
		$p_null,
		$p_mode,
		$p_seq,
		$p_amount,
		$p_id = `''`,
		$p_add_button = `true`
	)

display the form for PA

Parameters

$p_array	contains POST (or GET) data (val[] hplan[][] op[])
$p_null	= 1 if PA optional otherwise 0 mandatory
$p_mode	== form 1 ==> read/write otherwise 0==>readonly
$p_seq	number of the row
$p_amount	amount
$p_id	operation is detailled in a HTML popup, if several are opened, the tableid MUST be different. So we need to use a new parameter
$p_add_button	true, show the button, false don't display them

See also: save_form_plan

Note

op is an array containing the line number
pa_id is an array of the existing array
hplan is an array of the POSTE ANALYTIQUE id used, the size of hplan from 0 to x, x can be bigger than the number of plan id
val contains the amount by row inside the table. One operation (j_id) you can have several rows
0 =>

array

'op' => int 200

'pa_id' =>

array

0 => string '14' (length=2)

1 => string '15' (length=2)

'hplan' =>

array

1 =>

array

0 => string '25' (length=2)

1 => string '26' (length=2)

'val' =>

array

1 =>

array

0 => string '100.0000' (length=8)

Add a button for distribution key

Add a button to clean the detail

Definition at line 571 of file anc_operation.class.php.

    {
        if ( $p_array != null)
            extract ($p_array, EXTR_SKIP);
        $result="";
        $plan=new Anc_Plan($this->db);
        $a_plan=$plan->get_list(" order by pa_id ");
        if ( empty ($a_plan) ) return "";
        $table_id="t".$p_seq;
        $hidden=new IHidden();
 
        $readonly=($p_mode==1)?false:true;
 
        if ($p_mode==1)
        {
           $result .= sprintf('<input type="HIDDEN" id="amount_%s" class="%s%s-amount" name="amount_%s" value="%s">',
                   $table_id,
                   $this->in_div,
                   $table_id,
                   $table_id,
                   $p_amount
                   );
            
            $result.='<table id="'.$p_id.$table_id.'">';
        }
        else
        {
            $result.='<table>';
        }
        $result.="<tr>".$plan->header()."<th>"._("montant")."</th></tr>";
 
        /* compute the number of rows */
        $nb_row=(isset($val[$p_seq]))?count($val[$p_seq]):1;
        $count=0;
 
        $remain=abs($p_amount);
        $ctrl_remain="remain".$this->in_div.$table_id;
 
        for ( $i=0; $i < $nb_row;$i++)
        {
            $result.='<tr>';
 
            foreach ($a_plan as $r_plan)
            {
                $existing=(isset($hplan[$p_seq][$count]))?$hplan[$p_seq][$count]:-1;
                $array=$this->db->make_array(
                           "select po_id as value,".
                           " html_quote(po_name) as label from poste_analytique ".
                           " where pa_id = $1 ".
                           " and ( po_state = 1 or po_id = $2) ".
                           " order by po_name",$p_null,[$r_plan['id'],$existing]);
                $select =new ISelect("hplan[".$p_seq."][]",$array);
                $select->table=0;
                // view only or editables
                if (  $p_mode==1 )
                {
                    // editable
                    $select->readonly=false;
                    if ( isset($hplan) && isset($hplan[$p_seq][$count]) ){
                        $select->selected=$hplan[$p_seq][$count];
 
                                        }
                }
                else
                {
                                        if ( isset($hplan) && isset($hplan[$p_seq][$count]) ){
                        $select->selected=$hplan[$p_seq][$count];
                                        }
                    // view only
                    $select->readOnly=true;
                }
                if ($p_mode==1)
                {
                    $result.='<td>'.$select->input().'</td>';
                }
                else
                {
                    $result.='<td>'.$select->display().'</td>';
                }
                $count++;
 
 
            }
            $value=new INum();
            $value->javascript='onchange="format_number(this);anc_refresh_remain(\''.$this->in_div.$table_id.'\',\''.$p_seq.'\')"';
            $value->name=($readonly)?"ro"."val[".$p_seq."][]":"val[".$p_seq."][]";
            $value->size=6;
            $value->value=(isset($val[$p_seq][$i]))?$val[$p_seq][$i]:abs($p_amount);
            $value->value=round($value->value,2);
             $value->style='class="inum '.$this->in_div.$table_id.'-value-'.$p_seq.'"';
            $value->readOnly=($p_mode==1)?false:true;
            $remain=bcsub($remain,$value->value);
            $result.='<td>'.$value->input().'</td>';
 
            $result.="</tr>";
        }
 
        $result.="</table>";
 
        if ($p_add_button && $p_mode == 1)
        {
            $style_remain=($remain==0)?'style="color:green"':' style="color:red"';
            $result.=" "._("Reste")." =  ".
                     '<span class="remain" '.$style_remain.' id="'.$ctrl_remain.'">'.
                            $remain.'</span>';
            // add a button to add a row
            $button=new IButton();
            $button->javascript="add_row('".$p_id."$table_id',$p_seq);";
            $button->name="js".$p_id.$p_seq;
            $button->label=_("Nouvelle ligne");
 
            $result.="<br>".$button->input();
            /**
             * Add a button for distribution key
             * 
             */
            $http=new HttpInput();
            $ledger=$http->post("p_jrn", "string",0);
            if ($ledger==0) {
                $ledger=$this->db->get_value('select j_jrn_def from jrnx where j_id=$1',array($this->j_id));
            }
            $gDossier=Dossier::id();
            $button_key=new IButton();
            $button_key->javascript="anc_key_choice(".$gDossier.",'".$p_id."$table_id',$p_amount,'".$ledger."');";
            $button_key->name="js".$p_id.$p_seq;
            $button_key->label=_("Clef");
            $result .= $button_key->input();
            /**
             * Add a button to clean the detail
             */
            $button_clean=new IButton();
            $button_clean->javascript=sprintf("anc_key_clean('%s','%s','%s','%s','%s','%s');",
                    $gDossier,
                    $p_id,
                    $p_amount,
                    $ledger,
                    $this->j_id,
                    $p_seq
                    );
            $button_clean->name=uniqid();
            $button_clean->label=_("Efface détail");
            $result.=$button_clean->input();
                    
 
        }
 
        return $result;
    }

References $a_plan, $array, $count, $hidden, $i, $nb_row, $p_array, $readonly, $result, $select, $table_id, $val, $value, db, js, table, tr(), and value.

Here is the call graph for this function:

◆ display_table()

Anc_Operation::display_table	(	$p_mode,
		$p_amount,
		$p_id
	)

Display a table with analytic accounting in detail of operation.

Note: $this->j_id must be set

Parameters

$p_mode	0 = readonly or 1=writable
$p_amount	amount
$p_id	unique id

See also: display_form_plan

Returns: string to display

Definition at line 1060 of file anc_operation.class.php.

    {
        static $seq=-1;         /* first seq == 0 */
        $seq++;
 
        $array=$this->get_by_jid($this->j_id) ;
        if ( $array != null )
        {
            $request=$this->to_request($array,$seq);
            return "<td>".$this->display_form_plan($request,1,$p_mode,$seq,$p_amount,$p_id)."</td>";
        }
        else
        {
            return '<td>'.$this->display_form_plan(null,1,$p_mode,$seq,$p_amount,$p_id)."</TD>";
        }
        return "";
 
    }

References $array, $p_id, $seq, get_by_jid(), and to_request().

Here is the call graph for this function:

◆ get_balance()

Anc_Operation::get_balance	(	$p_from,
		$p_to,
		$p_plan_id
	)

Definition at line 506 of file anc_operation.class.php.

    {
        // for the operation connected to jrnx
        $cond=sql_filter_per($this->db,$p_from,$p_to,'p_id','j_date');
        $sql="select oa_id, po_id, oa_amount, oa_debit, j_date from jrnx join operation_analytique using (j_id)
             join poste_analytique using (po_id)
             where
             $cond and j_id is not null and pa_id=$p_plan_id";
 
        // OD
        $cond=sql_filter_per($this->db,$p_from,$p_to,'p_id','oa_date');
        $sql="union select oa_id, po_id, oa_amount, oa_debit,oa_date from
             operation_analytique
             join poste_analytique using (po_id)
             where j_id is null and
             $cond and pa_id=$p_plan_id ";
        try
        {
            $res=$this->db->exec_sql($sql);
            $array=Database::fetch_all($res);
        }
        catch (Exception $e)
        {
              record_log($e);
        }
    }

References $array, $e, $res, $sql, db, DatabaseCore\fetch_all(), record_log(), and sql_filter_per().

Here is the call graph for this function:

◆ get_by_jid()

Anc_Operation::get_by_jid ( $p_jid )

retrieve an operation thanks a jrnx.j_id

Parameters

the jrnx.j_id

Returns: null if nothing is found other an array

Definition at line 366 of file anc_operation.class.php.

    {
        $array=array();
        $a_plan=$this->db->get_array('select pa_id from plan_analytique order by pa_id');
        $res=array();
        /*
         * For one oa_row
         */
        $a_rowcount=$this->db->get_array("select distinct  oa_row "
                ." from operation_analytique where j_id=$1 order by oa_row", array($p_jid));
 
        for ($i=0; $i<count($a_rowcount); $i++)
        {
            /*
             * Get one row as template for filling the missing 
             */
            $a_existing=$this->db->get_array('
                    select distinct oa_id,
                     po_id,
                     oa_amount,
                     oa_description,
                     oa_debit,
                     j_id,
                     oa_group,
                     oa_date,
                     pa_id,
                     oa_row,
                     oa_positive
                     from operation_analytique join poste_analytique using (po_id)
                     where
                     j_id=$1 and oa_row = $2 
                     order by j_id,oa_row', 
                    array($p_jid, $a_rowcount[$i]['oa_row']));
            
            // the first row we found will be the template
            $template=$a_existing[0];
            /*
             * For each plan
             */
            for ($j=0; $j<count($a_plan); $j++)
            {
                /*
                 * Fetch the row with this pa_id, oa_row, max : 1 row
                 */
                $a_fetch=$this->db->get_array('
                    select distinct oa_id,
                     po_id,
                     oa_amount,
                     oa_description,
                     oa_debit,
                     j_id,
                     oa_group,
                     oa_date,
                     pa_id,
                     oa_row,
                     oa_positive
                     from operation_analytique join poste_analytique using (po_id)
                     where
                     j_id=$1 and oa_row = $2  and pa_id=$3', array($p_jid,
                    $a_rowcount[$i]['oa_row'],
                    $a_plan[$j]['pa_id']
                        )
                );
                if (count($a_fetch)==0)
                {
                    $a_fetch=$template;
                    $a_fetch['pa_id']=$a_plan[$j]['pa_id'];
                    $a_fetch['po_id']=-1;
                    $a_fetch['oa_id']='';
                    $res[]=$a_fetch;
                }
                else
                if (count($a_fetch)==1)
                {
                    $res[]=$a_fetch[0];
                }
            }
        }
 
        foreach ($res as $row)
        {
            $a=new Anc_Operation($this->db);
            foreach ($row as $attr=> $value)
            {
                $a->$attr=$row[$attr];
            }
            $array[]=clone $a;
        }
 
 
        return $array;
    }

References $a, $a_plan, $array, $attr, $i, $res, $row, $template, $value, and db.

Referenced by display_table(), and update_from_jrnx().

◆ get_currency_rate()

Anc_Operation::get_currency_rate ( )

Definition at line 58 of file anc_operation.class.php.

    {
        return $this->currency_rate;
    }

References $currency_rate.

◆ get_jrid()

Anc_Operation::get_jrid ( )

retrieve the jr_id thanks the oa_group

Definition at line 493 of file anc_operation.class.php.

    {
        $sql="select distinct jr_id from jrn join jrnx on (j_grpt=jr_grpt_id) join operation_analytique using (j_id) where j_id is not null and oa_group=".$this->oa_group;
        $res=$this->db->exec_sql($sql);
        if ( Database::num_row($res) == 0 ) return 0;
        $ret=Database::fetch_all($res);
        return $ret[0]['jr_id'];
    }

References $res, $ret, $sql, db, DatabaseCore\fetch_all(), and DatabaseCore\num_row().

Here is the call graph for this function:

◆ get_list()

Anc_Operation::get_list	(	$p_from,
		$p_to,
		$p_from_poste = `""`,
		$p_to_poste = `""`
	)

get a list of row from a certain periode

Definition at line 232 of file anc_operation.class.php.

    {
        $cond="";
        $cond_poste="";
 
        if ($p_from!="")
            $cond="and (jr_date >= to_date('$p_from','DD.MM.YYYY')  or oa_date >= to_date('$p_from','DD.MM.YYYY') )";
        if ( $p_to!="" )
            $cond.="and (jr_date <=to_date('$p_to','DD.MM.YYYY') or  oa_date <=to_date('$p_to','DD.MM.YYYY')) ";
 
        if ($p_from_poste != "" )
            $cond_poste=" and upper(po_name) >= upper('".$p_from_poste."')";
        if ($p_to_poste != "" )
            $cond_poste.=" and upper(po_name) <= upper('".$p_to_poste."')";
        $pa_id_cond="";
        if ( isset ( $this->pa_id) && $this->pa_id !='')
            $pa_id_cond= "pa_id=".$this->pa_id." and";
        $sql="
        
        select B.po_id as po_id,
            oa_id,
            po_name,
            oa_description,
            po_description,
            oa_debit,
            (case when jr_date is not null then to_char(jr_date,'DD.MM.YYYY') else to_char(oa_date,'DD.MM.YYYY') end )  as oa_date,
            (case when jr_date is not null then to_char(jr_date,'YYYYMMDD') else to_char(oa_date,'YYYYMMDD') end )  as str_order_date,
            oa_amount,
            oa_group,
            j_id ,
            jr_internal,
            jr_pj_number ,
            jr_id,
            coalesce(jr_comment,b.oa_description) as jr_comment,
            case when j_poste is null and b.f_id is not null then
            (select ad_value from fiche_detail where fiche_detail.f_id=b.f_id and ad_id=".ATTR_DEF_ACCOUNT.")
                when j_poste is not null then
                j_poste
                end as j_poste
            ,
            coalesce(jrnx.f_id,b.f_id) as f_id,
            case when jrnx.f_id is not null then 
                     (select ad_value from fiche_Detail where f_id=jrnx.f_id and ad_id=23) 
                     when b.f_id is not null then
                     (select ad_value from fiche_Detail where f_id=b.f_id and ad_id=23)
            end
                     as qcode,
            jr_pj_number
        from operation_analytique as B join poste_analytique using(po_id)
        left join jrnx using (j_id)
        left join jrn on  (j_grpt=jr_grpt_id)
             where $pa_id_cond oa_amount <> 0.0 $cond $cond_poste
        order by jr_date,oa_group,oa_debit desc,oa_id";
 
        $RetSql=$this->db->exec_sql($sql);
        $array=Database::fetch_all($RetSql);
        return $array;
    }

References $array, $sql, db, DatabaseCore\fetch_all(), and pa_id.

Here is the call graph for this function:

◆ get_list_simple()

Anc_Operation::get_list_simple	(	$p_from,
		$p_to
	)

Definition at line 201 of file anc_operation.class.php.

    {
        $cond="";
        $where=" where ";
        
        if ($p_from!="") {
            $cond="$where (oa_date >= to_date('$p_from','DD.MM.YYYY')  or oa_date >= to_date('$p_from','DD.MM.YYYY') )";
            $where=" and ";
        }
        if ( $p_to!="" ) {
            $cond.="$where (oa_date <=to_date('$p_to','DD.MM.YYYY') or  oa_date <=to_date('$p_to','DD.MM.YYYY')) ";
            $where=" and ";
        }
        
        $cond .= $where." j_id is null ";
        
        $sql="
            select distinct oa_group,
                to_char(oa_date,'DD.MM.YYYY') as str_date ,
                oa_date,
                oa_description
            from 
                operation_analytique as oa 
                $cond
                    order by oa_date ";
        return $this->db->get_array($sql);
                
    }

References $sql, and db.

Referenced by html_table().

◆ html_table()

Anc_Operation::html_table ( $p_from )

Definition at line 293 of file anc_operation.class.php.

    {
        if ($p_from=="")
        {
            $from="";
            $to="";
        }
        else
        {
            $p=new Periode($this->db);
            list($from,$to)=$p->get_date_limit($p_from);
        }
 
        $array=$this->get_list_simple($from,$to);
        
        if ( empty($array)  )
            return _("Pas d'enregistrement trouvé");
 
        // navigation_bar
        $step=$_SESSION[SESSION_KEY.'g_pagesize'];
        $page=(isset($_GET['offset']))?$_GET['page']:1;
        $offset=(isset($_GET['offset']))?$_GET['offset']:0;
        $bar=navigation_bar($offset+1,count($array),$step,$page);
 
        if ( $step !=-1)
            $view=array_splice($array,$offset,$step);
        else
            $view=$array;
 
        $gDossier=dossier::id();
        $ret="";
        $ret.=$bar;
 
        $count=0;
        $group=0;
        $oldgroup=0;
        $oldjrid=0;
        $ret.=_("Chercher")." ".HtmlInput::filter_table("anc_operation_list_tb", '0,1,2', 1);
        $ret.= "<table id=\"anc_operation_list_tb\"class=\"result\">";
        $ret.=th(_("Date"));
        $ret.=th(_("Libellé"));
        $ret.=th("");
        $ret.=th("");
        $i=0;
        foreach ($view as $row)
        {
            $class=($i%2 == 0)?'class="even"':' class="odd"';
            $i++;
            
            if ( $oldgroup <> $row['oa_group']) {
                $oldgroup=$row['oa_group'];
            }
            $row_id=sprintf('id="tr%s"',$oldgroup);
            
            $ret.="<tr $row_id $class>";
            $ret.=td($row['str_date']);
            $ret.=td(h($row['oa_description']));
            $js="anc_remove_operation(".$gDossier.",".$oldgroup.")";
             
            $ret.="<td>".Icon_Action::trash(uniqid(), $js) ."</td>";
            $js="anc_detail_op({$row['oa_group']},{$gDossier})";
            $ret .= "<td>". Icon_Action::modify(uniqid(), $js)."</td>";
            $ret.="</tr>";
        }    
        $ret.='</table>';
        $ret.=$bar;
        
        return $ret;
    }

References $_GET, $array, $bar, $class, $count, $from, $gDossier, $i, $js, $offset, $p, $page, $ret, $row, $step, $to, db, HtmlInput\filter_table(), get_list_simple(), h, id, Icon_Action\modify(), navigation_bar(), td(), and th().

Here is the call graph for this function:

◆ save_form_plan()

Anc_Operation::save_form_plan	(	$p_array,
		$p_item,
		$p_j_id
	)

it called for each item, the data are taken from $p_array data and set before in this. Amount will be transformed thanks the $this->currency_rate;

Parameters

$p_item	if the item nb for each item (purchase or selling merchandise)
$p_array	structure

nb_tx x is the number of the item it contains the number of rows of CA for this card

val double array : amount for the CA row ACC => sub row ANC

here Operation 0 has 2 row for a total of 10.31 and 1 here Operation 1 has 1 row for a total of 430

    [val] => Array
        (
            [0] => Array
                (
                    [0] => 10.31
                    [1] => 1
                )

            [1] => Array
                (
                    [0] => 430
                )

        )

amount_tx the amount for each row

It is the amount to split per accounting, it is possible that it is different from the sum of the given amount ( see val) per row

      [amount_t0] => 11.31
      [amount_t1] => 430

ta_AoCrow_R contains the value of the pa_id and po_id for this row with the form pa_id_po_id d_d

hplan = Double array operation

Double array operation => all the amount but in linear form

Example if the amount of the operation 0 is splitted in 2 rows and 2 cols (because 2 analytic plan, means 2 cols) we have an array of 4 values for operation 0, it gives the poste_analytique.po_id (from DB).

Here is the operation 0 (one row of the accounting) is splitted in po_id = 1 (pa_id see in tables or array pa_id) and po_id=5 (second pa_id) for 10.31 (see array val) and for 1 is set for po_id 1 and 4, p

        [hplan] => Array
        (
            [0] => Array
                (
                    [0] => 1
                    [1] => 5
                    [2] => 1
                    [3] => 4
                )

            [1] => Array
                (
                    [0] => 1
                    [1] => 6
                )

        )

pa_id

pa_id array of plan_analytic.pa_id (1 per column), always ordered by pa_id

    [pa_id] => Array
        (
            [0] => 1
            [1] => 2
        )

     *

Attention: The idea is one j_id matches several oa_id, serveral data must be set before the call :

j_id
oa_debit
oa_group
oa_date
oa_description

Definition at line 889 of file anc_operation.class.php.

    {
        extract($p_array, EXTR_SKIP);
        if (! isset ($hplan) ) return;
        /* variable for in array
           pa_id array of existing pa_id
           hplan double array with the pa_id (column)
           val double array by row with amount
           op contains sequence
           p_item is used to identify what op is concerned
        */
        /* for each row */
        $idx_pa_id=0;
        $row=0;
        
        if ( ! isset ($hplan[$p_item]))            return;
        // foreach col PA
        for ($e=0;$e<count($hplan[$p_item]);$e++)
        {
            if ( $idx_pa_id == count($pa_id))
            {
                $idx_pa_id=0;
                $row++;
            }
            if ($hplan[$p_item][$e] != -1 && $val[$p_item][$row] != '')
            {
                $op=new Anc_Operation($this->db);
                $op->po_id=$hplan[$p_item][$e];
                $op->oa_group=$this->oa_group;
                $op->j_id=$p_j_id;
                // convert oa_amount to EUR
                $op->oa_amount=bcdiv($val[$p_item][$row],$this->currency_rate,2);
                $op->oa_debit=$this->oa_debit;
                $op->oa_date=$this->oa_date;
 
                $op->oa_description=$this->oa_description;
                $op->oa_row=$row;
                $op->add();
            }
            $idx_pa_id++;
        }
        // }
    }

◆ save_form_plan_vat_nd()

Anc_Operation::save_form_plan_vat_nd	(	$p_array,
		$p_item,
		$p_j_id,
		$p_nd
	)

Save the ND VAT with prorata.

Parameters

$p_array	usually $_POST
$p_item	item of the form
$p_j_id	jrnx.j_id concerned writing
$p_nd	amount nd vat

See also: Anc_Operation::save_form_plan_vat_nd

Returns: type

Definition at line 729 of file anc_operation.class.php.

    {
        bcscale(4);
        extract($p_array, EXTR_SKIP);
        if (! isset ($hplan) ) return;
        
        if ( ! isset(${'amount_t'.$p_item}) )
            throw new Exception ('amount not set');
        
        $tot=0;
        /* variable for in array
           pa_id array of existing pa_id
           hplan double array with the pa_id (column)
           val double array by row with amount
           op contains sequence
           p_item is used to identify what op is concerned
        */
        /* echo "j_id = $j_id p_item = $p_item hplan=".var_export($hplan[$p_item],true)." val = ".var_export($val[$p_item],true).'<br>'; */
        /* for each row */
        //   for ($i=0;$i<count($val[$p_item]);$i++) {
        $idx_pa_id=0;
        $row=0;
        $a_Anc_Operation=array();
        // foreach col PA
        for ($e=0;$e<count($hplan[$p_item]);$e++)
        {
            if ( $idx_pa_id == count($pa_id))
            {
                $idx_pa_id=0;
                $row++;
            }
            if ($hplan[$p_item][$e] != -1 && $val[$p_item][$row] != '')
            {
                $op=new Anc_Operation($this->db);
                $op->po_id=$hplan[$p_item][$e];
                $op->oa_group=$this->oa_group;
                $op->j_id=$p_j_id;
                $ratio=0;
                if (${"amount_t".$p_item} != 0 ) {
                    $ratio=bcdiv($val[$p_item][$row],${"amount_t".$p_item});
                }
                $amount=  bcmul($p_nd, $ratio);
                // convert to euro
                $amount=bcmul($amount,$this->currency_rate);
                $op->oa_amount=round($amount,2);
                $op->oa_debit=$this->oa_debit;
                $op->oa_date=$this->oa_date;
 
                $op->oa_description=$this->oa_description;
                $op->oa_row=$row;
                $op->oa_jrnx_id_source=$this->oa_jrnx_id_source;
                $a_Anc_Operation[]=clone $op;
            }
            $idx_pa_id++;
        }
        $nb_op=count($a_Anc_Operation);
        bcscale(4);
        for ($i=0;$i<$nb_op;$i++)
        {
            $tot=bcadd($tot,$a_Anc_Operation[$i]->oa_amount);
        }
// utilité ???
//        if ( $tot != $p_nd && count($a_Anc_Operation) > 0 )
//        {
//            $diff=  bcsub($tot, $p_nd);
//            $a_Anc_Operation[0]->oa_amount=bcsub($a_Anc_Operation[0]->oa_amount,$diff);
//        }
        for ($i=0;$i<$nb_op;$i++)
        {
            $a_Anc_Operation[$i]->add();
        }
    }

Referenced by save_update_form().

◆ save_update_form()

Anc_Operation::save_update_form ( $p_array )

save a whole form from a update box

Parameters

$p_array for ALL j_id

Returns

Note

See also: save_form_plan to_request

Definition at line 943 of file anc_operation.class.php.

    {
        extract($p_array, EXTR_SKIP);
        if ( ! isset($opanc)) return;
        for ($i = 0; $i < count($opanc); $i++)
        {
            /* clean operation_analytique */
            $this->db->exec_sql('delete from operation_analytique where j_id=$1', array($opanc[$i]));
 
            /* get missing data for adding */
            $a_missing = $this->db->get_array("select to_char(jr_date,'DD.MM.YYYY') 
                    as mdate,j_montant,j_debit,jr_comment ,j_poste
                    from jrnx join jrn on (j_grpt=jr_grpt_id) where j_id=$1", array($opanc[$i]));
            $missing = $a_missing[0];
           
            $this->oa_description = $missing['jr_comment'];
            $this->j_id = $opanc[$i];
            $group = $this->db->get_next_seq("s_oa_group"); /* for analytic */
            $this->oa_group = $group;
            $this->oa_date = $missing['mdate'];
            $this->save_form_plan($p_array, $i, $opanc[$i]);
            
            // There is ND VAT amount
            $a_nd = $this->db->get_array('select j_id from operation_analytique
                where oa_jrnx_id_source=$1', array($opanc[$i]));
            if (count($a_nd) > 0)
            {
                // for each ND VAT amount
                for ($e=0;$e<count($a_nd);$e++)
                {
                    $this->db->exec_sql('delete from operation_analytique where j_id=$1', array($a_nd[$e]['j_id']));
                    /* get missing data for adding */
                    $a_missing_vat = $this->db->get_array("select to_char(jr_date,'DD.MM.YYYY') as mdate,j_montant,j_debit,jr_comment from jrnx join jrn on (j_grpt=jr_grpt_id) where j_id=$1", array($a_nd[$e]['j_id']));
                    $missing_vat = $a_missing_vat[0];
                    $this->oa_debit = 't';
                    $this->oa_description = $missing_vat['jr_comment'];
                    $this->j_id = $opanc[$i];
                    $group = $this->db->get_next_seq("s_oa_group"); /* for analytic */
                    $this->oa_group = $group;
                    $this->oa_date = $missing_vat['mdate'];
                    $this->oa_jrnx_id_source=$opanc[$i];
                    $p_array['amount_t'.$i]=$missing['j_montant'];
                    $this->save_form_plan_vat_nd($p_array, $i, $a_nd[$e]['j_id'],$missing_vat['j_montant']);
                }
            }
        }
    }

References $e, $i, $p_array, db, and save_form_plan_vat_nd().

Here is the call graph for this function:

◆ set_currency_rate()

Anc_Operation::set_currency_rate ( $currency_rate )

Definition at line 86 of file anc_operation.class.php.

    {
        $this->currency_rate=$currency_rate;
        return $this;
    }

References $currency_rate.

◆ test_me()

Anc_Operation::test_me ( )

Definition at line 1086 of file anc_operation.class.php.

    {
        $cn=Dossier::connect();
        $anco=new Anc_Operation($cn);
        $j_id=200;
        $anco->j_id=$j_id;
        $array=$anco->get_by_jid($j_id);
        $a=$anco->to_request($array,1);
        echo '<form>';
        echo dossier::hidden();
        echo HtmlInput::hidden('j_id',$j_id);
        echo HtmlInput::hidden('test_select',$_REQUEST['test_select']);
        echo $anco->display_table(1,15002,0);
        echo '<input type="submit" name="save">';
        echo '</form>';
        if ( isset($_REQUEST['save']))
        {
            echo "to_save";
            var_dump($_REQUEST);
        }
        var_dump($a);
 
    }

References $_REQUEST, $a, $array, $cn, $j_id, Dossier\connect(), and HtmlInput\hidden().

Here is the call graph for this function:

◆ to_request()

Anc_Operation::to_request	(	$p_array,
		$p_line
	)

Definition at line 997 of file anc_operation.class.php.

    {
        $result=array();
        $result[]=array('op'=>$this->j_id);
        $pa_id=array();
 
        /* First add the pa_id */
        for ($i=0;$i < count($p_array);$i++)
        {
            if ( in_array($p_array[$i]->pa_id,$pa_id)==false)
                $pa_id[]=$p_array[$i]->pa_id;
        }
        $result['pa_id']=$pa_id;
 
        /* add the hplan */
        $seq=0;
        for ($i=0;$i < count($p_array);$i++)
        {
            $hplan[$p_line][$i]=$p_array[$i]->po_id;
        }
        $result['hplan']=$hplan;
        /* Add the amount */
        $idx_pa=0;
        $jrn_def=$this->db->get_value('select jrn_def_type from jrnx join jrn_def on (j_jrn_def=jrn_def_id) where j_id=$1',array($this->j_id));
        for ($i=0;$i < count($p_array);$i++)
        {
            
            /*
             * For the bank, negatif are always on the debit and positif on the credit
             */
            if ( $jrn_def != 'FIN')
            {
                $val[$p_line][$p_array[$i]->oa_row]=($p_array[$i]->oa_positive=='Y')?$p_array[$i]->oa_amount:($p_array[$i]->oa_amount*(-1));
            }
            else
            {
                $val[$p_line][$p_array[$i]->oa_row]=$p_array[$i]->oa_amount;
            }
        }
        $result['val']=$val;
        return $result;
    }

References $i, $p_array, $pa_id, $result, $seq, $val, db, and pa_id.

Referenced by display_table().

◆ update_from_jrnx()

Anc_Operation::update_from_jrnx ( $p_po_id )

modify an op from modify_op.php

Definition at line 462 of file anc_operation.class.php.

    {
        $a=$this->get_by_jid($this->j_id);
        if ( $a == null )
        {
            // retrieve data from jrnx
            $sql="select jr_date,j_montant,j_debit from jrnx ".
                 " join jrn on (jr_grpt_id = j_grpt) ".
                 "where j_id=".$this->j_id;
            $res=$this->db->exec_sql($sql);
            if (Database::num_row($res) == 0 ) return;
            $row=Database::fetch_array($res,0);
            $this->oa_amount=$row['j_amount'];
            $this->oa_date=$row['jr_date'];
            $this->oa_debit=$row['j_debit'];
            $this->oa_description=$row['jr_comment'];
            $this->add();
        }
        else
        {
            foreach ($a as $row )
            {
                if ( $row->pa_id == $this->pa_id )
                {
                    $row->po_id=$p_po_id;
                    $row->update();
                }
            }
        }
    }

References $a, $res, $row, $sql, add(), db, DatabaseCore\fetch_array(), get_by_jid(), and DatabaseCore\num_row().

Here is the call graph for this function:

Field Documentation

◆ $card

Anc_Operation::$card

Card linked to the operation

Definition at line 47 of file anc_operation.class.php.

Referenced by __toString().

◆ $currency_rate

Anc_Operation::$currency_rate

private

currency rate

Definition at line 48 of file anc_operation.class.php.

Referenced by __toString(), get_currency_rate(), and set_currency_rate().

◆ $db

Anc_Operation::$db

database connection

Definition at line 34 of file anc_operation.class.php.

◆ $has_data

Anc_Operation::$has_data

Definition at line 55 of file anc_operation.class.php.

◆ $id

Anc_Operation::$id

= oa_id (one row)

Definition at line 37 of file anc_operation.class.php.

Referenced by __toString().

◆ $in_div

Anc_Operation::$in_div

Definition at line 96 of file anc_operation.class.php.

◆ $j_id

Anc_Operation::$j_id

foreign key to a jrnx operation (or null if none

Definition at line 42 of file anc_operation.class.php.

Referenced by __toString(), and test_me().

◆ $list

Anc_Operation::$list

array of all operation

Definition at line 36 of file anc_operation.class.php.

Referenced by __toString().

◆ $oa_amount

Anc_Operation::$oa_amount

amount for one row

Definition at line 39 of file anc_operation.class.php.

Referenced by __toString().

◆ $oa_date

Anc_Operation::$oa_date

equal to j_date if j_id is not null

Definition at line 45 of file anc_operation.class.php.

Referenced by __toString().

◆ $oa_debit

Anc_Operation::$oa_debit

true for debit or false

Definition at line 41 of file anc_operation.class.php.

Referenced by __toString().

◆ $oa_description

Anc_Operation::$oa_description

comment for one row

Definition at line 40 of file anc_operation.class.php.

Referenced by __toString().

◆ $oa_group

Anc_Operation::$oa_group

group of operation

Definition at line 44 of file anc_operation.class.php.

Referenced by __toString().

◆ $oa_id

Anc_Operation::$oa_id

Definition at line 56 of file anc_operation.class.php.

◆ $oa_jrnx_id_source

Anc_Operation::$oa_jrnx_id_source

In the case, the amount comes from a ND VAT, the variable contents the jrnx.j_id of the source which was used to compute the amount.

Definition at line 54 of file anc_operation.class.php.

◆ $oa_positive

Anc_Operation::$oa_positive

signed of the amount

Definition at line 95 of file anc_operation.class.php.

◆ $oa_row

Anc_Operation::$oa_row

Definition at line 57 of file anc_operation.class.php.

Referenced by add().

◆ $pa_id

Anc_Operation::$pa_id

the plan analytique id

Definition at line 46 of file anc_operation.class.php.

Referenced by __toString(), and to_request().

◆ $po_id

Anc_Operation::$po_id

poste analytique

Definition at line 38 of file anc_operation.class.php.

Referenced by __toString().

◆ $row

Anc_Operation::$row

array of row for one operation

Definition at line 35 of file anc_operation.class.php.

Referenced by __toString(), get_by_jid(), html_table(), and update_from_jrnx().

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

include/class/anc_operation.class.php

Public Member Functions

Data Fields

Private Attributes

Detailed Description

Constructor & Destructor Documentation

◆ __construct()

Member Function Documentation

◆ __toString()

◆ add()

◆ delete()

◆ delete_by_jid()

◆ display_form_plan()

◆ display_table()

◆ get_balance()

◆ get_by_jid()

◆ get_currency_rate()

◆ get_jrid()

◆ get_list()

◆ get_list_simple()

◆ html_table()

◆ save_form_plan()

val double array : amount for the CA row ACC => sub row ANC

amount_tx the amount for each row

hplan = Double array operation

pa_id

◆ save_form_plan_vat_nd()

◆ save_update_form()

◆ set_currency_rate()

◆ test_me()

◆ to_request()

◆ update_from_jrnx()

Field Documentation

◆ $card

◆ $currency_rate

◆ $db

◆ $has_data

◆ $id

◆ $in_div

◆ $j_id

◆ $list

◆ $oa_amount

◆ $oa_date

◆ $oa_debit

◆ $oa_description

◆ $oa_group

◆ $oa_id

◆ $oa_jrnx_id_source

◆ $oa_positive

◆ $oa_row

◆ $pa_id

◆ $po_id

◆ $row