noalyss Version-9
NOALYSS : serveur de comptabilité et ERP (2002)
Loading...
Searching...
No Matches
operation_exercice.class.php
Go to the documentation of this file.
1<?php
2/*
3 * This file is part of NOALYSS.
4 *
5 * NOALYSS is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published by
7 * the Free Software Foundation; either version 2 of the License, or
8 * (at your option) any later version.
9 *
10 * NOALYSS is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 * GNU General Public License for more details.
14 *
15 * You should have received a copy of the GNU General Public License
16 * along with NOALYSS; if not, write to the Free Software
17 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
18*/
19// Copyright Author Dany De Bontridder danydb@aevalys.eu 6/01/24
20/*!
21 * \file
22 * \brief Special operations end or start of exercice
23 */
24
25/**
26 * @class Operation_Exercice
27 * @brief Special operations end or start of exercice
28 */
30{
32
33
34 public function __construct($p_id = -1)
35 {
36 $this->operation_exercice_sql = new Operation_Exercice_SQL(Dossier::connect(), $p_id);
37 }
38
39 /**
40 * @brief input the source of the data : folder, exercice, closing or opening operation
41 * @return void
42 */
43 public static function input_source()
44 {
45 require NOALYSS_TEMPLATE . "/operation_exercice-input_source.php";
46 }
47
48 function display_result()
49 {
50 $date = new IDate("exercice_date");
51 $date->id = "exercice_date";
52 $date->value = format_date($this->operation_exercice_sql->getp("oe_date"), "DD.MM.YYYY");
53 $inplace_date = new Inplace_Edit($date);
54 $inplace_date->add_json_param("op", "operation_exercice+date");
55 $inplace_date->add_json_param("gDossier", Dossier::id());
56 $inplace_date->add_json_param("oe_id", $this->operation_exercice_sql->oe_id);
57 $inplace_date->set_callback("ajax_misc.php");
58 echo _("Date"), $inplace_date->input();
59
60 $text_operation = new IText("text_operation");
61 $text_operation->id = uniqid("text");
62 $text_operation->size = 80;
63 $text_operation->value = $this->operation_exercice_sql->getp("oe_text");
64 $inplace_text = new Inplace_Edit($text_operation);
65 $inplace_text->add_json_param("op", "operation_exercice+text");
66 $inplace_text->add_json_param("gDossier", Dossier::id());
67 $inplace_text->add_json_param("oe_id", $this->operation_exercice_sql->oe_id);
68 $inplace_text->set_callback("ajax_misc.php");
69 echo $inplace_text->input();
70
71 $cn = Dossier::connect();
72 // get data
73 $a_data = $cn->get_array("
74 SELECT oed_id
75 , oe_id
76 , oed_poste
77 , oed_qcode
78 , oed_label
79 , oed_amount
80 , oed_debit
81 FROM public.operation_exercice_detail
82 where
83 oe_id=$1
84 order by oed_debit desc,oed_poste,oed_qcode
85
86 ", [$this->operation_exercice_sql->oe_id]);
87 $aheader = array(_("Poste"), _("Fiche"), _("Libellé"), _("Montant"), _("Débit/Crédit"));
88 echo '<div></div>';
89 echo \HtmlInput::filter_table("operation_exercice_tb", '0,1,2,3,4', 1);
90 echo \HtmlInput::button_action(_("Ajouter une ligne"), sprintf("operation_exercice.modify_row('-1','%s')", $this->operation_exercice_sql->oe_id));
91 echo '<table class="result" id="operation_exercice_tb">';
92 foreach ($aheader as $header) echo th($header, 'style="text-align:center"');
93 echo th("");
94
95 foreach ($a_data as $data) {
96 $this->display_row($data);
97 }
98 echo '</table>';
99 echo \HtmlInput::button_action(_("Ajouter une ligne"), sprintf("operation_exercice.modify_row('-1','%s')", $this->operation_exercice_sql->oe_id));
100 $this->display_total();
101 echo Dossier::hidden();
102 $js = <<<EOF
103(function() {
104 $$(".op-exercice").forEach(item=>item.addEventListener("click",function(event) {operation_exercice.click_modify_row(item)}));
105 })();
106EOF;
107 echo create_script($js);
108 }
109
110 /**
111 * @brief display the balance (total) of the operation
112 * @param bool $with_span if yes add the span wrapper , otherwise doesn't add it
113 */
114 public function display_total($with_span = true)
115 {
116 $cn = Dossier::connect();
117 $sql_total = "
118 with saldo_deb_cred as
119(
120 select
121 case when oed_debit is true then oed_amount else 0-oed_amount end signed_amount ,
122 case when oed_debit is true then oed_amount end debit,
123 case when oed_debit is false then oed_amount end credit
124 from public.operation_exercice_detail
125 where oe_id=$1
126)
127select sum(signed_amount) delta,sum(debit) debit,sum(credit) credit from saldo_deb_cred
128 ";
129 $total = $cn->get_row($sql_total, [$this->operation_exercice_sql->oe_id]);
130 if ($with_span) {
131 echo '<span id="tot_ope_exe" style="margin-left:20%">';
132 }
133 $style = 'style="display:inline-block;padding:1rem;margin:1rem;border:1px solid navy;width:20%;text-align:center;font-size:140%"';
134
135 echo span(sprintf(_("Débit %s"), nbm($total['debit'])), $style);
136 echo span(sprintf(_("Crédit %s"), nbm($total['credit'])), $style);
137 $s = "";
138 if ($total['delta'] > 0) {
139 $s = " Solde débiteur ";
140 }
141 if ($total['delta'] < 0) {
142 $s = " Solde créditeur ";
143 }
144 echo span($s . " " . nbm($total['delta']), $style);
145 if ($with_span) {
146 echo '</span>';
147 }
148 }
149
150 /**
151 * @brief let display one row
152 * @param $data array row of operation_exercice_detail [oed_id, oe_id, oed_poste, oed_qcode oed_label
153 * oed_amount oed_debit]
154 * @return void
155 * @see Operation_Exercice_Detail_SQL
156 */
157 function display_row($data, $row_tr = true)
158 {
159 if ($row_tr) printf('<tr class="op-exercice even" id="oe_%s" oed_id="%s" oe_id="%s">', $data['oed_id'], $data['oed_id'], $data['oe_id']);
160 echo td($data['oed_poste']);
161 echo td($data['oed_qcode']);
162 echo td(h($data['oed_label']));
163 echo td(nbm($data['oed_amount']), 'class="num"');
164 echo td(($data['oed_debit'] == 'f' ? _("Crédit") : _("Débit")), 'style="text-align:center"');
165 echo td(\Icon_Action::modify(uniqid(), sprintf("operation_exercice.modify_row('%s','%s')", $data['oed_id'], $data['oe_id'])));
166
167
168 if ($row_tr) print ('</tr >');
169 }
170
171 /**
172 * @brief input one row of operation_exercice
173 * @param $data array row of operation_exercice_detail [oed_id, oe_id, oed_poste, oed_qcode oed_label
174 * oed_amount oed_debit]
175 * @return void
176 * @see Operation_Exercice_Detail_SQL
177 */
178 public static function input_row(Operation_Exercice_Detail_SQL $operation_detail_sql)
179 {
180 $operation=new Operation_Exercice_SQL($operation_detail_sql->get_cn(),$operation_detail_sql->getp("oe_id"));
181 if ( $operation->getp("oe_transfer_date") !="") {
182 require_once NOALYSS_TEMPLATE . "/operation_exercice-input_row-error.php";
183 return;
184 }
185
186 require_once NOALYSS_TEMPLATE . "/operation_exercice-input_row.php";
187 }
188
189 /**
190 * @brief input data for transfering
191 * @return void
192 */
193 function input_transfer()
194 {
196 if ( $operation->getp("oe_transfer_date") !="") {
197 echo '<span class="warning">';
198 printf(_("Opération transférée le %s")
199 ,$operation->getp("oe_transfer_date") );
200 echo '</span>';
201 return;
202 }
203 require_once NOALYSS_TEMPLATE . "/operation_exercice-input_transfer.php";
204 }
205
206 /**
207 * @brief transfer to accountancy
208 * @param $ledger_id int the ledger id (jrn_def_id)
209 * @return void
210 */
212 {
213 global $oe_result; // result of operation
214 global $oe_data; // transform data to array used by Acc_Ledger::insert
215 global $oe_status ; // status OK or NOK
216 $cn = Dossier::connect();
217
218 $this->transform($ledger_id);
219
220 $oe_status = "OK";
222 try {
223 $cn->start();
224 if ($this->operation_exercice_sql->getp("oe_transfer_date")!="") throw new \Exception("duplicate",EXC_DUPLICATE);
225 if ( empty($oe_data['e_date'] ) ) throw new \Exception ("Date null",2);
226 $ledger->verify_operation($oe_data);
227 $ledger->save($oe_data);
228 $oe_result=_("Détail opération");
229 $oe_result.=sprintf('<a class="detail" style="display:inline" href="javascript:modifyOperation(%d,%d)">%s</a><hr>',
230 $ledger->jr_id, dossier::id(), $ledger->internal);
231
232 $cn->exec_sql("update operation_exercice set oe_transfer_date=to_timestamp($1,'DD.MM.YY HH24:MI') , jr_internal=$2 where oe_id=$3",
233 [date('d.m.Y H:i'),$ledger->internal,$this->operation_exercice_sql->oe_id]);
234
235 $cn->commit();
236 return true;
237 } catch (\Exception $e) {
238 $oe_result=$e->getMessage();
239
240 $oe_status='NOK';
241 $cn->rollback();
242 }
243 return false;
244
245 }
246
247 /**
248 * @brief Transform the data in table OPERATION_EXERCICE and OPERATION_EXERCICE_DETAIL into an array usable
249 * by Acc_Ledger, the result will be stored into the global variable $oe_data
250 * @globals $oe_data array with the data transformed
251 * @param $ledger_id
252 * @return void
253 * @throws Exception
254 */
256 {
257 global $oe_data; // transform data to array used by Acc_Ledger::verify_operation
258 $cn = Dossier::connect();
259 $acc_ledger=new \Acc_Ledger($cn, $ledger_id);
260 $oe_data = array();
261 $oe_data['p_currency_code'] = 0;
262 $oe_data['p_currency_rate'] = 1;
263 $oe_data['p_jrn'] = $ledger_id;
264 $oe_data['e_date'] = $this->operation_exercice_sql->oe_date;
265 $oe_data['desc']=$this->operation_exercice_sql->getp("oe_text");
266 $operation_detail_sql = new Operation_Exercice_Detail_SQL($cn);
267 $all_operation = $operation_detail_sql->collect_objects(' where oe_id = $1',[$this->operation_exercice_sql->oe_id]);
268 $nb = 0;
269 foreach ($all_operation as $item) {
270 $oe_data['qc_' . $nb] = $item->oed_qcode;
271 $oe_data['poste' . $nb] = $item->oed_poste;
272 $oe_data['ld' . $nb] = $item->oed_label;
273 $oe_data['amount' . $nb] = $item->oed_amount;
274
275 if ($item->oed_debit == "t") $oe_data['ck' . $nb] = 't';
276 $nb++;
277 }
278 $oe_data['nb_item']=$nb;
279 $oe_data['e_pj']=$acc_ledger->guess_pj();
280 $oe_data['e_pj_suggest']=$acc_ledger->guess_pj();
281 $oe_data['mt']=microtime(true);
282 $oe_data['jr_optype']=($this->operation_exercice_sql->getp('oe_type')=='opening')?'OPE':'CLO';
283
284 }
285
286 public static function list_draft()
287 {
288
289 require_once NOALYSS_TEMPLATE."/operation_exercice-list_draft.php";
290
291 }
292
293 public static function delete($aOperation_id)
294 {
295 $cn=Dossier::connect();
296 foreach ($aOperation_id as $operation_id)
297 {
298 $cn->exec_sql("delete from operation_exercice where oe_id=$1",[$operation_id]);
299 }
300 }
301
306
308 {
309 $this->operation_exercice_sql = $operation_exercice_sql;
310 return $this;
311
312 }
313
314
315}
format_date($p_date, $p_from_format='YYYY-MM-DD', $p_to_format='DD.MM.YYYY')
format the date, when taken from the database the format is MM-DD-YYYY
th($p_string, $p_extra='', $raw='')
Definition ac_common.php:58
span($p_string, $p_extra='')
Definition ac_common.php:43
td($p_string='', $p_extra='')
surround the string with td
Definition ac_common.php:83
nbm($p_number, $p_dec=2)
format the number with a sep.
h( $row[ 'oa_description'])
if(isNumber($jr_id)==0) $ledger_id
_("actif, passif,charge,...")
Class for jrn, class acc_ledger for manipulating the ledger AND some acc.
getp($p_string)
set the value thanks the alias name instead of the colum name
Html Input : Input a date format dd.mm.yyyy The property title should be set to indicate what it is e...
Html Input.
static modify($p_id, $p_javascript)
Display the icon to modify a idem.
Inplace_edit class for ajax update of HtmlInput object.
abstract of the table operation_exercice_detail
abstract of the table public.operation_exercice
Special operations end or start of exercice.
static input_row(Operation_Exercice_Detail_SQL $operation_detail_sql)
input one row of operation_exercice
submit_transfer($ledger_id)
transfer to accountancy
transform($ledger_id)
Transform the data in table OPERATION_EXERCICE and OPERATION_EXERCICE_DETAIL into an array usable by ...
display_row($data, $row_tr=true)
let display one row
static input_source()
input the source of the data : folder, exercice, closing or opening operation
input_transfer()
input data for transfering
display_total($with_span=true)
display the balance (total) of the operation
set_operation_exercice_sql(Operation_Exercice_SQL $operation_exercice_sql)
if( $t !=-1) $total
Definition compute.php:80
const EXC_DUPLICATE
Definition constant.php:345
if(count($a_accounting)==0) $header
create_script($p_string)
create the HTML for adding the script tags around of the script
print
Type of printing.