purchasing/supplier_invoice.php

   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 $page_security = 'SA_SUPPLIERINVOICE';
  13 $path_to_root = "..";
  14
  15 include_once($path_to_root . "/purchasing/includes/purchasing_db.inc");
  16
  17 include_once($path_to_root . "/includes/session.inc");
  18
  19 include_once($path_to_root . "/includes/banking.inc");
  20 include_once($path_to_root . "/includes/data_checks.inc");
  21
  22 include_once($path_to_root . "/purchasing/includes/purchasing_ui.inc");
  23 $js = "";
  24 if ($use_popup_windows)
  25         $js .= get_js_open_window(900, 500);
  26 if ($use_date_picker)
  27         $js .= get_js_date_picker();
  28 //----------------------------------------------------------------------------------------
  29
  30 check_db_has_suppliers(_("There are no suppliers defined in the system."));
  31
  32 if (isset($_GET['ModifyInvoice']))
  33         check_is_closed(ST_SUPPINVOICE, $_GET['ModifyInvoice']);
  34
  35 //--------------------------------------------------------------------------------------------------
  36
  37 if (isset($_GET['New']))
  38 {
  39         if (isset( $_SESSION['supp_trans']))
  40         {
  41                 unset ($_SESSION['supp_trans']->grn_items);
  42                 unset ($_SESSION['supp_trans']->gl_codes);
  43                 unset ($_SESSION['supp_trans']);
  44         }
  45         $help_context = "Enter Supplier Invoice";
  46         $_SESSION['page_title'] = _("Enter Supplier Invoice");
  47
  48         $_SESSION['supp_trans'] = new supp_trans(ST_SUPPINVOICE);
  49 } else if(isset($_GET['ModifyInvoice'])) {
  50         $help_context = 'Modifying Purchase Invoice';
  51         $_SESSION['page_title'] = sprintf( _("Modifying Purchase Invoice # %d"), $_GET['ModifyInvoice']);
  52         $_SESSION['supp_trans'] = new supp_trans(ST_SUPPINVOICE, $_GET['ModifyInvoice']);
  53 }
  54
  55 page($_SESSION['page_title'], false, false, "", $js);
  56 //---------------------------------------------------------------------------------------------------------------
  57
  58 if (isset($_GET['AddedID']))
  59 {
  60         $invoice_no = $_GET['AddedID'];
  61         $trans_type = ST_SUPPINVOICE;
  62
  63
  64     echo "<center>";
  65     display_notification_centered(_("Supplier invoice has been processed."));
  66     display_note(get_trans_view_str($trans_type, $invoice_no, _("View this Invoice")));
  67
  68         display_note(get_gl_view_str($trans_type, $invoice_no, _("View the GL Journal Entries for this Invoice")), 1);
  69
  70         hyperlink_no_params("$path_to_root/purchasing/supplier_payment.php", _("Entry supplier &payment for this invoice"));
  71
  72         hyperlink_params($_SERVER['PHP_SELF'], _("Enter Another Invoice"), "New=1");
  73
  74         hyperlink_params("$path_to_root/admin/attachments.php", _("Add an Attachment"), "filterType=$trans_type&trans_no=$invoice_no");
  75
  76         display_footer_exit();
  77 }
  78
  79 //--------------------------------------------------------------------------------------------------
  80
  81 if (isset($_GET['New']))
  82 {
  83         if (isset( $_SESSION['supp_trans']))
  84         {
  85                 unset ($_SESSION['supp_trans']->grn_items);
  86                 unset ($_SESSION['supp_trans']->gl_codes);
  87                 unset ($_SESSION['supp_trans']);
  88         }
  89
  90         $_SESSION['supp_trans'] = new supp_trans(ST_SUPPINVOICE);
  91 } else if(isset($_GET['ModifyInvoice'])) {
  92         $_SESSION['supp_trans'] = new supp_trans(ST_SUPPINVOICE, $_GET['ModifyInvoice']);
  93 }
  94
  95 //--------------------------------------------------------------------------------------------------
  96 function clear_fields()
  97 {
  98         global $Ajax;
  99
 100         unset($_POST['gl_code']);
 101         unset($_POST['dimension_id']);
 102         unset($_POST['dimension2_id']);
 103         unset($_POST['amount']);
 104         unset($_POST['memo_']);
 105         unset($_POST['AddGLCodeToTrans']);
 106         $Ajax->activate('gl_items');
 107         set_focus('gl_code');
 108 }
 109 //------------------------------------------------------------------------------------------------
 110 //      GL postings are often entered in the same form to two accounts
 111 //  so fileds are cleared only on user demand.
 112 //
 113 if (isset($_POST['ClearFields']))
 114 {
 115         clear_fields();
 116 }
 117
 118 if (isset($_POST['AddGLCodeToTrans'])){
 119
 120         $Ajax->activate('gl_items');
 121         $input_error = false;
 122
 123         $result = get_gl_account_info($_POST['gl_code']);
 124         if (db_num_rows($result) == 0)
 125         {
 126                 display_error(_("The account code entered is not a valid code, this line cannot be added to the transaction."));
 127                 set_focus('gl_code');
 128                 $input_error = true;
 129         }
 130         else
 131         {
 132                 $myrow = db_fetch_row($result);
 133                 $gl_act_name = $myrow[1];
 134                 if (!check_num('amount'))
 135                 {
 136                         display_error(_("The amount entered is not numeric. This line cannot be added to the transaction."));
 137                         set_focus('amount');
 138                         $input_error = true;
 139                 }
 140         }
 141
 142         if (!is_tax_gl_unique(get_post('gl_code'))) {
 143                 display_error(_("Cannot post to GL account used by more than one tax type."));
 144                 set_focus('gl_code');
 145                 $input_error = true;
 146         }
 147
 148         if ($input_error == false)
 149         {
 150                 $_SESSION['supp_trans']->add_gl_codes_to_trans($_POST['gl_code'], $gl_act_name,
 151                         $_POST['dimension_id'], $_POST['dimension2_id'],
 152                         input_num('amount'), $_POST['memo_']);
 153                 set_focus('gl_code');
 154         }
 155 }
 156
 157 //------------------------------------------------------------------------------------------------
 158
 159 function check_data()
 160 {
 161         global $Refs;
 162
 163         if (!$_SESSION['supp_trans']->is_valid_trans_to_post())
 164         {
 165                 display_error(_("The invoice cannot be processed because the there are no items or values on the invoice.  Invoices are expected to have a charge."));
 166                 return false;
 167         }
 168
 169         if (!$Refs->is_valid($_SESSION['supp_trans']->reference))
 170         {
 171                 display_error(_("You must enter an invoice reference."));
 172                 set_focus('reference');
 173                 return false;
 174         }
 175
 176         if (!is_new_reference($_SESSION['supp_trans']->reference, ST_SUPPINVOICE, $_SESSION['supp_trans']->trans_no))
 177         {
 178                 display_error(_("The entered reference is already in use."));
 179                 set_focus('reference');
 180                 return false;
 181         }
 182
 183         if (!$Refs->is_valid($_SESSION['supp_trans']->supp_reference))
 184         {
 185                 display_error(_("You must enter a supplier's invoice reference."));
 186                 set_focus('supp_reference');
 187                 return false;
 188         }
 189
 190         if (!is_date( $_SESSION['supp_trans']->tran_date))
 191         {
 192                 display_error(_("The invoice as entered cannot be processed because the invoice date is in an incorrect format."));
 193                 set_focus('trans_date');
 194                 return false;
 195         }
 196         elseif (!is_date_in_fiscalyear($_SESSION['supp_trans']->tran_date))
 197         {
 198                 display_error(_("The entered date is out of fiscal year or is closed for further data entry."));
 199                 set_focus('trans_date');
 200                 return false;
 201         }
 202         if (!is_date( $_SESSION['supp_trans']->due_date))
 203         {
 204                 display_error(_("The invoice as entered cannot be processed because the due date is in an incorrect format."));
 205                 set_focus('due_date');
 206                 return false;
 207         }
 208
 209         if (is_reference_already_there($_SESSION['supp_trans']->supplier_id, $_POST['supp_reference'], $_SESSION['supp_trans']->trans_no))
 210         {       /*Transaction reference already entered */
 211                 display_error(_("This invoice number has already been entered. It cannot be entered again.") . " (" . $_POST['supp_reference'] . ")");
 212                 return false;
 213         }
 214
 215         return true;
 216 }
 217
 218 //--------------------------------------------------------------------------------------------------
 219
 220 function handle_commit_invoice()
 221 {
 222         copy_to_trans($_SESSION['supp_trans']);
 223
 224         if (!check_data())
 225                 return;
 226         $inv = $_SESSION['supp_trans'];
 227         $invoice_no = add_supp_invoice($inv);
 228
 229         // presume supplier data need correction
 230         if ($inv->stored_algorithm != $inv->tax_algorithm)
 231                 update_supp_tax_algorithm($inv->supplier_id, $inv->tax_algorithm);
 232
 233     $_SESSION['supp_trans']->clear_items();
 234     unset($_SESSION['supp_trans']);
 235
 236         meta_forward($_SERVER['PHP_SELF'], "AddedID=$invoice_no");
 237 }
 238
 239 //--------------------------------------------------------------------------------------------------
 240
 241 if (isset($_POST['PostInvoice']))
 242 {
 243         handle_commit_invoice();
 244 }
 245
 246 function check_item_data($n)
 247 {
 248         global $check_price_charged_vs_order_price,
 249                 $check_qty_charged_vs_del_qty, $SysPrefs;
 250
 251         if (!check_num('this_quantity_inv'.$n, 0) || input_num('this_quantity_inv'.$n)==0)
 252         {
 253                 display_error( _("The quantity to invoice must be numeric and greater than zero."));
 254                 set_focus('this_quantity_inv'.$n);
 255                 return false;
 256         }
 257
 258         if (!check_num('ChgPrice'.$n))
 259         {
 260                 display_error( _("The price is not numeric."));
 261                 set_focus('ChgPrice'.$n);
 262                 return false;
 263         }
 264
 265         $margin = $SysPrefs->over_charge_allowance();
 266         if ($check_price_charged_vs_order_price == True)
 267         {
 268                 if ($_POST['order_price'.$n]!=input_num('ChgPrice'.$n)) {
 269                      if ($_POST['order_price'.$n]==0 ||
 270                                 input_num('ChgPrice'.$n)/$_POST['order_price'.$n] >
 271                             (1 + ($margin/ 100)))
 272                     {
 273                         display_error(_("The price being invoiced is more than the purchase order price by more than the allowed over-charge percentage. The system is set up to prohibit this. See the system administrator to modify the set up parameters if necessary.") .
 274                         _("The over-charge percentage allowance is :") . $margin . "%");
 275                         set_focus('ChgPrice'.$n);
 276                         return false;
 277                     }
 278                 }
 279         }
 280
 281         if ($check_qty_charged_vs_del_qty == True)
 282         {
 283                 if (input_num('this_quantity_inv'.$n) / ($_POST['qty_recd'.$n] - $_POST['prev_quantity_inv'.$n]) >
 284                         (1+ ($margin / 100)))
 285                 {
 286                         display_error( _("The quantity being invoiced is more than the outstanding quantity by more than the allowed over-charge percentage. The system is set up to prohibit this. See the system administrator to modify the set up parameters if necessary.")
 287                         . _("The over-charge percentage allowance is :") . $margin . "%");
 288                         set_focus('this_quantity_inv'.$n);
 289                         return false;
 290                 }
 291         }
 292
 293         return true;
 294 }
 295
 296 function commit_item_data($n)
 297 {
 298         if (check_item_data($n))
 299         {
 300         if (input_num('this_quantity_inv'.$n) >= ($_POST['qty_recd'.$n] - $_POST['prev_quantity_inv'.$n]))
 301         {
 302                 $complete = true;
 303         }
 304         else
 305         {
 306                 $complete = false;
 307         }
 308
 309                 $_SESSION['supp_trans']->add_grn_to_trans($n, $_POST['po_detail_item'.$n],
 310                         $_POST['item_code'.$n], $_POST['item_description'.$n], $_POST['qty_recd'.$n],
 311                         $_POST['prev_quantity_inv'.$n], input_num('this_quantity_inv'.$n),
 312                         $_POST['order_price'.$n], input_num('ChgPrice'.$n), $complete,
 313                         $_POST['std_cost_unit'.$n], "");
 314         }
 315 }
 316
 317 //-----------------------------------------------------------------------------------------
 318
 319 $id = find_submit('grn_item_id');
 320 if ($id != -1)
 321 {
 322         commit_item_data($id);
 323 }
 324
 325 if (isset($_POST['InvGRNAll']))
 326 {
 327         foreach($_POST as $postkey=>$postval )
 328     {
 329                 if (strpos($postkey, "qty_recd") === 0)
 330                 {
 331                         $id = substr($postkey, strlen("qty_recd"));
 332                         $id = (int)$id;
 333                         commit_item_data($id);
 334                 }
 335     }
 336 }
 337
 338 //--------------------------------------------------------------------------------------------------
 339 $id3 = find_submit('Delete');
 340 if ($id3 != -1)
 341 {
 342         $_SESSION['supp_trans']->remove_grn_from_trans($id3);
 343         $Ajax->activate('grn_items');
 344         $Ajax->activate('inv_tot');
 345 }
 346
 347 $id4 = find_submit('Delete2');
 348 if ($id4 != -1)
 349 {
 350         $_SESSION['supp_trans']->remove_gl_codes_from_trans($id4);
 351         clear_fields();
 352         $Ajax->activate('gl_items');
 353         $Ajax->activate('inv_tot');
 354 }
 355
 356 $id2 = -1;
 357 if ($_SESSION["wa_current_user"]->can_access('SA_GRNDELETE'))
 358 {
 359         $id2 = find_submit('void_item_id');
 360         if ($id2 != -1)
 361         {
 362                 remove_not_invoice_item($id2);
 363                 display_notification(sprintf(_('All yet non-invoiced items on delivery line # %d has been removed.'), $id2));
 364
 365         }
 366 }
 367
 368 if (isset($_POST['go']))
 369 {
 370         $Ajax->activate('gl_items');
 371         display_quick_entries($_SESSION['supp_trans'], $_POST['qid'], input_num('totamount'), QE_SUPPINV);
 372         $_POST['totamount'] = price_format(0); $Ajax->activate('totamount');
 373         $Ajax->activate('inv_tot');
 374 }
 375
 376 start_form();
 377
 378 invoice_header($_SESSION['supp_trans']);
 379
 380 if ($_POST['supplier_id']=='')
 381                 display_error(_("There is no supplier selected."));
 382 else {
 383         display_grn_items($_SESSION['supp_trans'], 1);
 384
 385         display_gl_items($_SESSION['supp_trans'], 1);
 386
 387         div_start('inv_tot');
 388         invoice_totals($_SESSION['supp_trans']);
 389         div_end();
 390
 391 }
 392
 393 //-----------------------------------------------------------------------------------------
 394
 395 if ($id != -1 || $id2 != -1)
 396 {
 397         $Ajax->activate('grn_items');
 398         $Ajax->activate('inv_tot');
 399 }
 400
 401 if (get_post('AddGLCodeToTrans'))
 402         $Ajax->activate('inv_tot');
 403
 404 br();
 405 submit_center('PostInvoice', _("Enter Invoice"), true, '', 'default');
 406 br();
 407
 408 end_form();
 409
 410 //--------------------------------------------------------------------------------------------------
 411
 412 end_page();
 413 ?>