From 3c29faea6c5a7d5a89ecd5d536bb238447f22e3b Mon Sep 17 00:00:00 2001
From: Jean-Christophe Engel <lesanges@zaclys.net>
Date: Wed, 8 Jul 2026 15:41:18 +0200
Subject: [PATCH] =?UTF-8?q?Correction=20v=C3=A9rifications=20montant=20avo?=
 =?UTF-8?q?ir=20saisi?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 attach_credit.html | 84 ++++++++++++++++++++++++----------------------
 1 file changed, 43 insertions(+), 41 deletions(-)

diff --git a/attach_credit.html b/attach_credit.html
index 276dc76..0652ce3 100644
--- a/attach_credit.html
+++ b/attach_credit.html
@@ -18,9 +18,18 @@
 	{{:assign label_immo=$label_immo|cat:" — "|cat:$ligne_immo.line_label}}
 {{/if}}
 
+{{if $info_immo.amount != null}}
+	{{:assign var="ligne_immo.amount" value=$info_immo.amount}}
+{{/if}}
+
 {{* déduire le montant des écritures liées à l'immo courante au crédit du même compte *}}
 {{:include file="_get_credit_lines.html" immo_doc_id=$_GET.immo_doc_id keep="total_credits"}}
-{{:assign solde_immo="%d-%d"|math:$ligne_immo.amount:$total_credits}}
+{{:assign valeur_residuelle="%d-%d"|math:$ligne_immo.amount:$total_credits}}
+
+{{* lister les amortissements liés à l'immobilisation *}}
+{{:include file="./_get_amort_lines.html" immo_doc_id=$_GET.immo_doc_id keep="linked_amort, total_amort, created_amort"}}
+{{:assign valeur_residuelle="%d-%d"|math:$valeur_residuelle:$total_amort}}
+
 
 {{* chercher l'écriture au crédit du compte d'immobilisation *}}
 {{#select
@@ -62,53 +71,46 @@
 		{{/if}}
 	{{else}}
 		{{:assign montant_credit=$_POST.montant|money_int}}
-		{{* vérifier que le montant saisi est inférieur au solde de l'écriture d'immobilisation *}}
-		{{if $montant_credit > $solde_immo}}
-			{{:assign solde_nb="%f"|math:$solde_immo|money_currency:false}}
-			{{:error message="Le montant de l'avoir ne peut être supérieur au montant de l'immobilisation (%s)"|args:$solde_nb}}
-		{{/if}}
-		{{* vérifier que le montant saisi est inférieur au reste de l'écriture de crédit *}}
-		{{if $montant_credit > $reste}}
-			{{:assign reste_nb="%f"|math:$reste|money_currency:false}}
-			{{:error message="Le montant de l'avoir ne peut être supérieur au reste (%s)"|args:$reste_nb}}
-		{{/if}}
-		{{if $montant_credit == $credit_line.amount}}
-			{{:assign saved_credit=null}}
-		{{else}}
-			{{:assign saved_credit=$montant_credit}}
-		{{/if}}
+	{{/if}}
+
+	{{* vérifier que le montant saisi est inférieur à la valeur nette de l'écriture d'immobilisation *}}
+	{{if $montant_credit > $valeur_residuelle}}
+		{{:assign solde_nb="%f"|math:$valeur_residuelle|money_currency:false}}
+		{{:error message="Le montant de l'avoir ne peut être supérieur à la valeur nette de l'immobilisation (%s)"|args:$solde_nb}}
+	{{/if}}
+
+	{{* vérifier que le montant saisi est inférieur au reste de l'écriture de crédit *}}
+	{{if $montant_credit > $reste}}
+		{{:assign reste_nb="%f"|math:$reste|money_currency:false}}
+		{{:error message="Le montant de l'avoir ne peut être supérieur au reste (%s)"|args:$reste_nb}}
+	{{/if}}
+	{{if $montant_credit == $credit_line.amount}}
+		{{:assign saved_credit=null}}
+	{{else}}
+		{{:assign saved_credit=$montant_credit}}
 	{{/if}}
 
 	{{* Lier l'écriture de crédit à l'écriture d'immobilisation *}}
 	{{:include file="_common_attach.html" immo_doc_id=$_GET.immo_doc_id trans_id=$credit_line.trans_id}}
 
-{{*
-	TODO ? vérifier le succès avant d'enregistrer le doc ?
-*}}
-
-{{* enregistrer la liaison des lignes d'immo *}}
-{{:save
-	key=""|uuid
-	type="credit_link"
-	immo_doc_id=$_GET.immo_doc_id|intval
-	credit_line_id=$_GET.credit_line_id|intval
-	amount=$saved_credit
-}}
-
 	{{*
-{{if $montant_credit == $solde_immo}}
-	{{:save
-	id=$_GET.immo_doc_id
-	status="archived"
-	}}
-{{/if}}
-*}}
+		TODO ? vérifier le succès avant d'enregistrer le doc ?
+	*}}
 
-{{if $_GET.from == "exit"}}
-	{{:redirect force="exit_step1.html?immo_doc_id=%s&ok=1&msg=attach_avoir"|args:$_GET.immo_doc_id}}
-{{else}}
-	{{:redirect force="amortization.html?immo_doc_id=%s&ok=1&msg=attach_avoir"|args:$_GET.immo_doc_id}}
-{{/if}}
+	{{* enregistrer la liaison des lignes d'immo *}}
+	{{:save
+		key=""|uuid
+		type="credit_link"
+		immo_doc_id=$_GET.immo_doc_id|intval
+		credit_line_id=$_GET.credit_line_id|intval
+		amount=$saved_credit
+	}}
+
+	{{if $_GET.from == "exit"}}
+		{{:redirect force="exit_step1.html?immo_doc_id=%s&ok=1&msg=attach_avoir"|args:$_GET.immo_doc_id}}
+	{{else}}
+		{{:redirect force="amortization.html?immo_doc_id=%s&ok=1&msg=attach_avoir"|args:$_GET.immo_doc_id}}
+	{{/if}}
 {{/form}}
 
 {{:admin_header title="Écritures au crédit du compte d'immobilisation" custom_css="./style.css" current="module_amortization"}}