'; /* * Let you change the exercice */ echo '

'._('Choississez un autre exercice').'

';; echo '

'; echo 'Choississez un autre exercice :'; $ex=new Exercice($cn); $wex=$ex->select('exercice',$exercice,' onchange="submit(this)"'); echo $wex->input(); echo dossier::hidden(); echo HtmlInput::get_to_hidden(array('p_action','type')); echo '

'; echo '

'; // Show the form for period echo '

'; echo HtmlInput::hidden('p_action','impress'); echo HtmlInput::hidden('type','bal'); echo HtmlInput::get_to_hidden(array('exercice')); echo dossier::hidden(); // filter on the current year $from=(isset($_GET["from_periode"]))?$_GET['from_periode']:""; $input_from=new IPeriod("from_periode",$from,$exercice); $input_from->show_end_date=false; $input_from->type=ALL; $input_from->cn=$cn; $input_from->filter_year=true; $input_from->user=$User; echo 'Depuis :'.$input_from->input(); // filter on the current year $to=(isset($_GET["to_periode"]))?$_GET['to_periode']:""; $input_to=new IPeriod("to_periode",$to,$exercice); $input_to->show_start_date=false; $input_to->filter_year=true; $input_to->type=ALL; $input_to->cn=$cn; $input_to->user=$User; echo ' jusque :'.$input_to->input(); //------------------------------------------------- /* add a all ledger choice */ echo 'Filtre '; $rad=new IRadio(); $array_ledger=$User->get_ledger('ALL',3); $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'.HtmlInput::select_ledger($array_ledger,$selected).'
'; 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; $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=(isset($_GET['from_poste']))?$_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=(isset($_GET['to_poste']))?$_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 "Uniquement comptes non soldés ".$unsold->input(); echo '

'; 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 "

'. dossier::hidden(). HtmlInput::submit('bt_pdf',"Export PDF"). HtmlInput::hidden("p_action","impress"). HtmlInput::hidden("act","PDF/balance"). HtmlInput::hidden("from_periode",$_GET['from_periode']). HtmlInput::hidden("to_periode",$_GET['to_periode']); echo HtmlInput::hidden('p_filter',$_GET['p_filter']); for ($e=0;$e

'. HtmlInput::submit('bt_csv',"Export CSV"). dossier::hidden(). HtmlInput::hidden("p_action","impress"). HtmlInput::hidden("act","CSV/balance"). HtmlInput::hidden("from_periode",$_GET['from_periode']). HtmlInput::hidden("to_periode",$_GET['to_periode']); echo HtmlInput::hidden('p_filter',$_GET['p_filter']); if (isset($_GET ['r_jrn'])) if (isset($selected[$e])) echo HtmlInput::hidden("r_jrn[$e]",$e); for ($e=0;$e

"; } //----------------------------------------------------- // Display result //----------------------------------------------------- if ( isset($_GET['view'] ) ) { $bal=new Acc_Balance($cn); if ( $_GET['p_filter']==1) { for ($e=0;$ejrn[]=$array_ledger[$e]['jrn_def_id']; } 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; $row=$bal->get_row($_GET['from_periode'], $_GET['to_periode']); $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 ''; echo ''; echo ''; echo ''; echo ''; echo ''; $i=0; foreach(array('sum_cred','sum_deb','solde_deb','solde_cred') as $a) { $lvl1[$a]=0; $lvl2[$a]=0; $lvl3[$a]=0; } $lvl1_old=''; $lvl2_old=''; $lvl3_old=''; bcscale(2); 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'}=substr($r['poste'],0,$ind); if ( ${'lvl'.$ind.'_old'} != substr($r['poste'],0,$ind)) { echo ''; echo td("Total niveau ".$ind); echo td(${'lvl'.$ind.'_old'}); echo td(nbm(${'lvl'.$ind}['sum_deb']),'style="text-align:right"'); echo td(nbm(${'lvl'.$ind}['sum_cred']),'style="text-align:right"'); echo td(nbm(${'lvl'.$ind}['solde_deb']),'style="text-align:right"'); echo td(nbm(${'lvl'.$ind}['solde_cred']),'style="text-align:right"'); echo ''; ${'lvl'.$ind.'_old'}=substr($r['poste'],0,$ind); foreach(array('sum_cred','sum_deb','solde_deb','solde_cred') as $a) { ${'lvl'.$ind}[$a]=0; } } } foreach(array('sum_cred','sum_deb','solde_deb','solde_cred') as $a) { $lvl1[$a]=bcadd($lvl1[$a],$r[$a]); $lvl2[$a]=bcadd($lvl2[$a],$r[$a]); $lvl3[$a]=bcadd($lvl3[$a],$r[$a]); } echo ''; echo td($view_history); echo td(h($r['label'])); 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"'); echo ''; } echo '

Poste Comptable	Libellé	Débit	Crédit	Solde Débiteur	Solde Créditeur

'; }// end submit echo "