';
/* add a all ledger choice */
echo _('Filtre')." ";
$rad=new IRadio();
$array_ledger=$g_user->get_ledger('ALL',3);
$array=get_array_column($array_ledger,'jrn_def_id');
$selected=(isset($_GET['r_jrn']))?$_GET['r_jrn']:null;
$select_cat=(isset($_GET['r_cat']))?$_GET['r_cat']:null;
$array_cat=Acc_Ledger::array_cat();
echo '
';
if ( ! isset($_GET['p_filter']) || $_GET['p_filter']==0) $rad->selected='t';
else $rad->selected=false;
echo '- '.$rad->input('p_filter',0)._('Aucun filtre, tous les journaux').'
';
if ( isset($_GET['p_filter']) && $_GET['p_filter']==1) $rad->selected='t';
else $rad->selected=false;
echo '- '.$rad->input('p_filter',1)._('Filtré par journal');
echo HtmlInput::button_choice_ledger(array('div'=>'','type'=>'ALL','all_type'=>1));
echo '
';
if ( isset($_GET['p_filter']) && $_GET['p_filter']==2) $rad->selected='t';
else $rad->selected=false;
echo '- '.$rad->input('p_filter',2)._('Filtré par catégorie').HtmlInput::select_cat($array_cat).'
';
echo '
';
echo _('Totaux par sous-niveaux');
$ck_lev1=new ICheckBox('lvl1');
$ck_lev2=new ICheckBox('lvl2');
$ck_lev3=new ICheckBox('lvl3');
$ck_lev1->value=1;
$ck_lev2->value=1;
$ck_lev3->value=1;
echo '
';
if (HtmlInput::default_value('lvl1',false,$_GET) !== false)
$ck_lev1->selected=true;
if (HtmlInput::default_value('lvl2',false,$_GET) !== false)
$ck_lev2->selected=true;
if (HtmlInput::default_value('lvl3',false,$_GET) !== false)
$ck_lev3->selected=true;
echo '- '.$ck_lev1->input()._('Niveau 1').'
';
echo '- '.$ck_lev2->input()._('Niveau 2').'
';
echo '- '.$ck_lev3->input()._('Niveau 3').'
';
echo '
';
$unsold=new ICheckBox('unsold');
if (HtmlInput::default_value('unsold',false,$_GET) !== false)
$unsold->selected=true;
// previous exercice if checked
$previous_exc=new ICheckBox('previous_exc');
if (HtmlInput::default_value('previous_exc',false,$_GET) !== false)
$previous_exc->selected=true;
$from_poste=new IPoste();
$from_poste->name="from_poste";
$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=HtmlInput::default_value_get('from_poste','');
$from_span=new ISpan("from_poste_label","");
$to_poste=new IPoste();
$to_poste->name="to_poste";
$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=HtmlInput::default_value_get('to_poste','');
$to_span=new ISpan("to_poste_label","");
echo "
";
echo _("Plage de postes")." :".$from_poste->input();
echo $from_span->input();
echo " "._("jusque")." :".$to_poste->input();
echo $to_span->input();
echo "
";
echo '
';
echo '
';
echo _("Uniquement comptes non soldés")." ".$unsold->input();
echo '
';
echo '
';
echo _("Avec la balance de l'année précédente")." ".$previous_exc->input();
echo '
';
echo '
';
?>
value=1;
$is_summary=HtmlInput::default_value_get("summary", 0);
$summary->set_check($is_summary);
echo $summary->input();
?>
';
echo HtmlInput::submit("view",_("Visualisation"));
echo '';
echo '
';
//-----------------------------------------------------
// Form
//-----------------------------------------------------
// Show the export button
if ( isset ($_GET['view'] ) )
{
$hid=new IHidden();
echo "
";
echo '';
echo ' | ";
echo ' | ";
echo '';
echo HtmlInput::print_window();
echo ' | ';
echo "
";
echo "
";
}
//-----------------------------------------------------
// Display result
//-----------------------------------------------------
if ( isset($_GET['view'] ) )
{
$bal=new Acc_Balance($cn);
if ( $_GET['p_filter']==1)
{
for ($e=0;$e
jrn[]=$selected[$e];
}
if ( $_GET['p_filter'] == 0 )
{
$bal->jrn=null;
}
if ( $_GET['p_filter'] == 2 && isset ($_GET['r_cat']))
{
$bal->filter_cat($_GET['r_cat']);
}
$bal->from_poste=$_GET['from_poste'];
$bal->to_poste=$_GET['to_poste'];
if ( isset($_GET['unsold'])) $bal->unsold=true;
$previous=(isset($_GET['previous_exc']))?1:0;
$row=$bal->get_row($_GET['from_periode'],
$_GET['to_periode'],
$previous);
$previous= (isset ($row[0]['sum_cred_previous']))?1:0;
$periode=new Periode($cn);
$a=$periode->get_date_limit($_GET['from_periode']);
$b=$periode->get_date_limit($_GET['to_periode']);
echo " période du ".$a['p_start']." au ".$b['p_end']."
";
echo '';
echo _('Cherche').HtmlInput::infobulle(24);
echo HtmlInput::filter_table("t_balance", "0,1","1");
echo '';
echo '';
echo '| Poste Comptable | ';
echo 'Libellé | ';
if ( $previous == 1 ){
echo 'Débit N-1 | ';
echo 'Crédit N-1 | ';
echo 'Solde Débiteur N-1 | ';
echo 'Solde Créditeur N-1 | ';
if ( isset($_GET['lvl1']) || isset($_GET['lvl2']) || isset($_GET['lvl3']))
echo 'Solde N-1 | ';
}
echo 'Débit | ';
echo 'Crédit | ';
echo 'Solde Débiteur | ';
echo 'Solde Créditeur | ';
if ( isset($_GET['lvl1']) || isset($_GET['lvl2']) || isset($_GET['lvl3']))
echo 'Solde | ';
$i=0;
if ( $previous == 1) {
$a_sum=array('sum_cred','sum_deb','solde_deb','solde_cred','sum_cred_previous','sum_deb_previous','solde_deb_previous','solde_cred_previous');
}
else {
$a_sum=array('sum_cred','sum_deb','solde_deb','solde_cred') ;
}
foreach($a_sum as $a)
{
$lvl1[$a]=0;
$lvl2[$a]=0;
$lvl3[$a]=0;
}
$lvl1_old='';
$lvl2_old='';
$lvl3_old='';
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++;
if ( $i%2 == 0 )
$tr="even";
else
$tr="odd";
$view_history= sprintf('%s',
$r['poste'], $gDossier, $r['poste']);
/*
* level x
*/
foreach (array(3,2,1) as $ind)
{
if ( ! isset($_GET['lvl'.$ind]))continue;
if (${'lvl'.$ind.'_old'} == '') ${'lvl'.$ind.'_old'}=mb_substr($r['poste'],0,$ind);
if ( ${'lvl'.$ind.'_old'} != mb_substr($r['poste'],0,$ind))
{
echo '';
echo td(${'lvl'.$ind.'_old'},'style="font-weight:bold;"');
echo td(${'lvl'.$ind.'_old'}." "._("Total niveau")." ".$ind,'style="font-weight:bold;"');
if ($previous==1) {
echo td(nbm(${'lvl'.$ind}['sum_deb_previous']),'class="previous_year" style="font-weight:bold;"');
echo td(nbm(${'lvl'.$ind}['sum_cred_previous']),' class="previous_year" style="font-weight:bold;" ');
echo td(nbm(${'lvl'.$ind}['solde_deb_previous']),'class="previous_year" style="font-weight:bold;"');
echo td(nbm(${'lvl'.$ind}['solde_cred_previous']),'class="previous_year" style="font-weight:bold;"');
$delta_previous=bcsub(${'lvl'.$ind}['solde_cred_previous'],${'lvl'.$ind}['solde_deb_previous']);
$side_previous=($delta_previous > 0 ) ? "C":"D";
echo td(nbm(abs($delta_previous))." $side_previous",'class="previous_year" style="text-align:right;font-weight:bold;" ');
}
echo td(nbm(${'lvl'.$ind}['sum_deb']),'style="text-align:right;font-weight:bold;" ');
echo td(nbm(${'lvl'.$ind}['sum_cred']),'style="text-align:right;font-weight:bold;"');
echo td(nbm(${'lvl'.$ind}['solde_deb']),'style="text-align:right;font-weight:bold;"');
echo td(nbm(${'lvl'.$ind}['solde_cred']),'style="text-align:right;font-weight:bold;"');
$delta=bcsub(${'lvl'.$ind}['solde_cred'],${'lvl'.$ind}['solde_deb']);
$side=($delta > 0 ) ? "C":"D";
echo td(nbm(abs($delta))." $side",'style="text-align:right;font-weight:bold;" ');
echo '
';
${'lvl'.$ind.'_old'}=mb_substr($r['poste'],0,$ind);
foreach($a_sum as $a)
{
${'lvl'.$ind}[$a]=0;
}
}
}
foreach($a_sum as $a)
{
$lvl1[$a]=bcadd($lvl1[$a],$r[$a]);
$lvl2[$a]=bcadd($lvl2[$a],$r[$a]);
$lvl3[$a]=bcadd($lvl3[$a],$r[$a]);
}
// For the Total row , there is no accounting
if ( $r['poste'] == "") {
$tr="highlight";
}
$summary_tab=$bal->summary_add($summary_tab,$r['poste'],$r['sum_deb'],$r['sum_cred']);
echo '';
echo td($view_history);
echo td(h($r['label']));
if ($previous == 1 ) {
echo td(nbm($r['sum_deb_previous']),' class="previous_year"');
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 ' | ';
$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;"');
echo td(nbm($r['solde_deb']),'style="text-align:right;"');
echo td(nbm($r['solde_cred']),'style="text-align:right;"');
if ( isset($_GET['lvl1']) || isset($_GET['lvl2']) || isset($_GET['lvl3'])) echo ' | ';
echo '
';
}
echo '
';
// display the summary
if ($is_summary==1) {
if ( $previous == 1) {
echo '';
echo '
';
echo _("Résumé Exercice précédent");
echo '
';
$bal->summary_display($summary_prev_tab);
echo "";
}
echo '';
echo '
';
echo _("Résumé Exercice courant");
echo '
';
$bal->summary_display($summary_tab);
echo "";
}
}// end submit
echo " ";
?>