{{* -*- brindille -*- *}}

{{*
	Enregistrer la liaison entre une écriture d'immobilisation et
	une écriture de sortie d'immobilisation
	@param immo_doc_id  : id du document associé à l'immobilisation
	@param exit_line_id : ligne de l'écriture de sortie d'immobilisation
*}}

{{* données de l'immobilisation *}}
{{:include file="_get_immo_data.html" immo_doc_id=$_GET.immo_doc_id keep="info_immo, ligne_immo, message"}}
{{if $message != null}}
	{{:error message=$message}}
{{/if}}

{{* chercher l'écriture de sortie d'immobilisation *}}
{{#select
	id_transaction
	FROM acc_transactions_lines
	WHERE id = :line_id;
	:line_id = $_GET.exit_line_id|intval
}}
	{{:assign rebut_id=$id_transaction}}
{{else}}
	{{:error message="Impossible de trouver l'écriture de sortie d'immobilisation"}}
{{/select}}

{{* 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.trans_id
}}
	{{:assign var="linked_transactions." value=$linked_id}}
{{/select}}

{{* ajouter la nouvelle liaison *}}
{{:assign var="linked_transactions." value=$rebut_id}}

{{* Enregistrer les liaisons *}}
{{:api
	method="POST"
	path="accounting/transaction/%s/transactions"|args:$ligne_immo.trans_id
	assign="result"
	assign_code="result_code"
	transactions=$linked_transactions
}}

{{* enregistrer la liaison de l'écriture de sortie *}}
{{:save
	key=""|uuid
	type="exit_link"
	immo_doc_id=$info_immo.id
	exit_line_id=$_GET.exit_line_id|intval
}}

{{:redirect to="exit_step3.html?immo_doc_id=%s&ok=1&msg=attach_exit"|args:$_GET.immo_doc_id}}