1418: Affichage Balance - soldes et sous-totaux

This commit is contained in:
Dany De Bontridder 2017-03-25 02:03:13 +01:00
parent 707b7383b5
commit 3f715e4c00
3 changed files with 218 additions and 17 deletions

View file

@ -153,7 +153,7 @@ $from_poste->set_attribute('ipopup','ipop_account');
$from_poste->set_attribute('label','from_poste_label');
$from_poste->set_attribute('account','from_poste');
$from_poste->value=(isset($_GET['from_poste']))?$_GET['from_poste']:"";
$from_poste->value=HtmlInput::default_value_get('from_poste','');
$from_span=new ISpan("from_poste_label","");
$to_poste=new IPoste();
@ -162,7 +162,7 @@ $to_poste->set_attribute('ipopup','ipop_account');
$to_poste->set_attribute('label','to_poste_label');
$to_poste->set_attribute('account','to_poste');
$to_poste->value=(isset($_GET['to_poste']))?$_GET['to_poste']:"";
$to_poste->value=HtmlInput::default_value_get('to_poste','');
$to_span=new ISpan("to_poste_label","");
echo "<div>";
@ -179,6 +179,18 @@ echo '<p>';
echo _("Avec la balance de l'année précédente")." ".$previous_exc->input();
echo '</p>';
echo '</div>';
?>
<div>
<?php echo _("Résumé")?>
<?php
$summary=new ICheckBox("summary");
$summary->value=1;
$is_summary=HtmlInput::default_value_get("summary", 0);
$summary->set_check($is_summary);
echo $summary->input();
?>
</div>
<?php
echo '</div>';
echo HtmlInput::submit("view",_("Visualisation"));
echo '</form>';
@ -200,7 +212,7 @@ if ( isset ($_GET['view'] ) )
HtmlInput::submit('bt_pdf',"Export PDF").
HtmlInput::hidden("ac",$_REQUEST['ac']).
HtmlInput::hidden("act","PDF:balance").
HtmlInput::hidden("summary", $is_summary).
HtmlInput::hidden("from_periode",$_GET['from_periode']).
HtmlInput::hidden("to_periode",$_GET['to_periode']);
echo HtmlInput::hidden('p_filter',$_GET['p_filter']);
@ -324,6 +336,10 @@ if ( isset($_GET['view'] ) )
bcscale(2);
$nb_row = count($row);
// Compute for the summary
$summary_tab=$bal->summary_init();
$summary_prev_tab=$bal->summary_init();
foreach ($row as $r)
{
$i++;
@ -384,6 +400,9 @@ if ( isset($_GET['view'] ) )
if ( $r['poste'] == "") {
$tr="highlight";
}
$summary_tab=$bal->summary_add($summary_tab,$r['poste'],$r['sum_deb'],$r['sum_cred']);
echo '<TR class="'.$tr.'">';
echo td($view_history);
echo td(h($r['label']));
@ -392,7 +411,16 @@ if ( isset($_GET['view'] ) )
echo td(nbm($r['sum_cred_previous']),' class="previous_year" ');
echo td(nbm($r['solde_deb_previous']),' class="previous_year"');
echo td(nbm($r['solde_cred_previous']),'class="previous_year" ');
if ( isset($_GET['lvl1']) || isset($_GET['lvl2']) || isset($_GET['lvl3'])) echo '<td></td>';
if ( isset($_GET['lvl1']) ||
isset($_GET['lvl2']) ||
isset($_GET['lvl3']))
echo '<td></td>';
$summary_prev_tab=$bal->summary_add($summary_prev_tab,
$r['poste'],
$r['sum_deb_previous'],
$r['sum_cred_previous']);
}
echo td(nbm($r['sum_deb']),'style="text-align:right;"');
echo td(nbm($r['sum_cred']),'style="text-align:right;"');
@ -400,10 +428,26 @@ if ( isset($_GET['view'] ) )
echo td(nbm($r['solde_cred']),'style="text-align:right;"');
if ( isset($_GET['lvl1']) || isset($_GET['lvl2']) || isset($_GET['lvl3'])) echo '<td></td>';
echo '</TR>';
}
echo '</table>';
// display the summary
if ($is_summary==1) {
if ( $previous == 1) {
echo '<div style="float:left;margin-right:50px">';
echo '<h2>';
echo _("Résumé Exercice précédent");
echo '</h2>';
$bal->summary_display($summary_prev_tab);
echo "</div>";
}
echo '<div style="float:left">';
echo '<h2>';
echo _("Résumé Exercice courant");
echo '</h2>';
$bal->summary_display($summary_tab);
echo "</div>";
}
}// end submit
echo "</div>";
?>

