';
echo '
';
$l=(isset($_REQUEST['letter']))?2:0;
$s=(isset($_REQUEST['solded']))?1:0;
foreach ($a_accounting as $accounting_id )
{
$acc_account_ledger=new Acc_Account_Ledger ($cn, $accounting_id['pcm_val']);
$acc_account_ledger->get_row_date( $from_periode, $to_periode,$l,$s);
if ( empty($acc_account_ledger->row))
{
continue;
}
echo '
'. $accounting_id['pcm_val'].' '.h($accounting_id['pcm_lib']).'
|
';
echo '
| Date |
Référence |
Libellé |
Pièce |
Type |
Débit |
Crédit |
Solde |
Let. |
';
$solde = 0.0;
$solde_d = 0.0;
$solde_c = 0.0;
bcscale(2);
$i=0;
$current_exercice="";
foreach ($acc_account_ledger->row as $detail)
{
/*
* separation per exercice
*/
if ( $current_exercice == "") $current_exercice=$detail['p_exercice'];
if ( $current_exercice != $detail['p_exercice']) {
echo '
| '.$current_exercice.' |
'.''.' |
'._("Total du compte").$accounting_id['pcm_val'].' |
'.''.' | '.td("").
''.($solde_d > 0 ? nbm( $solde_d) : '').' |
'.($solde_c > 0 ? nbm( $solde_c) : '').' |
'.nbm( abs($solde_c-$solde_d)).' |
';
if ($solde_c > $solde_d ) echo _("Crédit");
if ($solde_c < $solde_d ) echo _("Débit");
if ($solde_c == $solde_d ) echo " ";
echo ' | '.
'
';
/*
* reset total and current_exercice
*/
$current_exercice=$detail['p_exercice'];
$solde = 0.0;
$solde_d = 0.0;
$solde_c = 0.0;
}
if ($detail['cred_montant'] > 0)
{
$solde=bcsub($solde, $detail['cred_montant']);
$solde_c=bcadd($solde_c,$detail['cred_montant']);
}
if ($detail['deb_montant'] > 0)
{
$solde = bcadd($solde,$detail['deb_montant']);
$solde_d = bcadd($solde_d,$detail['deb_montant']);
}
$side=" ".$acc_account_ledger->get_amount_side($solde);
$letter="";
$html_let="";
if ($detail['letter'] > 0) {
$letter=strtoupper(base_convert($detail['letter'],10,36));
$html_let = HtmlInput::show_reconcile("", $letter);
}
$i++;
if (($i % 2 ) == 0) $class="odd"; else $class="even";
echo '
| '.$detail['j_date_fmt'].' |
'.HtmlInput::detail_op($detail['jr_id'],$detail['jr_internal']).' |
'.$detail['description'].' |
'.$detail['jr_pj_number'].' |
'.$detail['jr_optype'].' |
'.($detail['deb_montant'] > 0 ? nbm($detail['deb_montant']) : '').' |
'.($detail['cred_montant'] > 0 ? nbm($detail['cred_montant']) : '').' |
'.nbm(abs($solde)).$side.' |
'.$html_let.' |
';
}
echo '
| '.$current_exercice.' |
'.''.' |
'.''.'Total du compte '.$accounting_id['pcm_val'].''.' |
'.''.' | '.td("").
''.''.($solde_d > 0 ? nbm( $solde_d) : '').''.' |
'.''.($solde_c > 0 ? nbm( $solde_c) : '').''.' |
'.''.nbm( abs($solde_c-$solde_d)).''.' |
';
if ($solde_c > $solde_d ) echo "Crédit";
if ($solde_c < $solde_d ) echo "Débit";
if ($solde_c == $solde_d ) echo "=";
echo ' | '.
'
';
}
echo '
';
echo Acc_Account_Ledger::HtmlTableHeader("gl_comptes");
echo "