sales/create_recurrent_invoices.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_SALESINVOICE';
  13 $path_to_root = "..";
  14 include_once($path_to_root . "/sales/includes/cart_class.inc");
  15 include_once($path_to_root . "/includes/session.inc");
  16 include_once($path_to_root . "/sales/includes/ui/sales_order_ui.inc");
  17 include_once($path_to_root . "/includes/ui.inc");
  18 include_once($path_to_root . "/reporting/includes/reporting.inc");
  19
  20 $js = "";
  21 if ($SysPrefs->use_popup_windows)
  22         $js .= get_js_open_window(900, 600);
  23 if (user_use_date_picker())
  24         $js .= get_js_date_picker();
  25
  26 page(_($help_context = "Create and Print Recurrent Invoices"), false, false, "", $js);
  27
  28 function create_recurrent_invoices($customer_id, $branch_id, $order_no, $tmpl_no, $date, $from, $to)
  29 {
  30         global $Refs;
  31
  32         $doc = new Cart(ST_SALESORDER, array($order_no));
  33
  34         get_customer_details_to_order($doc, $customer_id, $branch_id);
  35
  36         $doc->trans_type = ST_SALESORDER;
  37         $doc->trans_no = 0;
  38         $doc->document_date = $date;
  39
  40         $doc->due_date = get_invoice_duedate($doc->payment, $doc->document_date);
  41         $doc->reference = $Refs->get_next($doc->trans_type, null, array('customer' => $customer_id, 'branch' => $branch_id,
  42                 'date' => $date));
  43         if ($doc->Comments != "")
  44                 $doc->Comments .= "\n";
  45         $doc->Comments .= sprintf(_("Recurrent Invoice covers period %s - %s."), $from, add_days($to, -1));
  46
  47         foreach ($doc->line_items as $line_no=>$item) {
  48                 $line = &$doc->line_items[$line_no];
  49                 $line->price = get_price($line->stock_id, $doc->customer_currency,
  50                         $doc->sales_type, $doc->price_factor, $doc->document_date);
  51         }
  52         $cart = $doc;
  53         $cart->trans_type = ST_SALESINVOICE;
  54         $cart->reference = $Refs->get_next($cart->trans_type, null, array('customer' => $customer_id, 'branch' => $branch_id,
  55                 'date' => $date));
  56         $invno = $cart->write(1);
  57         if ($invno == -1)
  58         {
  59                 display_error(_("The entered reference is already in use."));
  60                 display_footer_exit();
  61         }
  62         update_last_sent_recurrent_invoice($tmpl_no, $to);
  63         return $invno;
  64 }
  65
  66 function calculate_from($myrow)
  67 {
  68         if ($myrow["last_sent"] == '0000-00-00')
  69                 $from = sql2date($myrow["begin"]);
  70         else
  71                 $from = sql2date($myrow["last_sent"]);
  72         return $from;
  73 }
  74
  75 if (!isset($_POST['date'])) {
  76   $_POST['date'] = Today();
  77 }
  78
  79 $id = find_submit("create");
  80 if ($id != -1)
  81 {
  82         $Ajax->activate('_page_body');
  83         $date = $_POST['date'];
  84         if (is_date_in_fiscalyear($date))
  85         {
  86                 $invs = array();
  87                 $myrow = get_recurrent_invoice($id);
  88                 $from = calculate_from($myrow);
  89                 $to = add_months($from, $myrow['monthly']);
  90                 $to = add_days($to, $myrow['days']);
  91                 if ($myrow['debtor_no'] == 0)
  92                 {
  93                         $cust = get_cust_branches_from_group($myrow['group_no']);
  94                         while ($row = db_fetch($cust))
  95                         {
  96                                 $invs[] = create_recurrent_invoices($row['debtor_no'], $row['branch_code'], $myrow['order_no'], $myrow['id'],
  97                                         $date, $from, $to);
  98                         }
  99                 }
 100                 else
 101                 {
 102                         $invs[] = create_recurrent_invoices($myrow['debtor_no'], $myrow['group_no'], $myrow['order_no'], $myrow['id'],
 103                                 $date, $from, $to);
 104                 }
 105                 if (count($invs) > 0)
 106                 {
 107                         $min = min($invs);
 108                         $max = max($invs);
 109                 }
 110                 else
 111                         $min = $max = 0;
 112                 display_notification(sprintf(_("%s recurrent invoice(s) created, # %s - # %s."), count($invs), $min, $max));
 113                 if (count($invs) > 0)
 114                 {
 115                         $ar = array('PARAM_0' => $min."-".ST_SALESINVOICE,      'PARAM_1' => $max."-".ST_SALESINVOICE, 'PARAM_2' => "",
 116                                 'PARAM_3' => 0, 'PARAM_4' => 0, 'PARAM_5' => "", 'PARAM_6' => user_def_print_orientation());
 117                         display_note(print_link(sprintf(_("&Print Recurrent Invoices # %s - # %s"), $min, $max), 107, $ar), 0, 1);
 118                         $ar['PARAM_3'] = 1; // email
 119                         display_note(print_link(sprintf(_("&Email Recurrent Invoices # %s - # %s"), $min, $max), 107, $ar), 0, 1);
 120                 }
 121         }
 122         else
 123                 display_error(_("The entered date is out of fiscal year or is closed for further data entry."));
 124 }
 125
 126 $result = get_recurrent_invoices();
 127
 128 start_form();
 129 start_table(TABLESTYLE_NOBORDER);
 130 start_row();
 131 date_cells(_("Invoice date:"), 'date', '');
 132 end_row();
 133 end_table();
 134
 135 start_table(TABLESTYLE, "width='70%'");
 136 $th = array(_("Description"), _("Template No"),_("Customer"),_("Branch")."/"._("Group"),_("Days"),_("Monthly"),_("Begin"),_("End"),_("Last Created"),"");
 137 table_header($th);
 138 $k = 0;
 139 $today = add_days($_POST['date'], 1);
 140 $due = false;
 141 while ($myrow = db_fetch($result))
 142 {
 143         $begin = sql2date($myrow["begin"]);
 144         $end = sql2date($myrow["end"]);
 145         $last_sent = calculate_from($myrow);
 146         $due_date = add_months($last_sent, $myrow['monthly']);
 147         $due_date = add_days($due_date, $myrow['days']);
 148
 149         $overdue = date1_greater_date2($today, $due_date) && date1_greater_date2($today, $begin)
 150                 && date1_greater_date2($end, $today);
 151         if ($overdue)
 152         {
 153                 start_row("class='overduebg'");
 154                 $due = true;
 155         }
 156         else
 157                 alt_table_row_color($k);
 158
 159         label_cell($myrow["description"]);
 160         label_cell(get_customer_trans_view_str(30, $myrow["order_no"]));
 161         if ($myrow["debtor_no"] == 0)
 162         {
 163                 label_cell("");
 164                 label_cell(get_sales_group_name($myrow["group_no"]));
 165         }
 166         else
 167         {
 168                 label_cell(get_customer_name($myrow["debtor_no"]));
 169                 label_cell(get_branch_name($myrow['group_no']));
 170         }
 171         label_cell($myrow["days"]);
 172         label_cell($myrow['monthly']);
 173         label_cell($begin);
 174         label_cell($end);
 175         label_cell(($myrow['last_sent']=="0000-00-00")?"":$last_sent);
 176         if ($overdue)
 177                 button_cell("create".$myrow["id"], _("Create Invoices"), "", ICON_DOC);
 178         else
 179                 label_cell("");
 180         end_row();
 181 }
 182 end_table();
 183 end_form();
 184 if ($due)
 185         display_note(_("Marked items are due."), 1, 0, "class='overduefg'");
 186 else
 187         display_note(_("No recurrent invoices are due."), 1, 0);
 188
 189 br();
 190
 191 end_page();