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