anc_od.inc.php

Go to the documentation of this file.

<?php
/*
 *   This file is part of NOALYSS.
 *
 *   NOALYSS is free software; you can redistribute it and/or modify
 *   it under the terms of the GNU General Public License as published by
 *   the Free Software Foundation; either version 2 of the License, or
 *   (at your option) any later version.
 *
 *   NOALYSS is distributed in the hope that it will be useful,
 *   but WITHOUT ANY WARRANTY; without even the implied warranty of
 *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *   GNU General Public License for more details.
 *
 *   You should have received a copy of the GNU General Public License
 *   along with NOALYSS; if not, write to the Free Software
 *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
*/
 
// Copyright Author Dany De Bontridder danydb@aevalys.eu
 
/*!\file
 *
 *
 * \brief Misc Operation for analytic accountancy
 *
 */
if ( ! defined ('ALLOWED') ) die('Appel direct ne sont pas permis');
 
global $g_user;
$http=new HttpInput();
 
$str_dossier=Dossier::get();
$pa=new Anc_Plan($cn);
$m=$pa->get_list();
if ( ! $m )
{
 
    echo '<div ><h2 class="error">'._('Aucun plan analytique défini').'</h2></div>';
    return;
}
 
$dossier_id=Dossier::id();
$see=$http->request("see","string","0");
$new=$http->request("new","string","0");
$selected=($see==0)?"new":"see";
//----------------------------------------------------------------------
// show the  menu
//----------------------------------------------------------------------
echo show_menu_extension(array(
       array( 
           "?".http_build_query(["ac"=>$http->request("ac"),"new"=>1,"gDossier"=>$dossier_id]),
           _("Nouveau"),
           _("Nouvelle opération")
           ,"new"
           ),
       array (
            "?".http_build_query(["ac"=>$http->request("ac"),"see"=>1,"gDossier"=>$dossier_id]),
            _("Liste"),
           _("Liste opérations"),
           "see"
           )
    )
    ,$selected
);
 
 
//----------------------------------------------------------------------
// the pa_id is set
//
//----------------------------------------------------------------------
if ( isset($_GET['see']))
{
 
    // Show the list for the period
    // and exit
    //-----------------------------
    $a=new Anc_Operation($cn);
 
    echo '
    <div class="content"  >
    <form method= "get">
    ';
 
    echo dossier::hidden();
    $hid=new IHidden();
    $exercice=$http->request("exercice","number",0);
    if ($exercice == 0 ){
        $exercice=$g_user->get_exercice();
    }
    $ex=new Exercice($cn);
    $js=sprintf("updatePeriode(%d,'%s','%s')",Dossier::id(),'exercice','p_periode');
    $wex=$ex->select('exercice',$exercice,' onchange="'.$js.'"');
    echo $wex->input();
    $hid->name="ac";
    $hid->value=$http->request("ac");
    echo $hid->input();
 
    $hid->name="see";
    $hid->value="";
    echo $hid->input();
 
    $w=new ISelect();
    $w->name="p_periode";
// filter on the current year
    $filter_year=" where p_exercice='".$g_user->get_exercice()."'";
 
    $periode_start=$cn->make_array("select p_id,to_char(p_start,'DD-MM-YYYY') from parm_periode 
           where p_exercice=$1 order by  p_start,p_end",1,[$exercice]);
    $g_user=new Noalyss_user($cn);
    $current=$http->get("p_periode","number",$g_user->get_periode());
    $w->value=$periode_start;
    $w->selected=$current;
    echo _('Filtrer par période').":".$w->input().HtmlInput::submit('gl_submit','Valider').'</form>';
    echo '<hr>';
 
    echo '<div class="content" >';
    echo $a->html_table($current);
    echo '</div>';
    return;
}
if ( isset($_POST['save']))
{
    // record the operation and exit
    // and exit
    //-----------------------------
    echo '<div class="redcontent" >'.
    _('Opération sauvée');
    $a=new Anc_Group_Operation($cn);
 
    $a->get_from_array($_POST);
 
    $a->save();
    echo $a->show();
    echo '</div>';
    return;
}
 
if ( isset($_GET['new']))
{
    //show the form for entering a new Anc_Operation
    //------------------------------------------
    $a=new Anc_Group_Operation($cn);
 
    $wSubmit=new IHidden("p_action","ca_od");
    $wSubmit->table=0;
    echo '<div class="redcontent"  >';
    echo '<form id="anc_od_frm" method="post" onsubmit="return validate_anc(\'anc_od_frm\');return false;">';
    echo dossier::hidden();
    echo $wSubmit->input();
    echo $a->form();
    echo HtmlInput::submit("save",_("Sauver"));
    echo '</form>';
    echo '<div class="info">';
    echo _('Débit').' = <span id="totalDeb"></span>';
    echo _('Crédit').' = <span id="totalCred"></span>';
    echo _('Difference').' = <span id="totalDiff"></span>
    </div>
    ';
 
    echo '</div>';
    $msg_comment=_("Commentaire vide");
    $msg_date=_("Date invalide");
echo <<<EOF
<script> 
    function validate_anc(p_frm_id) {
    try {
        if ($('pdesc').value.length==0) {
            smoke.alert('$msg_comment');
            return false;
        }
        if ( ! check_date($(p_frm_id)['pdate'].value) ) {
            smoke.alert('$msg_date');
            return false;
        }
        } catch (e) {
            smoke.alert(e.message);
        }
        return ;
    }
    
</script>;    
 
EOF;
    
   return;
}
 
?>
<div class="redcontent">