altocompta/include/template/ledger_detail_ven.php
Dany De Bontridder ac14ffab61 Merged revisions 4743-4748,4759-4784,4786-4791 via svnmerge from
svn+ssh://ns352270.ovh.net/svn/phpcompta/tags/rel600

........
  r4743 | danydb | 2012-02-04 16:18:09 +0100 (Sat, 04 Feb 2012) | 1 line
  
  update DBVersion
........
  r4744 | danydb | 2012-02-04 16:22:52 +0100 (Sat, 04 Feb 2012) | 1 line
  
  remove space
........
  r4745 | danydb | 2012-02-04 16:44:10 +0100 (Sat, 04 Feb 2012) | 3 lines
  
  Bug : clause from in report didn't work properly
........
  r4746 | danydb | 2012-02-04 18:39:58 +0100 (Sat, 04 Feb 2012) | 1 line
  
  sql improve : do not use comptaproc. function in select concerning lettering
........
  r4747 | danydb | 2012-02-04 18:45:55 +0100 (Sat, 04 Feb 2012) | 1 line
  
  put correct DBVERSION
........
  r4748 | danydb | 2012-02-04 18:47:00 +0100 (Sat, 04 Feb 2012) | 1 line
  
  remove useless patch
........
  r4759 | danydb | 2012-02-04 23:19:55 +0100 (Sat, 04 Feb 2012) | 2 lines
  
  Bug : remove double input in letter_deb, letter_cred
........
  r4760 | danydb | 2012-02-04 23:35:13 +0100 (Sat, 04 Feb 2012) | 2 lines
  
  Upgrade script
........
  r4761 | danydb | 2012-02-07 16:50:24 +0100 (Tue, 07 Feb 2012) | 1 line
  
  FIN : cosmetic show name of the card + align col.
........
  r4762 | danydb | 2012-02-07 18:50:55 +0100 (Tue, 07 Feb 2012) | 1 line
  
  FIN : add item , new column card name, change func for adding row
........
  r4763 | danydb | 2012-02-08 17:49:44 +0100 (Wed, 08 Feb 2012) | 1 line
  
  Improve : generate document : default argument is an array
........
  r4764 | danydb | 2012-02-08 19:15:50 +0100 (Wed, 08 Feb 2012) | 2 lines
  
  Correct probleme with date in calc
........
  r4765 | danydb | 2012-02-08 19:47:08 +0100 (Wed, 08 Feb 2012) | 3 lines
  
  Correct probleme with date in other document than CALC
  New tag : DATE_CALC
........
  r4766 | danydb | 2012-02-08 20:00:18 +0100 (Wed, 08 Feb 2012) | 2 lines
  
  Double click on accounting gives the history of the accounting
........
  r4767 | danydb | 2012-02-09 10:20:29 +0100 (Thu, 09 Feb 2012) | 1 line
  
  Improve : generate document :add DATE_LIMIT_CALC to allow date formatting in calc
........
  r4768 | danydb | 2012-02-09 13:47:45 +0100 (Thu, 09 Feb 2012) | 2 lines
  
  cosmetic : place of "Document generated
........
  r4769 | danydb | 2012-02-09 14:02:13 +0100 (Thu, 09 Feb 2012) | 2 lines
  
  cosmetic : ACH generated document use style instead of class
........
  r4770 | danydb | 2012-02-09 14:09:58 +0100 (Thu, 09 Feb 2012) | 1 line
  
  code indent
........
  r4771 | danydb | 2012-02-17 01:13:36 +0100 (Fri, 17 Feb 2012) | 1 line
  
  bug cannot update ANC (cause j_id and value from POST conflict)
........
  r4772 | danydb | 2012-02-17 01:16:34 +0100 (Fri, 17 Feb 2012) | 1 line
  
  do not clause popup if we save
........
  r4773 | danydb | 2012-02-17 01:26:16 +0100 (Fri, 17 Feb 2012) | 1 line
  
  ANC : great ledger oa_date problem (order by clause)
........
  r4774 | danydb | 2012-02-20 09:24:08 +0100 (Mon, 20 Feb 2012) | 2 lines
  
  0000525: Le contrôle des montants analytiques d'une écriture à plusieurs ligne (ex: salaires) en modification met tout en rouge
