Finalisation et simplification modification entrée

mouvements/entrees/modifier_entree.html

@@ -1,33 +1,6 @@
 {{#restrict section="config" level="admin" block=true}}{{/restrict}}
 {{:admin_header title="Modifier une entrée" current="module_equipment"}}
 
-{{*
-    ************************************************************************
-                                TEST
-    ************************************************************************
-*}}
-
-{{* achat 1 caméra 30/10/23 *}}
-{{:assign key_mvt= 91b794f5-5cb7-449e-9378-d1813a436b46 }}
-
-{{* Emprunt 13 chaises 15/06/22 *}}
-{{:assign key_mvt=6fcc2787-9d0e-497d-b4dd-c23bc3a3e0f6}}
-
-{{* achat 1 micro 30/10/23 *}}
-{{:assign key_mvt=93b46b27-577a-4f81-a0bf-f183887b7567}}
-
-{{* achat 4 micros 5/10/22 *}}
-{{:assign key_mvt=98e68d24-473c-4188-a0e9-f020f943c7f2}}
-
-{{* achat 2 canapés 2/11/22 *}}
-{{:assign key_mvt=445c6f0d-d4eb-4981-ba8f-432e68c36ff2}}
-
-{{*
-    ************************************************************************
-                                /TEST
-    ************************************************************************
-*}}
-
 {{:assign key_mvt=$_GET.key}}
 
 {{* récupérer les infos du mouvement à modifier *}}
@@ -35,40 +8,43 @@
 {{else}}
     {{:error message="Aucune entrée avec la clé %s"|args:$key_mvt}}
 {{/load}}
-{{:assign entree_modif=$mvt_modif.inputNature}}
+{{:assign input_init=$mvt_modif.inputNature}}
-{{:assign amount_modif=$mvt_modif.amount}}
+{{:assign amount_init=$mvt_modif.amount}}
-{{:assign date_modif=$mvt_modif.date|date_short}}
+{{:assign date_init=$mvt_modif.date|date_short}}
-{{:assign key_eqpmt_modif=$mvt_modif.equipment}}
+{{:assign key_eqpmt_init=$mvt_modif.equipment}}
 
 {{* types d'entrées *}}
 {{:assign rang=0}}
 {{#foreach from=$module.config.inputNature item="elem"}}
-    {{* if $elem.type != 'retour' *}}
         {{:assign var='types_entrees.' value="%s"|args:$elem.label}}
         {{if $elem.label == $mvt_modif.inputNature}}
             {{:assign type_defaut=$rang}}
         {{/if}}
         {{:assign rang="%d+1"|math:$rang}}
-    {{* /if *}}
 {{/foreach}}
-{{* :debug types_entrees=$types_entrees *}}
 
 {{* récupérer les infos du matériel associé *}}
-{{#load key=$key_eqpmt_modif assign="eqpmt_modif"}}
+{{#load key=$key_eqpmt_init assign="eqpmt_init"}}
 {{else}}
-    {{:error message="Aucun matériel avec la clé « %s »"|args:$key_eqpmt_modif}}
+    {{:error message="Aucun matériel avec la clé « %s »"|args:$key_eqpmt_init}}
 {{/load}}
 
+{{*
+    -------------------- Traiter la saisie --------------------
+*}}
 {{#form on="change"}}
     {{* préparer le mouvement modifié *}}
-    {{:assign var="operation" from="types_entrees.%d"|args:$_POST.type_operation}}
     {{:assign var="mvt_modif.inputNature" from="types_entrees.%d"|args:$_POST.type_operation}}
     {{:assign var="mvt_modif.amount" value=$_POST.amount}}
     {{:assign var="mvt_modif.equipment" value=$_POST.equipment}}
     {{:assign var="mvt_modif.date" value=$_POST.date|parse_date}}
     {{:assign var="mvt_modif.comment" value=$_POST.comment}}
 
-    {{* lister les mouvements *}}
+    {{*
+        lister les mouvements et remplacer le mouvement sélectionné par sa version modifiée
+        en l'insérant à sa place par date croissante
+    *}}
+    {{:assign insere=false}}
     {{#select
         id, key,
         json_extract(document, '$.type') as 'type',
@@ -80,112 +56,76 @@
         json_extract(document, '$.date') as 'date',
         json_extract(document, '$.comment') as 'comment'
         FROM module_data_equipment
-        WHERE json_extract(document, '$.type') = 'movement'
+        WHERE
-        ORDER BY json_extract(document, '$.date')
+            json_extract(document, '$.type') = 'movement'
-        ;
+        AND
-        assign="movements."
+            (json_extract(document, '$.equipment') = :old_eqpmt_key
+        OR
+            json_extract(document, '$.equipment') = :new_eqpmt_key)
+        ORDER BY json_extract(document, '$.date');
+        :old_eqpmt_key=$key_eqpmt_init
+        :new_eqpmt_key=$_POST.equipment
+        assign="movement"
     }}
-    {{/select}}
+        {{if $key != $key_mvt}}
-
+            {{if $date > $mvt_modif.date && ! $insere}}
-    {{*
+                {{:assign var=movements_modif." from=mvt_modif}}
-        remplacer le mouvement sélectionné par sa version modifiée
-        en l'insérant à sa place par date croissante
-    *}}
-    {{:assign insere=false}}
-    {{#foreach from=$movements item="movement"}}
-        {{if $movement.key != $key_mvt}}
-            {{if $movement.date > $mvt_modif.date && ! $insere}}
-                {{:assign var=movements_mod." from=mvt_modif}}
                 {{:assign insere=true}}
             {{/if}}
-            {{:assign var=movements_mod." from=movement}}
+            {{:assign var=movements_modif." from=movement}}
         {{/if}}
-    {{/foreach}}
+    {{/select}}
     {{if ! $insere}}
-        {{:assign var=movements_mod." from=mvt_modif}}
+        {{:assign var=movements_modif." from=mvt_modif}}
     {{/if}}
 
-    {{*
-        Vérifier la cohérence des opérations :
-        - si le matériel n'a pas changé, vérifier les E/S de ce matériel
-        - si le matériel a changé, vérifier les E/S de l'ancien et du nouveau matériel !!!
-    *}}
-
     {{* Vérifier la cohérence des opérations de l'ancien matériel *}}
-    {{:include file="./valider_operation.html" keep="erreur" movements=$movements_mod eqpmt_key=$key_eqpmt_modif}}
+    {{:include
-{{* :debug erreur1=$erreur *}}
+        file="./valider_operation.html"
-{{*
+        keep="erreur"
-    {{:assign erreur = false}}
+        movements=$movements_modif
-    {{:assign stock=0}}
+        eqpmt_key=$key_eqpmt_init
-    {{:assign exterieur=0}}
+    }}
-    {{:assign nonprop=0}}
-    {{#foreach from=$movements_mod item="movement"}}
-        {{if $movement.direction == 'entrée'}}
-            {{* chercher le type d'entrée parmi les types de la config *}}
-{{*
-            {{#foreach from=$module.config.inputNature item="elem"}}
-                {{if $movement.inputNature == $elem.label}}
-                    {{if  $elem.type == 'définitif'}}
-                        {{:assign stock="%d+%d"|math:$stock:$movement.amount}}
-                    {{elseif  $elem.type == 'retour'}}
-                        {{:assign exterieur="%d-%d"|math:$exterieur:$movement.amount}}
-                    {{elseif  $elem.type == 'temporaire'}}
-                        {{:assign nonprop="%d+%d"|math:$nonprop:$movement.amount}}
-                    {{/if}}
-                {{/if}}
-            {{/foreach}}
-        {{elseif $movement.direction == 'sortie'}}
-            {{* chercher le type de sortie parmi les types de la config *}}
-{{*
-            {{#foreach from=$module.config.outputNature item="elem"}}
-                {{if $movement.outputNature == $elem.label}}
-                    {{if  $elem.type == 'définitif'}}
-                         {{:assign stock="%d-%d"|math:$stock:$movement.amount}}
-                    {{elseif  $elem.type == 'temporaire'}}
-                         {{:assign exterieur="%d+%d"|math:$exterieur:$movement.amount}}
-                   {{elseif $elem.type == 'retour'}}
-                        {{:assign nonprop="%d-%d"|math:$nonprop:$movement.amount}}
-                    {{/if}}
-                {{/if}}
-            {{/foreach}}
-        {{/if}}
 
-        {{if $stock < 0 || $exterieur < 0 || $nonprop < 0}}
+    {{* Si le matériel a changé, vérifier la cohérence des opérations du nouveau matériel *}}
-            {{#load key=$mvt_modif.equipment assign="eqpmt"}}{{/load}}
+    {{if ! $erreur && $key_eqpmt_init != $_POST.equipment}}
-            <p class="block error">
+        {{:include
-                Modification demandée impossible : 
+            file="./valider_operation.html"
-                « {{$entree_modif}} de {{$eqpmt_modif.designation}} (qté : {{$amount_modif}}) en date du {{$date_modif}} » vers
+            keep="erreur"
-                « {{$mvt_modif.inputNature}} de {{$eqpmt.designation}} (qté : {{$mvt_modif.amount}}) à la date du {{$mvt_modif.date|date_short}} »
+            movements=$movements_modif
-            </p>
+            eqpmt_key=$_POST.equipment
-            {{:assign erreur=true}}
+        }}
-            {{:break}}
-        {{/if}}
-    {{/foreach}}
-*}}
-
-    {{* Vérifier la cohérence des opérations du nouveau matériel *}}
-    {{if ! $erreur && $key_eqpmt_modif != $_POST.equipment}}
-        {{:include file="./valider_operation.html" keep="erreur" movements=$movements_mod eqpmt_key=$_POST.equipment}}
-{{* :debug erreur2=$erreur *}}
     {{/if}}
 
     {{#load key=$mvt_modif.equipment assign="eqpmt"}}{{/load}}
     {{if $erreur}}
         <p class="block error">
             Modification demandée impossible : 
-            « {{$entree_modif}} de {{$eqpmt_modif.designation}} (qté : {{$amount_modif}}) en date du {{$date_modif}} » vers
+            « {{$input_init}} de {{$eqpmt_init.designation}} (qté : {{$amount_init}}) en date du {{$date_init}} » vers
             « {{$mvt_modif.inputNature}} de {{$eqpmt.designation}} (qté : {{$mvt_modif.amount}}) à la date du {{$mvt_modif.date|date_short}} »
         </p>
+        {{* :redirect force="./index.html?err=1&msg=Modification demandée impossible" *}}
     {{else}}
-        <p class="block confirm">
+        {{* vérification réussie : modifier le mouvement *}}
-            La modification de 
+        {{:save
-             « {{$entree_modif}} de {{$eqpmt_modif.designation}} (qté : {{$amount_modif}}) en date du {{$date_modif}} » vers
+            key=$key_mvt
-             « {{$mvt_modif.inputNature}} de {{$eqpmt.designation}} (qté : {{$mvt_modif.amount}}) à la date du {{$mvt_modif.date|date_short}} » est possible
+            validate_schema="/%s/mouvements/movement.schema.json"|args:$module.name
-        </p>
+            type="movement"
+            direction="entrée"
+            inputNature=$mvt_modif.inputNature
+            amount=$mvt_modif.amount|intval
+            equipment=$mvt_modif.equipment
+            date=$mvt_modif.date
+            comment=$mvt_modif.comment
+        }}
+        {{:redirect force="./index.html?ok=1&msg=Modification enregistrée"}}
     {{/if}}
 
 {{/form}}
 
+{{*
+    -------------------- Préparer la saisie --------------------
+*}}
 
 {{* lister les catégories et matériels associés *}}
 {{#load type="category" assign="category" order="$$.name"}}
@@ -199,14 +139,14 @@
 <form method="post" action="">
 
   <fieldset class="entree">
-    <legend>Modifier l'entrée « {{$mvt_modif.inputNature}} {{$eqpmt_modif.designation}} ({{$mvt_modif.amount}}) en date du {{$date_modif}} »</legend>
+    <legend>Modifier l'entrée « {{$input_init}} {{$eqpmt_init.designation}} ({{$amount_init}}) en date du {{$date_init}} »</legend>
     {{:input type="select" name="type_operation" label="Type" required=true options=$types_entrees default=$type_defaut}}
     {{:input type="date" name="date" label="Date" required=true default=$mvt_modif.date}}
     {{:input type="number" name="amount" label="Quantité" required=true default=$mvt_modif.amount}}
 
     <fieldset>
       <legend>Matériel</legend>
-      {{:input type="select_groups" name="equipment" label="Matériel" required=true options=$equipments default=$key_eqpmt_modif}}
+      {{:input type="select_groups" name="equipment" label="Matériel" required=true options=$equipments default=$key_eqpmt_init}}
       {{:input type="textarea" name="comment" label="Remarques" cols="40", rows="3" required=false default=$mvt_modif.comment}}
     </fieldset>
   </fieldset>