';
echo '
';
// if $_REQUEST[sa] == del delete the predefined operation
if ( $sa == 'del') {
$op=new Pre_operation($cn);
$op->od_id=$_REQUEST['od_id'];
$op->delete();
$sa='jrn';
}
// if $_REQUEST[sa] == jrn show the predefined operation for this
// ledger
if ( $sa == 'jrn' ) {
$op=new Pre_operation($cn);
$op->set_jrn($_GET['jrn']);
if ( isset($_GET['direct'])) {
$op->od_direct='true';
} else {
$op->od_direct='false';
}
$array=$op->get_list_ledger();
if ( empty($array) == true ) {
echo "Aucun enregistrement";
exit();
}
echo '
';
$count=0;
foreach ($array as $row ) {
if ( $count %2 == 0 )
echo '';
else
echo '
';
echo '| '.$row['od_name'].' | ';
echo '';
echo '';
echo ' | ';
echo '
';
}
echo '
';
}
echo '
';
$User->db=$cn;
$sql_year=" and c_periode in (select p_id from parm_periode where p_exercice='".$User->get_exercice()."')";
echo '
';
$deb=getDbValue($cn,"select sum (c_montant) from centralized where c_debit='t' $sql_year ");
$cred=getDbValue($cn,"select sum (c_montant) from centralized where c_debit='f' $sql_year ");
if ( $cred == $deb ) {
$result =' OK ';}
else {
$result =' NON OK ';}
printf ('- Solde Grand Livre centralisé: debit %f credit %f %s
',$deb,$cred,$result);
$sql="select jrn_def_id,jrn_def_name from jrn_def";
$res=ExecSql($cn,$sql);
$jrn=pg_fetch_all($res);
foreach ($jrn as $l) {
$id=$l['jrn_def_id'];
$name=$l['jrn_def_name'];
$deb=getDbValue($cn,"select sum (c_montant) from centralized where c_debit='t' and c_jrn_def=$id $sql_year ");
$cred=getDbValue($cn,"select sum (c_montant) from centralized where c_debit='f' and c_jrn_def=$id $sql_year ");
if ( $cred == $deb ) {
$result =' OK ';}
else {
$result =' NON OK ';}
printf ('- Journal %s Solde centralisé: debit %f credit %f %s
',$name,$deb,$cred,$result);
}
echo '
';
echo '
';
$sql_year=" and j_tech_per in (select p_id from parm_periode where p_exercice='".$User->get_exercice()."')";
$deb=getDbValue($cn,"select sum (j_montant) from jrnx where j_debit='t' $sql_year ");
$cred=getDbValue($cn,"select sum (j_montant) from jrnx where j_debit='f' $sql_year ");
if ( $cred == $deb ) {
$result =' OK ';}
else {
$result =' NON OK ';}
printf ('- Total solde Grand Livre : debit %f credit %f %s
',$deb,$cred,$result);
$sql="select jrn_def_id,jrn_def_name from jrn_def";
$res=ExecSql($cn,$sql);
$jrn=pg_fetch_all($res);
foreach ($jrn as $l) {
$id=$l['jrn_def_id'];
$name=$l['jrn_def_name'];
$deb=getDbValue($cn,"select sum (j_montant) from jrnx where j_debit='t' and j_jrn_def=$id $sql_year ");
$cred=getDbValue($cn,"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 ('- Journal %s total : debit %f credit %f %s
',$name,$deb,$cred,$result);
}
echo '