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         // Query the user to retain the reconciled status
  83         if (!$new) {
  84             $result = get_bank_trans(ST_JOURNAL, $Order->order_id);
  85             $row = db_fetch($result);
  86             if ($row
  87                 && $row['reconciled']) {
  88                 check_row(_('Reconciled:'), 'reconciled', 1, true);
  89                 hidden('reconciled_date', $row['reconciled']);
  90             }
  91         }
  92         end_outer_table(1);
  93 }
  94
  95 //---------------------------------------------------------------------------------
  96
  97 function display_gl_items($title, &$order)
  98 {
  99         global $path_to_root;
 100
 101         display_heading($title);
 102
 103         $dim = get_company_pref('use_dimension');
 104
 105         $id = find_submit('Edit');
 106         $sub_type = is_subledger_account(get_post('code_id'));
 107         $has_subaccounts = $order->has_sub_accounts();
 108
 109     div_start('items_table');
 110         start_table(TABLESTYLE, "width='95%'");
 111         if ($dim == 2)
 112                 $th = array(_("Account Code"), _("Account Description"), _("Dimension")." 1",
 113                         _("Dimension")." 2", _("Debit"), _("Credit"), _("Memo"), "");
 114         elseif ($dim == 1)
 115                 $th = array(_("Account Code"), _("Account Description"), _("Dimension"),
 116                         _("Debit"), _("Credit"), _("Memo"), "");
 117         else
 118                 $th = array(_("Account Code"), _("Account Description"),
 119                         _("Debit"), _("Credit"), _("Memo"), "");
 120
 121         if (count($order->gl_items)) $th[] = '';
 122         if ($sub_type || $has_subaccounts)
 123                 array_insert($th, 2, _("Counterparty"));
 124
 125         table_header($th);
 126
 127         $k = 0;
 128
 129         if ($id == -1)
 130                 $id = get_post('Index', -1);
 131
 132         foreach ($order->gl_items as $line => $item)
 133         {
 134                 if ($id != $line)
 135                 {
 136                 alt_table_row_color($k);
 137
 138                         $acc = $item->code_id . ($item->person_id ? sprintf(' %05d', $item->person_id) : '');
 139                         label_cells($acc, $item->description);
 140
 141                 if ($sub_type || $has_subaccounts)
 142                         label_cell($item->person_name);
 143
 144                 if ($dim >= 1)
 145                                 label_cell(get_dimension_string($item->dimension_id, true));
 146                 if ($dim > 1)
 147                                 label_cell(get_dimension_string($item->dimension2_id, true));
 148                 if ($item->amount > 0)
 149                 {
 150                         amount_cell(abs($item->amount));
 151                         label_cell("");
 152                 }
 153                 else
 154                 {
 155                         label_cell("");
 156                         amount_cell(abs($item->amount));
 157                 }
 158                         label_cell($item->reference);
 159
 160                         edit_button_cell("Edit$line", _("Edit"),
 161                                 _('Edit journal line'));
 162                         delete_button_cell("Delete$line", _("Delete"),
 163                                 _('Remove line from journal'));
 164                 end_row();
 165                 }
 166                 else
 167                 {
 168                         gl_edit_item_controls($order, $dim, $item->person_id, $line);
 169                 }
 170         }
 171
 172         if ($id == -1)
 173                 gl_edit_item_controls($order, $dim, $sub_type);
 174
 175         if ($order->count_gl_items())
 176         {
 177                 $colspan = ($dim == 2 ? "4" : ($dim == 1 ? "3" : "2")) + ($sub_type || $has_subaccounts ? 1 : 0);
 178                 start_row();
 179                 label_cell(_("Total"), "align=right colspan=" . $colspan);
 180                 amount_cell($order->gl_items_total_debit());
 181                 amount_cell(abs($order->gl_items_total_credit()));
 182                 label_cell('', "colspan=3");
 183                 end_row();
 184         }
 185
 186     end_table();
 187         div_end();
 188 }
 189
 190 //---------------------------------------------------------------------------------
 191
 192 function gl_edit_item_controls(&$order, $dim, $sub_accounts, $Index=null)
 193 {
 194         global $Ajax;
 195         start_row();
 196
 197         $id = find_submit('Edit');
 198         if ($id == -1)
 199                 $continue = $id = get_post('Index', -1);
 200
 201         if ($Index != -1 && $Index == $id)
 202         {
 203             // Modifying an existing row
 204                 $item = $order->gl_items[$Index];
 205                 if (!isset($continue))
 206                 {
 207                         $_POST['code_id'] = $item->code_id;
 208                         $_POST['dimension_id'] = $item->dimension_id;
 209                         $_POST['dimension2_id'] = $item->dimension2_id;
 210                         $_POST['person_id'] = $item->person_id;
 211                         if ($item->amount > 0)
 212                         {
 213                                 $_POST['AmountDebit'] = price_format($item->amount);
 214                                 $_POST['AmountCredit'] = "";
 215                         }
 216                         else
 217                         {
 218                                 $_POST['AmountDebit'] = "";
 219                                 $_POST['AmountCredit'] = price_format(abs($item->amount));
 220                         }
 221                         $_POST['description'] = $item->description;
 222                         $_POST['LineMemo'] = $item->reference;
 223                 }
 224                 hidden('Index', $id);
 225                 $skip_bank = !$_SESSION["wa_current_user"]->can_access('SA_BANKJOURNAL');
 226                 echo gl_all_accounts_list('code_id', null, $skip_bank, true, _('[Select account]'), true, false, false);
 227
 228                 if (is_subledger_account(get_post('code_id')))
 229                 {       // for home currency postings show all customers
 230                         $sel_cur = get_post('currency', $order->currency);
 231                         subledger_list_cells(null, 'person_id', get_post('code_id'), null, false, false,
 232                                 get_company_currency() == $sel_cur  ? null : $sel_cur);
 233                 } elseif ($order->has_sub_accounts())
 234                         label_cell('');
 235                 if ($dim >= 1)
 236                         dimensions_list_cells(null, 'dimension_id', null, true, " ", false, 1);
 237                 if ($dim > 1)
 238                         dimensions_list_cells(null, 'dimension2_id', null, true, " ", false, 2);
 239             $Ajax->activate('items_table');
 240         }
 241         else
 242         {
 243                 $skip_bank = !$_SESSION["wa_current_user"]->can_access('SA_BANKJOURNAL');
 244                 echo gl_all_accounts_list('code_id', null, $skip_bank, true, _('[Select account]'), true, false, false);
 245                 if ($sub_accounts)
 246                 {
 247                         // for home currency postings show all customers
 248                         $sel_cur = get_post('currency', $order->currency);
 249                         subledger_list_cells(null, 'person_id', get_post('code_id'), null, false, false,
 250                                 get_company_currency() == $sel_cur  ? null : $sel_cur);
 251                 }
 252                 elseif ($order->has_sub_accounts())
 253                         label_cell('');
 254
 255                 if ($dim >= 1)
 256                         dimensions_list_cells(null, 'dimension_id', null, true, " ", false, 1);
 257                 if ($dim > 1)
 258                         dimensions_list_cells(null, 'dimension2_id', null, true, " ", false, 2);
 259         }
 260
 261         if (get_post('_code_id_update'))
 262         {
 263             $Ajax->activate('code_id');
 264                 set_focus($sub_accounts ? 'person_id' : 'AmountDebit');
 265         }
 266         if ($dim < 1)
 267                 hidden('dimension_id', 0);
 268         if ($dim < 2)
 269                 hidden('dimension2_id', 0);
 270
 271         small_amount_cells(null, 'AmountDebit');
 272         small_amount_cells(null, 'AmountCredit');
 273         text_cells_ex(null, 'LineMemo', 35, 255);
 274
 275         if ($id != -1)
 276         {
 277                 button_cell('UpdateItem', _("Update"),
 278                                 _('Confirm changes'), ICON_UPDATE);
 279                 button_cell('CancelItemChanges', _("Cancel"),
 280                                 _('Cancel changes'), ICON_CANCEL);
 281                 set_focus('amount');
 282         }
 283         else
 284                 submit_cells('AddItem', _("Add Item"), "colspan=2",
 285                     _('Add new line to journal'), true);
 286
 287         end_row();
 288 }
 289
 290 //---------------------------------------------------------------------------------
 291
 292 function gl_options_controls()
 293 {
 294           echo "<br><table align='center'>";
 295
 296           textarea_row(_("Memo"), 'memo_', null, 50, 3);
 297
 298           echo "</table>";
 299 }