Changed context help organization to enable use of central, multilanguage wiki.
[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 ($use_popup_windows)
22         $js .= get_js_open_window(900, 600);
23
24 page(_($help_context = "Create and Print Recurrent Invoices"), false, false, "", $js);
25
26 function set_last_sent($id, $date)
27 {
28         $date = date2sql($date);
29         $sql = "UPDATE ".TB_PREF."recurrent_invoices SET last_sent='$date' WHERE id=".db_escape($id);
30         db_query($sql,"The recurrent invoice could not be updated or added");
31 }       
32
33 function create_recurrent_invoices($customer_id, $branch_id, $order_no, $tmpl_no)
34 {
35         global $Refs;
36
37         $doc = new Cart(ST_SALESORDER, array($order_no));
38
39         get_customer_details_to_order($doc, $customer_id, $branch_id);
40
41         $doc->trans_type = ST_SALESORDER;
42         $doc->trans_no = 0;
43         $doc->document_date = Today(); // 2006-06-15. Added so Invoices and Deliveries get current day
44
45         $doc->due_date = get_invoice_duedate($doc->customer_id, $doc->document_date);
46         $doc->reference = $Refs->get_next($doc->trans_type);
47         //$doc->Comments='';
48
49         foreach ($doc->line_items as $line_no=>$item) {
50                 $line = &$doc->line_items[$line_no];
51                 $line->price = get_price($line->stock_id, $doc->customer_currency,
52                         $doc->sales_type, $doc->price_factor, $doc->document_date);
53         }       
54         $cart = $doc;
55         $cart->trans_type = ST_SALESINVOICE;
56         $cart->reference = $Refs->get_next($cart->trans_type);
57         $invno = $cart->write(1);
58         set_last_sent($tmpl_no, $cart->document_date);
59         return $invno;
60 }
61
62 if (isset($_GET['recurrent']))
63 {
64         $invs = array();
65         $sql = "SELECT * FROM ".TB_PREF."recurrent_invoices WHERE id=".db_escape($_GET['recurrent']);
66
67         $result = db_query($sql,"could not get recurrent invoice");
68         $myrow = db_fetch($result);
69         if ($myrow['debtor_no'] == 0)
70         {
71                 $cust = get_cust_branches_from_group($myrow['group_no']);
72                 while ($row = db_fetch($cust))
73                 {
74                         $invs[] = create_recurrent_invoices($row['debtor_no'], $row['branch_code'], $myrow['order_no'], $myrow['id']);
75                 }       
76         }
77         else
78         {
79                 $invs[] = create_recurrent_invoices($myrow['debtor_no'], $myrow['group_no'], $myrow['order_no'], $myrow['id']);
80         }
81         if (count($invs) > 0)
82         {
83                 $min = min($invs);
84                 $max = max($invs);
85         }
86         else 
87                 $min = $max = 0;
88         display_notification(sprintf(_("%s recurrent invoice(s) created, # $min - # $max."), count($invs)));
89         if (count($invs) > 0)
90         {
91                 $ar = array('PARAM_0' => $min,  'PARAM_1' => $max, 'PARAM_2' => "",
92                         'PARAM_3' => 0, 'PARAM_4' => 0, 'PARAM_5' => "", 'PARAM_6' => ST_SALESINVOICE);
93                 display_note(print_link(_("&Print Recurrent Invoices # $min - # $max"), 107, $ar), 0, 1);
94                 $ar['PARAM_3'] = 1; 
95                 display_note(print_link(_("&Email Recurrent Invoices # $min - # $max"), 107, $ar), 0, 1);
96         }
97 }       
98
99 //-------------------------------------------------------------------------------------------------
100 function get_sales_group_name($group_no)
101 {
102         $sql = "SELECT description FROM ".TB_PREF."groups WHERE id = ".db_escape($group_no);
103         $result = db_query($sql, "could not get group");
104         $row = db_fetch($result);
105         return $row[0];
106 }
107
108 $sql = "SELECT * FROM ".TB_PREF."recurrent_invoices ORDER BY description, group_no, debtor_no";
109 $result = db_query($sql,"could not get recurrent invoices");
110
111 start_table("$table_style width=70%");
112 $th = array(_("Description"), _("Template No"),_("Customer"),_("Branch")."/"._("Group"),_("Days"),_("Monthly"),_("Begin"),_("End"),_("Last Created"),"");
113 table_header($th);
114 $k = 0;
115 $today = add_days(Today(), 1);
116 $due = false;
117 while ($myrow = db_fetch($result)) 
118 {
119         $begin = sql2date($myrow["begin"]);
120         $end = sql2date($myrow["end"]);
121         $last_sent = sql2date($myrow["last_sent"]);
122         if ($myrow['monthly'] > 0)
123                 $due_date = begin_month($last_sent);
124         else
125                 $due_date = $last_sent;
126         $due_date = add_months($due_date, $myrow['monthly']);
127         $due_date = add_days($due_date, $myrow['days']);
128         $overdue = date1_greater_date2($today, $due_date) && date1_greater_date2($today, $begin)
129                 && date1_greater_date2($end, $today);
130         if ($overdue)
131         {
132                 start_row("class='overduebg'");
133                 $due = true;
134         }       
135         else    
136                 alt_table_row_color($k);
137                 
138         label_cell($myrow["description"]);
139         label_cell(get_customer_trans_view_str(30, $myrow["order_no"]));
140         if ($myrow["debtor_no"] == 0)
141         {
142                 label_cell("");
143                 label_cell(get_sales_group_name($myrow["group_no"]));
144         }       
145         else
146         {
147                 label_cell(get_customer_name($myrow["debtor_no"]));
148                 label_cell(get_branch_name($myrow['group_no']));
149         }       
150         label_cell($myrow["days"]);
151         label_cell($myrow['monthly']);
152         label_cell($begin);
153         label_cell($end);
154         label_cell($last_sent);
155         if ($overdue)
156                 label_cell("<a href='$path_to_root/sales/create_recurrent_invoices.php?recurrent=" . $myrow["id"] . "'>" . _("Create Invoices") . "</a>");
157         else
158                 label_cell("");
159         end_row();
160 }
161 end_table();
162 if ($due)
163         display_note(_("Marked items are due."), 1, 0, "class='overduefg'");
164 else
165         display_note(_("No recurrent invoices are due."), 1, 0);
166
167 echo '<br>';
168
169 end_page();
170 ?>