'; $Ledger = new Acc_Ledger_Fin($cn, 0); if (!isset($_REQUEST['p_jrn'])) { $a = $Ledger->get_first('fin'); $Ledger->id = $a['jrn_def_id']; } else $Ledger->id = $_REQUEST['p_jrn']; $jrn_priv = $g_user->get_ledger_access($Ledger->id); if (isset($_GET["p_jrn"]) && $jrn_priv == "X") { NoAccess(); exit(); } //------------------------- // save //------------------------- if (isset($_POST['save'])) { if (trim($_POST['ext']) != '' && isset($_POST['op'])) { $array = $_POST['op']; $tot = 0; $cn->start(); for ($i = 0; $i < count($array); $i++) { $cn->exec_sql('update jrn set jr_pj_number=$1 where jr_id=$2', array($_POST['ext'], $array[$i])); $tot = bcadd($tot, $cn->get_value('select qf_amount from quant_fin where jr_id=$1', array($array[$i]))); } $diff = bcsub($_POST['start_extrait'], $_POST['end_extrait']); if ($diff != 0 && $diff != $tot) { $cn->rollback(); alert("D'après l'extrait il y aurait du avoir un montant de $diff à rapprocher alors qu'il y a $tot rapprochés, mise à jour annulée"); } $cn->commit(); } } //------------------------- // show the operation of this ledger // without receipt number //------------------------- echo '
'; echo '
'; echo HtmlInput::get_to_hidden(array('gDossier', 'ledger_type', 'ac', 'sa')); $wLedger = $Ledger->select_ledger('FIN', 3); if ($wLedger == null) exit('Pas de journal disponible'); echo '
'; echo '

' . $Ledger->get_name() . '

'; echo '
'; $wLedger->javascript = "onchange='this.form.submit()';"; echo $wLedger->input(); echo HtmlInput::submit('ref', 'Rafraîchir'); echo '
'; echo '
'; echo dossier::hidden(); echo HtmlInput::get_to_hidden(array('sa', 'p_action', 'p_jrn')); $operation = $cn->get_array("select jr_id,jr_internal,jr_comment,to_char(jr_date,'DD.MM.YYYY') as fmt_date,jr_montant from jrn where jr_def_id=$1 and (jr_pj_number is null or jr_pj_number='') order by jr_date", array($Ledger->id)); echo '' . hb(h($Ledger->get_bank_name())) . ''; echo '

'; $iextrait = new IText('ext'); $iextrait->value = $Ledger->guess_pj(); $nstart_extrait = new INum('start_extrait'); $nend_extrait = new INum('end_extrait'); echo "Extrait / relevé :" . $iextrait->input(); echo 'solde Début' . $nstart_extrait->input(); echo 'solde Fin' . $nend_extrait->input(); echo IButton::tooggle_checkbox('rec1'); echo '

'; echo ''; $r = th('Date'); $r.=th('Libellé'); $r.=th('N° interne'); $r.=th('Montant', ' style="text-align:right"'); $r.=th('Selection', ' style="text-align:center" '); echo tr($r); $iradio = new ICheckBox('op[]'); $tot_not_reconcilied = 0; $diff = 0; for ($i = 0; $i < count($operation); $i++) { $row = $operation[$i]; $r = ''; $js = HtmlInput::detail_op($row['jr_id'], $row['jr_internal']); $r.=td($row['fmt_date']); $r.=td($row['jr_comment']); $r.=td($js); $r.=td(sprintf("%.2f", $row['jr_montant']), ' class="num" '); $tot_not_reconcilied+=$row['jr_montant']; $diff+=$cn->get_value('select qf_amount from quant_fin where jr_id=$1', array($row['jr_id'])); $iradio->value = $row['jr_id']; $r.=td(HtmlInput::hidden('jrid[]', $row['jr_id']) . $iradio->input(), ' style="text-align:center" '); if ($i % 2 == 0) echo tr($r, ' class="odd" '); else echo tr($r); } echo '
'; $bk_card = new Fiche($cn); $bk_card->id = $Ledger->get_bank(); $filter_year = " j_tech_per in (select p_id from parm_periode where p_exercice='" . $g_user->get_exercice() . "')"; /* get saldo for not reconcilied operations */ $saldo_not_reconcilied = $bk_card->get_solde_detail($filter_year . " and j_grpt in (select jr_grpt_id from jrn where trim(jr_pj_number) ='' or jr_pj_number is null)"); /* get saldo for reconcilied operation */ $saldo_reconcilied = $bk_card->get_solde_detail($filter_year . " and j_grpt in (select jr_grpt_id from jrn where trim(jr_pj_number) != '' and jr_pj_number is not null)"); /* solde compte */ $saldo = $bk_card->get_solde_detail($filter_year); echo ''; echo ''; echo td("Solde compte "); echo td(sprintf('%.2f', ($saldo['debit'] - $saldo['credit'])), ' style="text-align:right"'); echo ''; echo ''; echo td("Solde non rapproché "); echo td(sprintf('%.2f', ($saldo_not_reconcilied['debit'] - $saldo_not_reconcilied['credit'])), ' style="text-align:right"'); echo ''; echo ''; echo td("Solde rapproché "); echo td(sprintf('%.2f', ($saldo_reconcilied['debit'] - $saldo_reconcilied['credit'])), ' style="text-align:right"'); echo ''; echo ''; echo td("Total montant "); echo td(sprintf('%.2f', ($tot_not_reconcilied)), ' style="text-align:right"'); echo ''; echo '
'; echo HtmlInput::submit('save', 'Mettre à jour le n° de relevé banquaire'); echo '
'; echo '
'; exit(); ?>