View file

@ -63,7 +63,7 @@ class Acc_Balance
global $g_user;
// filter on requested periode
$per_sql=sql_filter_per($this->db,$p_from_periode,$p_to_periode,'p_id','j_tech_per');
bcscale(2);
$and="";
$jrn="";
@ -206,26 +206,29 @@ class Acc_Balance
$a['sum_cred']=round($r['sum_cred'],2);
$a['solde_deb']=round(( $a['sum_deb'] >= $a['sum_cred'] )? $a['sum_deb']- $a['sum_cred']:0,2);
$a['solde_cred']=round(( $a['sum_deb'] <= $a['sum_cred'] )?$a['sum_cred']-$a['sum_deb']:0,2);
if ($p_previous_exc==1)
{
$a['sum_deb_previous']=round($r['sum_deb_previous'],2);
$a['sum_cred_previous']=round($r['sum_cred_previous'],2);
$a['solde_deb_previous']=round(( $a['sum_deb_previous'] >= $a['sum_cred_previous'] )? $a['sum_deb_previous']- $a['sum_cred_previous']:0,2);
$a['solde_cred_previous']=round(( $a['sum_deb_previous'] <= $a['sum_cred_previous'] )?$a['sum_cred_previous']-$a['sum_deb_previous']:0,2);
$tot_cred_previous+= $a['sum_cred_previous'];
$tot_deb_previous+= $a['sum_deb_previous'];
$tot_deb_saldo_previous+= $a['solde_deb_previous'];
$tot_cred_saldo_previous+= $a['solde_cred_previous'];
$tot_cred_previous = bcadd ($tot_cred_previous, $a['sum_cred_previous']);
$tot_deb_previous = bcadd( $tot_deb_previous,$a['sum_deb_previous']);
$tot_deb_saldo_previous = bcadd ($tot_deb_saldo_previous ,$a['solde_deb_previous']);
$tot_cred_saldo_previous = bcadd ($tot_cred_saldo_previous,$a['solde_cred_previous']);
}
if ($p_previous_exc==0 && $this->unsold==true && $a['solde_cred']==0 && $a['solde_deb']==0) continue;
if ($p_previous_exc==1 && $this->unsold==true && $a['solde_cred']==0 && $a['solde_deb']==0 && $a['solde_cred_previous']==0 && $a['solde_deb_previous']==0) continue;
$array[$i]=$a;
$tot_cred+= $a['sum_cred'];
$tot_deb+= $a['sum_deb'];
$tot_deb_saldo+= $a['solde_deb'];
$tot_cred_saldo+= $a['solde_cred'];
$tot_cred= bcadd ($tot_cred,$a['sum_cred']);
$tot_deb= bcadd($tot_deb, $a['sum_deb']);
$tot_deb_saldo= bcadd($tot_deb_saldo, $a['solde_deb']);
$tot_cred_saldo= bcadd($tot_cred_saldo,$a['solde_cred']);
}//for i
// Add the saldo
$i+=1;
@ -275,6 +278,132 @@ class Acc_Balance
}
}
/**
* @brief create an empty array for computing the summary
*/
function summary_init()
{
$array=[];
$array["1_5"]=["deb"=>0,"cred"=>0];
$array["6"]=["deb"=>0,"cred"=>0];
$array["7"]=["deb"=>0,"cred"=>0];
return $array;
}
/**
* Add the current amount (d /c) to the right item in the array, in order
* to compute a summary (1 to 5 , 6 charge and 7 profit ),
* the return value is an array
* @see Acc_Balance::summary_init()
* @param array $p_array array with the result
* @param string $p_accounting accounting
* @param numeric $p_deb
* @param numeric $p_cred
* @return array
*/
function summary_add($p_array,$p_accounting,$p_deb,$p_cred)
{
if (trim($p_accounting)=="") return $p_array;
// Summary
$first_digit=trim($p_accounting);
$first_digit_trim=$first_digit[0];
if ( $first_digit_trim >0 && $first_digit_trim < 6) {
$p_array["1_5"]["deb"]=bcadd( $p_array["1_5"]["deb"],$p_deb);
$p_array["1_5"]["cred"]=bcadd( $p_array["1_5"]["cred"],$p_cred);
}
elseif ($first_digit_trim == "6") {
$p_array["6"]["deb"]=bcadd( $p_array["6"]["deb"],$p_deb);
$p_array["6"]["cred"]=bcadd( $p_array["6"]["cred"],$p_cred);
}
elseif ($first_digit_trim=="7") {
$p_array["7"]["deb"]=bcadd( $p_array["7"]["deb"],$p_deb);
$p_array["7"]["cred"]=bcadd( $p_array["7"]["cred"],$p_cred);
}
return $p_array;
}
/**
* Display the summary of result in HTML
* @see Acc_Balance::summary_init()
* @param array $p_array
*/
function summary_display($p_array)
{
echo "<table>";
echo "<tr>";
echo td(_("Class 1-5"));
$diff=bcsub($p_array["1_5"]["deb"],$p_array["1_5"]["cred"]);
echo td(nbm(abs($diff),2));
$side=($diff < 0)?"C":"D";
$side=($diff == 0)?"=":$side;
echo td($side);
echo "</tr>";
echo "<tr>";
echo td(_("Class 6"));
$diff6=bcsub($p_array["6"]["deb"],$p_array["6"]["cred"]);
echo td(nbm(abs($diff6),2),' class="num"');
$side=($diff6 < 0)?"C":"D";
$side=($diff6 == 0)?"=":$side;
echo td($side);
echo "</tr>";
echo "<tr>";
echo td(_("Class 7"));
$diff7=bcsub($p_array["7"]["deb"],$p_array["7"]["cred"]);
echo td(nbm(abs($diff7),2),' class="num"');
$side=($diff7 < 0)?"C":"D";
$side=($diff7 == 0)?"=":$side;
echo td($side);
echo "</tr>";
echo "<tr>";
echo td(_("Solde 6/7"));
$diff=bcadd($diff6,$diff7);
echo td(nbm(abs($diff),2),' class="num"');
$side=($diff < 0)?"C":"D";
$side=($diff == 0)?"=":$side;
echo td($side);
echo "</tr>";
echo "</table>";
}
/**
* Display the summary of result in PDF
* @param array $p_array
* @param PDF $p_pdf
* @see Acc_Balance::summary_init()
*/
function summary_display_pdf($p_array,$p_pdf)
{
$p_pdf->write_cell(30,6,_("Class 1-5"));
$diff=bcsub($p_array["1_5"]["deb"],$p_array["1_5"]["cred"]);
$p_pdf->write_cell(50,6,
nbm(abs($diff),2),0,0,'R');
$side=($diff < 0)?"C":"D";
$side=($diff == 0)?"=":$side;
$p_pdf->write_cell(10,6,$side);
$p_pdf->line_new();
$p_pdf->write_cell(30,6,_("Class 6"));
$diff6=bcsub($p_array["6"]["deb"],$p_array["6"]["cred"]);
$p_pdf->write_cell(50,6,nbm(abs($diff6),2),0,0,'R');
$side=($diff6 < 0)?"C":"D";
$side=($diff6 == 0)?"=":$side;
$p_pdf->write_cell(10,6,$side);
$p_pdf->line_new();
$p_pdf->write_cell(30,6,_("Class 7"));
$diff7=bcsub($p_array["7"]["deb"],$p_array["7"]["cred"]);
$p_pdf->write_cell(50,6,nbm(abs($diff7),2),0,0,'R');
$side=($diff7 < 0)?"C":"D";
$side=($diff7 == 0)?"=":$side;
$p_pdf->write_cell(10,6,$side);
$p_pdf->line_new();
$p_pdf->write_cell(30,6,_("Solde 6/7"));
$diff=bcadd($diff6,$diff7);
$p_pdf->write_cell(50,6,nbm(abs($diff),2),0,0,'R');
$side=($diff < 0)?"C":"D";
$side=($diff == 0)?"=":$side;
$p_pdf->write_cell(10,6,$side);
$p_pdf->line_new();
}
static function test_me ()
{
require 'class/class_user.php';

View file

@ -45,6 +45,11 @@ $g_user->Check();
$bal=new Acc_Balance($cn);
// Compute for the summary
$summary_tab=$bal->summary_init();
$summary_prev_tab=$bal->summary_init();
$is_summary=HtmlInput::default_value_get("summary", 0);
extract ($_GET, EXTR_SKIP);
$bal->jrn=null;
switch( $_GET['p_filter'])
@ -208,6 +213,9 @@ if (! empty($array))
$pdf->LongLine(30,6,$value['poste'],0,'L',$fill);
$pdf->LongLine(60,6,$value['label'],0,'L',$fill);
$summary_tab=$bal->summary_add($summary_tab,$value['poste'],
$value['sum_deb'],
$value['sum_cred']);
if ($previous == 1 ) {
$pdf->write_cell(22,6,nbm($value['sum_deb_previous']),0,0,'R',$fill);
$pdf->write_cell(22,6,nbm($value['sum_cred_previous']),0,0,'R',$fill);
@ -217,6 +225,10 @@ if (! empty($array))
$tp_cred_previous=bcadd($tp_cred_previous,$value['sum_cred_previous']);
$tp_sold_previous=bcadd($tp_sold_previous,$value['solde_deb_previous']);
$tp_solc_previous=bcadd($tp_solc_previous,$value['solde_cred_previous']);
$summary_prev_tab=$bal->summary_add($summary_prev_tab,
$value['poste'],
$value['sum_deb_previous'],
$value['sum_cred_previous']);
}
$pdf->write_cell(25,6,nbm($value['sum_deb']),0,0,'R',$fill);
$pdf->write_cell(25,6,nbm($value['sum_cred']),0,0,'R',$fill);
@ -275,6 +287,22 @@ if (! empty($array))
$pdf->write_cell(25,6,nbm($tp_solc),'T',0,'R',0);
$pdf->line_new();
} /** empty */
// display the summary
if ($is_summary==1) {
if ($previous==1) {
$pdf->SetFont('DejaVuCond', 'B', 8);
$pdf->write_cell(50, 8, _("Résumé Exercice précédent"));
$pdf->line_new();
$pdf->SetFont('DejaVuCond', '', 7);
$bal->summary_display_pdf($summary_prev_tab, $pdf);
$pdf->line_new();
}
$pdf->SetFont('DejaVuCond', 'B', 8);
$pdf->write_cell(50, 8, _("Résumé Exercice courant"));
$pdf->line_new();
$pdf->SetFont('DejaVuCond', '', 7);
$bal->summary_display_pdf($summary_tab, $pdf);
}
$fDate=date('dmy-Hi');
$pdf->Output('balance-'.$fDate.'.pdf','D');