ajout liaison entre sortie temporaire et retour

historique.html

@@ -42,6 +42,8 @@
 		<p class="block confirm">Modification enregistrée</p>
 	{{elseif $_GET.msg == "copie"}}
 		<p class="block confirm">Mouvement copié</p>
+	{{elseif $_GET.msg == "retour"}}
+		<p class="block confirm">Retour enregistré</p>
 	{{elseif $_GET.msg == "suppression"}}
 		<p class="block confirm">Mouvement supprimé</p>
 	{{/if}}
@@ -83,6 +85,32 @@
 	{{/if}}
 {{/foreach}}
 
+{{* calculer la quantité restant à l'extérieur de chaque matériel *}}
+{{#foreach from=$config.output_nature key=key}}
+	{{if $type == "temporaire"}}
+		{{:assign var="temp_outputs." value=$key|quote_sql}}
+	{{/if}}
+{{/foreach}}
+{{:assign operations=$temp_outputs|implode:","}}
+{{:assign operations="("|cat:$operations|cat:")"}}
+
+{{#select
+	mvt.key AS mvt_key,
+	json_extract(mvt.document, '$.amount') - IFNULL(SUM(json_extract(mvt2.document, '$.amount')), 0) AS reste
+	FROM module_data_equipment AS mvt
+	LEFT JOIN module_data_equipment AS link ON mvt.key = json_extract(link.document, '$.output')
+	LEFT JOIN module_data_equipment AS mvt2 ON mvt2.key = json_extract(link.document, '$.return')
+	WHERE
+		json_extract(mvt.document, '$.operation') IN !op
+	AND json_extract(mvt.document, '$.equipment') = :eqpmt_key
+	GROUP by mvt.key
+	;
+	!op = $operations
+	:eqpmt_key = $_GET.key
+}}
+	{{:assign var="reste.%s"|args:$mvt_key value=$reste}}
+{{/select}}
+
 {{* calculer et mémoriser les quantités pour que le tri de la liste affiche les valeurs correctes *}}
 {{:assign stock=0}}
 {{:assign exterieur=0}}
@@ -126,7 +154,7 @@
 			"" as 'Stock';
 			"" as 'Sorti';
 			"" as 'Disponible';
-			$$.comment AS 'Commentaire'"
+			$$.comment AS 'Remarque'"
 		equipment=$equipment_key
 		order=1
 	}}
@@ -150,7 +178,17 @@
 				<td>{{$comment}}</td>
 				<td class="actions">
 					{{if $current != "archives"}}
-						{{:linkbutton
+						{{if $direction == "output" && $type_mvt == "temporaire"}}
+							{{:assign var="ext" from="reste.%s"|args:$key}}
+							{{if $ext != null && $ext > 0}}
+								{{:linkbutton
+								label="Retour"
+								href="mouvements/output_return.html?key=%s&prop=%s"|args:$key:$_GET.prop
+								shape="history"
+								target="_dialog"}}
+							{{/if}}
+						{{/if}}
+							{{:linkbutton
 							label="Dupliquer"
 							href="mouvements/dupliquer_mouvement.html?key=%s&prop=%s"|args:$key:$_GET.prop
 							shape="plus"
@@ -179,7 +217,7 @@
 			$$.operation AS 'Opération';
 			$$.amount AS 'Quantité';
 			"" as 'Présent';
-			$$.comment AS 'Commentaire'"
+			$$.comment AS 'Remarque'"
 		equipment=$equipment_key
 		order=1
 	}}

inventaire.html

@@ -157,13 +157,6 @@
 		<td class="num">{{$col4}}</td>
 		<td class="num">{{$col5}}</td>
 		<td class="actions">
-			{{if $col4 > 0}}
-				{{:linkbutton
-				label="Retour"
-				href="mouvements/entrees/retour.html?key=%s"|args:$key
-				shape="history"
-				target="_dialog"}}
-			{{/if}}
 			{{if $col5 > 0}}
 				{{:linkbutton
 				label="Sortie"

mouvements/output_return.html

@@ -0,0 +1,179 @@
+{{* -*- brindille -*- *}}
+
+{{*
+	paramètres :
+	- key		: clé du mouvement
+*}}
+
+{{* infos du mouvement *}}
+{{#load key=$_GET.key assign="mvt_new"}}
+{{else}}
+	{{:error message="Aucun mouvement avec la clé %s"|args:$_GET.key}}
+{{/load}}
+
+{{* infos du matériel associé *}}
+{{#load key=$mvt_new.equipment assign="equipment"}}
+{{else}}
+	{{:error message="Aucun matériel avec la clé « %s »"|args:$key}}
+{{/load}}
+
+{{* récupérer la config des entrées/sorties *}}
+{{:include file="../_get_config.html" keep="config"}}
+
+{{* calculer la quantité sortie *}}
+{{#foreach from=$config.output_nature key=key}}
+	{{if $type == "temporaire"}}
+		{{:assign var="temp_outputs." value=$key|quote_sql}}
+	{{/if}}
+{{/foreach}}
+{{:assign operations=$temp_outputs|implode:","}}
+{{:assign operations="("|cat:$operations|cat:")"}}
+
+{{#select
+	json_extract(mvt.document, '$.amount') - IFNULL(SUM(json_extract(mvt2.document, '$.amount')), 0) AS exterieur
+	FROM module_data_equipment AS mvt
+	LEFT JOIN module_data_equipment AS link ON mvt.key = json_extract(link.document, '$.output')
+	LEFT JOIN module_data_equipment AS mvt2 ON mvt2.key = json_extract(link.document, '$.return')
+	WHERE
+	json_extract(mvt.document, '$.operation') IN !op
+	AND mvt.key = :mvt_key
+	GROUP by mvt.key
+	;
+	!op = $operations
+	:mvt_key = $_GET.key
+	}}
+	{{:assign exterieur=$exterieur}}
+{{/select}}
+
+{{*
+	-------------------- Traiter la saisie --------------------
+*}}
+{{#form on="save"}}
+	{{* vérifier validité des données *}}
+	{{if $_POST.amount <= 0}}
+		{{:error message="La quantité (%s) doit être strictement positive !!"|args:$_POST.amount}}
+	{{/if}}
+
+	{{if $_POST.amount > $exterieur}}
+		{{:error message="La quantité (%s) doit être inférieure à la quantité sortie (%s) !!"|args:$_POST.amount:$exterieur}}
+	{{/if}}
+
+	{{if $_POST.date|parse_date|strtotime > $now}}
+		{{:error message="Impossible de saisir une date dans le futur (%s)"|args:$_POST.date}}
+	{{/if}}
+
+	{{* préparer le nouveau mouvement *}}
+	{{:assign var="mvt_new.key" value=""|uuid}}
+	{{:assign var="mvt_new.direction" value="input"}}
+	{{:assign var="mvt_new.date" value=$_POST.date|parse_date}}
+	{{:assign var="mvt_new.operation" value=$_POST.operation}}
+	{{:assign var="mvt_new.amount" value=$_POST.amount}}
+
+	{{*
+		lister les mouvements
+		- insérer le nouveau mvt à sa place par date croissante
+	*}}
+	{{:assign insere=false}}
+	{{#load
+		where="
+			$$.type = 'movement'
+		AND
+			$$.equipment = :eqpmt_key"
+		:eqpmt_key=$equipment.key
+		order="$$.date"
+		assign="movement"
+	}}
+		{{if! $insere}}
+			{{if
+				$mvt_new.direction == "input" && $date >= $mvt_new.date ||
+				$mvt_new.direction == "output" && $date > $mvt_new.date
+			}}
+				{{:assign var="movements_new." from=mvt_new}}
+				{{:assign insere=true}}
+			{{/if}}
+		{{/if}}
+		{{:assign var="movements_new." from=movement}}
+	{{/load}}
+	{{if ! $insere}}
+		{{:assign var="movements_new." from=mvt_new}}
+	{{/if}}
+
+	{{* Vérifier la cohérence des mouvements du matériel *}}
+	{{:include
+		file="./valider_modification.html"
+		keep="erreur, pb"
+		movements=$movements_new
+	}}
+	{{if $erreur}}
+		<p class="block error">Impossible d'enregistrer ce mouvement.
+			{{if $pb.mvt.key != $mvt_new.key}}
+				{{:assign var="err_mvt_label" from="config.input_nature.%s.label"|args:$pb.mvt.operation}}
+				<br />Mouvement incompatible avec
+				« {{$err_mvt_label}} » : « {{$equipment.name}} (qté : {{$pb.mvt.amount}})
+					en date du {{$pb.mvt.date|date_short}} ».
+				{{/if}}
+		</p>
+	{{else}}
+		{{* vérification réussie : enregistrer le mouvement modifié *}}
+		{{:assign mvt_key=""|uuid}}
+		{{:save
+			key=$mvt_key
+			validate_schema="movement.schema.json"
+			type="movement"
+			direction="input"
+			operation=$_POST.operation
+			amount=$_POST.amount|intval
+			equipment=$equipment.key
+			date=$_POST.date|parse_date
+			comment=$_POST.comment|trim
+		}}
+		{{* enregistrer la liaison entre le retour et la sortie temporaire *}}
+		{{:save
+			key=""|uuid
+			type="link"
+			output=$_GET.key
+			return=$mvt_key
+		}}
+		{{:redirect force="../historique.html?ok=1&key=%s&prop=1&msg=retour"|args:$mvt_new.equipment}}
+	{{/if}}
+{{/form}}
+
+{{:admin_header title="Retour de matériel" custom_css="./../../style.css" current="module_equipment"}}
+{{:form_errors}}
+
+{{* barre de navigation *}}
+{{if ! $dialog}}
+	{{:include file="../_nav.html" current="entrees"}}
+{{/if}}
+
+{{*
+	-------------------- Préparer la saisie --------------------
+*}}
+
+{{#foreach from=$config.input_nature key=key}}
+	{{if $type == "retour"}}
+		{{:assign var="return_label.%s"|args:$key value=$label}}
+		{{:break}}
+	{{/if}}
+{{/foreach}}
+
+{{* infos de la catégorie *}}
+{{#load key=$equipment.category assign="category"}}{{/load}}
+
+<form method="post" action="">
+	<fieldset>
+		<legend>Retour de « {{$equipment.name}} (Catégorie : {{$category.name}}) »</legend>
+		<dl>
+			{{:input type="select" name="operation" label="Type" required=true options=$return_label}}
+			{{:input type="date" name="date" label="Date" required=true default=$now|date_short}}
+			{{:input type="number" name="amount" label="Quantité" min=1 max=$exterieur required=true default=$exterieur}}
+			{{:input type="textarea" name="comment" label="Remarques" cols="40", rows="3" required=false default=$mvt_new.comment}}
+		</dl>
+	</fieldset>
+
+	<p class="submit">
+		{{:button type="submit" name="save" label="Enregistrer" shape="right" class="main"}}
+	</p>
+</form>
+
+{{:admin_footer}}

mouvements/supprimer_mouvement.html

@@ -22,6 +22,10 @@
 
 {{#form on="delete"}}
 
+	{{#load type="link" where="$$.output = :key OR $$.return = :key"  :key=$_GET.key}}
+		{{:assign link_key=$key}}
+	{{/load}}
+
 	{{* vérifier s'il est possible de supprimer le mouvement *}}
 	{{if $mvt_suppr.direction == 'input'}}
 		{{:assign dispo=0}}
@@ -62,43 +66,20 @@
 
 	{{else}}
 		{{* sortie *}}
-		{{:assign temporaire=false}}
 		{{:assign var="type_operation" from="config.output_nature.%s.type"|args:$mvt_suppr.operation}}
 
 		{{if $type_operation == 'temporaire'}}
-			{{:assign exterieur=0}}
+			{{if $link_key != null}}
-			{{#load
+				{{:redirect force="../historique.html?key=%s&prop=%s&err=1&msg=suppression"|args:$mvt_suppr.equipment:$_GET.prop}}
-				type="movement"
+			{{/if}}
-				where="$$.equipment = :key" :key=$mvt_suppr.equipment
-				assign="mvt"
-				order="$$.date"}}
-
-				{{* déterminer le type de mouvement *}}
-				{{:assign var="type_mvt" from="config.%s_nature.%s.type"|args:$mvt.direction:$mvt.operation}}
-
-				{{if $key != $_GET.key}}
-					{{* ce n'est pas le mouvement à supprimer : cumuler les entrées/sorties *}}
-					{{if $mvt.direction == 'input'}}
-						{{if $type_mvt == 'retour'}}
-							{{:assign exterieur="%d-%d"|math:$exterieur:$mvt.amount}}
-						{{/if}}
-					{{elseif $mvt.direction == 'output'}}
-						{{if $type_mvt == 'temporaire'}}
-							{{:assign exterieur="%d+%d"|math:$exterieur:$mvt.amount}}
-						{{/if}}
-					{{/if}}
-
-					{{* problème ? *}}
-					{{if $exterieur < 0}}
-						{{:redirect force="../historique.html?key=%s&prop=%s&err=1&msg=suppression"|args:$mvt_suppr.equipment:$_GET.prop}}
-					{{/if}}
-				{{/if}}
-			{{/load}}
 		{{/if}}
 	{{/if}}
 
 	{{* vérification réussie : supprimer le mouvement *}}
 	{{:delete key=$_GET.key}}
+	{{if $link_key != null}}
+		{{:delete key=$link_key}}
+	{{/if}}
 
 	{{* voir s'il reste des mouvements pour le matériel concerné par le mouvement supprimé *}}
 	{{#load type="movement" where="$$.equipment = :eqpmt_key" :eqpmt_key=$equipment.key}}