Anc_Balance_Double Class Reference

Print the crossed balance between 2 plan. More...

Inheritance diagram for Anc_Balance_Double:

Collaboration diagram for Anc_Balance_Double:

Public Member Functions
	display_csv ()
	Compute the csv export.
	display_form ($p_string='')
	Compute the form to display.
	display_html ()
	display_pdf ()
	Display the result in pdf.
	get_request ()
	complete the object with the data in $_REQUEST
	load ()
	load the data from the database
	show_button ($p_string="")
	Show the button to export in PDF or CSV.
	show_sum ($p_array)
	add extra lines with sum of each account
Public Member Functions inherited from Anc_Print
	__construct ($p_cn)
	check ()
	set_sql_filter ()
	Set the filter (account_date)

Static Public Member Functions
static	test_me ()
	for testing and debuggind the class it must never be called from production system, it is intended only for developpers

Data Fields
	$from_poste2
	compute the html display
	$pa_id2
	$to_poste2
Data Fields inherited from Anc_Print
	$db
	$from
	$from_poste
	$has_data
	$pa_id
	$to
	$to_poste

Detailed Description

Print the crossed balance between 2 plan.

Definition at line 33 of file anc_balance_double.class.php.

Member Function Documentation

display_csv()

Anc_Balance_Double::display_csv

(

)

Compute the csv export.

Returns

string with the csv

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

    {
        $csv = new Noalyss_Csv("ca_bal_croise");
        $csv->send_header();
        
        $csv->add("Poste comptable Analytique");
        $csv->add("Poste comptable Analytique");
        $csv->add("Debit");
        $csv->add("Credit");
        $csv->add("Solde");
        $csv->add("D/C");
 
        $csv->write();
 
        $array=$this->load();
        if ( is_array($array) == false )
        {
            return $array;
 
        }
        foreach ( $array as $row)
        {
 
            $csv->add($row['a_po_name']);
            $csv->add($row['b_po_name']);
            $csv->add($row['a_d'],'number');
            $csv->add($row['a_c'],'number');
            $csv->add($row['a_solde'],'number');
            $csv->add($row['a_debit'],'text');
            $csv->write();
        }
 
 
    }

References $array, $csv, $row, and load().

Here is the call graph for this function:

display_form()

Anc_Balance_Double::display_form

(

$p_string = ''

)

Compute the form to display.

Parameters

$p_hidden

hidden tag to be included (gDossier,...)

Returns

string containing the data

Reimplemented from Anc_Print.

Definition at line 334 of file anc_balance_double.class.php.

    {
        $r=parent::display_form($p_string);
        // show the second plan
        $r.='<span style="padding:5px;margin:5px;border:2px double  blue;display:block;">';
        $plan=new Anc_Plan($this->db);
        $plan_id=new ISelect("pa_id2");
        $plan_id->value=$this->db->make_array("select pa_id, pa_name from plan_analytique order by pa_name");
        $plan_id->selected=$this->pa_id2;
        $r.= "Plan Analytique :".$plan_id->input();
        $r.=HtmlInput::request_to_hidden(array('ac'));
        
        
 
 
        $poste=new IText();
        $poste->size=10;
        $r.=_('Entre le poste ');
        $r.=$poste->input("from_poste2",$this->from_poste2);
        $javascript="search_ca(".dossier::id().",'from_poste2','pa_id2')";
        $r.=Icon_Action::icon_magnifier(uniqid(), $javascript);
 
        $r.=_(" et le poste ");
        $poste->id="to_poste2";
        $r.=$poste->input("to_poste2",$this->to_poste2);
        $javascript="search_ca(".dossier::id().",'to_poste2','pa_id2')";
        $r.=Icon_Action::icon_magnifier(uniqid(), $javascript);
 
        $r.='<span class="notice" style="display:block">'.
            _('Selectionnez le plan qui vous int&eacute;resse avant de cliquer sur Recherche').
            '</span>';
 
        $r.='</span>';
        $r.=HtmlInput::submit('Affiche', _('Rechercher'));
        return $r;
    }

References $pa_id2, $poste, $r, _, db, and Icon_Action\icon_magnifier().

