From c81bccc75110ddd4a0ac2395c97aafe56c9d431c Mon Sep 17 00:00:00 2001 From: Laurent Destailleur Date: Sun, 2 May 2004 13:46:22 +0000 Subject: [PATCH] =?UTF-8?q?New:=20La=20mise=20a=20jour=20du=20champ=20fk?= =?UTF-8?q?=5Fbank=20dans=20le=20paiement=20faisant=20le=20lien=20entre=20?= =?UTF-8?q?un=20paiement=20et=20l'=E9criture=20dans=20le=20compte=20se=20f?= =?UTF-8?q?ait=20dor=E9navant=20aussi=20bien=20pour=20les=20paiements=20fo?= =?UTF-8?q?urnisseurs=20que=20clients.=20Fix:=20L'ajout=20des=20url=20li?= =?UTF-8?q?=E9s=20=E0=20llx=5Fbank=20ne=20se=20faisait=20que=20sur=20la=20?= =?UTF-8?q?derni=E8re=20facture=20dans=20le=20cas=20de=20paiement=20multi-?= =?UTF-8?q?facture.=20Fix:=20Le=20lien=20sur=20le=20user=20de=20cr=E9ation?= =?UTF-8?q?=20lors=20d'un=20ajout=20dans=20llx=5Fbank=20ne=20se=20faisait?= =?UTF-8?q?=20pas.=20Optim:=20Le=20code=20cr=E9ait=203=20instances=20de=20?= =?UTF-8?q?paiement=20avec=20recherche=20des=20ses=20propri=E9t=E9s=20en?= =?UTF-8?q?=20base=20alors=20qu'une=20seule=20suffisait=20car=20on=20veut?= =?UTF-8?q?=20toujours=20le=20m=EAme.=20Norm:=20$HTTP=5FPOST=5FVARS=20remp?= =?UTF-8?q?lac=E9=20par=20$=5FPOST=20selon=20recommandation=20PHP.?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- htdocs/compta/paiement.php | 77 +++++++++++++++++++++++--------------- 1 file changed, 46 insertions(+), 31 deletions(-) diff --git a/htdocs/compta/paiement.php b/htdocs/compta/paiement.php index d6e985773ee..04627e4fd88 100644 --- a/htdocs/compta/paiement.php +++ b/htdocs/compta/paiement.php @@ -31,69 +31,84 @@ include_once(DOL_DOCUMENT_ROOT."/compta/bank/account.class.php"); $facid=isset($_GET["facid"])?$_GET["facid"]:$_POST["facid"]; -if ($HTTP_POST_VARS["action"] == 'add_paiement') +if ($_POST["action"] == 'add_paiement') { - if ($HTTP_POST_VARS["paiementid"] > 0) + if ($_POST["paiementid"] > 0) { $datepaye = $db->idate(mktime(12, 0 , 0, - $HTTP_POST_VARS["remonth"], - $HTTP_POST_VARS["reday"], - $HTTP_POST_VARS["reyear"])); + $_POST["remonth"], + $_POST["reday"], + $_POST["reyear"])); $paiement_id = 0; $amounts = array(); - foreach ($HTTP_POST_VARS as $key => $value) + foreach ($_POST as $key => $value) { if (substr($key,0,7) == 'amount_') { $other_facid = substr($key,7); - $amounts[$other_facid] = $HTTP_POST_VARS[$key]; + $amounts[$other_facid] = $_POST[$key]; } } - $paiement = new Paiement($db); + // TODO Mettre toute la chaine dans une même transaction + // Creation de la ligne paiement + $paiement = new Paiement($db); $paiement->datepaye = $datepaye; - $paiement->amounts = $amounts; - $paiement->author = $HTTP_POST_VARS["author"]; - $paiement->paiementid = $HTTP_POST_VARS["paiementid"]; - $paiement->num_paiement = $HTTP_POST_VARS["num_paiement"]; - $paiement->note = $HTTP_POST_VARS["note"]; + $paiement->amounts = $amounts; // Tableau de montant + $paiement->paiementid = $_POST["paiementid"]; + $paiement->num_paiement = $_POST["num_paiement"]; + $paiement->note = $_POST["note"]; $paiement_id = $paiement->create($user); if ($paiement_id > 0) { - $paiement = new Paiement($db); - if ( $paiement->fetch($paiement_id) ) - { - $fac = new Facture($db); - $fac->fetch($facid); - $fac->fetch_client(); + // On determine le montant total du paiement + $total=0; + foreach ($paiement->amounts as $key => $value) + { + $facid = $key; + $value = trim($value); + $amount = round(ereg_replace(",",".",$value), 2); + if (is_numeric($amount)) + { + $total += $amount; + } + } - $label = "Règlement facture"; - - // On ajoute une ligne dans la table llx_bank pour qu'ensuite on puisse rapprocher le compte ! - $acc = new Account($db, $HTTP_POST_VARS["accountid"]); - //paiementid est correct, il contient "CHQ ou VIR par exemple" - $bank_line_id = $acc->addline($datepaye, $HTTP_POST_VARS["paiementid"], $label, $paiement->montant, $num_paiement); + // Insertion dans llx_bank + $label = "Règlement facture"; + $acc = new Account($db, $_POST["accountid"]); + //paiementid contient "CHQ ou VIR par exemple" + $bank_line_id = $acc->addline($paiement->datepaye, $paiement->paiementid, $label, $total, $paiement->num_paiement, '', $user); // Mise a jour fk_bank dans llx_paiement. On connait ainsi le paiement qui a généré l'écriture bancaire - $pai = new Paiement($db); - //$pai->update_fk_bank($paiement_id,$bank_line_id); // TODO Méthode à creer + if ($bank_line_id) { + $paiement->update_fk_bank($bank_line_id); + } - $acc->add_url_line($bank_line_id, $paiement_id, DOL_URL_ROOT.'/compta/paiement/fiche.php?id=', "(paiement)"); - $acc->add_url_line($bank_line_id, $fac->client->id, DOL_URL_ROOT.'/compta/fiche.php?socid=', $fac->client->nom); + // Mise a jour liens (pour chaque facture concernées par le paiement) + foreach ($paiement->amounts as $key => $value) + { + $facid = $key; + $fac = new Facture($db); + $fac->fetch($facid); + $fac->fetch_client(); + $acc->add_url_line($bank_line_id, $paiement_id, DOL_URL_ROOT.'/compta/paiement/fiche.php?id=', "(paiement)"); + $acc->add_url_line($bank_line_id, $fac->client->id, DOL_URL_ROOT.'/compta/fiche.php?socid=', $fac->client->nom); + } $loc = DOL_URL_ROOT.'/compta/paiement/fiche.php?id='.$paiement_id; Header("Location: $loc"); - } } else { - // print "Pas d'entrée dans la banque"; + // Il y a eu erreur + $fiche_erreur_message = "Echec de la création du paiement"; } } else