Improved journal trans: added currency support, tax and source document date. Allowed...
[fa-stable.git] / gl / includes / ui / gl_journal_ui.inc
1 <?php
2 /**********************************************************************
3     Copyright (C) FrontAccounting, LLC.
4         Released under the terms of the GNU General Public License, GPL, 
5         as published by the Free Software Foundation, either version 3 
6         of the License, or (at your option) any later version.
7     This program is distributed in the hope that it will be useful,
8     but WITHOUT ANY WARRANTY; without even the implied warranty of
9     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  
10     See the License here <http://www.gnu.org/licenses/gpl-3.0.html>.
11 ***********************************************************************/
12 include_once($path_to_root . "/includes/ui.inc");
13 include_once($path_to_root . "/includes/ui/items_cart.inc");
14
15 //--------------------------------------------------------------------------------
16
17 function display_order_header(&$Order)
18 {
19         global $Ajax;
20
21         $qes = has_quick_entries(QE_JOURNAL);
22         $new = $Order->order_id==0;
23         start_outer_table(TABLESTYLE2, "width='90%'");
24         table_section(1);
25
26     date_row(_("Journal Date:"), 'date_', '', $new, 0,0,0,null, true);
27     if (input_changed('date_'))
28     {
29         unset($_POST['ref']);
30         $Ajax->activate('ref');
31     }
32
33         currencies_list_row(_('Currency:'), 'currency', null, true);
34         if (list_updated('currency'))
35                 unset($_POST['_ex_rate']);
36         exchange_rate_display(get_company_pref('curr_default'), get_post('currency'), get_post('date_'), true);
37
38         if (list_updated('currency'))
39                 $Order->clear_items();
40
41         table_section(2);
42
43     date_row(_("Document Date:"), 'doc_date', '', $new);
44     date_row(_("Event Date:"), 'event_date', '', $new);
45     text_row(_("Source ref:"), 'source_ref', null, 30, 60);
46
47         if ($new) {
48                 table_section(3);
49         }
50
51         ref_row(_("Reference:"), 'ref', null, get_post('ref'), false, ST_JOURNAL, get_post('date_'));
52         hidden('ref_original');
53
54         if ($qes !== false)
55         {
56                 table_section(3);
57                 quick_entries_list_row(_("Quick Entry").":", 'quick', null, QE_JOURNAL, true);
58
59                 start_row();
60                 $qid = get_quick_entry(get_post('quick'));
61                 if (list_updated('quick')) {
62                         unset($_POST['totamount']); // enable default
63                 $Ajax->activate('totamount');
64                 }
65                 end_row();
66                 if ($qid['bal_type'] == 1)
67                 {
68                         $accname = get_gl_account_name($qid['base_desc']);
69                         label_row(($qid['base_amount'] == 0 ? _("Yearly") : _("Monthly")) . " ". _("balance from account")." ".
70                                 $qid['base_desc']." ".$accname."&nbsp;&nbsp;".submit('go', _("Go"), false, false, true),'', "colspan=2");
71                 }
72                 else
73                 {
74                         text_row(_('Additional info:'), 'aux_info', null, 35, 255);
75                         amount_row($qid['base_desc'].":", 'totamount', price_format($qid['base_amount']),
76                                 null, "&nbsp;&nbsp;".submit('go', _("Go"), false, false, true));
77                 }
78
79         }
80
81         check_row(_('Include in tax register:'), 'taxable_trans', null, true);
82         end_outer_table(1);
83 }
84
85 //---------------------------------------------------------------------------------
86
87 function display_gl_items($title, &$order)
88 {
89         global $path_to_root;
90
91         display_heading($title);
92
93         $dim = get_company_pref('use_dimension');
94
95         $id = find_submit('Edit');
96         $sub_type = is_subledger_account(get_post('code_id'));
97         $has_subaccounts = $order->has_sub_accounts();
98
99     div_start('items_table');
100         start_table(TABLESTYLE, "width='95%'");
101         if ($dim == 2)
102                 $th = array(_("Account Code"), _("Account Description"), _("Dimension")." 1",
103                         _("Dimension")." 2", _("Debit"), _("Credit"), _("Memo"), "");
104         else if ($dim == 1)
105                 $th = array(_("Account Code"), _("Account Description"), _("Dimension"),
106                         _("Debit"), _("Credit"), _("Memo"), "");
107         else
108                 $th = array(_("Account Code"), _("Account Description"),
109                         _("Debit"), _("Credit"), _("Memo"), "");
110
111         if (count($order->gl_items)) $th[] = '';
112         if ($sub_type || $has_subaccounts)
113                 array_insert($th, 2, _("Counterparty"));
114
115         table_header($th);
116
117         $k = 0;
118
119         if ($id == -1) 
120                 $id = get_post('Index', -1);
121
122         foreach ($order->gl_items as $line => $item) 
123         {
124                 if ($id != $line)
125                 {
126                 alt_table_row_color($k);
127
128                         $acc = $item->code_id . ($item->person_id ? sprintf(' %05d', $item->person_id) : '');
129                         label_cells($acc, $item->description);
130
131                 if ($sub_type || $has_subaccounts)
132                         label_cell($item->person_name);
133
134                 if ($dim >= 1)
135                                 label_cell(get_dimension_string($item->dimension_id, true));
136                 if ($dim > 1)
137                                 label_cell(get_dimension_string($item->dimension2_id, true));
138                 if ($item->amount > 0)
139                 {
140                         amount_cell(abs($item->amount));
141                         label_cell("");
142                 }
143                 else
144                 {
145                         label_cell("");
146                         amount_cell(abs($item->amount));
147                 }       
148                         label_cell($item->reference);
149
150                         edit_button_cell("Edit$line", _("Edit"),
151                                 _('Edit journal line'));
152                         delete_button_cell("Delete$line", _("Delete"),
153                                 _('Remove line from journal'));
154                 end_row();
155                 } 
156                 else 
157                 {
158                         gl_edit_item_controls($order, $dim, $item->person_id, $line);
159                 }
160         }
161
162         if ($id == -1)
163                 gl_edit_item_controls($order, $dim, $sub_type);
164
165         if ($order->count_gl_items()) 
166         {
167                 $colspan = ($dim == 2 ? "4" : ($dim == 1 ? "3" : "2")) + ($sub_type || $has_subaccounts ? 1 : 0);
168                 start_row();
169                 label_cell(_("Total"), "align=right colspan=" . $colspan);
170                 amount_cell($order->gl_items_total_debit());
171                 amount_cell(abs($order->gl_items_total_credit()));
172                 label_cell('', "colspan=3");
173                 end_row();
174         }
175
176     end_table();
177         div_end();
178 }
179
180 //---------------------------------------------------------------------------------
181
182 function gl_edit_item_controls(&$order, $dim, $sub_accounts, $Index=null)
183 {
184         global $Ajax;
185         start_row();
186
187         $id = find_submit('Edit');
188         if ($id == -1) 
189                 $continue = $id = get_post('Index', -1);
190
191         if ($Index != -1 && $Index == $id)
192         {
193             // Modifying an existing row
194                 $item = $order->gl_items[$Index];
195                 if (!isset($continue))
196                 {
197                         $_POST['code_id'] = $item->code_id;
198                         $_POST['dimension_id'] = $item->dimension_id;
199                         $_POST['dimension2_id'] = $item->dimension2_id;
200                         $_POST['person_id'] = $item->person_id;
201                         if ($item->amount > 0)
202                         {
203                                 $_POST['AmountDebit'] = price_format($item->amount);
204                                 $_POST['AmountCredit'] = "";
205                         }
206                         else
207                         {
208                                 $_POST['AmountDebit'] = "";
209                                 $_POST['AmountCredit'] = price_format(abs($item->amount));
210                         }
211                         $_POST['description'] = $item->description;
212                         $_POST['LineMemo'] = $item->reference;
213                 }
214                 hidden('Index', $id);
215                 $skip_bank = !$_SESSION["wa_current_user"]->can_access('SA_BANKJOURNAL');
216                 echo gl_all_accounts_list('code_id', null, $skip_bank, true, _('[Select account]'), true, false, false);
217
218                 if (is_subledger_account(get_post('code_id')))
219                 {       // for home currency postings show all customers
220                         $sel_cur = get_post('currency', $order->currency);
221                         subledger_list_cells(null, 'person_id', get_post('code_id'), null, false, false,
222                                 get_company_currency() == $sel_cur  ? null : $sel_cur);
223                 } elseif ($order->has_sub_accounts())
224                         label_cell('');
225                 if ($dim >= 1) 
226                         dimensions_list_cells(null, 'dimension_id', null, true, " ", false, 1);
227                 if ($dim > 1) 
228                         dimensions_list_cells(null, 'dimension2_id', null, true, " ", false, 2);
229             $Ajax->activate('items_table');
230         }
231         else
232         {
233                 $skip_bank = !$_SESSION["wa_current_user"]->can_access('SA_BANKJOURNAL');
234                 echo gl_all_accounts_list('code_id', null, $skip_bank, true, _('[Select account]'), true, false, false);
235                 if ($sub_accounts)
236                 {
237                         // for home currency postings show all customers
238                         $sel_cur = get_post('currency', $order->currency);
239                         subledger_list_cells(null, 'person_id', get_post('code_id'), null, false, false,
240                                 get_company_currency() == $sel_cur  ? null : $sel_cur);
241                 }
242                 elseif ($order->has_sub_accounts())
243                         label_cell('');
244
245                 if ($dim >= 1)
246                         dimensions_list_cells(null, 'dimension_id', null, true, " ", false, 1);
247                 if ($dim > 1)
248                         dimensions_list_cells(null, 'dimension2_id', null, true, " ", false, 2);
249         }
250
251         if (get_post('_code_id_update'))
252         {
253             $Ajax->activate('code_id');
254                 set_focus($sub_accounts ? 'person_id' : 'AmountDebit');
255         }
256         if ($dim < 1)
257                 hidden('dimension_id', 0);
258         if ($dim < 2)
259                 hidden('dimension2_id', 0);
260
261         small_amount_cells(null, 'AmountDebit');
262         small_amount_cells(null, 'AmountCredit');
263         text_cells_ex(null, 'LineMemo', 35, 255);
264
265         if ($id != -1)
266         {
267                 button_cell('UpdateItem', _("Update"),
268                                 _('Confirm changes'), ICON_UPDATE);
269                 button_cell('CancelItemChanges', _("Cancel"),
270                                 _('Cancel changes'), ICON_CANCEL);
271                 set_focus('amount');
272         } 
273         else 
274                 submit_cells('AddItem', _("Add Item"), "colspan=2",
275                     _('Add new line to journal'), true);
276
277         end_row();
278 }
279
280 //---------------------------------------------------------------------------------
281
282 function gl_options_controls()
283 {
284           echo "<br><table align='center'>";
285
286           textarea_row(_("Memo"), 'memo_', null, 50, 3);
287
288           echo "</table>";
289 }