482 lines
14 KiB
PHP
482 lines
14 KiB
PHP
<?php
|
|
/*
|
|
* This file is part of PhpCompta.
|
|
*
|
|
* PhpCompta 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.
|
|
*
|
|
* PhpCompta 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 PhpCompta; if not, write to the Free Software
|
|
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
|
*/
|
|
/* $Revision$ */
|
|
|
|
// Copyright Author Dany De Bontridder ddebontridder@yahoo.fr
|
|
|
|
/*!\file
|
|
* \brief this file respond to an ajax request
|
|
* The parameters are
|
|
* - gDossier
|
|
* - $op operation the file has to execute
|
|
* Part 1
|
|
* dsp_tva fill a ipopup with a choice of possible VAT
|
|
* - if code is set then fill the field code
|
|
* - if compute is set then add event to call clean_tva and compute_ledger
|
|
@see Acc_Ledger_Sold::input
|
|
* Part 2
|
|
* dl : display form to modify, add and delete lettering for a given operation
|
|
*
|
|
*/
|
|
require_once('class_database.php');
|
|
require_once ('class_fiche.php');
|
|
require_once('class_iradio.php');
|
|
require_once('function_javascript.php');
|
|
require_once('ac_common.php');
|
|
require_once ('class_user.php');
|
|
|
|
$var=array('gDossier','op');
|
|
$cont=0;
|
|
/* check if mandatory parameters are given */
|
|
foreach ($var as $v)
|
|
{
|
|
if ( ! isset ($_REQUEST [$v] ) )
|
|
{
|
|
echo "$v is not set ";
|
|
$cont=1;
|
|
}
|
|
}
|
|
if ( $cont != 0 ) exit();
|
|
extract($_REQUEST );
|
|
set_language();
|
|
|
|
$cn=new Database($gDossier);
|
|
$user=new User($cn);
|
|
$user->check(true);
|
|
$user->check_dossier($gDossier,true);
|
|
$html=var_export($_REQUEST,true);
|
|
switch($op)
|
|
{
|
|
case "remove_anc":
|
|
if ($user->check_action(CAOD))
|
|
$cn->exec_sql("delete from operation_analytique where oa_group=$1",array($_GET['oa']));
|
|
break;
|
|
case "rm_stock":
|
|
require_once('constant.security.php');
|
|
if ( $user->check_action(GESTOCK) == 0 )
|
|
{
|
|
exit();
|
|
}
|
|
$cn->exec_sql('delete from stock_goods where sg_id=$1',
|
|
array($s_id));
|
|
$html=escape_xml($s_id);
|
|
header('Content-type: text/xml; charset=UTF-8');
|
|
printf('{"d_id":"%s"}',$s_id);
|
|
exit();
|
|
break;
|
|
//--------------------------------------------------
|
|
// get the last date of a ledger
|
|
case 'lastdate':
|
|
require_once('class_acc_ledger_fin.php');
|
|
$ledger=new Acc_Ledger_Fin($cn,$_GET['p_jrn']);
|
|
$html=$ledger->get_last_date();
|
|
$html=escape_xml($html);
|
|
header('Content-type: text/xml; charset=UTF-8');
|
|
echo <<<EOF
|
|
<?xml version="1.0" encoding="UTF-8"?>
|
|
<data>
|
|
<code>e_date</code>
|
|
<value>$html</value>
|
|
</data>
|
|
EOF;
|
|
|
|
break;
|
|
case 'bkname':
|
|
require_once('class_acc_ledger_fin.php');
|
|
$ledger=new Acc_Ledger_Fin($cn,$_GET['p_jrn']);
|
|
$html=$ledger->get_bank_name();
|
|
$html=escape_xml($html);
|
|
header('Content-type: text/xml; charset=UTF-8');
|
|
echo <<<EOF
|
|
<?xml version="1.0" encoding="UTF-8"?>
|
|
<data>
|
|
<code>bkname</code>
|
|
<value>$html</value>
|
|
</data>
|
|
EOF;
|
|
break;
|
|
// display new calendar
|
|
case 'cal':
|
|
require_once('class_calendar.php');
|
|
/* others report */
|
|
$cal=new Calendar();
|
|
$cal->set_periode($per);
|
|
|
|
$html="";
|
|
$html=$cal->display();
|
|
$html=escape_xml($html);
|
|
header('Content-type: text/xml; charset=UTF-8');
|
|
echo <<<EOF
|
|
<?xml version="1.0" encoding="UTF-8"?>
|
|
<data>
|
|
<code>$html</code>
|
|
</data>
|
|
EOF;
|
|
break;
|
|
/* remove a cat of document */
|
|
case 'rem_cat_doc':
|
|
require_once('class_document_type.php');
|
|
// if user can not return error message
|
|
if( $user->check_action(PARCATDOC)==0 )
|
|
{
|
|
$html="nok";
|
|
header('Content-type: text/xml; charset=UTF-8');
|
|
echo <<<EOF
|
|
<?xml version="1.0" encoding="UTF-8"?>
|
|
<data>
|
|
<dtid>$html</dtid>
|
|
</data>
|
|
EOF;
|
|
return;
|
|
}
|
|
// remove the cat if no action
|
|
$count_md=$cn->get_value('select count(*) from document_modele where md_type=$1',array($dt_id));
|
|
$count_a=$cn->get_value('select count(*) from action_gestion where ag_type=$1',array($dt_id));
|
|
|
|
if ( $count_md != 0 || $count_a != 0 )
|
|
{
|
|
$html="nok";
|
|
header('Content-type: text/xml; charset=UTF-8');
|
|
echo <<<EOF
|
|
<?xml version="1.0" encoding="UTF-8"?>
|
|
<data>
|
|
<dtid>$html</dtid>
|
|
</data>
|
|
EOF;
|
|
exit;
|
|
}
|
|
$cn->exec_sql('delete from document_type where dt_id=$1',array($dt_id));
|
|
$html=$dt_id;
|
|
header('Content-type: text/xml; charset=UTF-8');
|
|
echo <<<EOF
|
|
<?xml version="1.0" encoding="UTF-8"?>
|
|
<data>
|
|
<dtid>$html</dtid>
|
|
</data>
|
|
EOF;
|
|
return;
|
|
break;
|
|
case 'dsp_tva':
|
|
$cn=new Database($gDossier);
|
|
$Res=$cn->exec_sql("select * from tva_rate order by tva_rate desc");
|
|
$Max=Database::num_row($Res);
|
|
$r="";
|
|
$r=HtmlInput::anchor_close('tva_select');
|
|
$r.=h2info('Choississez la TVA ');
|
|
$r.='<div >';
|
|
$r.= '<TABLE style="padding-left:10%;padding-right:10%;width:80%">';
|
|
$r.=th('');
|
|
$r.=th(_('code'));
|
|
$r.=th(_('Taux'));
|
|
$r.=th(_('Symbole'));
|
|
$r.=th(_('Explication'));
|
|
|
|
for ($i=0;$i<$Max;$i++)
|
|
{
|
|
$row=Database::fetch_array($Res,$i);
|
|
if ( ! isset($compute))
|
|
{
|
|
if ( ! isset($code) )
|
|
{
|
|
$script="onclick=\"$('$ctl').value='".$row['tva_id']."';removeDiv('tva_select');\"";
|
|
}
|
|
else
|
|
{
|
|
$script="onclick=\"$('$ctl').value='".$row['tva_id']."';set_value('$code','".$row['tva_label']."');removeDiv('tva_select');\"";
|
|
}
|
|
}
|
|
else
|
|
{
|
|
if ( ! isset($code) )
|
|
{
|
|
$script="onclick=\"$('$ctl').value='".$row['tva_id']."';removeDiv('tva_select');clean_tva('$compute');compute_ledger('$compute');\"";
|
|
}
|
|
else
|
|
{
|
|
$script="onclick=\"$('$ctl').value='".$row['tva_id']."';set_value('$code','".$row['tva_label']."');removeDiv('tva_select');clean_tva('$compute');compute_ledger('$compute');\"";
|
|
}
|
|
|
|
}
|
|
$set= '<INPUT TYPE="BUTTON" class="button" Value="select" '.$script.'>';
|
|
$r.='<tr>';
|
|
$r.=td($set);
|
|
$r.=td($row['tva_id']);
|
|
$r.=td($row['tva_rate']);
|
|
$r.=td($row['tva_label']);
|
|
$r.=td($row['tva_comment']);
|
|
$r.='</tr>';
|
|
}
|
|
$r.='</TABLE>';
|
|
$r.='</div>';
|
|
$html=escape_xml($r);
|
|
|
|
header('Content-type: text/xml; charset=UTF-8');
|
|
echo <<<EOF
|
|
<?xml version="1.0" encoding="UTF-8"?>
|
|
<data>
|
|
<code>$html</code>
|
|
<popup>$popup</popup>
|
|
</data>
|
|
EOF;
|
|
break;
|
|
case 'label_tva':
|
|
$cn=new Database($gDossier);
|
|
if ( isNumber($id) == 0 )
|
|
$value = _('tva inconnue');
|
|
else
|
|
{
|
|
$Res=$cn->get_array("select * from tva_rate where tva_id = $1",array($id));
|
|
if ( count($Res) == 0 )
|
|
$value=_('tva inconnue');
|
|
else
|
|
$value=$Res[0]['tva_label'];
|
|
}
|
|
header('Content-type: text/xml; charset=UTF-8');
|
|
echo <<<EOF
|
|
<?xml version="1.0" encoding="UTF-8"?>
|
|
<data>
|
|
<code>$code</code>
|
|
<value>$value</value>
|
|
</data>
|
|
EOF;
|
|
|
|
break;
|
|
/**
|
|
*display the lettering
|
|
*/
|
|
case 'dl':
|
|
require_once('class_lettering.php');
|
|
$exercice=$user->get_exercice();
|
|
$periode=new Periode($cn);
|
|
list($first_per,$last_per)=$periode->get_limit($exercice);
|
|
|
|
$ret=new IButton('return');
|
|
$ret->label=_('Retour');
|
|
$ret->javascript="$('detail').hide();$('list').show();$('search').show();";
|
|
|
|
// retrieve info for the given j_id (date, amount,side and comment)
|
|
$sql="select j_date,to_char(j_date,'DD.MM.YYYY') as j_date_fmt,J_POSTE,j_qcode,jr_id,
|
|
jr_comment,j_montant, j_debit,jr_internal from jrnx join jrn on (j_grpt=jr_grpt_id)
|
|
where j_id=$1";
|
|
$arow=$cn->get_array($sql,array($j_id));
|
|
$row=$arow[0];
|
|
$r='';
|
|
$r.='<fieldset><legend>'._('Lettrage').'</legend>';
|
|
$r.='Poste '.$row['j_poste'].' '.$row['j_qcode'].'<br>';
|
|
|
|
$detail="<A class=\"detail\" style=\"display:inline\" HREF=\"javascript:modifyOperation('".$row['jr_id']."',".$gDossier.")\" > ".$row['jr_internal']."</A>";
|
|
|
|
$r.='Date : '.$row['j_date_fmt'].' ref :'.$detail.' <br> ';
|
|
$r.=h($row['jr_comment'])." montant: ".($row['j_montant'])." ".(($row['j_debit']=='t')?'D':'C');
|
|
$r.='</fieldset>';
|
|
$r.='<div id="filtre" style="float:left;display:block">';
|
|
$r.='<form method="get" id="search_form" onsubmit="search_letter(this);return false">';
|
|
$r.='<div style="float:left;">';
|
|
// needed hidden var
|
|
$r.=dossier::hidden();
|
|
if ( isset($_REQUEST['ac'])) $r.=HtmlInput::hidden('ac',$_REQUEST['ac']);
|
|
if ( isset($_REQUEST['sa'])) $r.=HtmlInput::hidden('sa',$_REQUEST['sa']);
|
|
if ( isset($_REQUEST['acc'])) $r.=HtmlInput::hidden('acc',$_REQUEST['acc']);
|
|
$r.=HtmlInput::hidden('j_id',$j_id);
|
|
$r.=HtmlInput::hidden('op',$op);
|
|
$r.=HtmlInput::hidden('ot',$ot);
|
|
|
|
$r.='<table>';
|
|
//min amount
|
|
$line=td(_('Montant min. '));
|
|
$min=new INum('min_amount');
|
|
$min->value=(isset($min_amount))?$min_amount:$row['j_montant'];
|
|
$min_amount=(isset($min_amount))?$min_amount:$row['j_montant'];
|
|
|
|
$line.=td($min->input());
|
|
// max amount
|
|
$line.=td(_('Montant max. '));
|
|
$max=new INum('max_amount');
|
|
$max->value=(isset($max_amount))?$max_amount:$row['j_montant'];
|
|
$max_amount=(isset($max_amount))?$max_amount:$row['j_montant'];
|
|
$line.=td($max->input());
|
|
$r.=tr($line);
|
|
|
|
// start date
|
|
$start=new IDate('search_start');
|
|
$start->value=(isset($search_start))?$search_start:$first_per->first_day();
|
|
|
|
|
|
$line=td('Date Debut').td($start->input());
|
|
// end date
|
|
$end=new IDate('search_end');
|
|
$end->value=(isset($search_end))?$search_end:$last_per->last_day();
|
|
$line.=td('Date Fin').td($end->input());
|
|
$r.=tr($line);
|
|
// Side
|
|
$line=td('Debit / Credit');
|
|
$iside=new ISelect('side');
|
|
$iside->value=array(
|
|
array('label'=>_('Debit'),'value'=>0),
|
|
array('label'=>_('Credit'),'value'=>1),
|
|
array('label'=>_('Les 2'),'value'=>3)
|
|
);
|
|
/**
|
|
*
|
|
* if $side is not then
|
|
* - if jl_id exist and is > 0 show by default all the operation (=3)
|
|
* - if jl_id does not exist or is < 0 then show by default the opposite
|
|
* side
|
|
*/
|
|
if ( ! isset ($side ))
|
|
{
|
|
// find the jl_id of the j_id
|
|
$jl_id=$cn->get_value('select comptaproc.get_letter_jnt($1)',array($j_id));
|
|
if ($jl_id == null )
|
|
{
|
|
// get the other side
|
|
$iside->selected=(isset($side))?$side:(($row['j_debit']=='t')?1:0);
|
|
$side=(isset($side))?$side:(($row['j_debit']=='t')?1:0);
|
|
}
|
|
else
|
|
{
|
|
// show everything
|
|
$iside->selected=3;
|
|
$side=3;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
$iside->selected=$side;
|
|
}
|
|
|
|
$r.=tr($line.td($iside->input()));
|
|
$r.='</table>';
|
|
$r.='</div>';
|
|
$r.='<div style="float:left;padding-left:100">';
|
|
$r.=HtmlInput::submit('search','Rechercher');
|
|
$r.='</div>';
|
|
$r.='</form>';
|
|
$r.='</div>';
|
|
|
|
$form='<div id="result" style="float:top;clear:both">';
|
|
|
|
$form.='<FORM id="letter_form" METHOD="post">';
|
|
$form.=dossier::hidden();
|
|
if ( isset($_REQUEST['p_action'])) $form.=HtmlInput::hidden('p_action',$_REQUEST['p_action']);
|
|
if ( isset($_REQUEST['sa'])) $form.=HtmlInput::hidden('sa',$_REQUEST['sa']);
|
|
if ( isset($_REQUEST['acc'])) $form.=HtmlInput::hidden('acc',$_REQUEST['acc']);
|
|
if ( isset($_REQUEST['sc'])) $form.=HtmlInput::hidden('sc',$_REQUEST['sc']);
|
|
if ( isset($_REQUEST['sb'])) $form.=HtmlInput::hidden('sb',$_REQUEST['sb']);
|
|
if ( isset($_REQUEST['f_id'])) $form.=HtmlInput::hidden('f_id',$_REQUEST['f_id']);
|
|
/* check if date are valid */
|
|
if ( (isset($search_end) && isDate($search_end) == null) ||
|
|
(isset($search_start) && isDate ($search_start) == null))
|
|
{
|
|
ob_start();
|
|
alert(_('Date malformée, désolé'));
|
|
$html=ob_get_contents();
|
|
ob_clean();
|
|
|
|
$html=escape_xml($html);
|
|
|
|
header('Content-type: text/xml; charset=UTF-8');
|
|
echo <<<EOF
|
|
<?xml version="1.0" encoding="UTF-8"?>
|
|
<data>
|
|
<code>detail</code>
|
|
<value>$html</value>
|
|
</data>
|
|
EOF;
|
|
exit();
|
|
}
|
|
|
|
// display a list of operation from the other side + box button
|
|
if ( $ot == 'account')
|
|
{
|
|
$obj=new Lettering_Account($cn,$row['j_poste']);
|
|
if ( isset($search_start)) $obj->start=$search_start;
|
|
if ( isset ($search_end)) $obj->end=$search_end;
|
|
if ( isset ($max_amount)) $obj->fil_amount_max=$max_amount;
|
|
if ( isset ($min_amount)) $obj->fil_amount_min=$min_amount;
|
|
if ( isset ($side)) $obj->fil_deb=$side;
|
|
|
|
$form.=$obj->show_letter($j_id);
|
|
}
|
|
else if ($ot=='card')
|
|
{
|
|
$obj=new Lettering_Card($cn,$row['j_qcode']);
|
|
if ( isset($search_start)) $obj->start=$search_start;
|
|
if ( isset ($search_end)) $obj->end=$search_end;
|
|
if ( isset ($max_amount)) $obj->fil_amount_max=$max_amount;
|
|
if ( isset ($min_amount)) $obj->fil_amount_min=$min_amount;
|
|
if ( isset ($side)) $obj->fil_deb=$side;
|
|
$form.=$obj->show_letter($j_id);
|
|
}
|
|
else
|
|
{
|
|
$form.='Mauvais type objet';
|
|
}
|
|
|
|
$form.=HtmlInput::submit('record',_('Sauver')).$ret->input();
|
|
$form.='</FORM>';
|
|
$form.='</div>';
|
|
$html=$r.$form;
|
|
// echo $html;exit;
|
|
$html=escape_xml($html);
|
|
|
|
header('Content-type: text/xml; charset=UTF-8');
|
|
echo <<<EOF
|
|
<?xml version="1.0" encoding="UTF-8"?>
|
|
<data>
|
|
<code>detail</code>
|
|
<value>$html</value>
|
|
</data>
|
|
EOF;
|
|
break;
|
|
case 'mod_doc':
|
|
require_once('modify_mod_document.inc.php');
|
|
break;
|
|
case 'input_per':
|
|
require_once('modify_periode.inc.php');
|
|
break;
|
|
case 'save_per':
|
|
require_once('modify_periode.inc.php');
|
|
break;
|
|
case 'mod_predf':
|
|
require_once('modify_predf_op.php');
|
|
break;
|
|
case 'save_predf':
|
|
require_once('save_predf_op.php');
|
|
break;
|
|
case 'search_op':
|
|
/*put_global(array
|
|
(array('key'=>'ac','value'=>'JSSEARCH')),
|
|
(array('key'=>'ledger_type','value'=>'ALL'))
|
|
);*/
|
|
ob_start();
|
|
require_once 'search.inc.php';
|
|
$content=ob_get_contents();
|
|
ob_clean();
|
|
$html=escape_xml($content);
|
|
header('Content-type: text/xml; charset=UTF-8');
|
|
echo <<<EOF
|
|
<?xml version="1.0" encoding="UTF-8"?>
|
|
<data>
|
|
<ctl>$ctl</ctl>
|
|
<code>$html</code>
|
|
</data>
|
|
EOF;
|
|
break;
|
|
}
|