diff --git a/htdocs/expensereport/class/paymentexpensereport.class.php b/htdocs/expensereport/class/paymentexpensereport.class.php
new file mode 100644
index 0000000000000000000000000000000000000000..c7e152466fe135bdef3060a2216621d9e41186f8
--- /dev/null
+++ b/htdocs/expensereport/class/paymentexpensereport.class.php
@@ -0,0 +1,592 @@
+<?php
+/* Copyright (C) 2015 Alexandre Spangaro <alexandre.spangaro@gmail.com>
+ *
+ * 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 <http://www.gnu.org/licenses/>.
+ */
+
+/**
+ * \file htdocs/expensereport/class/paymentexpensereport.class.php
+ * \ingroup Expense Report
+ * \brief File of class to manage payment of expense report
+ */
+
+require_once DOL_DOCUMENT_ROOT.'/core/class/commonobject.class.php';
+
+
+/** \class PaymentExpenseReport
+ * \brief Class to manage payments of expense report
+ */
+class PaymentExpenseReport extends CommonObject
+{
+ public $element='payment_expensereport'; //!< Id that identify managed objects
+ public $table_element='payment_expensereport'; //!< Name of table without prefix where object is stored
+
+ var $id;
+ var $rowid;
+ var $ref;
+
+ var $fk_expensereport;
+ var $datec='';
+ var $tms='';
+ var $datep='';
+ var $amount; // Total amount of payment
+ var $amounts=array(); // Array of amounts
+ var $fk_typepayment;
+ var $num_payment;
+ var $note;
+ var $fk_bank;
+ var $fk_user_creat;
+ var $fk_user_modif;
+
+ /**
+ * Constructor
+ *
+ * @param DoliDB $db Database handler
+ */
+ function __construct($db)
+ {
+ $this->db = $db;
+ }
+
+ /**
+ * Create payment of expense report into database.
+ * Use this->amounts to have list of lines for the payment
+ *
+ * @param User $user User making payment
+ * @return int <0 if KO, id of payment if OK
+ */
+ function create($user)
+ {
+ global $conf, $langs;
+
+ $error=0;
+
+ $now=dol_now();
+
+ // Validate parameters
+ if (! $this->datepaid)
+ {
+ $this->error='ErrorBadValueForParameterCreatePaymentExpenseReport';
+ return -1;
+ }
+
+ // Clean parameters
+ if (isset($this->fk_expensereport)) $this->fk_expensereport=trim($this->fk_expensereport);
+ if (isset($this->amount)) $this->amount=trim($this->amount);
+ if (isset($this->fk_typepayment)) $this->fk_typepayment=trim($this->fk_typepayment);
+ if (isset($this->num_payment)) $this->num_payment=trim($this->num_payment);
+ if (isset($this->note)) $this->note=trim($this->note);
+ if (isset($this->fk_bank)) $this->fk_bank=trim($this->fk_bank);
+ if (isset($this->fk_user_creat)) $this->fk_user_creat=trim($this->fk_user_creat);
+ if (isset($this->fk_user_modif)) $this->fk_user_modif=trim($this->fk_user_modif);
+
+ $totalamount = 0;
+ foreach ($this->amounts as $key => $value) // How payment is dispatch
+ {
+ $newvalue = price2num($value,'MT');
+ $this->amounts[$key] = $newvalue;
+ $totalamount += $newvalue;
+ }
+ $totalamount = price2num($totalamount);
+
+ // Check parameters
+ if ($totalamount == 0) return -1; // On accepte les montants negatifs pour les rejets de prelevement mais pas null
+
+
+ $this->db->begin();
+
+ if ($totalamount != 0)
+ {
+ $sql = "INSERT INTO ".MAIN_DB_PREFIX."payment_expensereport (fk_expensereport, datec, datep, amount,";
+ $sql.= " fk_typepayment, num_payment, note, fk_user_creat, fk_bank)";
+ $sql.= " VALUES ($this->chid, '".$this->db->idate($now)."',";
+ $sql.= " '".$this->db->idate($this->datepaid)."',";
+ $sql.= " ".$totalamount.",";
+ $sql.= " ".$this->paymenttype.", '".$this->db->escape($this->num_payment)."', '".$this->db->escape($this->note)."', ".$user->id.",";
+ $sql.= " 0)";
+
+ dol_syslog(get_class($this)."::create", LOG_DEBUG);
+ $resql=$this->db->query($sql);
+ if ($resql)
+ {
+ $this->id = $this->db->last_insert_id(MAIN_DB_PREFIX."payment_expensereport");
+ }
+ else
+ {
+ $error++;
+ }
+
+ }
+
+ if ($totalamount != 0 && ! $error)
+ {
+ $this->amount=$totalamount;
+ $this->db->commit();
+ return $this->id;
+ }
+ else
+ {
+ $this->error=$this->db->error();
+ $this->db->rollback();
+ return -1;
+ }
+ }
+
+ /**
+ * Load object in memory from database
+ *
+ * @param int $id Id object
+ * @return int <0 if KO, >0 if OK
+ */
+ function fetch($id)
+ {
+ global $langs;
+ $sql = "SELECT";
+ $sql.= " t.rowid,";
+ $sql.= " t.fk_expensereport,";
+ $sql.= " t.datec,";
+ $sql.= " t.tms,";
+ $sql.= " t.datep,";
+ $sql.= " t.amount,";
+ $sql.= " t.fk_typepayment,";
+ $sql.= " t.num_payment,";
+ $sql.= " t.note,";
+ $sql.= " t.fk_bank,";
+ $sql.= " t.fk_user_creat,";
+ $sql.= " t.fk_user_modif,";
+ $sql.= " pt.code as type_code, pt.libelle as type_libelle,";
+ $sql.= ' b.fk_account';
+ $sql.= " FROM (".MAIN_DB_PREFIX."c_paiement as pt, ".MAIN_DB_PREFIX."payment_expensereport as t)";
+ $sql.= ' LEFT JOIN '.MAIN_DB_PREFIX.'bank as b ON t.fk_bank = b.rowid';
+ $sql.= " WHERE t.rowid = ".$id." AND t.fk_typepayment = pt.id";
+
+ dol_syslog(get_class($this)."::fetch", LOG_DEBUG);
+ $resql=$this->db->query($sql);
+ if ($resql)
+ {
+ if ($this->db->num_rows($resql))
+ {
+ $obj = $this->db->fetch_object($resql);
+
+ $this->id = $obj->rowid;
+ $this->ref = $obj->rowid;
+
+ $this->fk_expensereport = $obj->fk_expensereport;
+ $this->datec = $this->db->jdate($obj->datec);
+ $this->tms = $this->db->jdate($obj->tms);
+ $this->datep = $this->db->jdate($obj->datep);
+ $this->amount = $obj->amount;
+ $this->fk_typepayment = $obj->fk_typepayment;
+ $this->num_payment = $obj->num_payment;
+ $this->note = $obj->note;
+ $this->fk_bank = $obj->fk_bank;
+ $this->fk_user_creat = $obj->fk_user_creat;
+ $this->fk_user_modif = $obj->fk_user_modif;
+
+ $this->type_code = $obj->type_code;
+ $this->type_libelle = $obj->type_libelle;
+
+ $this->bank_account = $obj->fk_account;
+ $this->bank_line = $obj->fk_bank;
+ }
+ $this->db->free($resql);
+
+ return 1;
+ }
+ else
+ {
+ $this->error="Error ".$this->db->lasterror();
+ return -1;
+ }
+ }
+
+
+ /**
+ * Update database
+ *
+ * @param User $user User that modify
+ * @param int $notrigger 0=launch triggers after, 1=disable triggers
+ * @return int <0 if KO, >0 if OK
+ */
+ function update($user=null, $notrigger=0)
+ {
+ global $conf, $langs;
+ $error=0;
+
+ // Clean parameters
+
+ if (isset($this->fk_expensereport)) $this->fk_expensereport=trim($this->fk_expensereport);
+ if (isset($this->amount)) $this->amount=trim($this->amount);
+ if (isset($this->fk_typepayment)) $this->fk_typepayment=trim($this->fk_typepayment);
+ if (isset($this->num_payment)) $this->num_payment=trim($this->num_payment);
+ if (isset($this->note)) $this->note=trim($this->note);
+ if (isset($this->fk_bank)) $this->fk_bank=trim($this->fk_bank);
+ if (isset($this->fk_user_creat)) $this->fk_user_creat=trim($this->fk_user_creat);
+ if (isset($this->fk_user_modif)) $this->fk_user_modif=trim($this->fk_user_modif);
+
+
+
+ // Check parameters
+ // Put here code to add control on parameters values
+
+ // Update request
+ $sql = "UPDATE ".MAIN_DB_PREFIX."payment_expensereport SET";
+
+ $sql.= " fk_expensereport=".(isset($this->fk_expensereport)?$this->fk_expensereport:"null").",";
+ $sql.= " datec=".(dol_strlen($this->datec)!=0 ? "'".$this->db->idate($this->datec)."'" : 'null').",";
+ $sql.= " tms=".(dol_strlen($this->tms)!=0 ? "'".$this->db->idate($this->tms)."'" : 'null').",";
+ $sql.= " datep=".(dol_strlen($this->datep)!=0 ? "'".$this->db->idate($this->datep)."'" : 'null').",";
+ $sql.= " amount=".(isset($this->amount)?$this->amount:"null").",";
+ $sql.= " fk_typepayment=".(isset($this->fk_typepayment)?$this->fk_typepayment:"null").",";
+ $sql.= " num_payment=".(isset($this->num_payment)?"'".$this->db->escape($this->num_payment)."'":"null").",";
+ $sql.= " note=".(isset($this->note)?"'".$this->db->escape($this->note)."'":"null").",";
+ $sql.= " fk_bank=".(isset($this->fk_bank)?$this->fk_bank:"null").",";
+ $sql.= " fk_user_creat=".(isset($this->fk_user_creat)?$this->fk_user_creat:"null").",";
+ $sql.= " fk_user_modif=".(isset($this->fk_user_modif)?$this->fk_user_modif:"null")."";
+
+
+ $sql.= " WHERE rowid=".$this->id;
+
+ $this->db->begin();
+
+ dol_syslog(get_class($this)."::update", LOG_DEBUG);
+ $resql = $this->db->query($sql);
+ if (! $resql) { $error++; $this->errors[]="Error ".$this->db->lasterror(); }
+
+ if (! $error)
+ {
+ if (! $notrigger)
+ {
+ // Uncomment this and change MYOBJECT to your own tag if you
+ // want this action call a trigger.
+
+ //// Call triggers
+ //include_once DOL_DOCUMENT_ROOT . '/core/class/interfaces.class.php';
+ //$interface=new Interfaces($this->db);
+ //$result=$interface->run_triggers('MYOBJECT_MODIFY',$this,$user,$langs,$conf);
+ //if ($result < 0) { $error++; $this->errors=$interface->errors; }
+ //// End call triggers
+ }
+ }
+
+ // Commit or rollback
+ if ($error)
+ {
+ foreach($this->errors as $errmsg)
+ {
+ dol_syslog(get_class($this)."::update ".$errmsg, LOG_ERR);
+ $this->error.=($this->error?', '.$errmsg:$errmsg);
+ }
+ $this->db->rollback();
+ return -1*$error;
+ }
+ else
+ {
+ $this->db->commit();
+ return 1;
+ }
+ }
+
+
+ /**
+ * Delete object in database
+ *
+ * @param User $user User that delete
+ * @param int $notrigger 0=launch triggers after, 1=disable triggers
+ * @return int <0 if KO, >0 if OK
+ */
+ function delete($user, $notrigger=0)
+ {
+ global $conf, $langs;
+ $error=0;
+
+ $this->db->begin();
+
+ if (! $error)
+ {
+ $sql = "DELETE FROM ".MAIN_DB_PREFIX."bank_url";
+ $sql.= " WHERE type='payment_expensereport' AND url_id=".$this->id;
+
+ dol_syslog(get_class($this)."::delete", LOG_DEBUG);
+ $resql = $this->db->query($sql);
+ if (! $resql) { $error++; $this->errors[]="Error ".$this->db->lasterror(); }
+ }
+
+ if (! $error)
+ {
+ $sql = "DELETE FROM ".MAIN_DB_PREFIX."payment_expensereport";
+ $sql.= " WHERE rowid=".$this->id;
+
+ dol_syslog(get_class($this)."::delete", LOG_DEBUG);
+ $resql = $this->db->query($sql);
+ if (! $resql) { $error++; $this->errors[]="Error ".$this->db->lasterror(); }
+ }
+
+ if (! $error)
+ {
+ if (! $notrigger)
+ {
+ // Uncomment this and change MYOBJECT to your own tag if you
+ // want this action call a trigger.
+
+ //// Call triggers
+ //include_once DOL_DOCUMENT_ROOT . '/core/class/interfaces.class.php';
+ //$interface=new Interfaces($this->db);
+ //$result=$interface->run_triggers('MYOBJECT_DELETE',$this,$user,$langs,$conf);
+ //if ($result < 0) { $error++; $this->errors=$interface->errors; }
+ //// End call triggers
+ }
+ }
+
+ // Commit or rollback
+ if ($error)
+ {
+ foreach($this->errors as $errmsg)
+ {
+ dol_syslog(get_class($this)."::delete ".$errmsg, LOG_ERR);
+ $this->error.=($this->error?', '.$errmsg:$errmsg);
+ }
+ $this->db->rollback();
+ return -1*$error;
+ }
+ else
+ {
+ $this->db->commit();
+ return 1;
+ }
+ }
+
+
+
+ /**
+ * Load an object from its id and create a new one in database
+ *
+ * @param int $fromid Id of object to clone
+ * @return int New id of clone
+ */
+ function createFromClone($fromid)
+ {
+ global $user,$langs;
+
+ $error=0;
+
+ $object=new PaymentExpenseReport($this->db);
+
+ $object->context['createfromclone'] = 'createfromclone';
+
+ $this->db->begin();
+
+ // Load source object
+ $object->fetch($fromid);
+ $object->id=0;
+ $object->statut=0;
+
+ // Clear fields
+ // ...
+
+ // Create clone
+ $result=$object->create($user);
+
+ // Other options
+ if ($result < 0)
+ {
+ $this->error=$object->error;
+ $error++;
+ }
+
+ if (! $error)
+ {
+
+
+
+ }
+
+ unset($this->context['createfromclone']);
+
+ // End
+ if (! $error)
+ {
+ $this->db->commit();
+ return $object->id;
+ }
+ else
+ {
+ $this->db->rollback();
+ return -1;
+ }
+ }
+
+
+ /**
+ * Initialise an instance with random values.
+ * Used to build previews or test instances.
+ * id must be 0 if object instance is a specimen.
+ *
+ * @return void
+ */
+ function initAsSpecimen()
+ {
+ $this->id=0;
+
+ $this->fk_expensereport='';
+ $this->datec='';
+ $this->tms='';
+ $this->datep='';
+ $this->amount='';
+ $this->fk_typepayment='';
+ $this->num_payment='';
+ $this->note='';
+ $this->fk_bank='';
+ $this->fk_user_creat='';
+ $this->fk_user_modif='';
+
+
+ }
+
+
+ /**
+ * Add record into bank for payment with links between this bank record and invoices of payment.
+ * All payment properties must have been set first like after a call to create().
+ *
+ * @param User $user Object of user making payment
+ * @param string $mode 'payment_expensereport'
+ * @param string $label Label to use in bank record
+ * @param int $accountid Id of bank account to do link with
+ * @param string $emetteur_nom Name of transmitter
+ * @param string $emetteur_banque Name of bank
+ * @return int <0 if KO, >0 if OK
+ */
+ function addPaymentToBank($user,$mode,$label,$accountid,$emetteur_nom,$emetteur_banque)
+ {
+ global $conf;
+
+ $error=0;
+
+ if (! empty($conf->banque->enabled))
+ {
+ require_once DOL_DOCUMENT_ROOT.'/compta/bank/class/account.class.php';
+
+ $acc = new Account($this->db);
+ $acc->fetch($accountid);
+
+ $total=$this->total;
+ if ($mode == 'payment_expensereport') $amount=$total;
+
+ // Insert payment into llx_bank
+ $bank_line_id = $acc->addline(
+ $this->datepaid,
+ $this->paymenttype, // Payment mode id or code ("CHQ or VIR for example")
+ $label,
+ $amount,
+ $this->num_payment,
+ '',
+ $user,
+ $emetteur_nom,
+ $emetteur_banque
+ );
+
+ // Update fk_bank in llx_paiement.
+ // On connait ainsi le paiement qui a genere l'ecriture bancaire
+ if ($bank_line_id > 0)
+ {
+ $result=$this->update_fk_bank($bank_line_id);
+ if ($result <= 0)
+ {
+ $error++;
+ dol_print_error($this->db);
+ }
+
+ // Add link 'payment', 'payment_supplier', 'payment_expensereport' in bank_url between payment and bank transaction
+ $url='';
+ if ($mode == 'payment_expensereport') $url=DOL_URL_ROOT.'/expensereport/payment/card.php?rowid=';
+ if ($url)
+ {
+ $result=$acc->add_url_line($bank_line_id, $this->id, $url, '(paiement)', $mode);
+ if ($result <= 0)
+ {
+ $error++;
+ dol_print_error($this->db);
+ }
+ }
+ }
+ else
+ {
+ $this->error=$acc->error;
+ $error++;
+ }
+ }
+
+ if (! $error)
+ {
+ return 1;
+ }
+ else
+ {
+ return -1;
+ }
+ }
+
+
+ /**
+ * Update link between the expense report payment and the generated line in llx_bank
+ *
+ * @param int $id_bank Id if bank
+ * @return int >0 if OK, <=0 if KO
+ */
+ function update_fk_bank($id_bank)
+ {
+ $sql = "UPDATE ".MAIN_DB_PREFIX."payment_expensereport SET fk_bank = ".$id_bank." WHERE rowid = ".$this->id;
+
+ dol_syslog(get_class($this)."::update_fk_bank", LOG_DEBUG);
+ $result = $this->db->query($sql);
+ if ($result)
+ {
+ return 1;
+ }
+ else
+ {
+ $this->error=$this->db->error();
+ return 0;
+ }
+ }
+
+ /**
+ * Return clicable name (with picto eventually)
+ *
+ * @param int $withpicto 0=No picto, 1=Include picto into link, 2=Only picto
+ * @param int $maxlen Longueur max libelle
+ * @return string Chaine avec URL
+ */
+ function getNomUrl($withpicto=0,$maxlen=0)
+ {
+ global $langs;
+
+ $result='';
+
+ if (empty($this->ref)) $this->ref=$this->lib;
+ $label = $langs->trans("ShowPayment").': '.$this->ref;
+
+ if (!empty($this->id))
+ {
+ $link = '<a href="'.DOL_URL_ROOT.'/expensereport/payment/card.php?id='.$this->id.'" title="'.dol_escape_htmltag($label, 1).'" class="classfortooltip">';
+ $linkend='</a>';
+
+ if ($withpicto) $result.=($link.img_object($label, 'payment', 'class="classfortooltip"').$linkend.' ');
+ if ($withpicto && $withpicto != 2) $result.=' ';
+ if ($withpicto != 2) $result.=$link.($maxlen?dol_trunc($this->ref,$maxlen):$this->ref).$linkend;
+ }
+
+ return $result;
+ }
+}
diff --git a/htdocs/expensereport/payment/card.php b/htdocs/expensereport/payment/card.php
new file mode 100644
index 0000000000000000000000000000000000000000..8d4ce687cfc85315dd42230e8d733783d0d0a155
--- /dev/null
+++ b/htdocs/expensereport/payment/card.php
@@ -0,0 +1,303 @@
+<?php
+/* Copyright (C) 2015 Alexandre Spangaro <alexandre.spangaro@gmail.com>
+ *
+ * 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 <http://www.gnu.org/licenses/>.
+ */
+
+/**
+ * \file htdocs/expensereport/payment/card.php
+ * \ingroup Expense Report
+ * \brief Tab payment of an expense report
+ */
+
+require '../../main.inc.php';
+require_once DOL_DOCUMENT_ROOT.'/expensereport/class/expensereport.class.php';
+require_once DOL_DOCUMENT_ROOT.'/expensereport/class/paymentexpensereport.class.php';
+require_once DOL_DOCUMENT_ROOT.'/compta/facture/class/facture.class.php';
+require_once DOL_DOCUMENT_ROOT.'/core/modules/facture/modules_facture.php';
+if (! empty($conf->banque->enabled)) require_once DOL_DOCUMENT_ROOT.'/compta/bank/class/account.class.php';
+
+$langs->load('bills');
+$langs->load('banks');
+$langs->load('companies');
+
+// Security check
+$id=GETPOST('rowid')?GETPOST('rowid','int'):GETPOST('id','int');
+$action=GETPOST("action");
+$confirm=GETPOST('confirm');
+if ($user->societe_id) $socid=$user->societe_id;
+// TODO Add rule to restrict access payment
+//$result = restrictedArea($user, 'facture', $id,'');
+
+$payment = new PaymentExpenseReport($db);
+if ($id > 0)
+{
+ $result=$payment->fetch($id);
+ if (! $result) dol_print_error($db,'Failed to get payment id '.$id);
+}
+
+
+/*
+ * Actions
+ */
+
+// Delete payment
+if ($action == 'confirm_delete' && $confirm == 'yes' && $user->rights->expensereport->supprimer)
+{
+ $db->begin();
+
+ $result = $payment->delete($user);
+ if ($result > 0)
+ {
+ $db->commit();
+ header("Location: ".DOL_URL_ROOT."/expensereport/index.php");
+ exit;
+ }
+ else
+ {
+ setEventMessage($payment->error, 'errors');
+ $db->rollback();
+ }
+}
+
+// Create payment
+if ($action == 'confirm_valide' && $confirm == 'yes' && $user->rights->expensereport->creer)
+{
+ $db->begin();
+
+ $result=$payment->valide();
+
+ if ($result > 0)
+ {
+ $db->commit();
+
+ $factures=array(); // TODO Get all id of invoices linked to this payment
+ foreach($factures as $id)
+ {
+ $fac = new Facture($db);
+ $fac->fetch($id);
+
+ $outputlangs = $langs;
+ if (! empty($_REQUEST['lang_id']))
+ {
+ $outputlangs = new Translate("",$conf);
+ $outputlangs->setDefaultLang($_REQUEST['lang_id']);
+ }
+ if (empty($conf->global->MAIN_DISABLE_PDF_AUTOUPDATE)) {
+ $fac->generateDocument($fac->modelpdf, $outputlangs);
+ }
+ }
+
+ header('Location: card.php?id='.$payment->id);
+ exit;
+ }
+ else
+ {
+ setEventMessage($payment->error);
+ $db->rollback();
+ }
+}
+
+
+/*
+ * View
+ */
+
+llxHeader();
+
+$expensereport = new ExpenseReport($db);
+$form = new Form($db);
+
+$h=0;
+
+$head[$h][0] = DOL_URL_ROOT.'/expensereport/payment/card.php?id='.$id;
+$head[$h][1] = $langs->trans("Card");
+$hselected = $h;
+$h++;
+
+dol_fiche_head($head, $hselected, $langs->trans("ExpenseReportPayment"), 0, 'payment');
+
+/*
+ * Confirm deleting of the payment
+ */
+if ($action == 'delete')
+{
+ print $form->formconfirm('card.php?id='.$payment->id, $langs->trans("DeletePayment"), $langs->trans("ConfirmDeletePayment"), 'confirm_delete','',0,2);
+
+}
+
+/*
+ * Confirm validation of the payment
+ */
+if ($action == 'valide')
+{
+ $facid = $_GET['facid'];
+ print $form->formconfirm('card.php?id='.$payment->id.'&facid='.$facid, $langs->trans("ValidatePayment"), $langs->trans("ConfirmValidatePayment"), 'confirm_valide','',0,2);
+
+}
+
+
+print '<table class="border" width="100%">';
+
+// Ref
+print '<tr><td valign="top" width="20%">'.$langs->trans('Ref').'</td>';
+print '<td colspan="3">';
+print $form->showrefnav($payment,'id','',1,'rowid','id');
+print '</td></tr>';
+
+// Date
+print '<tr><td valign="top">'.$langs->trans('Date').'</td><td colspan="3">'.dol_print_date($payment->datep,'day').'</td></tr>';
+
+// Mode
+print '<tr><td valign="top">'.$langs->trans('Mode').'</td><td colspan="3">'.$langs->trans("PaymentType".$payment->type_code).'</td></tr>';
+
+// Number
+print '<tr><td valign="top">'.$langs->trans('Number').'</td><td colspan="3">'.$payment->num_payment.'</td></tr>';
+
+// Amount
+print '<tr><td valign="top">'.$langs->trans('Amount').'</td><td colspan="3">'.price($payment->amount, 0, $outputlangs, 1, -1, -1, $conf->currency).'</td></tr>';
+
+// Note
+print '<tr><td valign="top">'.$langs->trans('Note').'</td><td colspan="3">'.nl2br($payment->note).'</td></tr>';
+
+// Bank account
+if (! empty($conf->banque->enabled))
+{
+ if ($payment->bank_account)
+ {
+ $bankline=new AccountLine($db);
+ $bankline->fetch($payment->bank_line);
+
+ print '<tr>';
+ print '<td>'.$langs->trans('BankTransactionLine').'</td>';
+ print '<td colspan="3">';
+ print $bankline->getNomUrl(1,0,'showall');
+ print '</td>';
+ print '</tr>';
+ }
+}
+
+print '</table>';
+
+
+/*
+ * List of donations paid
+ */
+
+$disable_delete = 0;
+$sql = 'SELECT er.rowid as did, er.paid, er.amount as er_amount, per.amount';
+$sql.= ' FROM '.MAIN_DB_PREFIX.'payment_expensereport as per,'.MAIN_DB_PREFIX.'expensereport as er';
+$sql.= ' WHERE per.fk_expensereport = er.rowid';
+$sql.= ' AND er.entity = '.$conf->entity;
+$sql.= ' AND per.rowid = '.$id;
+
+dol_syslog("expensereport/payment/card.php", LOG_DEBUG);
+$resql=$db->query($sql);
+if ($resql)
+{
+ $num = $db->num_rows($resql);
+
+ $i = 0;
+ $total = 0;
+ print '<br><table class="noborder" width="100%">';
+ print '<tr class="liste_titre">';
+ print '<td>'.$langs->trans('ExpenseReport').'</td>';
+ print '<td align="right">'.$langs->trans('ExpectedToPay').'</td>';
+ print '<td align="center">'.$langs->trans('Status').'</td>';
+ print '<td align="right">'.$langs->trans('PayedByThisPayment').'</td>';
+ print "</tr>\n";
+
+ if ($num > 0)
+ {
+ $var=True;
+
+ while ($i < $num)
+ {
+ $objp = $db->fetch_object($resql);
+
+ $var=!$var;
+ print '<tr '.$bc[$var].'>';
+ // Ref
+ print '<td>';
+ $expensereport->fetch($objp->did);
+ print $expensereport->getNomUrl(1);
+ print "</td>\n";
+ // Expected to pay
+ print '<td align="right">'.price($objp->d_amount).'</td>';
+ // Status
+ print '<td align="center">'.$expensereport->getLibStatut(4,$objp->amount).'</td>';
+ // Amount paid
+ print '<td align="right">'.price($objp->amount).'</td>';
+ print "</tr>\n";
+ if ($objp->paid == 1) // If at least one invoice is paid, disable delete
+ {
+ $disable_delete = 1;
+ }
+ $total = $total + $objp->amount;
+ $i++;
+ }
+ }
+ $var=!$var;
+
+ print "</table>\n";
+ $db->free($resql);
+}
+else
+{
+ dol_print_error($db);
+}
+
+print '</div>';
+
+
+/*
+ * Actions buttons
+ */
+print '<div class="tabsAction">';
+
+/*
+if (! empty($conf->global->BILL_ADD_PAYMENT_VALIDATION))
+{
+ if ($user->societe_id == 0 && $payment->statut == 0 && $_GET['action'] == '')
+ {
+ if ($user->rights->facture->paiement)
+ {
+ print '<a class="butAction" href="card.php?id='.$_GET['id'].'&facid='.$objp->facid.'&action=valide">'.$langs->trans('Valid').'</a>';
+ }
+ }
+}
+*/
+
+if ($_GET['action'] == '')
+{
+ if ($user->rights->expensereport->supprimer)
+ {
+ if (! $disable_delete)
+ {
+ print '<a class="butActionDelete" href="card.php?id='.$_GET['id'].'&action=delete">'.$langs->trans('Delete').'</a>';
+ }
+ else
+ {
+ print '<a class="butActionRefused" href="#" title="'.dol_escape_htmltag($langs->trans("CantRemovePaymentWithOneInvoicePaid")).'">'.$langs->trans('Delete').'</a>';
+ }
+ }
+}
+
+print '</div>';
+
+
+
+llxFooter();
+
+$db->close();
diff --git a/htdocs/expensereport/payment/index.html b/htdocs/expensereport/payment/index.html
new file mode 100644
index 0000000000000000000000000000000000000000..e69de29bb2d1d6434b8b29ae775ad8c2e48c5391
diff --git a/htdocs/expensereport/payment/payment.php b/htdocs/expensereport/payment/payment.php
new file mode 100644
index 0000000000000000000000000000000000000000..e8c2ef8a26eeef31288332d429e3370c14187660
--- /dev/null
+++ b/htdocs/expensereport/payment/payment.php
@@ -0,0 +1,314 @@
+<?php
+/* Copyright (C) 2015 Alexandre Spangaro <alexandre.spangaro@gmail.com>
+ *
+ * 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 <http://www.gnu.org/licenses/>.
+ */
+
+/**
+ * \file htdocs/expensereport/payment/payment.php
+ * \ingroup Expense Report
+ * \brief Page to add payment of an expense report
+ */
+
+require '../../main.inc.php';
+require_once DOL_DOCUMENT_ROOT.'/expensereport/class/expensereport.class.php';
+require_once DOL_DOCUMENT_ROOT.'/expensereport/class/paymentexpensereport.class.php';
+require_once DOL_DOCUMENT_ROOT.'/compta/bank/class/account.class.php';
+
+$langs->load("bills");
+
+$chid=GETPOST("rowid");
+$action=GETPOST('action');
+$amounts = array();
+
+// Security check
+$socid=0;
+if ($user->societe_id > 0)
+{
+ $socid = $user->societe_id;
+}
+
+
+/*
+ * Actions
+ */
+
+if ($action == 'add_payment')
+{
+ $error=0;
+
+ if ($_POST["cancel"])
+ {
+ $loc = DOL_URL_ROOT.'/expensereport/card.php?rowid='.$chid;
+ header("Location: ".$loc);
+ exit;
+ }
+
+ $datepaid = dol_mktime(12, 0, 0, $_POST["remonth"], $_POST["reday"], $_POST["reyear"]);
+
+ if (! $_POST["paymenttype"] > 0)
+ {
+ $mesg = $langs->trans("ErrorFieldRequired",$langs->transnoentities("PaymentMode"));
+ $error++;
+ }
+ if ($datepaid == '')
+ {
+ $mesg = $langs->trans("ErrorFieldRequired",$langs->transnoentities("Date"));
+ $error++;
+ }
+ if (! empty($conf->banque->enabled) && ! $_POST["accountid"] > 0)
+ {
+ $mesg = $langs->trans("ErrorFieldRequired",$langs->transnoentities("AccountToCredit"));
+ $error++;
+ }
+
+ if (! $error)
+ {
+ $paymentid = 0;
+
+ // Read possible payments
+ foreach ($_POST as $key => $value)
+ {
+ if (substr($key,0,7) == 'amount_')
+ {
+ $other_chid = substr($key,7);
+ $amounts[$other_chid] = price2num($_POST[$key]);
+ }
+ }
+
+ if (count($amounts) <= 0)
+ {
+ $error++;
+ $errmsg='ErrorNoPaymentDefined';
+ }
+
+ if (! $error)
+ {
+ $db->begin();
+
+ // Create a line of payments
+ $payment = new PaymentExpenseReport($db);
+ $payment->chid = $chid;
+ $payment->datepaid = $datepaid;
+ $payment->amounts = $amounts; // Tableau de montant
+ $payment->paymenttype = $_POST["paymenttype"];
+ $payment->num_payment = $_POST["num_payment"];
+ $payment->note = $_POST["note"];
+
+ if (! $error)
+ {
+ $paymentid = $payment->create($user);
+ if ($paymentid < 0)
+ {
+ $errmsg=$payment->error;
+ $error++;
+ }
+ }
+
+ if (! $error)
+ {
+ $result=$payment->addPaymentToBank($user,'payment_expensereport','(ExpenseReportPayment)',$_POST['accountid'],'','');
+ if (! $result > 0)
+ {
+ $errmsg=$payment->error;
+ $error++;
+ }
+ }
+
+ if (! $error)
+ {
+ $db->commit();
+ $loc = DOL_URL_ROOT.'/expensereport/card.php?rowid='.$chid;
+ header('Location: '.$loc);
+ exit;
+ }
+ else
+ {
+ $db->rollback();
+ }
+ }
+ }
+
+ $_GET["action"]='create';
+}
+
+
+/*
+ * View
+ */
+
+llxHeader();
+
+$form=new Form($db);
+
+
+// Form to create expense report payment
+if (GETPOST("action") == 'create')
+{
+
+ $expensereport = new ExpenseReport($db);
+ $expensereport->fetch($chid);
+
+ $total = $expensereport->amount;
+
+ print_fiche_titre($langs->trans("DoPayment"));
+
+ if ($mesg)
+ {
+ print "<div class=\"error\">$mesg</div>";
+ }
+
+ print '<form name="add_payment" action="'.$_SERVER['PHP_SELF'].'" method="post">';
+ print '<input type="hidden" name="token" value="'.$_SESSION['newtoken'].'">';
+ print '<input type="hidden" name="rowid" value="'.$chid.'">';
+ print '<input type="hidden" name="chid" value="'.$chid.'">';
+ print '<input type="hidden" name="action" value="add_payment">';
+
+ dol_fiche_head();
+
+ print '<table cellspacing="0" class="border" width="100%" cellpadding="2">';
+
+ print '<tr class="liste_titre"><td colspan="3">'.$langs->trans("ExpenseReport").'</td>';
+
+ print '<tr><td>'.$langs->trans("Ref").'</td><td colspan="2"><a href="'.DOL_URL_ROOT.'/expensereport/card.php?rowid='.$chid.'">'.$chid.'</a></td></tr>';
+ print '<tr><td>'.$langs->trans("Date")."</td><td colspan=\"2\">".dol_print_date($expensereport->date,'day')."</td></tr>\n";
+ print '<tr><td>'.$langs->trans("Amount")."</td><td colspan=\"2\">".price($expensereport->amount,0,$outputlangs,1,-1,-1,$conf->currency).'</td></tr>';
+
+ $sql = "SELECT sum(p.amount) as total";
+ $sql.= " FROM ".MAIN_DB_PREFIX."payment_expensereport as p";
+ $sql.= " WHERE p.fk_expensereport = ".$chid;
+ $resql = $db->query($sql);
+ if ($resql)
+ {
+ $obj=$db->fetch_object($resql);
+ $sumpaid = $obj->total;
+ $db->free();
+ }
+ print '<tr><td>'.$langs->trans("AlreadyPaid").'</td><td colspan="2">'.price($sumpaid,0,$outputlangs,1,-1,-1,$conf->currency).'</td></tr>';
+ print '<tr><td valign="top">'.$langs->trans("RemainderToPay").'</td><td colspan="2">'.price($total-$sumpaid,0,$outputlangs,1,-1,-1,$conf->currency).'</td></tr>';
+
+ print '<tr class="liste_titre">';
+ print "<td colspan=\"3\">".$langs->trans("Payment").'</td>';
+ print '</tr>';
+
+ print '<tr><td class="fieldrequired">'.$langs->trans("Date").'</td><td colspan="2">';
+ $datepaid = dol_mktime(12, 0, 0, $_POST["remonth"], $_POST["reday"], $_POST["reyear"]);
+ $datepayment=empty($conf->global->MAIN_AUTOFILL_DATE)?(empty($_POST["remonth"])?-1:$datepaid):0;
+ $form->select_date($datepayment,'','','','',"add_payment",1,1);
+ print "</td>";
+ print '</tr>';
+
+ print '<tr><td class="fieldrequired">'.$langs->trans("PaymentMode").'</td><td colspan="2">';
+ $form->select_types_paiements(isset($_POST["paymenttype"])?$_POST["paymenttype"]:$expensereport->paymenttype, "paymenttype");
+ print "</td>\n";
+ print '</tr>';
+
+ print '<tr>';
+ print '<td class="fieldrequired">'.$langs->trans('AccountToCredit').'</td>';
+ print '<td colspan="2">';
+ $form->select_comptes(isset($_POST["accountid"])?$_POST["accountid"]:$expensereport->accountid, "accountid", 0, '',1); // Show open bank account list
+ print '</td></tr>';
+
+ // Number
+ print '<tr><td>'.$langs->trans('Numero');
+ print ' <em>('.$langs->trans("ChequeOrTransferNumber").')</em>';
+ print '</td>';
+ print '<td colspan="2"><input name="num_payment" type="text" value="'.GETPOST('num_payment').'"></td></tr>'."\n";
+
+ print '<tr>';
+ print '<td valign="top">'.$langs->trans("Comments").'</td>';
+ print '<td valign="top" colspan="2"><textarea name="note" wrap="soft" cols="60" rows="'.ROWS_3.'"></textarea></td>';
+ print '</tr>';
+
+ print '</table>';
+
+ dol_fiche_end();
+
+ /*
+ * Autres charges impayees
+ */
+ $num = 1;
+ $i = 0;
+
+ print '<table class="noborder" width="100%">';
+ print '<tr class="liste_titre">';
+ print '<td align="right">'.$langs->trans("Amount").'</td>';
+ print '<td align="right">'.$langs->trans("AlreadyPaid").'</td>';
+ print '<td align="right">'.$langs->trans("RemainderToPay").'</td>';
+ print '<td align="center">'.$langs->trans("Amount").'</td>';
+ print "</tr>\n";
+
+ $var=true;
+ $total=0;
+ $totalrecu=0;
+
+ while ($i < $num)
+ {
+ $objp = $expensereport;
+
+ $var=!$var;
+
+ print "<tr ".$bc[$var].">";
+
+ print '<td align="right">'.price($objp->amount)."</td>";
+
+ print '<td align="right">'.price($sumpaid)."</td>";
+
+ print '<td align="right">'.price($objp->amount - $sumpaid)."</td>";
+
+ print '<td align="center">';
+ if ($sumpaid < $objp->amount)
+ {
+ $namef = "amount_".$objp->id;
+ print '<input type="text" size="8" name="'.$namef.'">';
+ }
+ else
+ {
+ print '-';
+ }
+ print "</td>";
+
+ print "</tr>\n";
+ $total+=$objp->total;
+ $total_ttc+=$objp->total_ttc;
+ $totalrecu+=$objp->am;
+ $i++;
+ }
+ if ($i > 1)
+ {
+ // Print total
+ print "<tr ".$bc[!$var].">";
+ print '<td colspan="2" align="left">'.$langs->trans("Total").':</td>';
+ print "<td align=\"right\"><b>".price($total_ttc)."</b></td>";
+ print "<td align=\"right\"><b>".price($totalrecu)."</b></td>";
+ print "<td align=\"right\"><b>".price($total_ttc - $totalrecu)."</b></td>";
+ print '<td align="center"> </td>';
+ print "</tr>\n";
+ }
+
+ print "</table>";
+
+ print '<br><div class="center">';
+ print '<input type="submit" class="button" name="save" value="'.$langs->trans("Save").'">';
+ print ' ';
+ print '<input type="submit" class="button" name="cancel" value="'.$langs->trans("Cancel").'">';
+ print '</div>';
+
+ print "</form>\n";
+}
+
+
+$db->close();
+
+llxFooter();