25require
'../../main.inc.php';
27require_once DOL_DOCUMENT_ROOT.
'/compta/facture/class/facture.class.php';
28require_once DOL_DOCUMENT_ROOT.
'/core/class/html.formaccounting.class.php';
31$langs->loadLangs(array(
"bills",
"accountancy"));
33$action =
GETPOST(
'action',
'aZ09');
34$cancel =
GETPOST(
'cancel',
'alpha');
35$backtopage =
GETPOST(
'backtopage',
'alpha');
41if (!isModEnabled(
'accounting')) {
44if ($user->socid > 0) {
47if (!$user->hasRight(
'accounting',
'bind',
'write')) {
57if ($action ==
'ventil' && $user->hasRight(
'accounting',
'bind',
'write')) {
59 if ($codeventil < 0) {
63 $sql =
" UPDATE ".MAIN_DB_PREFIX.
"facturedet";
64 $sql .=
" SET fk_code_ventilation = ".((int) $codeventil);
65 $sql .=
" WHERE rowid = ".((int) $id);
67 $resql = $db->query($sql);
71 setEventMessages($langs->trans(
"RecordModifiedSuccessfully"),
null,
'mesgs');
73 header(
"Location: ".$backtopage);
78 header(
"Location: ./lines.php");
87$help_url =
'EN:Module_Double_Entry_Accounting|FR:Module_Comptabilité_en_Partie_Double#Liaisons_comptables';
89llxHeader(
"", $langs->trans(
'FicheVentilation'), $help_url,
'', 0, 0,
'',
'',
'',
'mod-accountancy accountancy-customer page-card');
91if ($cancel == $langs->trans(
"Cancel")) {
99$facture_static =
new Facture($db);
103 $sql =
"SELECT f.ref, f.rowid as facid, l.fk_product, l.description, l.price,";
104 $sql .=
" l.qty, l.rowid, l.tva_tx, l.remise_percent, l.subprice, l.fk_code_ventilation,";
105 $sql .=
" p.rowid as product_id, p.ref as product_ref, p.label as product_label,";
107 $sql .=
" ppe.accountancy_code_sell as code_sell,";
109 $sql .=
" p.accountancy_code_sell as code_sell,";
111 $sql .=
" aa.account_number, aa.label";
112 $sql .=
" FROM ".MAIN_DB_PREFIX.
"facturedet as l";
113 $sql .=
" LEFT JOIN ".MAIN_DB_PREFIX.
"product as p ON p.rowid = l.fk_product";
115 $sql .=
" LEFT JOIN " . MAIN_DB_PREFIX .
"product_perentity as ppe ON ppe.fk_product = p.rowid AND ppe.entity = " . ((int) $conf->entity);
117 $sql .=
" LEFT JOIN ".MAIN_DB_PREFIX.
"accounting_account as aa ON l.fk_code_ventilation = aa.rowid";
118 $sql .=
" INNER JOIN ".MAIN_DB_PREFIX.
"facture as f ON f.rowid = l.fk_facture";
119 $sql .=
" WHERE f.fk_statut > 0 AND l.rowid = ".((int) $id);
120 $sql .=
" AND f.entity IN (".getEntity(
'invoice', 0).
")";
122 dol_syslog(
"/accounting/customer/card.php", LOG_DEBUG);
123 $result = $db->query($sql);
126 $num_lines = $db->num_rows($result);
130 $objp = $db->fetch_object($result);
132 print
'<form action="'.$_SERVER[
"PHP_SELF"].
'?id='.$id.
'" method="post">'.
"\n";
133 print
'<input type="hidden" name="token" value="'.newToken().
'">';
134 print
'<input type="hidden" name="action" value="ventil">';
135 print
'<input type="hidden" name="backtopage" value="'.dol_escape_htmltag($backtopage).
'">';
137 print
load_fiche_titre($langs->trans(
'CustomersVentilation'),
'',
'title_accountancy');
141 print
'<table class="border centpercent">';
144 print
'<tr><td>'.$langs->trans(
"Invoice").
'</td>';
145 $facture_static->ref = $objp->ref;
146 $facture_static->id = $objp->facid;
147 print
'<td>'.$facture_static->getNomUrl(1).
'</td>';
150 print
'<tr><td>'.$langs->trans(
"Description").
'</td>';
151 print
'<td>'.dolPrintHTML($objp->description).
'</td></tr>';
153 print
'<tr><td>'.$langs->trans(
"ProductLabel").
'</td>';
154 print
'<td>'.dol_trunc($objp->product_label, 24).
'</td></tr>';
156 print
'<tr><td>'.$langs->trans(
"Account").
'</td><td>';
157 print $formaccounting->select_account($objp->fk_code_ventilation,
'codeventil', 1);
164 print
'<div class="center">';
165 print
'<input class="button button-save" type="submit" value="'.$langs->trans(
"Save").
'">';
166 print
' ';
167 print
'<input class="button button-cancel" type="submit" name="cancel" value="'.$langs->trans(
"Cancel").
'">';
178 print
"Error ID incorrect";
if(!defined('NOREQUIRESOC')) if(!defined( 'NOREQUIRETRAN')) if(!defined('NOTOKENRENEWAL')) if(!defined( 'NOREQUIREMENU')) if(!defined('NOREQUIREHTML')) if(!defined( 'NOREQUIREAJAX')) llxHeader()
Empty header.
Class to manage invoices.
load_fiche_titre($title, $morehtmlright='', $picto='generic', $pictoisfullpath=0, $id='', $morecssontable='', $morehtmlcenter='')
Load a title with picto.
GETPOSTINT($paramname, $method=0)
Return the value of a $_GET or $_POST supervariable, converted into integer.
dol_get_fiche_head($links=array(), $active='', $title='', $notab=0, $picto='', $pictoisfullpath=0, $morehtmlright='', $morecss='', $limittoshow=0, $moretabssuffix='', $dragdropfile=0)
Show tabs of a record.
dol_get_fiche_end($notab=0)
Return tab footer of a card.
GETPOST($paramname, $check='alphanohtml', $method=0, $filter=null, $options=null, $noreplace=0)
Return value of a param into GET or POST supervariable.
setEventMessages($mesg, $mesgs, $style='mesgs', $messagekey='', $noduplicate=0)
Set event messages in dol_events session object.
getDolGlobalString($key, $default='')
Return dolibarr global constant string value.
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.