Here is the call graph for this function:

display_html()

Anc_Balance_Double::display_html

(

)

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

    {
        if ($this->pa_id == $this->pa_id2) throw new Exception(_("Pas de croisement avec un seul plan"),1000);
 
        bcscale(2);
        $r="";
 
        $array=$this->load();
        $odd=0;
        if ( is_array($array) == false )
        {
            return $array;
 
        }
        $old="";
        $tot_deb=0;
        $tot_cred=0;
 
        foreach ( $array as $row)
        {
            $odd++;
 
            $r.=($odd%2==0)?'<tr class="odd">':'<tr class="even">';
 
            if ( $old == $row['a_po_name'] )
            {
                $r.='<td></td>';
            }
            else
            {
 
                if ( $tot_deb != 0 || $tot_cred !=0 )
                {
                  $r.="<tr>".td('');
                  $r.="<td>"._("Total")." </td>".td(nbm($tot_deb),' class="num"').td(nbm($tot_cred),' class="num"');
                    $s=abs(bcsub($tot_deb,$tot_cred));
                    
                    $d=($tot_deb>$tot_cred)?'debit':'credit';
                    $r.="<td class=\"num\">".nbm($s)."</td><td>$d</td>";
                    $r.="</tr>";
                }
                $tot_deb=0;
                $tot_cred=0;
 
                // new
                $r.="</table>";
                $r.="<table class=\"result\" style=\"margin-bottom:3px\">";
                $r.="<tr>";
                $r.="<th style=\"width:30%\" >"._("Poste Analytique")."</th>";
                $r.="<th style=\"width:30%\">"._("Poste Analytique")."</th>";
                $r.="<th style=\"text-align:right\">"._("Débit")."</th>";
                $r.="<th style=\"text-align:right\">"._("Crédit")."</th>";
                $r.="<th style=\"text-align:right\">"._("Solde")."</th>";
                $r.="<th>D/C</th>";
                $r.="</tr>";
                $r.='<tr>';
                $r.=td($row['a_po_name'].' '.$row['a_po_description']);
                $old=$row['a_po_name'];
                $r.= '</tr>';
                $r.= '<tr>';
                $r.=td('');
            }
            $tot_deb=bcadd($tot_deb,$row['a_d']);
            $tot_cred=bcadd($tot_cred,$row['a_c']);
 
            $r.=td($row['b_po_name']." ".$row['b_po_description']);
 
            $r.=td(nbm($row['a_d']),' class="num"');
            $r.=td(nbm($row['a_c']),' class="num"');
            $r.=td(nbm($row['a_solde']),' class="num"');
            $r.=sprintf("<td>%s</td>",$row['a_debit']);
            $r.="</tr>";
        } /* end loop */
 
        if ( $tot_deb != 0 || $tot_cred !=0 )
        {
          $r.="<tr>".td('');
            $r.="<td>Total </td> <td ' class=\"num\"> ".nbm($tot_deb)." </td> <td ' class=\"num\">".nbm($tot_cred)."</td>";
            $s=abs($tot_deb-$tot_cred);
            $d=($tot_deb>$tot_cred)?'debit':'credit';
            $r.=td(nbm($s),' class="num"')."<td>$d</td>";
            $r.="</tr>";
        }
 
        $r.="</table>";
        $r.=h2info('Résumé');
        $r.='<table class="result">';
        $r.='<tr>';
        $r.=th('Po').
          th('Nom').
          th('Débit',' style="text-align:right"').
          th('Crédit','style="text-align:right" ').
          th('Solde',' style="text-align:right"');
 
        $sum=$this->show_sum($array);
        $tot_cred=0;$tot_deb=0;
        foreach ($sum as $row)
        {
            $r.='<tr>';
            $r.='<td>'.$row['poste'].'</td>';
            $r.='<td>'.$row['desc'].'</td>';
            $r.='<td class="num">'.nbm($row['debit']).'</td>';
            $r.='<td class="num">'.nbm($row['credit']).'</td>';
            $diff=bcsub($row['credit'],$row['debit']);
            $tot_cred=bcadd($tot_cred,$row['credit']);
            $tot_deb=bcadd($tot_deb,$row['debit']);
 
            $r.=td(nbm($diff),' class="num" ');
 
            $r.='<td>'.$row['dc'].'</td>';
            $r.='</tr>';
        }
        $r.='<tr class="highlight">';
        $r.=td('');
        $r.=td('total');
        $r.=td(nbm($tot_deb),'class="num"');
        $r.=td(nbm($tot_cred),'class="num"');
        $solde=bcsub($tot_cred,$tot_deb);
        $sign=($tot_cred<$tot_deb)?_("Débit"):_("Crédit");
        $r.=td(nbm($solde),'class="num" style="border:solid 1px blue;font-weight:bold"');
        $r.=td($sign);
        $r.='</tr>';
        $r.='</table>';
 
        return $r;
    }

