diff --git a/_immobilisations.html b/_immobilisations.html
index d287632..1546725 100644
--- a/_immobilisations.html
+++ b/_immobilisations.html
@@ -3,16 +3,16 @@
{{* Liste des immobilisations en cours d'amortissement ou amorties *}}
{{:include file="_get_config.html" keep="module.config"}}
-
-
- {{if $type_immo == "managed"}}
- Cette page liste les immobilisations en cours d'amortissement
- {{elseif $type_immo == "amortized"}}
- Cette page liste les immobilisations dont l'amortissement est terminé
- {{/if}}
-
+
+ {{if $type_immo == "managed"}}
+ Cette page liste les immobilisations en cours d'amortissement
+ {{elseif $type_immo == "amortized"}}
+ Cette page liste les immobilisations dont l'amortissement est terminé
+ {{/if}}
+
+{{if $module.table != null}}
@@ -29,14 +29,6 @@
- {{* vérifier l'existence de la table du module *}}
- {{#load limit="1"}}
- {{:assign table_presente=true}}
- {{else}}
- {{:assign table_presente=false}}
- {{/load}}
-
- {{if $table_presente}}
{{* lister les immobilisations *}}
{{:assign account_condition="("}}
{{#foreach from=$module.config.prefixes item="code"}}
@@ -44,17 +36,8 @@
{{:assign account_condition=$account_condition|cat:" account.code LIKE "|cat:$code|cat:" OR "}}
{{/foreach}}
{{:assign account_condition=$account_condition|cat:"0)"}}
- {{:assign doc_condition="($$.status <> 'ignored' AND $$.status <> 'archived')"}}
-
- {{:assign filter_condition="NOT ("}}
- {{#foreach from=$module.config.filters item="filter"}}
- {{:assign filter="%"|cat:$filter|cat:"%"|quote_sql}}
- {{:assign filter_condition=$filter_condition|cat:" trans_label LIKE "|cat:$filter|cat:" OR "}}
- {{/foreach}}
- {{:assign filter_condition=$filter_condition|cat:"0)"}}
- {{:assign filter_condition="($$.status IS NULL AND NOT (trans.status & 16) AND "|cat:$filter_condition|cat:")"}}
-
- {{:assign condition=$account_condition|cat:" AND debit > 0 AND ("|cat:$filter_condition|cat:" OR "|cat:$doc_condition|cat:")"}}
+ {{:assign status_condition="($$.status = 'managed' OR $$.status = 'amortized')"}}
+ {{:assign condition=$account_condition|cat:" AND line.debit > 0 AND "|cat:$status_condition}}
{{:assign nb_immo=0}}
{{:assign total_immo = 0}}
@@ -68,152 +51,105 @@
account.id as account_id,
account.code as account_code,
trans.id_year as trans_id_year,
+ info.id as immo_doc_id,
$$.duration as duration,
+ $$.label as doc_label,
+ $$.amount as doc_amount,
+ $$.date_achat as doc_date_achat,
+ $$.date as doc_date_mes,
$$.status as status
FROM acc_transactions AS trans
INNER JOIN acc_transactions_lines AS line ON line.id_transaction = trans.id
INNER JOIN acc_accounts AS account ON line.id_account = account.id
INNER JOIN acc_years AS years ON trans.id_year = years.id
- LEFT JOIN !table AS info ON $$.line = line.id
+ INNER JOIN !table AS info ON $$.line = line.id
WHERE !condition
- ORDER BY trans.date DESC;
+ ORDER BY COALESCE(doc_date_achat, trans_date) DESC;
!table=$module.table
!condition=$condition
}}
{{:assign trans_url="%s/acc/transactions/details.php?id=%s"|args:$admin_url:$immo_trans_id}}
{{:assign compte_url="%s/acc/accounts/journal.php?id=%s&year=%s"|args:$admin_url:$account_id:$trans_id_year}}
- {{:assign duration=$duration}}
- {{:assign montant_immo=$debit}}
- {{if $status == null}}
- {{:assign status="unknown"}}
+ {{:assign montant_immo=$doc_amount|or:$debit}}
+ {{:assign immo_date = $doc_date_achat|or:$trans_date}}
+ {{:assign label_immo=$doc_label|or:$trans_label}}
+ {{if $line_label != null && $line_label != $label_immo}}
+ {{:assign label_immo=$label_immo|cat:" — "|cat:$line_label}}
{{/if}}
- {{* chercher des écritures liées à l'immo courante au crédit du même compte
+ {{*
+ chercher des écritures liées à l'immo courante au crédit du même compte
et déduire leur montant de celui de l'immo
*}}
- {{#select
- CASE links.id_related = :immo_trans_id
- WHEN true THEN links.id_transaction
- WHEN false THEN links.id_related
- END as other_id,
- line.credit
- FROM acc_transactions AS trans
- INNER JOIN acc_transactions_links as links
- ON (trans.id = links.id_transaction OR trans.id = links.id_related)
- INNER JOIN acc_transactions_lines AS line on line.id_transaction = other_id
- INNER JOIN acc_accounts AS acc ON line.id_account = acc.id
- WHERE trans.id = :immo_trans_id AND line.credit > 0 AND acc.code = :account;
- :immo_trans_id=$immo_trans_id
- :account=$account_code
- }}
- {{:assign montant_immo="%d-%d"|math:$montant_immo:$credit}}
- {{/select}}
+ {{#load
+ type="credit_link"
+ where="$$.immo_doc_id = :immo_doc_id" :immo_doc_id = $immo_doc_id
+ }}
+ {{if $amount == null}}
+ {{#select credit FROM acc_transactions_lines WHERE id = :credit_line_id;
+ :credit_line_id=$credit_line_id
+ }}
+ {{:assign montant_immo="%d-%d"|math:$montant_immo:$credit}}
+ {{/select}}
+ {{else}}
+ {{:assign montant_immo="%d-%d"|math:$montant_immo:$amount}}
+ {{/if}}
+ {{/load}}
{{* Immobilisation soldée ? *}}
- {{* TODO marquer archivée *}}
+ {{* TODO ¿ marquer archivée ? *}}
{{if $montant_immo == 0}}
{{:continue}}
{{/if}}
- {{* lister les lignes des écritures d'amortissement liées à l'immobilisation *}}
+ {{* chercher des lignes des écritures d'amortissement liées à la ligne d'immobilisation *}}
{{:assign amort_lines=null}}
- {{#select
- l_amort.credit as amount,
- CASE links.id_related = t_immo.id
- WHEN true THEN links.id_transaction
- WHEN false THEN links.id_related
- END as amort_trans_id,
- l_amort.id AS amort_line_id
- FROM acc_transactions_lines as l_immo
- INNER JOIN acc_transactions as t_immo on t_immo.id = l_immo.id_transaction
- INNER JOIN acc_transactions_links as links
- ON (t_immo.id = links.id_transaction OR t_immo.id = links.id_related)
- INNER JOIN acc_transactions_lines as l_amort on amort_trans_id = l_amort.id_transaction
- INNER JOIN acc_accounts AS account ON l_amort.id_account = account.id
- WHERE l_immo.id = :line_id AND l_amort.credit <> 0 AND account.code LIKE '28%';
- :line_id = $immo_line_id|intval
- assign="line"
- }}
- {{:assign var="amort_lines.%d."|args:$amort_trans_id value=$line}}
- {{/select}}
-
{{:assign amort_amount=0}}
- {{#foreach from=$amort_lines key="amort_trans_id" item="lines"}}
- {{:assign nb=$lines|count}}
- {{* lister les docs de liaison de l'écriture d'amortissement *}}
- {{:assign links=null}}
- {{#load type="link"
- where="$$.immo_line_id = :immo_line_id AND $$.amort_trans_id = :amort_trans_id"
- :immo_line_id = $immo_line_id
- :amort_trans_id = $amort_trans_id
- assign="links."
+ {{#load type="amort_link"
+ where="$$.immo_doc_id = :immo_doc_id"
+ :immo_doc_id = $immo_doc_id
+ assign="amort_link"
}}
- {{/load}}
-
- {{#foreach from=$lines item="line"}}
- {{* voir s'il existe une ligne associée à l'écriture d'amortissement *}}
- {{:assign line_link_exist=false}}
- {{#foreach from=$links item="link"}}
- {{if $link.amort_line_id == $line.amort_line_id}}
- {{:assign amort_amount="%d+%d"|math:$amort_amount:$line.amount}}
- {{:assign line_link_exist=true}}
- {{/if}}
- {{/foreach}}
- {{if ! $line_link_exist}}
- {{if $nb == 1}}
- {{* créer la liaison ligne immo <-> ligne amort *}}
-{{*:debug lier_immo_line_id=$immo_line_id lier_amort_trans_id=$amort_trans_id avec_amort_line_id=$amort_line_id*}}
- {{:save
- key=""|uuid
- type="link"
- immo_line_id=$immo_line_id
- amort_line_id=$amort_line_id
- amort_trans_id=$amort_trans_id
- }}
- {{:assign amort_amount="%d+%d"|math:$amort_amount:$line.amount}}
- {{/if}}
- {{/if}}
- {{/foreach}}
- {{/foreach}}
-
- {{if $amort_amount == 0}}
- {{:assign exist_amort=false}}
- {{else}}
- {{:assign exist_amort=true}}
- {{:assign amort_amount=$amort_amount}}
- {{/if}}
+ {{if $amount == null}}
+ {{#select credit FROM acc_transactions_lines WHERE id = :amort_line_id;
+ :amort_line_id = $amort_line_id
+ }}
+ {{:assign amort_amount="%d+%d"|math:$amort_amount:$credit}}
+ {{/select}}
+ {{else}}
+ {{:assign amort_amount="%d+%d"|math:$amort_amount:$amount}}
+ {{/if}}
+ {{/load}}
{{* classement par onglet *}}
{{if $type_immo == "managed" && $amort_amount >= $montant_immo}}{{:continue}}{{/if}}
- {{if $status == "unknown" && ! $exist_amort}}{{:continue}}{{/if}}
- {{if $type_immo == "amortized" && $amort_amount < $montant_immo}}{{:continue}}{{/if}} {{* ?? *}}
+ {{if $type_immo == "amortized" && $amort_amount < $montant_immo}}{{:continue}}{{/if}}
{{:assign nb_immo="%d+1"|math:$nb_immo}}
{{:assign total_immo="%d+%d"|math:$total_immo:$montant_immo}}
{{:assign var="montant" from="sommes_immo.%s"|args:$account_code}}
{{:assign var="sommes_immo.%s"|args:$account_code value="%d+%d"|math:$montant:$montant_immo}}
+{{/if}}
diff --git a/_immobilisations_autres.html b/_immobilisations_autres.html
index 1f08e9b..992e20c 100644
--- a/_immobilisations_autres.html
+++ b/_immobilisations_autres.html
@@ -1,199 +1,187 @@
{{* -*- brindille -*- *}}
-{{* Liste des immobilisations non amortissables ou non (encore) gérées *}}
+{{* Liste des immobilisations non gérées ou non entièrement affectées *}}
{{:include file="_get_config.html" keep="module.config"}}
-
+
+ Cette page liste les immobilisations pas encore prises en charge
+ par le module ou les écritures de la balance d'ouverture initiale
+ dont le montant n'est pas encore totalement affecté
+
-
- Cette page liste les écritures pas (encore) prises en charge par le module et sans écriture d'amortissement associée.
-
+{{:assign saved_hides=$module.config.hides}}
+{{:assign var="user_hides" from="saved_hides.%s"|args:$logged_user.id}}
- {{:assign saved_hides=$module.config.hides}}
- {{:assign var="user_hides" from="saved_hides.%s"|args:$logged_user.id}}
-
- {{if $_POST|count == 0}}
- {{:assign unhide=$user_hides.unhide_other}}
+{{if $_POST|count == 0}}
+ {{:assign unhide=$user_hides.unhide_other}}
+{{else}}
+ {{if $_POST.unhide == null}}
+ {{:assign unhide=0}}
{{else}}
- {{if $_POST.unhide == null}}
- {{:assign unhide=0}}
- {{else}}
- {{:assign unhide=1}}
+ {{:assign unhide=1}}
+ {{/if}}
+ {{:assign var="user_hides.unhide_other" value=$unhide"}}
+ {{:assign var="saved_hides.%s"|args:$logged_user.id value=$user_hides}}
+ {{:save key="config" hides=$saved_hides}}
+{{/if}}
+{{if $unhide}}
+ {{:assign checked="checked"}}
+{{/if}}
+
+{{* vérifier l'existence de la table du module *}}
+{{if $module.table != null}}
+ {{:assign columns="$$.status as status, SUM($$.amount) as amount,"}}
+ {{:assign table_join="LEFT JOIN !table AS info ON $$.line = line.id"}}
+ {{:assign doc_condition="($$.status IS NULL OR $$.status == 'managed' OR $$.status == 'ignored')"}}
+{{else}}
+ {{:assign columns=""}}
+ {{:assign table_join=""}}
+ {{:assign doc_condition="1"}}
+{{/if}}
+
+{{*
+ lister les immobilisations non prises en charge par le module
+ ou dont le montant n'a pas été totalement affecté
+*}}
+{{:assign account_condition="("}}
+{{#foreach from=$module.config.prefixes item="code"}}
+ {{:assign code=$code|cat:"%"|quote_sql}}
+ {{:assign account_condition=$account_condition|cat:" account.code LIKE "|cat:$code|cat:" OR "}}
+{{/foreach}}
+{{:assign account_condition=$account_condition|cat:"0)"}}
+
+{{if $unhide == null}}
+ {{:assign filter_condition="NOT ("}}
+ {{#foreach from=$module.config.filters item="filter"}}
+ {{:assign filter="%"|cat:$filter|cat:"%"|quote_sql}}
+ {{:assign filter_condition=$filter_condition|cat:" trans_label LIKE "|cat:$filter|cat:" OR "}}
+ {{/foreach}}
+ {{:assign filter_condition=$filter_condition|cat:"0)"}}
+{{else}}
+ {{:assign filter_condition="1"}}
+{{/if}}
+
+{{:assign condition=$account_condition|cat:" AND debit > 0 AND NOT (trans.status & 16) AND "|cat:$filter_condition|cat:" AND "|cat:$doc_condition}}
+
+{{:assign nb_managed=0}}
+{{:assign nb_ignored=0}}
+{{:assign nb_null=0}}
+{{:assign nb_other=0}}
+{{#select
+ trans.id as immo_trans_id,
+ trans.label as trans_label,
+ trans.date as trans_date,
+ line.id as immo_line_id,
+ line.debit AS debit,
+ line.label AS line_label,
+ account.id as account_id,
+ account.code as account_code,
+ account.label as account_label,
+ !columns
+ trans.id_year as trans_id_year
+ FROM acc_transactions AS trans
+ INNER JOIN acc_transactions_lines AS line ON line.id_transaction = trans.id
+ INNER JOIN acc_accounts AS account ON line.id_account = account.id
+ INNER JOIN acc_years AS years ON trans.id_year = years.id
+ !table_join
+ WHERE !condition
+ GROUP BY immo_line_id
+ ORDER BY trans.date DESC;
+ !columns=$columns
+ !table_join=$table_join
+ !table=$module.table
+ !condition=$condition
+ assign="immo_line"
+ }}
+ {{*
+ parmi les immos gérées, ne conserver que celles dont le montant dans le doc est non nul
+ et inférieur au montant de l'écriture d'immo
+ *}}
+ {{if $immo_line.status == 'managed'}}
+ {{if $immo_line.amount == null || $immo_line.amount == 0 || $immo_line.amount == $immo_line.debit}}
+ {{:continue}}
{{/if}}
- {{:assign var="user_hides.unhide_other" value=$unhide"}}
- {{:assign var="saved_hides.%s"|args:$logged_user.id value=$user_hides}}
- {{:save key="config" hides=$saved_hides}}
{{/if}}
- {{if $unhide}}
- {{:assign checked="checked"}}
+ {{if $status == null}}
+ {{:assign nb_null="%d+1"|math:$nb_null}}
+ {{elseif $status == 'managed'}}
+ {{:assign nb_managed="%d+1"|math:$nb_managed}}
+ {{elseif $status == 'ignored'}}
+ {{:assign nb_ignored="%d+1"|math:$nb_ignored}}
+ {{else}}
+ {{:assign nb_other="%d+1"|math:$nb_other}}
{{/if}}
-
+ {{:assign var="immo_lines." value=$immo_line}}
+{{/select}}
+{{*:debug lines=$immo_lines nb_lines=$immo_lines|count nb_null=$nb_null nb_managed=$nb_managed nb_ignored=$nb_ignored nb_other=$nb_other unhide=$unhide*}}
-
-
-
-
N°
-
Date
-
Libellé
-
Montant
-
N° compte
-
Compte
-
-
-
-
+
- {{* vérifier l'existence de la table du module *}}
- {{#load limit="1"}}
- {{:assign columns="$$.duration as duration, $$.status as status,"}}
- {{:assign table_join="LEFT JOIN !table AS info ON $$.line = line.id"}}
- {{:assign doc_condition1="($$.status == 'ignored')"}}
- {{:assign doc_condition2="$$.status IS NULL"}}
- {{else}}
- {{:assign columns=""}}
- {{:assign table_join=""}}
- {{:assign doc_condition1="0"}}
- {{:assign doc_condition2="1"}}
- {{/load}}
+{{if $immo_lines|count > 0}}
+
+
+
+
N°
+
Ligne
+
Date
+
Libellé
+
Montant
+
Affecté
+
Reste
+
N° compte
+
Compte
+
+
+
+
+ {{#foreach from=$immo_lines item="line"}}
- {{* lister les immobilisations *}}
- {{:assign account_condition="("}}
- {{#foreach from=$module.config.prefixes item="code"}}
- {{:assign code=$code|cat:"%"|quote_sql}}
- {{:assign account_condition=$account_condition|cat:" account.code LIKE "|cat:$code|cat:" OR "}}
- {{/foreach}}
- {{:assign account_condition=$account_condition|cat:"0)"}}
-
- {{if $unhide == null}}
- {{:assign filter_condition="NOT ("}}
- {{#foreach from=$module.config.filters item="filter"}}
- {{:assign filter="%"|cat:$filter|cat:"%"|quote_sql}}
- {{:assign filter_condition=$filter_condition|cat:" trans_label LIKE "|cat:$filter|cat:" OR "}}
- {{/foreach}}
- {{:assign filter_condition=$filter_condition|cat:"0)"}}
- {{else}}
- {{:assign filter_condition="1"}}
- {{/if}}
- {{:assign filter_condition="("|cat:$doc_condition2|cat:" AND NOT (trans.status & 16) AND "|cat:$filter_condition|cat:")"}}
-
- {{:assign condition=$account_condition|cat:" AND debit > 0 AND ("|cat:$filter_condition|cat:" OR "|cat:$doc_condition1|cat:")"}}
-
- {{:assign nb_immo=0}}
- {{#select
- trans.id as immo_trans_id,
- trans.label as trans_label,
- trans.date as trans_date,
- line.id as immo_line_id,
- line.debit AS debit,
- line.label AS line_label,
- account.id as account_id,
- account.code as account_code,
- account.label as account_label,
- !columns
- trans.id_year as trans_id_year
- FROM acc_transactions AS trans
- INNER JOIN acc_transactions_lines AS line ON line.id_transaction = trans.id
- INNER JOIN acc_accounts AS account ON line.id_account = account.id
- INNER JOIN acc_years AS years ON trans.id_year = years.id
- !table_join
- WHERE !condition
- ORDER BY trans.date DESC;
- !columns=$columns
- !table_join=$table_join
- !table=$module.table
- !condition=$condition
- }}
- {{:assign trans_url="%s/acc/transactions/details.php?id=%s"|args:$admin_url:$immo_trans_id}}
- {{:assign compte_url="%s/acc/accounts/journal.php?id=%s&year=%s"|args:$admin_url:$account_id:$trans_id_year}}
-
- {{if $status == null}}
- {{:assign status="unknown"}}
- {{/if}}
-
- {{if $unhide == null}}
- {{if $status != "unknown"}}
- {{:continue}}
- {{/if}}
- {{else}}
- {{if $status != "ignored" && $status != "unknown"}}
- {{:continue}}
- {{/if}}
- {{* vérifier si le libellé aurait pu être filtré *}}
- {{#foreach from=$module.config.filters item="filter"}}
- {{if $filter|strpos:$trans_label !== false}}
- {{:assign status="ignored"}}
- {{/if}}
- {{/foreach}}
- {{/if}}
-
- {{* lister les lignes des écritures d'amortissement liées à l'immobilisation *}}
- {{:assign amort_lines=null}}
- {{#select
- l_amort.credit as amort_amount,
- CASE links.id_related = t_immo.id
- WHEN true THEN links.id_transaction
- WHEN false THEN links.id_related
- END as amort_trans_id,
- l_amort.id AS amort_line_id
- FROM acc_transactions_lines as l_immo
- INNER JOIN acc_transactions as t_immo on t_immo.id = l_immo.id_transaction
- INNER JOIN acc_transactions_links as links
- ON (t_immo.id = links.id_transaction OR t_immo.id = links.id_related)
- INNER JOIN acc_transactions_lines as l_amort on amort_trans_id = l_amort.id_transaction
- INNER JOIN acc_accounts AS account ON l_amort.id_account = account.id
- WHERE l_immo.id = :line_id AND l_amort.credit <> 0 AND account.code LIKE '28%';
- :line_id = $immo_line_id|intval
- assign="amort_lines."
- }}
- {{/select}}
- {{:assign amort_amount=0}}
- {{#foreach from=$amort_lines item="line"}}
- {{* voir s'il existe un doc associé à l'écriture d'amortissement *}}
- {{#load type="link"
- where="$$.immo_line_id = :immo_line_id AND $$.amort_trans_id = :amort_trans_id AND $$.amort_line_id = :amort_line_id"
- :immo_line_id = $immo_line_id
- :amort_trans_id = $line.amort_trans_id
- :amort_line_id = $line.amort_line_id
- }}
- {{:assign amort_amount="%d+%d"|math:$amort_amount:$line.amount}}
- {{else}}
- {{* TODO À VÉRIFIER (cas multi-lignes) *}}
- {{:assign amort_amount="%d+%d"|math:$amort_amount:$line.amount}}
- {{/load}}
- {{/foreach}}
- {{if $amort_amount != 0}}
+ {{if $unhide == null}}
+ {{if $status == "ignored"}}
{{:continue}}
{{/if}}
+ {{else}}
+ {{* vérifier si le libellé aurait pu être filtré *}}
+ {{#foreach from=$module.config.filters item="filter"}}
+ {{if $filter|strpos:$trans_label !== false}}
+ {{:assign status="ignored"}}
+ {{/if}}
+ {{/foreach}}
+ {{/if}}
- {{:assign nb_immo="%d+1"|math:$nb_immo}}
-
- Il sera possible de choisir la date de sortie, d'indiquer
- le montant de la cession le cas échéant et de modifier les
- comptes associés.
+ Il sera possible de choisir la date de sortie et d'indiquer
+ le montant de la cession le cas échéant.
- Il existe des écritures d'amortissement qui ne sont pas rattachées à une immobilisation !
- Utilisez le bouton « Rattacher une écriture » pour les afficher ; vous pourrez choisir d'en attacher certaines à cette immobilisation.
-
- {{/if}}
+{{if $free_amort_lines}}
+
+ Il y a des écritures d'amortissement qui ne sont pas rattachées à une immobilisation !
+ Utilisez le bouton « Rattacher un amortissement » pour les afficher ; vous pourrez choisir d'en attacher certaines à cette immobilisation.
+
{{/if}}
{{:form_errors}}
{{:admin_footer}}
diff --git a/attach_amort.html b/attach_amort.html
index 4770afa..31e0ae9 100644
--- a/attach_amort.html
+++ b/attach_amort.html
@@ -1,74 +1,231 @@
{{* -*- brindille -*- *}}
{{*
- Enregistrer la liaison entre une écriture d'amortissement et
- l'écriture d'immobilisation correspondante
+ Enregistrer la liaison entre une ligne d'écriture d'amortissement
+ et une ligne d'écriture d'immobilisation
+ @param immo_doc_id : numéro du doc d'immo
+ @param amort_line_id : numéro de ligne de l'écriture d'amortissement
*}}
-{{* chercher l'écriture d'immobilisation *}}
-{{#select
- id_transaction
- FROM acc_transactions_lines
- WHERE id = :line_id;
- :line_id = $_GET.immo_line_id|intval
-}}
- {{:assign immo_trans_id=$id_transaction}}
+{{* données de l'immobilisation *}}
+{{#load id=$_GET.immo_doc_id|intval assign="info_immo"}}
+ {{:assign label_immo=$label|or:$ligne_immo.trans_label}}
{{else}}
- {{:error message="Impossible de trouver l'écriture d'immobilisation de la ligne « %s »"|args:$_GET.immo_line_id}}
+ {{:error message="Immobilisation non trouvée"}}
+{{/load}}
+
+{{#select
+ line.id_transaction as immo_trans_id,
+ line.debit as montant,
+ trans.label as trans_label,
+ line.label as line_label
+ FROM acc_transactions_lines as line
+ INNER JOIN acc_transactions AS trans ON line.id_transaction = trans.id
+ WHERE line.id = :line_id;
+ :line_id = $info_immo.line
+ assign="ligne_immo"
+}}
+{{else}}
+ {{:error message="Immobilisation non trouvée"}}
{{/select}}
+{{:assign montant_immo=$info_immo.amount|or:$ligne_immo.montant}}
+
+{{if $ligne_immo.line_label != null && $ligne_immo.line_label != $label_immo}}
+ {{:assign label_immo=$label_immo|cat:" — "|cat:$ligne_immo.line_label}}
+{{/if}}
+
{{* chercher l'écriture d'amortissement *}}
{{#select
- id_transaction
- FROM acc_transactions_lines
- WHERE id = :line_id;
+ line.credit as amount,
+ line.label as line_label,
+ trans.date as amort_date,
+ trans.label as trans_label,
+ trans.id as trans_id,
+ acc.code as account_code,
+ acc.label as account_label
+ FROM acc_transactions_lines as line
+ INNER JOIN acc_transactions as trans on line.id_transaction = trans.id
+ INNER JOIN acc_accounts as acc on line.id_account = acc.id
+ WHERE line.id = :line_id;
:line_id = $_GET.amort_line_id|intval
+ assign="amort_line"
}}
- {{:assign amort_trans_id=$id_transaction}}
{{else}}
- {{:error message="Impossible de trouver l'écriture d'amortissement de la ligne « %s »"|args:$_GET.amort_line_id}}
+ {{:error message="Amortissement non trouvé"}}
{{/select}}
+{{:assign trans_url="%s/acc/transactions/details.php?id=%s"|args:$admin_url:$amort_line.trans_id}}
-{{* chercher les liaisons de l'écriture d'immobilisation *}}
-{{#select
- CASE links.id_related = :immo_trans_id
- WHEN true THEN links.id_transaction
- WHEN false THEN links.id_related
- END as linked_id
- FROM acc_transactions_links as links
- WHERE id_transaction = :immo_trans_id or id_related = :immo_trans_id;
- :immo_trans_id = $immo_trans_id
-}}
- {{:assign var="linked_transactions." value=$linked_id}}
-{{/select}}
-
-{{* ajouter la nouvelle liaison *}}
-{{:assign var="linked_transactions." value=$amort_trans_id}}
-{{:api
- method="POST"
- path="accounting/transaction/%s/transactions"|args:$immo_trans_id
- assign="result"
- assign_code="result_code"
- transactions=$linked_transactions
-}}
-
-{{* vérifier si cette liaison est déjà présente dans les documents pour éviter les doublons *}}
-{{#load type="link"
- where="$$.immo_line_id = :immo_line_id AND
- $$.amort_trans_id = :amort_trans_id AND
- $$.amort_line_id = :amort_line_id"
- :immo_line_id=$_GET.immo_line_id|intval
- :amort_trans_id = $amort_trans_id
+{{* montant de l'écriture d'amortissement déjà affecté *}}
+{{:assign montant_affecte=0}}
+{{#load type="amort_link" assign="linked_amort."
+ where="$$.amort_line_id = :amort_line_id"
:amort_line_id = $_GET.amort_line_id|intval
- limit=1
}}
-{{else}}
- {{:save
- key=""|uuid
- type="link"
- immo_line_id=$_GET.immo_line_id|intval
- amort_line_id=$_GET.amort_line_id|intval
- amort_trans_id=$amort_trans_id
- }}
+ {{:assign montant_affecte="%d+%d"|math:$montant_affecte:$amount}}
{{/load}}
-{{:redirect force="amortization.html?immo_line_id=%s&ok=1&msg=attach&trans_id=%s"|args:$_GET.immo_line_id:$amort_trans_id}}
+{{:assign reste="%d-%d"|math:$amort_line.amount:$montant_affecte}}
+
+{{* Traiter l'envoi du formulaire *}}
+{{#form on="save"}}
+ {{* vérifier que le montant saisi est inférieur au reste *}}
+ {{if $_POST.montant == null || $_POST.montant == 0}}
+ {{:assign montant_amort=$reste}}
+ {{if $montant_affecte == 0}}
+ {{:assign saved_amount=null}}
+ {{else}}
+ {{:assign saved_amount=$reste}}
+ {{/if}}
+ {{else}}
+ {{:assign montant_amort=$_POST.montant|money_int}}
+ {{if $montant_amort > $reste}}
+ {{:assign reste_nb="%f"|math:$reste|money_currency:false}}
+ {{:error message="Le montant de l'amortissement ne peut être supérieur au reste (%s)"|args:$reste_nb}}
+ {{/if}}
+ {{if $montant_amort == $amort_line.amount}}
+ {{:assign saved_amount=null}}
+ {{else}}
+ {{:assign saved_amount=$montant_amort}}
+ {{/if}}
+ {{/if}}
+
+ {{* vérifier que le montant total des amortissements ne dépasse pas la valeur de l'immo *}}
+ {{* montant de l'immo *}}
+ {{:assign total_credits=0}}
+ {{#load
+ type="credit_link"
+ where="$$.immo_doc_id = :immo_doc_id" :immo_doc_id = $_GET.immo_doc_id|intval
+ }}
+ {{if $amount == null}}
+ {{#select credit FROM acc_transactions_lines WHERE id = :credit_line_id;
+ :credit_line_id=$credit_line_id
+ }}
+ {{:assign total_credits="%d+%d"|math:$total_credits:$credit}}
+ {{/select}}
+ {{else}}
+ {{:assign total_credits="%d+%d"|math:$total_credits:$amount}}
+ {{/if}}
+ {{/load}}
+ {{:assign montant_immo="%d-%d"|math:$montant_immo:$total_credits}}
+
+ {{* montant des amortissements *}}
+ {{:assign total_amort=0}}
+ {{#load
+ type="amort_link"
+ where="$$.immo_doc_id = :immo_doc_id"
+ :immo_doc_id=$_GET.immo_doc_id|intval
+ }}
+ {{if $amount == null || $amount == 0}}
+ {{#select
+ line.credit
+ FROM acc_transactions_lines AS line
+ INNER JOIN acc_transactions AS trans ON line.id_transaction = trans.id
+ INNER join acc_accounts AS account on line.id_account = account.id
+ WHERE line.id = :amort_line_id
+ ;
+ :amort_line_id = $amort_line_id
+ }}
+ {{:assign total_amort="%d+%d"|math:$total_amort:$credit}}
+ {{/select}}
+ {{else}}
+ {{:assign total_amort="%d+%d"|math:$total_amort:$amount}}
+ {{/if}}
+ {{/load}}
+
+ {{:assign vnc="%d-%d"|math:$montant_immo:$total_amort}}
+ {{:assign total_amort="%d+%d"|math:$total_amort:$montant_amort}}
+ {{if $total_amort > $montant_immo}}
+ {{:assign ma="%f"|math:$montant_amort|money_currency:false}}
+ {{:assign vnc="%f"|math:$vnc|money_currency:false}}
+ {{:error message="Le montant de l'amortissement (%s) dépasse la valeur résiduelle de l'immobilisation (%s)"|args:$ma:$vnc}}
+ {{/if}}
+
+ {{* chercher les liaisons de l'écriture d'immobilisation *}}
+ {{#select
+ CASE links.id_related = :immo_trans_id
+ WHEN true THEN links.id_transaction
+ WHEN false THEN links.id_related
+ END as linked_id
+ FROM acc_transactions_links as links
+ WHERE id_transaction = :immo_trans_id or id_related = :immo_trans_id;
+ :immo_trans_id = $ligne_immo.immo_trans_id
+ }}
+ {{:assign var="linked_transactions." value=$linked_id}}
+ {{/select}}
+
+ {{* ajouter la nouvelle liaison *}}
+ {{:assign var="linked_transactions." value=$amort_line.trans_id}}
+ {{:api
+ method="POST"
+ path="accounting/transaction/%s/transactions"|args:$ligne_immo.immo_trans_id
+ assign="result"
+ assign_code="result_code"
+ transactions=$linked_transactions
+ }}
+
+ {{* vérifier si cette liaison est déjà présente dans les documents pour éviter les doublons *}}
+ {{* TODO voir si nécessaire ? *}}
+ {{#load type="amort_link"
+ where="$$.immo_doc_id = :immo_doc_id AND $$.amort_line_id = :amort_line_id"
+ :immo_doc_id=$_GET.immo_doc_id|intval
+ :amort_line_id = $_GET.amort_line_id|intval
+ limit=1
+ }}
+ {{else}}
+ {{:save
+ key=""|uuid
+ type="amort_link"
+ immo_doc_id=$_GET.immo_doc_id|intval
+ amort_line_id=$_GET.amort_line_id|intval
+ amount=$saved_amount
+ }}
+ {{/load}}
+
+ {{* immo soldée ? *}}
+ {{if $total_amort == $montant_immo}}
+ {{:assign status="amortized"}}
+ {{:save
+ key=$info_immo.key
+ status=$status
+ }}
+ {{/if}}
+
+ {{:redirect force="amortization.html?immo_doc_id=%s&type_immo=%s&ok=1&msg=attach_amort"|args:$_GET.immo_doc_id:$status}}
+{{/form}}
+
+{{:admin_header title="Amortir l'immobilisation" custom_css="./style.css" current="module_amortization"}}
+
+{{* barre de navigation *}}
+{{if ! $dialog}}
+ {{:include file="_nav.html" current="config" subcurrent="init" subsubcurrent="parameter"}}
+{{/if}}
+{{:form_errors}}
+
+