32require
'../../main.inc.php';
33require_once DOL_DOCUMENT_ROOT.
'/fourn/class/fournisseur.class.php';
34require_once DOL_DOCUMENT_ROOT.
'/fourn/class/fournisseur.facture.class.php';
35require_once DOL_DOCUMENT_ROOT.
'/core/lib/fourn.lib.php';
36require_once DOL_DOCUMENT_ROOT.
'/core/lib/files.lib.php';
37require_once DOL_DOCUMENT_ROOT.
'/core/lib/images.lib.php';
38require_once DOL_DOCUMENT_ROOT.
'/core/class/html.formfile.class.php';
39if (isModEnabled(
'project')) {
40 require_once DOL_DOCUMENT_ROOT.
'/projet/class/project.class.php';
43$langs->loadLangs(array(
'bills',
'other',
'companies'));
46$action =
GETPOST(
'action',
'aZ09');
47$confirm =
GETPOST(
'confirm',
'alpha');
52 $socid = $user->socid;
54$result =
restrictedArea($user,
'fournisseur', $id,
'facture_fourn',
'facture');
55$hookmanager->initHooks(array(
'invoicesuppliercarddocument'));
59$sortfield =
GETPOST(
'sortfield',
'aZ09comma');
60$sortorder =
GETPOST(
'sortorder',
'aZ09comma');
62if (empty($page) || $page == -1) {
65$offset = $limit * $page;
79 $upload_dir = $conf->fournisseur->facture->dir_output.
'/'.
get_exdir(
$object->id, 2, 0, 0, $object,
'invoice_supplier').$ref;
82$permissiontoadd = ($user->hasRight(
"fournisseur",
"facture",
"creer") || $user->hasRight(
"supplier_invoice",
"creer"));
89include DOL_DOCUMENT_ROOT.
'/core/actions_linkedfiles.inc.php';
98$title =
$object->ref.
" - ".$langs->trans(
'Documents');
99$helpurl =
"EN:Module_Suppliers_Invoices|FR:Module_Fournisseurs_Factures|ES:Módulo_Facturas_de_proveedores";
104 print
dol_get_fiche_head($head,
'documents', $langs->trans(
'SupplierInvoice'), -1,
'supplier_invoice');
106 $totalpaid =
$object->getSommePaiement();
108 $linkback =
'<a href="'.DOL_URL_ROOT.
'/fourn/facture/list.php?restore_lastsearch_values=1'.(!empty($socid) ?
'&socid='.$socid :
'').
'">'.$langs->trans(
"BackToList").
'</a>';
110 $morehtmlref =
'<div class="refidno">';
112 $morehtmlref .= $form->editfieldkey(
"RefSupplierBill",
'ref_supplier',
$object->ref_supplier, $object, 0,
'string',
'', 0, 1);
113 $morehtmlref .= $form->editfieldval(
"RefSupplierBill",
'ref_supplier',
$object->ref_supplier, $object, 0,
'string',
'',
null,
null,
'', 1);
115 $morehtmlref .=
'<br>'.$object->thirdparty->getNomUrl(1);
117 $morehtmlref .=
' <div class="inline-block valignmiddle">(<a class="valignmiddle" href="'.DOL_URL_ROOT.
'/fourn/facture/list.php?socid='.
$object->thirdparty->id.
'&search_company='.urlencode(
$object->thirdparty->name).
'">'.$langs->trans(
"OtherBills").
'</a>)</div>';
120 if (isModEnabled(
'project')) {
121 $langs->load(
"projects");
122 $morehtmlref .=
'<br>';
124 $morehtmlref .=
img_picto($langs->trans(
"Project"),
'project',
'class="pictofixedwidth"');
125 if ($action !=
'classify') {
126 $morehtmlref .=
'<a class="editfielda" href="'.$_SERVER[
'PHP_SELF'].
'?action=classify&token='.
newToken().
'&id='.
$object->id.
'">'.
img_edit($langs->transnoentitiesnoconv(
'SetProject')).
'</a> ';
128 $morehtmlref .= $form->form_project($_SERVER[
'PHP_SELF'].
'?id='.
$object->id, (!
getDolGlobalString(
'PROJECT_CAN_ALWAYS_LINK_TO_ALL_SUPPLIERS') ?
$object->socid : -1),
$object->fk_project, ($action ==
'classify' ?
'projectid' :
'none'), 0, 0, 0, 1,
'',
'maxwidth300');
130 if (!empty(
$object->fk_project)) {
132 $proj->fetch(
$object->fk_project);
133 $morehtmlref .= $proj->getNomUrl(1);
135 $morehtmlref .=
'<span class="opacitymedium"> - '.dol_escape_htmltag($proj->title).
'</span>';
140 $morehtmlref .=
'</div>';
142 $object->totalpaid = $totalpaid;
144 dol_banner_tab($object,
'ref', $linkback, 1,
'ref',
'ref', $morehtmlref,
'', 0);
146 print
'<div class="fichecenter">';
147 print
'<div class="underbanner clearboth"></div>';
150 $filearray =
dol_dir_list($upload_dir,
"files", 0,
'',
'(\.meta|_preview.*\.png)$', $sortfield, (strtolower($sortorder) ==
'desc' ? SORT_DESC : SORT_ASC), 1);
152 foreach ($filearray as $key => $file) {
153 $totalsize += $file[
'size'];
159 if ($action ==
'delete') {
160 print $form->formconfirm($_SERVER[
"PHP_SELF"].
'?id='.
$object->id.
'&urlfile='.urlencode(
GETPOST(
"urlfile")), $langs->trans(
'DeleteFile'), $langs->trans(
'ConfirmDeleteFile'),
'confirm_deletefile',
'', 0, 1);
163 print
'<table class="border tableforfield centpercent">';
166 print
'<tr><td class="titlefield">'.$langs->trans(
'Type').
'</td><td>';
167 print
'<span class="badgeneutral">';
172 $facreplaced->fetch(
$object->fk_facture_source);
173 print
' ('.$langs->transnoentities(
"ReplaceInvoice", $facreplaced->getNomUrl(1)).
')';
177 $facusing->fetch(
$object->fk_facture_source);
178 print
' ('.$langs->transnoentities(
"CorrectInvoice", $facusing->getNomUrl(1)).
')';
181 $facidavoir =
$object->getListIdAvoirFromInvoice();
182 if (count($facidavoir) > 0) {
183 $invoicecredits = array();
184 foreach ($facidavoir as $facid) {
186 $facavoir->fetch($facid);
187 $invoicecredits[] = $facavoir->getNomUrl(1);
189 print
' ('.$langs->transnoentities(
"InvoiceHasAvoir") . (count($invoicecredits) ?
' ' :
'') . implode(
',', $invoicecredits) .
')';
201 print
'<tr><td>'.$form->editfieldkey(
"Label",
'label',
$object->label, $object, 0).
'</td><td>';
202 print $form->editfieldval(
"Label",
'label',
$object->label, $object, 0);
206 print
'<tr><td>'.$langs->trans(
'AmountHT').
'</td><td>'.
price(
$object->total_ht, 1, $langs, 0, -1, -1, $conf->currency).
'</td></tr>';
207 print
'<tr><td>'.$langs->trans(
'AmountVAT').
'</td><td>'.
price(
$object->total_tva, 1, $langs, 0, -1, -1, $conf->currency).
'</td></tr>';
211 if ($mysoc->localtax1_assuj ==
"1") {
212 print
'<tr><td>'.$langs->transcountry(
"AmountLT1", $mysoc->country_code).
'</td>';
213 print
'<td>'.price(
$object->total_localtax1, 1, $langs, 0, -1, -1, $conf->currency).
'</td>';
216 if ($mysoc->localtax2_assuj ==
"1") {
217 print
'<tr><td>'.$langs->transcountry(
"AmountLT2", $mysoc->country_code).
'</td>';
218 print
'<td>'.price(
$object->total_localtax2, 1, $langs, 0, -1, -1, $conf->currency).
'</td>';
221 print
'<tr><td>'.$langs->trans(
'AmountTTC').
'</td><td>'.
price(
$object->total_ttc, 1, $langs, 0, -1, -1, $conf->currency).
'</td></tr>';
223 print
'</table><br>';
225 print
'<div class="underbanner clearboth"></div>';
227 print
'<table class="border tableforfield centpercent">';
230 print
'<tr><td class="titlefield nowrap">'.$langs->trans(
'NbOfAttachedFiles').
'</td><td>'.count($filearray).
'</td></tr>';
232 print
'<tr><td>'.$langs->trans(
'TotalSizeOfAttachedFiles').
'</td><td>'.
dol_print_size($totalsize, 1, 1).
'</td></tr>';
237 print
'<div class="clearboth"></div>';
242 $modulepart =
'facture_fournisseur';
243 $permission = ($user->hasRight(
"fournisseur",
"facture",
"creer") || $user->hasRight(
"supplier_invoice",
"creer"));
244 $permtoedit = ($user->hasRight(
"fournisseur",
"facture",
"creer") || $user->hasRight(
"supplier_invoice",
"creer"));
245 $param =
'&facid='.$object->id;
247 $defaulttpldir =
'/core/tpl';
248 $dirtpls = array_merge($conf->modules_parts[
'tpl'], array($defaulttpldir));
249 foreach ($dirtpls as $module => $reldir) {
250 if (!empty($module)) {
251 $tpl =
dol_buildpath($reldir.
'/document_actions_post_headers.tpl.php');
253 $tpl = DOL_DOCUMENT_ROOT.$reldir.
'/document_actions_post_headers.tpl.php';
256 if (empty($conf->file->strict_mode)) {
257 $res = @include $tpl;
266 print $langs->trans(
'ErrorUnknown');
if( $user->socid > 0) if(! $user->hasRight('accounting', 'chartofaccount')) $object
if(!defined('NOREQUIRESOC')) if(!defined( 'NOREQUIRETRAN')) if(!defined('NOTOKENRENEWAL')) if(!defined( 'NOREQUIREMENU')) if(!defined('NOREQUIREHTML')) if(!defined( 'NOREQUIREAJAX')) llxHeader()
Empty header.
Class to manage suppliers invoices.
const TYPE_CREDIT_NOTE
Credit note invoice.
const TYPE_REPLACEMENT
Replacement invoice.
Class to manage projects.
dol_dir_list($utf8_path, $types="all", $recursive=0, $filter="", $excludefilter=null, $sortcriteria="name", $sortorder=SORT_ASC, $mode=0, $nohook=0, $relativename="", $donotfollowsymlinks=0, $nbsecondsold=0)
Scan a directory and return a list of files/directories.
facturefourn_prepare_head(FactureFournisseur $object)
Prepare array with list of tabs.
dol_print_size($size, $shortvalue=0, $shortunit=0)
Return string with formatted size.
img_picto($titlealt, $picto, $moreatt='', $pictoisfullpath=0, $srconly=0, $notitle=0, $alt='', $morecss='', $marginleftonlyshort=2)
Show picto whatever it's its name (generic function)
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.
price($amount, $form=0, $outlangs='', $trunc=1, $rounding=-1, $forcerounding=-1, $currency_code='')
Function to format a value into an amount for visual output Function used into PDF and HTML pages.
newToken()
Return the value of token currently saved into session with name 'newtoken'.
GETPOST($paramname, $check='alphanohtml', $method=0, $filter=null, $options=null, $noreplace=0)
Return value of a param into GET or POST supervariable.
dol_buildpath($path, $type=0, $returnemptyifnotfound=0)
Return path of url or filesystem.
dol_sanitizeFileName($str, $newstr='_', $unaccent=1)
Clean a string to use it as a file name.
getDolGlobalString($key, $default='')
Return dolibarr global constant string value.
img_edit($titlealt='default', $float=0, $other='')
Show logo edit/modify fiche.
get_exdir($num, $level, $alpha, $withoutslash, $object, $modulepart='')
Return a path to have a the directory according to object where files are stored.
restrictedArea(User $user, $features, $object=0, $tableandshare='', $feature2='', $dbt_keyfield='fk_soc', $dbt_select='rowid', $isdraft=0, $mode=0)
Check permissions of a user to show a page and an object.