Feature 5388: Print Invoices (documents) list gets too long. Fixed by default 180...
[fa-stable.git] / admin / gl_setup.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_GLSETUP';
13 $path_to_root="..";
14 include($path_to_root . "/includes/session.inc");
15
16 $js = "";
17 if ($SysPrefs->use_popup_windows && $SysPrefs->use_popup_search)
18         $js .= get_js_open_window(900, 500);
19
20 page(_($help_context = "System and General GL Setup"), false, false, "", $js);
21
22 include_once($path_to_root . "/includes/date_functions.inc");
23 include_once($path_to_root . "/includes/ui.inc");
24 include_once($path_to_root . "/includes/data_checks.inc");
25
26 include_once($path_to_root . "/admin/db/company_db.inc");
27
28 //-------------------------------------------------------------------------------------------------
29
30 function can_process()
31 {
32     if (!check_num('past_due_days', 0, 100))
33     {
34         display_error(_("The past due days interval allowance must be between 0 and 100."));
35         set_focus('past_due_days');
36         return false;
37     }
38
39     if (!check_num('default_quote_valid_days', 0))
40     {
41         display_error(_("Quote Valid Days is not valid number."));
42         set_focus('default_quote_valid_days');
43         return false;
44     }
45
46     if (!check_num('default_delivery_required', 0))
47     {
48         display_error(_("Delivery Required By is not valid number."));
49         set_focus('default_delivery_required');
50         return false;
51     }
52
53     if (!check_num('default_receival_required', 0))
54     {
55         display_error(_("Receival Required By is not valid number."));
56         set_focus('default_receival_required');
57         return false;
58     }
59
60     if (!check_num('default_workorder_required', 0))
61     {
62         display_error(_("Work Order Required By After is not valid number."));
63         set_focus('default_workorder_required');
64         return false;
65     }   
66
67     if (!check_num('po_over_receive', 0, 100))
68         {
69                 display_error(_("The delivery over-receive allowance must be between 0 and 100."));
70                 set_focus('po_over_receive');
71                 return false;
72         }
73
74         if (!check_num('po_over_charge', 0, 100))
75         {
76                 display_error(_("The invoice over-charge allowance must be between 0 and 100."));
77                 set_focus('po_over_charge');
78                 return false;
79         }
80
81         if (!check_num('past_due_days', 0, 100))
82         {
83                 display_error(_("The past due days interval allowance must be between 0 and 100."));
84                 set_focus('past_due_days');
85                 return false;
86         }
87
88         $grn_act = get_company_pref('grn_clearing_act');
89         $post_grn_act = get_post('grn_clearing_act');
90         if ($post_grn_act == null)
91                 $post_grn_act = 0;
92         if (($post_grn_act != $grn_act) && db_num_rows(get_grn_items(0, '', true)))
93         {
94                 display_error(_("Before GRN Clearing Account can be changed all GRNs have to be invoiced"));
95                 $_POST['grn_clearing_act'] = $grn_act;
96                 set_focus('grn_clearing_account');
97                 return false;
98         }
99         if (!is_account_balancesheet(get_post('retained_earnings_act')) || is_account_balancesheet(get_post('profit_loss_year_act')))
100         {
101                 display_error(_("The Retained Earnings Account should be a Balance Account or the Profit and Loss Year Account should be an Expense Account (preferred the last one in the Expense Class)"));
102                 return false;
103         }
104         return true;
105 }
106
107 //-------------------------------------------------------------------------------------------------
108
109 if (isset($_POST['submit']) && can_process())
110 {
111         update_company_prefs( get_post( array( 'retained_earnings_act', 'profit_loss_year_act',
112                 'debtors_act', 'pyt_discount_act', 'creditors_act', 'freight_act', 'deferred_income_act',
113                 'exchange_diff_act', 'bank_charge_act', 'default_sales_act', 'default_sales_discount_act',
114                 'default_prompt_payment_act', 'default_inventory_act', 'default_cogs_act', 'depreciation_period',
115                 'default_loss_on_asset_disposal_act', 'default_adj_act', 'default_inv_sales_act', 'default_wip_act', 'legal_text',
116                 'past_due_days', 'default_workorder_required', 'default_dim_required', 'default_receival_required',
117                 'default_delivery_required', 'default_quote_valid_days', 'grn_clearing_act', 'tax_algorithm',
118                 'no_zero_lines_amount', 'show_po_item_codes', 'accounts_alpha', 'loc_notification', 'print_invoice_no',
119                 'allow_negative_prices', 'print_item_images_on_quote', 
120                 'allow_negative_stock'=> 0, 'accumulate_shipping'=> 0,
121                 'po_over_receive' => 0.0, 'po_over_charge' => 0.0, 'default_credit_limit'=>0.0
122 )));
123
124         display_notification(_("The general GL setup has been updated."));
125
126 } /* end of if submit */
127
128 //-------------------------------------------------------------------------------------------------
129
130 start_form();
131
132 start_outer_table(TABLESTYLE2);
133
134 table_section(1);
135
136 $myrow = get_company_prefs();
137
138 $_POST['retained_earnings_act']  = $myrow["retained_earnings_act"];
139 $_POST['profit_loss_year_act']  = $myrow["profit_loss_year_act"];
140 $_POST['debtors_act']  = $myrow["debtors_act"];
141 $_POST['creditors_act']  = $myrow["creditors_act"];
142 $_POST['freight_act'] = $myrow["freight_act"];
143 $_POST['deferred_income_act'] = $myrow["deferred_income_act"];
144 $_POST['pyt_discount_act']  = $myrow["pyt_discount_act"];
145
146 $_POST['exchange_diff_act'] = $myrow["exchange_diff_act"];
147 $_POST['bank_charge_act'] = $myrow["bank_charge_act"];
148 $_POST['tax_algorithm'] = $myrow["tax_algorithm"];
149 $_POST['default_sales_act'] = $myrow["default_sales_act"];
150 $_POST['default_sales_discount_act']  = $myrow["default_sales_discount_act"];
151 $_POST['default_prompt_payment_act']  = $myrow["default_prompt_payment_act"];
152
153 $_POST['default_inventory_act'] = $myrow["default_inventory_act"];
154 $_POST['default_cogs_act'] = $myrow["default_cogs_act"];
155 $_POST['default_adj_act'] = $myrow["default_adj_act"];
156 $_POST['default_inv_sales_act'] = $myrow['default_inv_sales_act'];
157 $_POST['default_wip_act'] = $myrow['default_wip_act'];
158
159 $_POST['allow_negative_stock'] = $myrow['allow_negative_stock'];
160
161 $_POST['po_over_receive'] = percent_format($myrow['po_over_receive']);
162 $_POST['po_over_charge'] = percent_format($myrow['po_over_charge']);
163 $_POST['past_due_days'] = $myrow['past_due_days'];
164
165 $_POST['grn_clearing_act'] = $myrow['grn_clearing_act'];
166
167 $_POST['default_credit_limit'] = price_format($myrow['default_credit_limit']);
168 $_POST['legal_text'] = $myrow['legal_text'];
169 $_POST['accumulate_shipping'] = $myrow['accumulate_shipping'];
170
171 $_POST['default_workorder_required'] = $myrow['default_workorder_required'];
172 $_POST['default_dim_required'] = $myrow['default_dim_required'];
173 $_POST['default_delivery_required'] = $myrow['default_delivery_required'];
174 $_POST['default_receival_required'] = $myrow['default_receival_required'];
175 $_POST['default_quote_valid_days'] = $myrow['default_quote_valid_days'];
176 $_POST['no_zero_lines_amount'] = $myrow['no_zero_lines_amount'];
177 $_POST['show_po_item_codes'] = $myrow['show_po_item_codes'];
178 $_POST['accounts_alpha'] = $myrow['accounts_alpha'];
179 $_POST['loc_notification'] = $myrow['loc_notification'];
180 $_POST['print_invoice_no'] = $myrow['print_invoice_no'];
181 $_POST['allow_negative_prices'] = $myrow['allow_negative_prices'];
182 $_POST['print_item_images_on_quote'] = $myrow['print_item_images_on_quote'];
183 $_POST['default_loss_on_asset_disposal_act'] = $myrow['default_loss_on_asset_disposal_act'];
184 $_POST['depreciation_period'] = $myrow['depreciation_period'];
185
186 //---------------
187
188
189 table_section_title(_("General GL"));
190
191 text_row(_("Past Due Days Interval:"), 'past_due_days', $_POST['past_due_days'], 6, 6, '', "", _("days"));
192
193 accounts_type_list_row(_("Accounts Type:"), 'accounts_alpha', $_POST['accounts_alpha']); 
194
195 gl_all_accounts_list_row(_("Retained Earnings:"), 'retained_earnings_act', $_POST['retained_earnings_act']);
196
197 gl_all_accounts_list_row(_("Profit/Loss Year:"), 'profit_loss_year_act', $_POST['profit_loss_year_act']);
198
199 gl_all_accounts_list_row(_("Exchange Variances Account:"), 'exchange_diff_act', $_POST['exchange_diff_act']);
200
201 gl_all_accounts_list_row(_("Bank Charges Account:"), 'bank_charge_act', $_POST['bank_charge_act']);
202
203 tax_algorithm_list_row(_("Tax Algorithm:"), 'tax_algorithm', $_POST['tax_algorithm']);
204
205 //---------------
206
207 table_section_title(_("Dimension Defaults"));
208
209 text_row(_("Dimension Required By After:"), 'default_dim_required', $_POST['default_dim_required'], 6, 6, '', "", _("days"));
210
211 //----------------
212
213 table_section_title(_("Customers and Sales"));
214
215 amount_row(_("Default Credit Limit:"), 'default_credit_limit', $_POST['default_credit_limit']);
216
217 yesno_list_row(_("Invoice Identification:"), 'print_invoice_no', $_POST['print_invoice_no'], $name_yes=_("Number"), $name_no=_("Reference"));
218
219 check_row(_("Accumulate batch shipping:"), 'accumulate_shipping', null);
220
221 check_row(_("Print Item Image on Quote:"), 'print_item_images_on_quote', null);
222
223 textarea_row(_("Legal Text on Invoice:"), 'legal_text', $_POST['legal_text'], 32, 4);
224
225 gl_all_accounts_list_row(_("Shipping Charged Account:"), 'freight_act', $_POST['freight_act']);
226
227 gl_all_accounts_list_row(_("Deferred Income Account:"), 'deferred_income_act', $_POST['deferred_income_act'], true, false,
228         _("Not used"), false, false, false);
229
230 //---------------
231
232 table_section_title(_("Customers and Sales Defaults"));
233 // default for customer branch
234 gl_all_accounts_list_row(_("Receivable Account:"), 'debtors_act');
235
236 gl_all_accounts_list_row(_("Sales Account:"), 'default_sales_act', null,
237         false, false, true);
238
239 gl_all_accounts_list_row(_("Sales Discount Account:"), 'default_sales_discount_act');
240
241 gl_all_accounts_list_row(_("Prompt Payment Discount Account:"), 'default_prompt_payment_act');
242
243 text_row(_("Quote Valid Days:"), 'default_quote_valid_days', $_POST['default_quote_valid_days'], 6, 6, '', "", _("days"));
244
245 text_row(_("Delivery Required By:"), 'default_delivery_required', $_POST['default_delivery_required'], 6, 6, '', "", _("days"));
246
247 //---------------
248
249 table_section(2);
250
251 table_section_title(_("Suppliers and Purchasing"));
252
253 percent_row(_("Delivery Over-Receive Allowance:"), 'po_over_receive');
254
255 percent_row(_("Invoice Over-Charge Allowance:"), 'po_over_charge');
256
257 table_section_title(_("Suppliers and Purchasing Defaults"));
258
259 gl_all_accounts_list_row(_("Payable Account:"), 'creditors_act', $_POST['creditors_act']);
260
261 gl_all_accounts_list_row(_("Purchase Discount Account:"), 'pyt_discount_act', $_POST['pyt_discount_act']);
262
263 gl_all_accounts_list_row(_("GRN Clearing Account:"), 'grn_clearing_act', get_post('grn_clearing_act'), true, false, _("No postings on GRN"));
264
265 text_row(_("Receival Required By:"), 'default_receival_required', $_POST['default_receival_required'], 6, 6, '', "", _("days"));
266
267 check_row(_("Show PO item codes:"), 'show_po_item_codes', null);
268
269 table_section_title(_("Inventory"));
270
271 check_row(_("Allow Negative Inventory:"), 'allow_negative_stock', null);
272 label_row(null, _("Warning:  This may cause a delay in GL postings"), "", "class='stockmankofg' colspan=2"); 
273
274 check_row(_("No zero-amounts (Service):"), 'no_zero_lines_amount', null);
275
276 check_row(_("Location Notifications:"), 'loc_notification', null);
277
278 check_row(_("Allow Negative Prices:"), 'allow_negative_prices', null);
279
280 table_section_title(_("Items Defaults"));
281 gl_all_accounts_list_row(_("Sales Account:"), 'default_inv_sales_act', $_POST['default_inv_sales_act']);
282
283 gl_all_accounts_list_row(_("Inventory Account:"), 'default_inventory_act', $_POST['default_inventory_act']);
284 // this one is default for items and suppliers (purchase account)
285 gl_all_accounts_list_row(_("C.O.G.S. Account:"), 'default_cogs_act', $_POST['default_cogs_act']);
286
287 gl_all_accounts_list_row(_("Inventory Adjustments Account:"), 'default_adj_act', $_POST['default_adj_act']);
288
289 gl_all_accounts_list_row(_("WIP Account:"), 'default_wip_act', $_POST['default_wip_act']);
290
291 //----------------
292
293 table_section_title(_("Fixed Assets Defaults"));
294
295 gl_all_accounts_list_row(_("Loss On Asset Disposal Account:"), 'default_loss_on_asset_disposal_act', $_POST['default_loss_on_asset_disposal_act']);
296
297 array_selector_row (_("Depreciation Period:"), 'depreciation_period', $_POST['depreciation_period'], array(FA_MONTHLY => _("Monthly"), FA_YEARLY => _("Yearly")));
298
299 //----------------
300
301 table_section_title(_("Manufacturing Defaults"));
302
303 text_row(_("Work Order Required By After:"), 'default_workorder_required', $_POST['default_workorder_required'], 6, 6, '', "", _("days"));
304
305 //----------------
306
307 end_outer_table(1);
308
309 submit_center('submit', _("Update"), true, '', 'default');
310
311 end_form(2);
312
313 //-------------------------------------------------------------------------------------------------
314
315 end_page();
316