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

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 More...

Additional Inherited Members
Data Fields inherited from Anc_Print
	$db
	$from
	$from_poste
	$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 291 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 332 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 $poste, $r, db, Icon_Action\icon_magnifier(), HtmlInput\request_to_hidden(), and HtmlInput\submit().

Here is the call graph for this function:

display_html()

Anc_Balance_Double::display_html

(

)

compute the html display

Returns

string

Definition at line 42 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 173 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(), name, 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 413 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 426 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 375 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, HtmlInput\hidden(), pa_id, HtmlInput\submit(), to, and to_poste.

Here is the call graph for this function:

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 521 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 581 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, $bal, and Dossier\connect().

Here is the call graph for this function:

---

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

• include/class/anc_balance_double.class.php