Finalisation et simplification modification entrée

This commit is contained in:
Jean-Christophe Engel 2023-11-29 11:02:29 +01:00
parent 10dcb47d86
commit fea2113926
1 changed files with 64 additions and 124 deletions

View File

@ -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 amount_modif=$mvt_modif.amount}}
{{:assign date_modif=$mvt_modif.date|date_short}}
{{:assign key_eqpmt_modif=$mvt_modif.equipment}}
{{:assign input_init=$mvt_modif.inputNature}}
{{:assign amount_init=$mvt_modif.amount}}
{{:assign date_init=$mvt_modif.date|date_short}}
{{: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'
ORDER BY json_extract(document, '$.date')
;
assign="movements."
WHERE
json_extract(document, '$.type') = 'movement'
AND
(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}}
{{*
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}}
{{if $key != $key_mvt}}
{{if $date > $mvt_modif.date && ! $insere}}
{{:assign var=movements_modif." 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}}
{{* :debug erreur1=$erreur *}}
{{*
{{:assign erreur = false}}
{{:assign stock=0}}
{{: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}}
{{:include
file="./valider_operation.html"
keep="erreur"
movements=$movements_modif
eqpmt_key=$key_eqpmt_init
}}
{{if $stock < 0 || $exterieur < 0 || $nonprop < 0}}
{{#load key=$mvt_modif.equipment assign="eqpmt"}}{{/load}}
<p class="block error">
Modification demandée impossible :
« {{$entree_modif}} de {{$eqpmt_modif.designation}} (qté : {{$amount_modif}}) en date du {{$date_modif}} » vers
« {{$mvt_modif.inputNature}} de {{$eqpmt.designation}} (qté : {{$mvt_modif.amount}}) à la date du {{$mvt_modif.date|date_short}} »
</p>
{{: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 *}}
{{* Si le matériel a changé, vérifier la cohérence des opérations du nouveau matériel *}}
{{if ! $erreur && $key_eqpmt_init != $_POST.equipment}}
{{:include
file="./valider_operation.html"
keep="erreur"
movements=$movements_modif
eqpmt_key=$_POST.equipment
}}
{{/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">
La modification de
« {{$entree_modif}} de {{$eqpmt_modif.designation}} (qté : {{$amount_modif}}) en date du {{$date_modif}} » vers
« {{$mvt_modif.inputNature}} de {{$eqpmt.designation}} (qté : {{$mvt_modif.amount}}) à la date du {{$mvt_modif.date|date_short}} » est possible
</p>
{{* vérification réussie : modifier le mouvement *}}
{{:save
key=$key_mvt
validate_schema="/%s/mouvements/movement.schema.json"|args:$module.name
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>