........
  r4775 | danydb | 2012-02-25 14:47:13 +0100 (Sat, 25 Feb 2012) | 1 line
  
  0000528: VEN_TVAC n'est pas correctement calculé
........
  r4776 | danydb | 2012-02-25 14:59:43 +0100 (Sat, 25 Feb 2012) | 1 line
  
  VEN_ART_PRICE = 0 alors return ""
........
  r4777 | danydb | 2012-02-25 15:14:55 +0100 (Sat, 25 Feb 2012) | 2 lines
  
  Order by document.dt_value
........
  r4778 | danydb | 2012-02-25 15:15:13 +0100 (Sat, 25 Feb 2012) | 2 lines
  
  Order by document.dt_value
........
  r4779 | danydb | 2012-02-25 15:18:12 +0100 (Sat, 25 Feb 2012) | 1 line
  
  constant.php for prod
........
  r4780 | danydb | 2012-02-25 15:42:00 +0100 (Sat, 25 Feb 2012) | 1 line
  
  Bug with calendar
........
  r4781 | danydb | 2012-02-25 15:48:43 +0100 (Sat, 25 Feb 2012) | 1 line
  
  0000531: Tableau de bord : pense-bête
........
  r4782 | danydb | 2012-03-14 17:16:38 +0100 (Wed, 14 Mar 2012) | 1 line
  
  548 banquaire -> bancaire
........
  r4783 | danydb | 2012-03-20 21:05:01 +0100 (Tue, 20 Mar 2012) | 1 line
  
  Warning if account used instead of a card in ACC_LEDGER
........
  r4784 | danydb | 2012-03-21 11:41:25 +0100 (Wed, 21 Mar 2012) | 1 line
  
  0000552: Pourcentage dans une fiche 4 décimales
........
  r4786 | danydb | 2012-03-22 20:17:37 +0100 (Thu, 22 Mar 2012) | 1 line
  
  0000557: Faire apparaître dans titre HTML le module courant
........
  r4787 | danydb | 2012-03-22 20:35:42 +0100 (Thu, 22 Mar 2012) | 1 line
  
  558 Agrandir zone document
........
  r4788 | danydb | 2012-03-22 20:40:22 +0100 (Thu, 22 Mar 2012) | 1 line
  
  558 Agrandir zone document : cosmetic background
........
  r4789 | danydb | 2012-03-22 20:51:52 +0100 (Thu, 22 Mar 2012) | 1 line
  
  558 Agrandir zone document : cosmetic background
........
  r4790 | danydb | 2012-03-22 20:54:18 +0100 (Thu, 22 Mar 2012) | 1 line
  
  Cosmetic ajout lien sous qcode client
........
  r4791 | danydb | 2012-03-22 21:12:17 +0100 (Thu, 22 Mar 2012) | 1 line
  
  Cosmetic : alignement et taille détail opérations
........
2012-03-23 20:12:57 +00:00

291 lines
8.3 KiB
PHP

