noalyss  Version-6.7.2
 All Data Structures Namespaces Files Functions Variables Enumerations
ledger_detail_ach.php
Go to the documentation of this file.
00001 <?php
00002 //This file is part of NOALYSS and is under GPL 
00003 //see licence.txt
00004 $str_anc="";
00005 ?><?php require_once('template/ledger_detail_top.php'); ?>
00006 <div class="content" style="padding:0;">
00007     <?php
00008     require_once('class_own.php');
00009     $owner = new Own($cn);
00010     ?>
00011 
00012     <?php if ($access == 'W') : ?>
00013         <form  class="print" onsubmit="return op_save(this);">
00014         <?php endif; ?>
00015 
00016         <?php echo HtmlInput::hidden('whatdiv', $div) . HtmlInput::hidden('jr_id', $jr_id) . dossier::hidden(); ?>
00017         <table style="width:100%">
00018             <tr><td>
00019                     <table>
00020                             <td></td>
00021                         <?php
00022                         $date = new IDate('p_date');
00023                         $date->value = format_date($obj->det->jr_date);
00024                         echo td(_('Date')) . td($date->input());
00025                         ?>
00026                         <tr>
00027                             <td></td>
00028                             <?php
00029                             $date_ech = new IDate('p_ech');
00030                             $date_ech->value = format_date($obj->det->jr_ech);
00031                             echo td(_('Echeance')) . td($date_ech->input());
00032                             ?>
00033                         </tr>
00034                         <tr>
00035                             <td></td>
00036                             <td>
00037                                 <?php echo _("Date paiement")?>
00038                             </td>
00039                             <td>
00040                                 <?php
00041                                 $date_paid = new IDate('p_date_paid');
00042                                 $date_paid->value = format_date($obj->det->jr_date_paid);
00043                                 echo $date_paid->input();
00044                                 ?>
00045                             </td>
00046                         </tr>
00047 
00048                         <tr><td>
00049                                 <?php
00050                                 $bk = new Fiche($cn, $obj->det->array[0]['qp_supplier']);
00051                                 echo td(_('Fournisseur'));
00052 
00053                                 $view_card_detail = HtmlInput::card_detail($bk->get_quick_code(), h($bk->getName()), ' class="line" ');
00054                                 echo td($view_card_detail);
00055                                 ?>
00056                             </td>
00057                         </tr>
00058                         <tr>
00059                             <td>
00060                                 <?php
00061                                 $itext = new IText('npj');
00062                                 $itext->value = strip_tags($obj->det->jr_pj_number);
00063                                 echo td(_('Pièce')) . td($itext->input());
00064                                 ?>
00065                             </td>
00066                         <tr>
00067                             <td>
00068                                 <?php
00069                                 $itext = new IText('lib');
00070                                 $itext->value = strip_tags($obj->det->jr_comment);
00071                                 $itext->size = 40;
00072                                 echo td(_('Libellé')) . td($itext->input(), ' colspan="2" ');
00073                                 ?>
00074                             </td>
00075                         </tr>
00076                         <tr>
00077                             <td></td>
00078                             <td>Payé</td>
00079                             <td>
00080                                 <?php
00081                                 $ipaid = new ICheckBox("ipaid", 'paid');
00082                                 $ipaid->selected = ($obj->det->jr_rapt == 'paid');
00083                                 echo $ipaid->input();
00084                                 ?>
00085                             </td>
00086                         </tr>
00087 
00088                     </table>
00089                 </td>
00090                 <td style="width:50%;height:100%;vertical-align:top;text-align: center">
00091                     <table style="width:99%;height:8rem;vertical-align:top;">
00092                         <tr style="height: 5%">
00093                             <td style="text-align:center;vertical-align: top">
00094                                 Note
00095                             </td></tr>
00096                         <tr>
00097                             <td style="text-align:center;vertical-align: top">
00098                                 <?php
00099                                 $inote = new ITextarea('jrn_note');
00100                                 $inote->style=' class="itextarea" style="width:90%;height:100%;"';
00101                                 $inote->value = strip_tags($obj->det->note);
00102                                 echo $inote->input();
00103                                 ?>
00104 
00105                             </td>
00106                         </tr>
00107                     </table>
00108                 </td>
00109             </tr>
00110 
00111         </table>
00112         <div class="myfieldset">
00113             <table class="result">
00114                 <?php
00115                 bcscale(2);
00116                 $total_htva = 0;
00117                 $total_tvac = 0;
00118                 echo th(_('Quick Code'));
00119                 echo th(_('Description'));
00120                 if ($owner->MY_TVA_USE == 'Y')
00121                 {
00122                     echo th(_('Taux TVA'), 'style="text-align:right"');
00123                 } else
00124                 {
00125                     echo th('');
00126                 }
00127                 echo th(_('Prix/Un.'), 'style="text-align:right"');
00128                 echo th(_('Quantité'), 'style="text-align:right"');
00129                 echo th(_('Non ded'), 'style="text-align:right"');
00130 
00131                 if ($owner->MY_TVA_USE == 'Y')
00132                 {
00133                     echo th(_('HTVA'), 'style="text-align:right"');
00134                     echo th(_('TVA ND'), 'style="text-align:right"');
00135                     echo th(_('TVA'), 'style="text-align:right"');
00136                     echo th(_('TVAC'), 'style="text-align:right"');
00137                 } else
00138                     echo th(_('Total'), 'style="text-align:right"');
00139 
00140                 if ($owner->MY_ANALYTIC != 'nu' )
00141                 {
00142                     $anc = new Anc_Plan($cn);
00143                     $a_anc = $anc->get_list(' order by pa_id ');
00144                     $x = count($a_anc);
00145                     /* set the width of the col */
00146                     /* add hidden variables pa[] to hold the value of pa_id */
00147                     $str_anc.='<tr><th>Code</th><th>Montant</th><th colspan="' . $x . '">' . _('Compt. Analytique') . Anc_Plan::hidden($a_anc).'</th></tr>';
00148 
00149                 }
00150                 echo '</tr>';
00151                 for ($e = 0; $e < count($obj->det->array); $e++)
00152                 {
00153                     $row = '';
00154                     $q = $obj->det->array[$e];
00155                     $fiche = new Fiche($cn, $q['qp_fiche']);
00156                     $qcode=$fiche->strAttribut(ATTR_DEF_QUICKCODE);
00157                     $view_card_detail = HtmlInput::card_detail($qcode, "", ' class="line" ');
00158                     $row = td($view_card_detail);
00159                     $sym_tva = '';
00160 
00161                     if ($owner->MY_TVA_USE == 'Y' && $q['qp_vat_code'] != '')
00162                     {
00163                         /* retrieve TVA symbol */
00164                         $tva = new Acc_Tva($cn, $q['qp_vat_code']);
00165                         $tva->load();
00166                         $sym_tva = h($tva->get_parameter('label'));
00167                     }
00168                     if ($owner->MY_UPDLAB == 'Y')
00169                     {
00170                         $l_lib = ($q['j_text'] == '') ? $fiche->strAttribut(ATTR_DEF_NAME) : $q['j_text'];
00171                         $hidden = HtmlInput::hidden("j_id[]", $q['j_id']);
00172                         $input = new IText("e_march" . $q['j_id'] . "_label", $l_lib);
00173                         $input->css_size = "100%";
00174                     } else
00175                     {
00176                         $input = new ISpan("e_march" . $q['j_id'] . "_label");
00177                         $hidden = HtmlInput::hidden("j_id[]", $q['j_id']);
00178                         $input->value = $fiche->strAttribut(ATTR_DEF_NAME);
00179                     }
00180                     $row.=td($input->input() . $hidden);
00181                     $row.=td($sym_tva, 'style="text-align:center"');
00182                     $pu = 0;
00183                     if ($q['qp_quantite'] != 0)
00184                         $pu = bcdiv($q['qp_price'], $q['qp_quantite']);
00185                     $row.=td(nbm($pu), 'class="num"');
00186                     $row.=td(nbm($q['qp_quantite']), 'class="num"');
00187 
00188                     $no_ded = bcadd($q['qp_dep_priv'], $q['qp_nd_amount']);
00189                     $row.=td(nbm($no_ded), ' style="text-align:right"');
00190                     $htva = $q['qp_price'];
00191 
00192 
00193                     $row.=td(nbm($htva), 'class="num"');
00194                     $tvac = bcadd($htva, $q['qp_vat']);
00195                     $tvac = bcadd($tvac, $q['qp_nd_tva']);
00196                     $tvac = bcadd($tvac, $q['qp_nd_tva_recup']);
00197                     $tvac = bcsub ($tvac,$q['qp_vat_sided']);
00198 
00199                     if ($owner->MY_TVA_USE == 'Y')
00200                     {
00201                         $tva_amount_nd = bcadd($q['qp_nd_tva_recup'], $q['qp_nd_tva']);
00202                         $class = "";
00203                         if ($q['qp_vat_sided'] <> 0)
00204                         {
00205                             $class = ' style="text-decoration:line-through"';
00206                         }
00207                         $row.=td(nbm($tva_amount_nd), 'class="num" ' . $class);
00208                         $row.=td(nbm($q['qp_vat']), 'class="num" ' . $class);
00209                         $row.=td(nbm($tvac), 'class="num"');
00210                     }
00211                     $total_tvac=bcadd($total_tvac,$tvac);
00212                     $total_htva=bcadd($htva,$total_htva);
00213                     /* Analytic accountancy */
00214                     if ($owner->MY_ANALYTIC != "nu" /*&& $div == 'popup'*/ )
00215                     {
00216                         $poste = $fiche->strAttribut(ATTR_DEF_ACCOUNT);
00217                         if (preg_match('/^(6|7)/', $poste))
00218                         {
00219                             $anc_op = new Anc_Operation($cn);
00220                             $anc_op->j_id = $q['j_id'];
00221                             $anc_op->in_div=$div;
00222                             echo HtmlInput::hidden('op[]', $anc_op->j_id);
00223                             /* compute total price */
00224                             bcscale(2);
00225                             $str_anc.='<tr>';
00226                             $str_anc.=td($qcode);
00227                             $str_anc.=td(nbm($htva));
00228                             $str_anc.=$anc_op->display_table(1, $htva, $div);
00229                         } else
00230                         {
00231                             $row.=td('');
00232                         }
00233                     }
00234                      $class=($e%2==0)?' class="even"':'class="odd"';
00235                      echo tr($row,$class);
00236                 }
00237                 if ($owner->MY_TVA_USE == 'Y')
00238                     $row = td(_('Total'), ' style="font-style:italic;text-align:right;font-weight: bolder;width:auto" colspan="6"');
00239                 else
00240                     $row = td(_('Total'), ' style="font-style:italic;text-align:right;font-weight: bolder;width:auto" colspan="6"');
00241                 $row.=td(nbm($total_htva), 'class="num" style="font-style:italic;font-weight: bolder;"');
00242                 if ($owner->MY_TVA_USE == 'Y')
00243                     $row.=td("") . td("").td(nbm($total_tvac), 'class="num" style="font-style:italic;font-weight: bolder;"');
00244                 echo tr($row);
00245                 ?>
00246             </table>
00247 
00248 
00249         </div>
00250 
00251 
00252 <?php
00253 require_once('ledger_detail_bottom.php');
00254 ?>
00255 </div>
 All Data Structures Namespaces Files Functions Variables Enumerations