2cc0de7efa9fa95920682a18a5c0e59e5a7cbb8f
[fa-stable.git] / 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, $memo)
29 {
30         global $Refs;
31
32         update_last_sent_recurrent_invoice($tmpl_no, $to);
33
34         $doc = new Cart(ST_SALESORDER, array($order_no));
35
36         get_customer_details_to_order($doc, $customer_id, $branch_id);
37
38         $doc->trans_type = ST_SALESORDER;
39         $doc->trans_no = 0;
40         $doc->document_date = $date;
41
42         $doc->due_date = get_invoice_duedate($doc->payment, $doc->document_date);
43
44         $doc->reference = $Refs->get_next($doc->trans_type, null, array('customer' => $customer_id, 'branch' => $branch_id,
45                 'date' => $date));
46         $doc->Comments = $memo;
47
48         foreach ($doc->line_items as $line_no=>$item) {
49                 $line = &$doc->line_items[$line_no];
50                 $new_price = get_price($line->stock_id, $doc->customer_currency,
51                         $doc->sales_type, $doc->price_factor, $doc->document_date);
52                 if ($new_price != 0)    // use template price if no price is currently set for the item.
53                         $line->price = $new_price;
54         }       
55         $cart = $doc;
56         $cart->trans_type = ST_SALESINVOICE;
57         $cart->reference = $Refs->get_next($cart->trans_type);
58         $cart->payment_terms['cash_sale'] = false; // no way to register cash payment with recurrent invoice at once
59         $invno = $cart->write(1);
60
61         return $invno;
62 }
63
64 function calculate_from($myrow)
65 {
66         if ($myrow["last_sent"] == '0000-00-00')
67                 $from = sql2date($myrow["begin"]);
68         else
69                 $from = sql2date($myrow["last_sent"]);
70         return $from;
71 }
72
73 function calculate_next($myrow)
74 {
75         if ($myrow["last_sent"] == '0000-00-00')
76                 $next = sql2date($myrow["begin"]);
77         else
78                 $next = sql2date($myrow["last_sent"]);
79         $next = add_months($next, $myrow['monthly']);
80         $next = add_days($next, $myrow['days']);
81         return add_days($next,-1);
82 }
83
84 $id = find_submit("confirmed");
85 if ($id != -1 && is_date_closed($_POST['trans_date']))
86 {
87         display_error(_("The entered date is out of fiscal year or is closed for further data entry."));
88         set_focus('trans_date');
89         $_POST['create'.$id] = 1;       //re-display current page
90         $id = -1;
91 }
92
93 if ($id != -1)
94 {
95         /*
96                 whole invoiced time is <begin, end>
97                 invoices are issued _after_ invoiced period is gone, eg:
98                 begin 1.1
99                 end   31.3
100                 period:    invoice ready for issue since:
101                 1.1-31.1 -  1.2
102                 1.2-28.2 -  1.3
103                 1.3-31.3 -  1.4
104                 In example above, when end is set to 1.4 will generate additional invoice on 1.5 !
105         */
106
107         $Ajax->activate('_page_body');
108         $from = get_post('from');
109         $to = get_post('to');
110         $memo = get_post('memo');
111         $date = $_POST['trans_date'];
112         $myrow = get_recurrent_invoice($id);
113
114         $invs = array();
115         if (recurrent_invoice_ready($id, $date))
116         {
117                         begin_transaction();
118
119                         if ($myrow['debtor_no'] == 0)
120                         {
121                                 $cust = get_cust_branches_from_group($myrow['group_no']);
122                                 while ($row = db_fetch($cust))
123                                 {
124                                         $invs[] = create_recurrent_invoices($row['debtor_no'], $row['branch_code'], $myrow['order_no'], $myrow['id'],
125                                                 $date, $from, $to, $memo);
126                                 }
127                         }
128                         else
129                         {
130                                 $invs[] = create_recurrent_invoices($myrow['debtor_no'], $myrow['group_no'], $myrow['order_no'], $myrow['id'],
131                                         $date, $from, $to, $memo);
132                         }
133                         commit_transaction();
134         }
135         if (count($invs) > 0)
136         {
137                 $min = min($invs);
138                 $max = max($invs);
139         }
140         else 
141                 $min = $max = 0;
142         display_notification(sprintf(_("%s recurrent invoice(s) created, # %s - # %s."), count($invs), $min, $max));
143         if (count($invs) > 0)
144         {
145                 $ar = array('PARAM_0' => $min."-".ST_SALESINVOICE,      'PARAM_1' => $max."-".ST_SALESINVOICE, 'PARAM_2' => "",
146                         'PARAM_3' => 0, 'PARAM_4' => 0, 'PARAM_5' => "", 'PARAM_6' => user_def_print_orientation());
147                 display_note(print_link(sprintf(_("&Print Recurrent Invoices # %s - # %s"), $min, $max), 107, $ar), 0, 1);
148                 $ar['PARAM_6'] = 1; // orygina³
149                 $ar['PARAM_3'] = 1; // email
150                 display_note(print_link(sprintf(_("&Email Recurrent Invoices # %s - # %s"), $min, $max), 107, $ar), 0, 1);
151         }
152 }
153
154
155 $id = find_submit('create');
156 if ($id != -1)
157 {
158         $Ajax->activate('_page_body');
159         $date = Today();
160         $myrow = get_recurrent_invoice($id);
161         $from = calculate_from($myrow);
162         $to = add_months($from, $myrow['monthly']);
163         $to = add_days($to, $myrow['days']);
164
165         if (!is_date_in_fiscalyear($date))
166                 display_error(_("The entered date is out of fiscal year or is closed for further data entry."));
167         elseif (!date1_greater_date2(add_days(Today(), 1), $to))
168                 display_error(_("Recurrent invoice cannot be generated before last day of covered period."));
169         elseif (check_recurrent_invoice_prices($id))
170                 display_error(_("Recurrent invoices cannot be generated because some items have no price defined in customer currency."));
171         elseif (!check_sales_order_type($myrow['order_no']))
172                 display_error(_("Recurrent invoices cannot be generated because selected sales order template uses prepayment sales terms. Change payment terms and try again."));
173         else {
174                 $count = recurrent_invoice_count($id);
175
176                 $_POST['trans_date'] = $to;
177                 start_form();
178                 start_table(TABLESTYLE, "width=50%");
179                 label_row(_('Description:'), $myrow["description"]);
180                 label_row(_('Template:'), get_customer_trans_view_str(ST_SALESORDER, $myrow["order_no"]));
181                 label_row(_('Number of invoices:'), $count);
182                 date_row(_('Invoice date:'), 'trans_date');
183                 text_row(_('Invoice notice:'), 'memo', sprintf(_("Recurrent Invoice covers period %s - %s."), $from, add_days($to, -1)),
184                         100, 100);
185                 end_table();
186                 hidden('from', $from, true);
187                 hidden('to', $to, true);
188                 br();
189                 submit_center_first('confirmed'.$id, _('Create'), _('Create recurrent invoices'), false, ICON_OK);
190                 submit_center_last('cancel', _('Cancel'), _('Return to recurrent invoices'), false, ICON_ESCAPE);
191                 submit_js_confirm("do_create".$id, sprintf(_("You are about to issue %s invoices.\n Do you want to continue?"), $count));
192                 end_form();
193
194                 display_footer_exit();
195         }
196 }
197 else
198 {
199 $result = get_recurrent_invoices(Today());
200
201 start_form();
202 start_table(TABLESTYLE, "width=70%");
203 $th = array(_("Description"), _("Template No"),_("Customer"),_("Branch")."/"._("Group"),_("Days"),_("Monthly"),_("Begin"),_("End"),_("Next invoice"),"");
204 table_header($th);
205 $k = 0;
206 $due = false;
207 while ($myrow = db_fetch($result)) 
208 {
209         if ($myrow['overdue'])
210         {
211                 start_row("class='overduebg'");
212                 $due = true;
213         }
214         else
215                 alt_table_row_color($k);
216
217         label_cell($myrow["description"]);
218         label_cell(get_customer_trans_view_str(ST_SALESORDER, $myrow["order_no"]), "nowrap align='right'");
219         if ($myrow["debtor_no"] == 0)
220         {
221                 label_cell("");
222
223                 label_cell(get_sales_group_name($myrow["group_no"]));
224         }
225         else
226         {
227                 label_cell(get_customer_name($myrow["debtor_no"]));
228                 label_cell(get_branch_name($myrow['group_no']));
229         }
230         label_cell($myrow["days"]);
231         label_cell($myrow['monthly']);
232         label_cell(sql2date($myrow['begin']),  "align='center'");
233         label_cell(sql2date($myrow['end']),  "align='center'");
234         label_cell(calculate_next($myrow),  "align='center'");
235         if ($myrow['overdue'])
236         {
237                 $count = recurrent_invoice_count($myrow['id']);
238                 if ($count)
239                 {
240                         button_cell("create".$myrow["id"], sprintf(_("Create %s Invoice(s)"), $count), "", ICON_DOC, 'process');
241                 } else {
242                         label_cell('');
243                 }
244         }
245         else
246                 label_cell("");
247         end_row();
248 }
249 end_table();
250 end_form();
251 if ($due)
252         display_note(_("Marked items are due."), 1, 0, "class='overduefg'");
253 else
254         display_note(_("No recurrent invoices are due."), 1, 0);
255
256 br();
257 }
258 end_page();