References $array, $diff, $old, $r, $row, $s, $solde, $tot_cred, $tot_deb, _, h2info(), load(), nbm(), pa_id, show_sum(), td(), and th().

Here is the call graph for this function:

display_pdf()

Anc_Balance_Double::display_pdf

(

)

Display the result in pdf.

Returns

none

Definition at line 175 of file anc_balance_double.class.php.

    {
        $array=$this->load();
        bcscale(2);
        if (empty($array))return;
        $pdf=new PDF($this->db);
        $pdf->Setdossierinfo(dossier::name());
        $pdf->setTitle("Balance analytique",true);
        $pdf->SetAuthor('NOALYSS');
        $pdf->AliasNbPages();
        $pdf->AddPage();
 
        $pa=new Anc_Plan($this->db,$this->pa_id);
        $pa->get();
        $pb=new Anc_Plan($this->db,$this->pa_id2);
        $pb->get();
        $pdf->SetFont('DejaVu','B',9);
        $pdf->write_cell(0,7,sprintf("Balance croise plan %s %s ",
                               $pa->name,
                               $pb->name),1,0,'C');
        $filtre_date="";
        $filtre_pa="";
        $filtre_pb="";
 
        if ( $this->from !="" ||$this->to !="")
            $filtre_date=sprintf("Filtre date  %s %s",
                                 $this->from,
                                 $this->to);
        if ( $this->from_poste !="" ||$this->to_poste !="")
            $filtre_pa=sprintf("Filtre poste plan1  %s %s",
                               ($this->from_poste!="")?"de ".$this->from_poste:" ",
                               ($this->to_poste!="")?"jusque ".$this->to_poste:"");
 
        if ( $this->from_poste2 !="" ||$this->to_poste2 !="")
            $filtre_pb=sprintf("Filtre poste plan2   %s  %s",
                               ($this->from_poste2!="")?"de ".$this->from_poste2:" ",
                               ($this->to_poste2!="")?"jusque ".$this->to_poste2:"");
 
        $pdf->SetFont('DejaVu','',8);
        $pdf->write_cell(50,7,$filtre_date);
        $pdf->write_cell(50,7,$filtre_pa);
        $pdf->write_cell(50,7,$filtre_pb);
        $pdf->line_new();
 
        $pdf->SetFont('DejaVu','',6);
        $pdf->write_cell(20,7,'id','B');
        $pdf->write_cell(100,7,'Poste Comptable','B');
        $pdf->write_cell(20,7,'Débit','B',0,'L');
        $pdf->write_cell(20,7,'Crédit','B',0,'L');
        $pdf->write_cell(20,7,'Solde','B',0,'L');
        $pdf->write_cell(20,7,'D/C','B',0,'L');
        $pdf->line_new();
 
        for ($i=0;$i<count($array);$i++)
        {
            $row=$array[$i];
            $pdf->write_cell(20,6,$row['a_po_name'],0,0,'L');
            $pdf->write_cell(40,6,mb_substr($row['a_po_description'],0,31),0,0,'L');
            $pdf->write_cell(20,6,$row['b_po_name'],0,0,'L');
            $pdf->write_cell(40,6,mb_substr($row['b_po_description'],0,31),0,0,'L');
            $pdf->write_cell(20,6,$row['a_d'],0,0,'R');
            $pdf->write_cell(20,6,$row['a_c'],0,0,'R');
            $side=($row['a_c']>$row['a_d'])?"+":"-";
            $side=($row['a_c'] == $row['a_d'])?"=":$side;
            $pdf->write_cell(20,6,$side." ".$row['a_solde'],0,0,'R');
            $pdf->write_cell(20,6,$row['a_debit'],0,0,'C');
            $pdf->line_new();
        }
 
        $sum=$this->show_sum($array);
        $pdf->SetFont('DejaVu','B',8);
        $pdf->write_cell(70,6,'Somme',1,0,'C');
        $pdf->line_new(5);
        $pdf->SetFont('DejaVu','',6);
 
        $pdf->write_cell(20,7,'Poste');
        $pdf->write_cell(60,7,'Description','B');
        $pdf->write_cell(20,7,'Débit','B',0,'L');
        $pdf->write_cell(20,7,'Crédit','B',0,'L');
        $pdf->write_cell(20,7,'Solde','B',0,'L');
        $pdf->write_cell(20,7,'D/C','B',0,'L');
        $pdf->line_new();
        // Summary
        $tot_cred=$tot_deb=0;
        for ($i=0;$i<count($sum);$i++)
        {
            $row=$sum[$i];
            $pdf->write_cell(20,6,$row['poste'],0,0,'L');
            $pdf->write_cell(60,6,$row['desc'],0,0,'L');
            $pdf->write_cell(20,6,sprintf('%.2f',$row['debit']),0,0,'R');
            $pdf->write_cell(20,6,sprintf('%.2f',$row['credit']),0,0,'R');
            $side=($row['credit']>$row['debit'])?"+":"-";
            $side=($row['debit'] == $row['credit'])?"=":$side;
            $pdf->write_cell(20,6,sprintf($side." ".'%.2f',$row['solde']),0,0,'R');
            $pdf->write_cell(20,6,$row['dc'],0,0,'R');
            $pdf->line_new();
            $tot_cred=bcadd($tot_cred,$row['credit']);
            $tot_deb=bcadd($tot_deb,$row['debit']);
        }
        $pdf->write_cell(20,6,"",0,0,'L');
        $pdf->write_cell(60,6,_('Total'),0,0,'L');
        $pdf->write_cell(20,6,nb($tot_deb),0,0,'R');
        $pdf->write_cell(20,6,nb($tot_cred),0,0,'R');
        $side=($tot_cred > $tot_deb)?"+":"-";
        $side=($tot_deb == $tot_cred)?"=":$side;
        $solde=abs(bcsub($tot_cred,$tot_deb));
        $pdf->write_cell(20,6,$side." ".$solde,0,0,'R');
        $pdf->write_cell(20,6,$row['dc'],0,0,'R');
        $pdf->line_new();
        $fDate=date('dmy-Hi');
        $pdf->output('crossbalance-'.$fDate.'.pdf','D');
    }

