29 require
'../../main.inc.php';
31 require_once DOL_DOCUMENT_ROOT.
'/fourn/class/fournisseur.facture.class.php';
32 require_once DOL_DOCUMENT_ROOT.
'/core/class/html.formaccounting.class.php';
35 $langs->loadLangs(array(
"bills",
"accountancy"));
37 $action =
GETPOST(
'action',
'aZ09');
38 $cancel =
GETPOST(
'cancel',
'alpha');
39 $backtopage =
GETPOST(
'backtopage',
'alpha');
41 $codeventil =
GETPOST(
'codeventil',
'int');
53 if ($action ==
'ventil' && $user->rights->accounting->bind->write)
57 if ($codeventil < 0) $codeventil = 0;
59 $sql =
" UPDATE ".MAIN_DB_PREFIX.
"facture_fourn_det";
60 $sql .=
" SET fk_code_ventilation = ".$codeventil;
61 $sql .=
" WHERE rowid = ".$id;
67 setEventMessages($langs->trans(
"RecordModifiedSuccessfully"), null,
'mesgs');
70 header(
"Location: ".$backtopage);
75 header(
"Location: ./lines.php");
85 llxHeader(
"", $langs->trans(
'FicheVentilation'));
87 if ($cancel == $langs->trans(
"Cancel")) {
92 $form =
new Form($db);
97 $sql =
"SELECT f.ref as ref, f.rowid as facid, l.fk_product, l.description, l.rowid, l.fk_code_ventilation, ";
98 $sql .=
" p.rowid as product_id, p.ref as product_ref, p.label as product_label";
99 $sql .=
", aa.account_number, aa.label";
100 $sql .=
" FROM ".MAIN_DB_PREFIX.
"facture_fourn_det as l";
101 $sql .=
" LEFT JOIN ".MAIN_DB_PREFIX.
"product as p ON p.rowid = l.fk_product";
102 $sql .=
" LEFT JOIN ".MAIN_DB_PREFIX.
"accounting_account as aa ON l.fk_code_ventilation = aa.rowid";
103 $sql .=
" INNER JOIN ".MAIN_DB_PREFIX.
"facture_fourn as f ON f.rowid = l.fk_facture_fourn ";
104 $sql .=
" WHERE f.fk_statut > 0 AND l.rowid = ".$id;
105 $sql .=
" AND f.entity IN (".getEntity(
'facture_fourn', 0).
")";
107 dol_syslog(
"/accounting/supplier/card.php sql=".$sql, LOG_DEBUG);
108 $result = $db->query($sql);
111 $num_lines = $db->num_rows($result);
115 $objp = $db->fetch_object($result);
117 print '<form action="'.$_SERVER[
"PHP_SELF"].
'?id='.$id.
'" method="post">'.
"\n";
118 print '<input type="hidden" name="token" value="'.newToken().
'">';
119 print '<input type="hidden" name="action" value="ventil">';
120 print '<input type="hidden" name="backtopage" value="'.dol_escape_htmltag($backtopage).
'">';
126 print '<table class="border centpercent">';
129 print '<tr><td>'.$langs->trans(
"BillsSuppliers").
'</td>';
130 $facturefournisseur_static->ref = $objp->ref;
131 $facturefournisseur_static->id = $objp->facid;
132 print '<td>'.$facturefournisseur_static->getNomUrl(1).
'</td>';
135 print '<tr><td width="20%">'.$langs->trans(
"Line").
'</td>';
136 print '<td>'.stripslashes(nl2br($objp->description)).
'</td></tr>';
137 print '<tr><td width="20%">'.$langs->trans(
"ProductLabel").
'</td>';
138 print '<td>'.dol_trunc($objp->product_label, 24).
'</td>';
139 print '<tr><td width="20%">'.$langs->trans(
"Account").
'</td><td>';
140 print $formaccounting->select_account($objp->fk_code_ventilation,
'codeventil', 1);
146 print '<div class="center">';
147 print '<input class="button button-save" type="submit" value="'.$langs->trans(
"Save").
'">';
148 print ' ';
149 print '<input class="button button-cancel" type="submit" name="cancel" value="'.$langs->trans(
"Cancel").
'">';
160 print "Error ID incorrect";
GETPOST($paramname, $check= 'alphanohtml', $method=0, $filter=null, $options=null, $noreplace=0)
Return value of a param into GET or POST supervariable.
Class to manage suppliers invoices.
setEventMessages($mesg, $mesgs, $style= 'mesgs', $messagekey= '')
Set event messages in dol_events session object.
load_fiche_titre($titre, $morehtmlright= '', $picto= 'generic', $pictoisfullpath=0, $id= '', $morecssontable= '', $morehtmlcenter= '')
Load a title with picto.
dol_syslog($message, $level=LOG_INFO, $ident=0, $suffixinfilename= '', $restricttologhandler= '', $logcontext=null)
Write log message into outputs.
accessforbidden($message= '', $printheader=1, $printfooter=1, $showonlymessage=0, $params=null)
Show a message to say access is forbidden and stop program Calling this function terminate execution ...
dol_get_fiche_head($links=array(), $active= '', $title= '', $notab=0, $picto= '', $pictoisfullpath=0, $morehtmlright= '', $morecss= '', $limittoshow=0, $moretabssuffix= '')
Show tabs of a record.
print
Draft customers invoices.
if(!empty($conf->facture->enabled)&&$user->rights->facture->lire) if((!empty($conf->fournisseur->enabled)&&empty($conf->global->MAIN_USE_NEW_SUPPLIERMOD)||!empty($conf->supplier_invoice->enabled))&&$user->rights->fournisseur->facture->lire) if(!empty($conf->don->enabled)&&$user->rights->don->lire) if(!empty($conf->tax->enabled)&&$user->rights->tax->charges->lire) if(!empty($conf->facture->enabled)&&!empty($conf->commande->enabled)&&$user->rights->commande->lire &&empty($conf->global->WORKFLOW_DISABLE_CREATE_INVOICE_FROM_ORDER)) if(!empty($conf->facture->enabled)&&$user->rights->facture->lire) if((!empty($conf->fournisseur->enabled)&&empty($conf->global->MAIN_USE_NEW_SUPPLIERMOD)||!empty($conf->supplier_invoice->enabled))&&$user->rights->fournisseur->facture->lire) $resql
Social contributions to pay.
dol_get_fiche_end($notab=0)
Return tab footer of a card.