diff --git a/include/verif_bilan.inc.php b/include/verif_bilan.inc.php index d613775e8..f45a6cfba 100644 --- a/include/verif_bilan.inc.php +++ b/include/verif_bilan.inc.php @@ -23,29 +23,32 @@ * \brief Verify the saldo of ledger: independant file */ if ( ! defined ('ALLOWED') ) die('Appel direct ne sont pas permis'); + require_once ('class_user.php'); require_once('class_acc_bilan.php'); +global $g_captcha,$g_failed,$g_succeed; + $cn=new Database(dossier::id()); $exercice=$g_user->get_exercice(); echo '
'; $sql_year=" and j_tech_per in (select p_id from parm_periode where p_exercice='".$g_user->get_exercice()."')"; -echo '
Vérification des journaux'; +echo '
'._('Vérification des journaux').''; echo '
    '; $deb=$cn->get_value("select sum (j_montant) from jrnx where j_debit='t' $sql_year "); $cred=$cn->get_value("select sum (j_montant) from jrnx where j_debit='f' $sql_year "); if ( $cred == $deb ) { - $result =' OK '; + $result =$g_succeed; } else { - $result =' NON OK '; + $result = $g_failed; } -printf ('
  1. Solde Grand Livre : debit %f credit %f %s
  2. ',$deb,$cred,$result); +printf ('
  3. '._("Solde Grand Livre : debit %f credit %f %s").'
  4. ',$deb,$cred,$result); $sql="select jrn_def_id,jrn_def_name from jrn_def"; $res=$cn->exec_sql($sql); @@ -59,57 +62,20 @@ foreach ($jrn as $l) if ( $cred == $deb ) { - $result =' OK '; - } - else - { - $result =' NON OK '; - } + $result =$g_succeed; +} +else +{ + $result = $g_failed; +} - printf ('
  5. Journal %s Solde : debit %f credit %f %s
  6. ',$name,$deb,$cred,$result); + printf ('
  7. '._("Journal %s Solde : debit %f credit %f %s").'
  8. ',$name,$deb,$cred,$result); } echo '
'; -echo '
    '; -$sql_year=" and j_tech_per in (select p_id from parm_periode where p_exercice='".$exercice."')"; -$deb=$cn->get_value("select sum (j_montant) from jrnx where j_debit='t' $sql_year "); -$cred=$cn->get_value("select sum (j_montant) from jrnx where j_debit='f' $sql_year "); - -if ( $cred == $deb ) -{ - $result =' OK '; -} -else -{ - $result =' NON OK '; -} - -printf ('
  1. Total solde Grand Livre : debit %f credit %f %s
  2. ',$deb,$cred,$result); -$sql="select jrn_def_id,jrn_def_name from jrn_def"; -$res=$cn->exec_sql($sql); -$jrn=Database::fetch_all($res); -foreach ($jrn as $l) -{ - $id=$l['jrn_def_id']; - $name=$l['jrn_def_name']; - $deb=$cn->get_value("select sum (j_montant) from jrnx where j_debit='t' and j_jrn_def=$id $sql_year "); - $cred=$cn->get_value("select sum (j_montant) from jrnx where j_debit='f' and j_jrn_def=$id $sql_year "); - - if ( $cred == $deb ) - { - $result =' OK '; - } - else - { - $result =' NON OK '; - } - - printf ('
  3. Journal %s total : debit %f credit %f %s
  4. ',$name,$deb,$cred,$result); - -} echo '
'; -echo '
Vérification des comptes'; +echo '
'._('Vérification des comptes').''; $bilan=new Acc_Bilan($cn); $periode=new Periode($cn); list ($start_periode,$end_periode)=$periode->get_limit($exercice); @@ -118,5 +84,58 @@ $bilan->to=$end_periode->p_id; $bilan->verify(); echo '
'; echo '
'; - ?> +
+
+ + ';?> + +

+ +

+ get_exercice()."')"; + $sql_year_source=" source.j_tech_per in (select p_id from parm_periode where p_exercice='".$g_user->get_exercice()."')"; + + $sql_qcode="select distinct source.f_id,source.j_qcode + from jrnx as source ,jrnx as target + where + source.j_id < target.j_id + and source.j_poste<>target.j_poste + and source.j_qcode = target.j_qcode + and $sql_year_source and $sql_year_target + "; + $sql_poste="select distinct j_poste,pcm_lib from jrnx join tmp_pcmn on (pcm_val=j_poste) where j_qcode =$1 $sql_year"; + $a_qcode=$cn->get_array($sql_qcode); + $res=$cn->prepare('get_poste',$sql_poste); + ?> +
    + execute('get_poste',array($a_qcode[$i]['j_qcode'])); + ?> +
  1. + +
  2. + + +
+