References $array, $fDate, $i, $pa, $pdf, $row, $side, $solde, $tot_cred, $tot_deb, _, db, from, from_poste, load(), nb(), pa_id, show_sum(), to, and to_poste.

Here is the call graph for this function:

get_request()

Anc_Balance_Double::get_request

(

)

complete the object with the data in $_REQUEST

Reimplemented from Anc_Print.

Definition at line 415 of file anc_balance_double.class.php.

    {
        parent::get_request();
        $this->from_poste2=(isset($_REQUEST['from_poste2']))?$_REQUEST['from_poste2']:"";
        $this->to_poste2=(isset($_REQUEST['to_poste2']))?$_REQUEST['to_poste2']:"";
        $this->pa_id2=(isset($_REQUEST['pa_id2']))?$_REQUEST['pa_id2']:"";
 
    }

References $_REQUEST.

load()

Anc_Balance_Double::load

(

)

load the data from the database

Returns

array

Definition at line 428 of file anc_balance_double.class.php.

    {
        $filter_poste="";
        $and="";
        if ( $this->from_poste != "" )
        {
            $filter_poste.=" $and upper(pa.po_name)>= upper('".Database::escape_string($this->from_poste)."')";
            $and=" and ";
 
        }
        if ( $this->to_poste != "" )
        {
            $filter_poste.=" $and upper(pa.po_name)<= upper('".Database::escape_string($this->to_poste)."')";
            $and=" and ";
        }
 
        if ( $this->from_poste2 != "" )
        {
            $filter_poste.=" $and upper(pb.po_name)>= upper('".Database::escape_string($this->from_poste2)."')";
            $and=" and ";
        }
        if ( $this->to_poste2 != "" )
        {
            $filter_poste.=" $and upper(pb.po_name)<= upper('".Database::escape_string($this->to_poste2)."')";
            $and=" and ";
        }
        if ( $filter_poste != "")
            $filter_poste=" where ".$filter_poste;
 
        $sql="
             select  a_po_id ,
             pa.po_name as a_po_name,
             pa.po_description as a_po_description,
             pb.po_description as b_po_description,
 
             b_po_id,
             pb.po_name as b_po_name,
             sum(a_oa_amount_c) as a_c,
             sum(a_oa_amount_d) as a_d
             from (select 
                        a.j_id,
             a.po_id as a_po_id,
             b.po_id as b_po_id,
             case when a.oa_debit='t' then a.oa_amount else 0 end as a_oa_amount_d,
             case when a.oa_debit='f' then a.oa_amount else 0 end as a_oa_amount_c
             from
             operation_analytique as a join operation_analytique as b on (a.oa_row=b.oa_row 
                        and a.oa_group=b.oa_group 
                        and a.j_id = b.j_id)
                join poste_analytique as poa on (a.po_id=poa.po_id)
                join poste_analytique as pob on (b.po_id=pob.po_id)
             where poa.pa_id= $1
             and pob.pa_id= $2 ".$this->set_sql_filter()."
             ) as m join poste_analytique as pa on ( a_po_id=pa.po_id)
             join poste_analytique as pb on (b_po_id=pb.po_id)
 
             $filter_poste
 
             group by a_po_id,b_po_id,pa.po_name,pa.po_description,pb.po_name,pb.po_description
             order by 2;
             ";
 
 
        $array=$this->db->get_array($sql,[$this->pa_id,$this->pa_id2]);
        $this->has_data=count($array);
        if ( $this->has_data == 0 )
            return null;
        $a=array();
        $count=0;
        foreach ($array as $row)
        {
            $a[$count]['a_po_id']=$row['a_po_id'];
            $a[$count]['a_d']=$row['a_d'];
            $a[$count]['a_c']=$row['a_c'];
            $a[$count]['b_po_id']=$row['b_po_id'];
 
            $a[$count]['a_po_name']=$row['a_po_name'];
            $a[$count]['a_po_description']=$row['a_po_description'];
            $a[$count]['b_po_name']=$row['b_po_name'];
            $a[$count]['b_po_description']=$row['b_po_description'];
            $a[$count]['a_solde']=abs($row['a_c']-$row['a_d']);
            $a[$count]['a_debit']=($row['a_d']>$row['a_c'])?"debit":"credit";
 
            $count++;
        }
        return $a;
 
 
    }