<? require_once('template/ledger_detail_top.php'); ?>
<div class="content" style="padding:0;">
<?
require_once('class_own.php');
$owner=new Own($cn);
?>
<? if ( $access=='W') : ?>
<form class="print" onsubmit="return op_save(this);">
<? endif; ?>
<? echo HtmlInput::hidden('whatdiv',$div).HtmlInput::hidden('jr_id',$jr_id).dossier::hidden();?>
<table style="width:100%">
<tr><td>
<table>
<tr><td>
<?php
$date=new IDate('p_date');
$date->value=format_date($obj->det->jr_date);
echo td('Date').td($date->input());
?>
</td>
</tr>
<tr>
<td>
<?php
$date_ech=new IDate('p_ech');
$date_ech->value=format_date($obj->det->jr_ech);
echo td('Echeance').td($date_ech->input());
?>
</td>
<tr>
<td>
<?
$bk=new Fiche($cn,$obj->det->array[0]['qs_client']);
echo td(_('Client'));
$view_history= sprintf('<A class="line" HREF="javascript:view_history_card(\'%s\',\'%s\')" >%s</A>',
$bk->id, $gDossier, $bk->get_quick_code());
echo td(h($bk->getName())).td($view_history);;
?>
</td>
</tr>
<tr>
<td>
<?
$itext=new IText('npj');
$itext->value=strip_tags($obj->det->jr_pj_number);
echo td(_('Pièce')).td($itext->input());
?>
</td>
<tr>
<td>
<?
$itext=new IText('lib');
$itext->value=strip_tags($obj->det->jr_comment);
$itext->size=40;
echo td(_('Libellé')).td($itext->input(),' colspan="2" ');
?>
</td>
</tr>
<tr>
<td></td>
<td>Payé</td>
<td>
<?
$ipaid=new ICheckBox("ipaid",'paid');
$ipaid->selected=($obj->det->jr_rapt=='paid');
echo $ipaid->input();
?>
</td>
</tr>
</table>
</td>
<td>
<table style="border:solid 1px yellow">
<tr>
<td>
Note
</td></tr>
<tr>
<td>
<?
$inote=new ITextarea('jrn_note');
$inote->width=25;
$inote->heigh=5;
$inote->value=strip_tags($obj->det->note);
echo $inote->input();
?>
</td>
</tr>
</table>
</td>
</tr>
</table>
<fieldset><legend><?=_('Détail')?></legend>
<table class="result">
<?
bcscale(2);
$total_htva=0;$total_tvac=0;
echo th(_('Quick Code'));
echo th(_('Description'));
echo th(_('Prix/Un'), 'style="text-align:right"');
echo th(_('Quantité'), 'style="text-align:right"');
if ( $owner->MY_TVA_USE == 'Y')
echo th(_('Taux TVA'), 'style="text-align:right"');
else
echo th('');
if ( $owner->MY_TVA_USE == 'Y') {
echo th(_('HTVA'), 'style="text-align:right"');
echo th(_('TVA'), 'style="text-align:right"');
echo th(_('TVAC'), 'style="text-align:right"');
} else
echo th(_('Total'), 'style="text-align:right"');
if ($owner->MY_ANALYTIC != 'nu' && $div == 'popup'){
$anc=new Anc_Plan($cn);
$a_anc=$anc->get_list(" order by pa_id ");
$x=count($a_anc);
/* set the width of the col */
echo '<th colspan="'.$x.'">'._('Compt. Analytique').'</th>';
/* add hidden variables pa[] to hold the value of pa_id */
echo Anc_Plan::hidden($a_anc);
}
echo '</tr>';
for ($e=0;$e<count($obj->det->array);$e++) {
$row='';
$q=$obj->det->array[$e];
$fiche=new Fiche($cn,$q['qs_fiche']);
$view_history= sprintf('<A class="line" HREF="javascript:view_history_card(\'%s\',\'%s\')" >%s</A>',
$fiche->id, $gDossier, $fiche->strAttribut(ATTR_DEF_QUICKCODE));
$row = td($view_history);
if ($owner->MY_UPDLAB == 'Y')
{
$l_lib = ($q['j_text'] == '') ? $fiche->strAttribut(ATTR_DEF_NAME) : $q['j_text'];
$hidden = HtmlInput::hidden("j_id[]", $q['j_id']);
$input = new IText("e_march" . $q['j_id'] . "_label", $l_lib);
$input->css_size="100%";
}
else
{
$input = new ISpan("e_march" . $q['j_id'] . "_label");
$hidden = HtmlInput::hidden("j_id[]", $q['j_id']);
$input->value = $fiche->strAttribut(ATTR_DEF_NAME);
}
$row.=td($input->input().$hidden);
$sym_tva='';
$pu=bcdiv($q['qs_price'],$q['qs_quantite']);
$row.=td(nbm($pu),'class="num"');
$row.=td(nbm($q['qs_quantite']),'class="num"');
$sym_tva='';
if ( $owner->MY_TVA_USE=='Y' && $q['qs_vat_code'] != '') {
/* retrieve TVA symbol */
$tva=new Acc_Tva($cn,$q['qs_vat_code']);
$tva->load();
$sym_tva=(h($tva->get_parameter('label')));
// $sym_tva=$sym
}
$row.=td($sym_tva,'style="text-align:center"');
$htva=$q['qs_price'];
$row.=td(nbm($htva),'class="num"');
$tvac=bcadd($htva,$q['qs_vat']);
if ($owner->MY_TVA_USE=='Y')
{
$row.=td(nbm($q['qs_vat']),'class="num"');
$row.=td(nbm($tvac),'class="num"');
}
$total_tvac=bcadd($total_tvac,$tvac);
$total_htva=bcadd($total_htva,$htva);
/* Analytic accountancy */
if ( $owner->MY_ANALYTIC != "nu" && $div == 'popup'){
$poste=$fiche->strAttribut(ATTR_DEF_ACCOUNT);
if ( preg_match('/^(6|7)/',$poste)) {
$anc_op=new Anc_Operation($cn);
$anc_op->j_id=$q['j_id'];
echo HtmlInput::hidden('op[]',$anc_op->j_id);
/* compute total price */
bcscale(2);
$row.=$anc_op->display_table(1,$htva,$div);
} else {
$row.=td('');
}
}
echo tr($row);
}
if ($owner->MY_TVA_USE=='Y')
$row= td(_('Total'),' style="font-style:italic;text-align:right;font-weight: bolder;" colspan="5"');
else
$row= td(_('Total'),' style="font-style:italic;text-align:right;font-weight: bolder;" colspan="5"');
$row.=td(nbm($total_htva),'class="num" style="font-style:italic;font-weight: bolder;"');
if ($owner->MY_TVA_USE=='Y')
$row.=td("").td(nbm($total_tvac),'class="num" style="font-style:italic;font-weight: bolder;"');
echo tr($row);
?>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</fieldset>
<fieldset>
<legend>
<?=_('Ecritures comptables')?>
</legend>
<?
/* if it is not in a popup, the details are hidden */
if ( $div != 'popup') {
$ib=new IButton ("a".$div);
$ib->label='Afficher';
$ib->javascript="g('detail_".$div."').style.display='block';g('a".$div."').style.display='none';";
echo $ib->input();
echo '<div id="detail_'.$div.'" style="display:none">';
$ib=new IButton ("h".$div);
$ib->label='Cacher';
$ib->javascript="g('detail_".$div."').style.display='none';g('a".$div."').style.display='block';";
echo $ib->input();
} else
echo '<div>';
$detail=new Acc_Misc($cn,$obj->jr_id);
$detail->get();
?>
<table class="result">
<tr>
<?
echo th(_('Poste Comptable'));
echo th(_('Quick Code'));
echo th(_('Libellé'));
echo th(_('Débit'),' style="text-align:right"');
echo th(_('Crédit'),' style="text-align:right"');
echo '</tr>';
for ($e=0;$e<count($detail->det->array);$e++) {
$row=''; $q=$detail->det->array[$e];
$view_history= sprintf('<A class="detail" style="text-decoration:underline" HREF="javascript:view_history_account(\'%s\',\'%s\')" >%s</A>',
$q['j_poste'], $gDossier, $q['j_poste']);
$row.=td($view_history);
if ( $q['j_qcode'] !=''){
$fiche=new Fiche($cn);
$fiche->get_by_qcode($q['j_qcode']);
$view_history= sprintf('<A class="detail" style="text-decoration:underline" HREF="javascript:view_history_card(\'%s\',\'%s\')" >%s</A>',
$fiche->id,$gDossier, $q['j_qcode']);
}
else
$view_history='';
$row.=td($view_history);
if ( $q['j_qcode'] !='') {
// nom de la fiche
$ff=new Fiche($cn);
$ff->get_by_qcode( $q['j_qcode']);
$row.=td($ff->strAttribut(h(ATTR_DEF_NAME)));
} else {
// libellé du compte
$name=$cn->get_value('select pcm_lib from tmp_pcmn where pcm_val=$1',array($q['j_poste']));
$row.=td(h($name));
}
$montant=td(nbm($q['j_montant']),'class="num"');
$row.=($q['j_debit']=='t')?$montant:td('');
$row.=($q['j_debit']=='f')?$montant:td('');
echo tr($row);
}
?>
</table>
</div>
</fieldset>
<?
require_once('ledger_detail_bottom.php');
?>
</div>