* * 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/don/payment.php * \ingroup donations * \brief Page to add payment of a donation */ require '../../main.inc.php'; require_once DOL_DOCUMENT_ROOT.'/don/class/don.class.php'; require_once DOL_DOCUMENT_ROOT.'/don/class/paymentdonation.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.'/don/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 PaymentDonation($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_donation','(DonationPayment)',$_POST['accountid'],'',''); if (! $result > 0) { $errmsg=$payment->error; $error++; } } if (! $error) { $db->commit(); $loc = DOL_URL_ROOT.'/don/card.php?rowid='.$chid; header('Location: '.$loc); exit; } else { $db->rollback(); } } } $_GET["action"]='create'; } /* * View */ llxHeader(); $form=new Form($db); // Form to create donation payment if (GETPOST("action") == 'create') { $don = new Don($db); $don->fetch($chid); $total = $don->amount; print_fiche_titre($langs->trans("DoPayment")); if ($mesg) { print "
$mesg
"; } print '
'; print ''; print ''; print ''; print ''; dol_fiche_head(); print ''; print ''; print ''; print '\n"; print ''; $sql = "SELECT sum(p.amount) as total"; $sql.= " FROM ".MAIN_DB_PREFIX."payment_donation as p"; $sql.= " WHERE p.fk_donation = ".$chid; $resql = $db->query($sql); if ($resql) { $obj=$db->fetch_object($resql); $sumpaid = $obj->total; $db->free(); } print ''; print ''; print ''; print "'; print ''; print '"; print ''; print '\n"; print ''; print ''; print ''; print ''; // Number print ''; print ''."\n"; print ''; print ''; print ''; print ''; print '
'.$langs->trans("Donation").'
'.$langs->trans("Ref").''.$chid.'
'.$langs->trans("Date")."".dol_print_date($don->date,'day')."
'.$langs->trans("Amount")."".price($don->amount,0,$outputlangs,1,-1,-1,$conf->currency).'
'.$langs->trans("AlreadyPaid").''.price($sumpaid,0,$outputlangs,1,-1,-1,$conf->currency).'
'.$langs->trans("RemainderToPay").''.price($total-$sumpaid,0,$outputlangs,1,-1,-1,$conf->currency).'
".$langs->trans("Payment").'
'.$langs->trans("Date").''; $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 "
'.$langs->trans("PaymentMode").''; $form->select_types_paiements(isset($_POST["paymenttype"])?$_POST["paymenttype"]:$don->paymenttype, "paymenttype"); print "
'.$langs->trans('AccountToCredit').''; $form->select_comptes(isset($_POST["accountid"])?$_POST["accountid"]:$don->accountid, "accountid", 0, '',1); // Show open bank account list print '
'.$langs->trans('Numero'); print ' ('.$langs->trans("ChequeOrTransferNumber").')'; print '
'.$langs->trans("Comments").'
'; dol_fiche_end(); /* * Autres charges impayees */ $num = 1; $i = 0; print ''; print ''; print ''; print ''; print ''; print ''; print "\n"; $var=true; $total=0; $totalrecu=0; while ($i < $num) { $objp = $don; $var=!$var; print ""; print '"; print '"; print '"; print '"; print "\n"; $total+=$objp->total; $total_ttc+=$objp->total_ttc; $totalrecu+=$objp->am; $i++; } if ($i > 1) { // Print total print ""; print ''; print ""; print ""; print ""; print ''; print "\n"; } print "
'.$langs->trans("Amount").''.$langs->trans("AlreadyPaid").''.$langs->trans("RemainderToPay").''.$langs->trans("Amount").'
'.price($objp->amount)."'.price($sumpaid)."'.price($objp->amount - $sumpaid)."'; if ($sumpaid < $objp->amount) { $namef = "amount_".$objp->id; print ''; } else { print '-'; } print "
'.$langs->trans("Total").':".price($total_ttc)."".price($totalrecu)."".price($total_ttc - $totalrecu)." 
"; print '
'; print ''; print '     '; print ''; print '
'; print "
\n"; } $db->close(); llxFooter();