References $a, $array, $count, $row, $sql, db, from_poste, pa_id, and to_poste.

Referenced by display_csv(), display_html(), and display_pdf().

show_button()

Anc_Balance_Double::show_button

(

$p_string = ""

)

Show the button to export in PDF or CSV.

Parameters

$p_string

hidden data to include in the form

Returns

string with the button

Definition at line 377 of file anc_balance_double.class.php.

    {
        $r="";
        $r.= '<form method="GET" action="export.php" style="display:inline">';
        $r.= $p_string;
        $r.= HtmlInput::hidden("to",$this->to);
        $r.= HtmlInput::hidden("act","PDF:AncBalDouble");
        $r.= HtmlInput::hidden("from",$this->from);
        $r.= HtmlInput::hidden("pa_id",$this->pa_id);
        $r.= HtmlInput::hidden("from_poste",$this->from_poste);
        $r.= HtmlInput::hidden("to_poste",$this->to_poste);
        $r.= HtmlInput::hidden("pa_id2",$this->pa_id2);
        $r.= HtmlInput::hidden("from_poste2",$this->from_poste2);
        $r.= HtmlInput::hidden("to_poste2",$this->to_poste2);
        $r.=dossier::hidden();
        $r.=HtmlInput::submit('bt_pdf',"Export en PDF");
        $r.= '</form>';
 
        $r.= '<form method="GET" action="export.php"  style="display:inline">';
        $r.= HtmlInput::hidden("to",$this->to);
        $r.= HtmlInput::hidden("act","CSV:AncBalDouble");
        $r.= HtmlInput::hidden("from",$this->from);
        $r.= HtmlInput::hidden("pa_id",$this->pa_id);
        $r.= HtmlInput::hidden("from_poste",$this->from_poste);
        $r.= HtmlInput::hidden("to_poste",$this->to_poste);
        $r.= HtmlInput::hidden("pa_id2",$this->pa_id2);
        $r.= HtmlInput::hidden("from_poste2",$this->from_poste2);
        $r.= HtmlInput::hidden("to_poste2",$this->to_poste2);
        $r.= $p_string;
        $r.= dossier::hidden();
        $r.=HtmlInput::submit('bt_csv',"Export en CSV");
        $r.= '</form>';
        return $r;
 
    }

