* Copyright (C) 2004-2011 Laurent Destailleur * Copyright (C) 2005-2012 Regis Houssin * Copyright (C) 2013 Florian Henry * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 3 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ /** * \file htdocs/fourn/facture/note.php * \ingroup facture * \brief Fiche de notes sur une facture fournisseur */ require '../../main.inc.php'; require_once DOL_DOCUMENT_ROOT.'/core/lib/fourn.lib.php'; require_once DOL_DOCUMENT_ROOT.'/fourn/class/fournisseur.class.php'; require_once DOL_DOCUMENT_ROOT.'/fourn/class/fournisseur.facture.class.php'; $langs->load('bills'); $langs->load("companies"); $id = (GETPOST('id','int') ? GETPOST('id','int') : GETPOST('facid','int')); $ref = GETPOST('ref','alpha'); $action = GETPOST('action','alpha'); // Security check if ($user->societe_id) $socid=$user->societe_id; $result = restrictedArea($user, 'fournisseur', $id, 'facture_fourn', 'facture'); $object = new FactureFournisseur($db); $object->fetch($id, $ref); $permissionnote=$user->rights->fournisseur->facture->creer; // Used by the include of actions_setnotes.inc.php /* * Actions */ include DOL_DOCUMENT_ROOT.'/core/actions_setnotes.inc.php'; // Must be include, not includ_once // Set label if ($action == 'setlabel' && $user->rights->fournisseur->facture->creer) { $object->label=$_POST['label']; $result=$object->update($user); if ($result < 0) dol_print_error($db); } /* * View */ $form = new Form($db); llxHeader(); if ($object->id > 0) { $object->fetch_thirdparty(); $head = facturefourn_prepare_head($object); $titre=$langs->trans('SupplierInvoice'); dol_fiche_head($head, 'note', $titre, 0, 'bill'); print ''; $linkback = ''.$langs->trans("BackToList").''; // Ref print ''; print "\n"; // Ref supplier print ''; print "\n"; // Company print ''; // Type print ''; // Label print ''; // Status $alreadypaid=$object->getSommePaiement(); print ''; // Amount print ''; print ''; // Amount Local Taxes //TODO: Place into a function to control showing by country or study better option if ($societe->localtax1_assuj=="1") //Localtax1 { print ''; print ''; print ''; } if ($societe->localtax2_assuj=="1") //Localtax2 { print ''; print ''; print ''; } print ''; print "

'.$langs->trans("Ref").'	'; print $form->showrefnav($object, 'ref', $linkback, 1, 'ref', 'ref', $morehtmlref); print '
'.$langs->trans("RefSupplier").'	'.$object->ref_supplier.'
'.$langs->trans('Supplier').'	'.$object->thirdparty->getNomUrl(1,'supplier').'
'.$langs->trans('Type').'	'; print $object->getLibType(); if ($object->type == FactureFournisseur::TYPE_REPLACEMENT) { $facreplaced=new FactureFournisseur($db); $facreplaced->fetch($object->fk_facture_source); print ' ('.$langs->transnoentities("ReplaceInvoice",$facreplaced->getNomUrl(1)).')'; } if ($object->type == FactureFournisseur::TYPE_CREDIT_NOTE) { $facusing=new FactureFournisseur($db); $facusing->fetch($object->fk_facture_source); print ' ('.$langs->transnoentities("CorrectInvoice",$facusing->getNomUrl(1)).')'; } $facidavoir=$object->getListIdAvoirFromInvoice(); if (count($facidavoir) > 0) { print ' ('.$langs->transnoentities("InvoiceHasAvoir"); $i=0; foreach($facidavoir as $fid) { if ($i==0) print ' '; else print ','; $facavoir=new FactureFournisseur($db); $facavoir->fetch($fid); print $facavoir->getNomUrl(1); } print ')'; } if ($facidnext > 0) { $facthatreplace=new FactureFournisseur($db); $facthatreplace->fetch($facidnext); print ' ('.$langs->transnoentities("ReplacedByInvoice",$facthatreplace->getNomUrl(1)).')'; } print '
'.$form->editfieldkey("Label",'label',$object->label,$object,0).'	'; print $form->editfieldval("Label",'label',$object->label,$object,0); print '
'.$langs->trans('Status').'	'.$object->getLibStatut(4,$alreadypaid).'
'.$langs->trans('AmountHT').'	'.price($object->total_ht,1,$langs,0,-1,-1,$conf->currency).'
'.$langs->trans('AmountVAT').'	'.price($object->total_tva,1,$langs,0,-1,-1,$conf->currency).'
'.$langs->transcountry("AmountLT1",$societe->country_code).'	'.price($object->total_localtax1,1,$langs,0,-1,-1,$conf->currency).'
'.$langs->transcountry("AmountLT2",$societe->country_code).'	'.price($object->total_localtax2,1,$langs,0,-1,-1,$conf->currency).'
'.$langs->trans('AmountTTC').'	'.price($object->total_ttc,1,$langs,0,-1,-1,$conf->currency).'

"; print '
'; $colwidth=20; include DOL_DOCUMENT_ROOT.'/core/tpl/notes.tpl.php'; dol_fiche_end(); } llxFooter(); $db->close();