Task #0000809: Journaux achat/vente : TVA différente de celle calculée

This commit is contained in:
Dany De Bontridder 2013-05-11 22:19:53 +00:00
parent 681da45bba
commit ab2a2136c6
3 changed files with 31 additions and 14 deletions

View file

@ -55,6 +55,7 @@ content[24]="Donnez une partie du poste comptable ou du libellé pour filtrer";
content[25]="Donnez une partie du libellé, la date, le montant ou le numéro d'opération pour filtrer, cela n'efface pas ce qui a déjà été sélectionné";
content[26]="Donnez une partie du quickcode, nom, description... pour filtrer";
content[27]="Attention, <b>SI</b> la fiche a changé de poste comptable, c'est seulement le dernier qui est affiché";
content[28]="Attention Différence entre TVA calculée et donnée";
function showBulle(p_ctl)
{
d=document.getElementById('bulle');

View file

@ -1353,21 +1353,19 @@ class Acc_Ledger_Purchase extends Acc_Ledger
if ( $g_parameter->MY_TVA_USE=='Y')
{
$op=new Acc_Compute();
$op->set_parameter("amount",$amount);
$op->set_parameter('amount_vat_rate',$oTva->get_parameter('rate'));
$op->compute_vat();
$tva_computed=$op->get_parameter('amount_vat');
//----- if tva_amount is not given we compute the vat ----
if ( strlen (trim (${'e_march'.$i.'_tva_amount'})) == 0)
{
$op=new Acc_Compute();
$op->set_parameter("amount",$amount);
$op->set_parameter('amount_vat_rate',$oTva->get_parameter('rate'));
$op->compute_vat();
$tva_item=$op->get_parameter('amount_vat');
}
else
$tva_item=round($
{'e_march'.$i.'_tva_amount'
}
,2);
$tva_item=round(${'e_march'.$i.'_tva_amount'},2);
if (isset($tva[$idx_tva] ) )
$tva[$idx_tva]+=$tva_item;
@ -1396,8 +1394,21 @@ class Acc_Ledger_Purchase extends Acc_Ledger
$r.='<td class="num">';
$r.=$oTva->get_parameter('label');
$r.='</td>';
$r.='<td class="num">';
$r.=nbm($tva_item);
/* warning if tva_computed and given are not the
same */
bcscale(2);
if ( bcsub($tva_item,$tva_computed) != 0)
{
$r.='<td style="background-color:red" class="num">';
$r.=HtmlInput::infobulle(28);
$r.='<a href="#" class="error" style="display:inline" title="'. _("Attention Différence entre TVA calculée et donnée").'">'
.nbm($tva_item).'<a>';
}
else{
$r.='<td class="num">';
$r.=nbm($tva_item);
}
$r.='</td>';
$r.='<td class="num">';
$r.=nbm(round($amount,2));

View file

@ -625,7 +625,8 @@ class Acc_Ledger_Sold extends Acc_Ledger
}
/*!@brief show the summary of the operation and propose to save it
/*!
*@brief show the summary of the operation and propose to save it
*@param array contains normally $_POST. It proposes also to save
* the Analytic accountancy
*@param $p_summary false for the feedback, true to show the summary
@ -772,16 +773,20 @@ class Acc_Ledger_Sold extends Acc_Ledger
$r.='<td class="num">';
$r.=$oTva->get_parameter('label');
$r.='</td>';
$r.='<td class="num">';
/* warning if tva_computed and given are not the
same */
if ( bcsub($tva_item,$tva_computed) != 0)
{
$r.='<td style="background-color:red" class="num">';
$r.=HtmlInput::infobulle(28);
$r.='<a href="#" class="error" style="display:inline" title="'. _("Attention Différence entre TVA calculée et donnée").'">'
.nbm($tva_item).'<a>';
}
else
else{
$r.='<td class="num">';
$r.=nbm($tva_item);
}
$r.='</td>';
$r.='<td class="num">';
$r.=nbm($amount);