References $r, from, from_poste, pa_id, to, and to_poste.

show_sum()

Anc_Balance_Double::show_sum

(

$p_array

)

add extra lines with sum of each account

Parameters

$p_array

array returned by load()

Definition at line 523 of file anc_balance_double.class.php.

    {
        $tot_deb=0;
        $tot_cred=0;
        $old="";
        $first=true;
        $array=array();
        foreach ( $p_array as $row)
        {
 
            if ( $old != $row['a_po_name'] && $first==false )
 
            {
                $s=abs($tot_deb-$tot_cred);
                $d=($tot_deb>$tot_cred)?'debit':'credit';
                $array[]=array('poste'=>$old,'desc'=>$old_desc
                                                    ,'debit'=>$tot_deb,'credit'=>$tot_cred,
                               'solde'=>$s,'dc'=>$d);
 
                $tot_deb=0;
                $tot_cred=0;
 
                $old=$row['a_po_name'];
                $old_desc=$row['a_po_description'];
            }
 
            if ( $first )
            {
                $first=false;
                $old=$row['a_po_name'];
                $old_desc=$row['a_po_description'];
            }
 
            $tot_deb+=$row['a_d'];
            $tot_cred+=$row['a_c'];
 
 
        }
        $s=abs($tot_deb-$tot_cred);
        $d=($tot_deb>$tot_cred)?'debit':'credit';
        $array[]=array('poste'=>$old,'desc'=>$old_desc
                       ,'debit'=>$tot_deb,'credit'=>$tot_cred,
 
                       'solde'=>$s,'dc'=>$d);
 
 
        return $array;
 
    }

References $array, $old, $p_array, $row, $s, $tot_cred, and $tot_deb.

Referenced by display_html(), and display_pdf().

test_me()

static Anc_Balance_Double::test_me ( )

static

for testing and debuggind the class it must never be called from production system, it is intended only for developpers

Parameters

param

Parameters

return none

Definition at line 583 of file anc_balance_double.class.php.

    {
        $a=Dossier::connect();
 
        $bal=new Anc_Balance_Double($a);
        $bal->get_request();
 
        echo '<form method="GET">';
 
        echo $bal->display_form();
        echo '</form>';
        if ( isset($_GET['result']))
        {
            echo $bal->show_button("","");
            echo "<h1>HTML</h1>";
            echo $bal->display_html();
            echo "<h1>CSV</h1>";
            echo $bal->display_csv();
 
        }
    }

References $_GET, $a, and $bal.

Field Documentation

$from_poste2

Anc_Balance_Double::$from_poste2

compute the html display

Returns

string

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

$pa_id2

Anc_Balance_Double::$pa_id2

Definition at line 43 of file anc_balance_double.class.php.

Referenced by display_form().

$to_poste2

Anc_Balance_Double::$to_poste2

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

---

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

• include/class/anc_balance_double.class.php