Initial Commit of AgileBill Open Source
This commit is contained in:
unknown
245
modules/net_term/net_term.inc.php
Normal file
245
modules/net_term/net_term.inc.php
Normal file
@@ -0,0 +1,245 @@
|
||||
<?php
|
||||
|
||||
/**
|
||||
* AgileBill - Open Billing Software
|
||||
*
|
||||
* This body of work is free software; you can redistribute it and/or
|
||||
* modify it under the terms of the Open AgileBill License
|
||||
* License as published at http://www.agileco.com/agilebill/license1-4.txt
|
||||
*
|
||||
* For questions, help, comments, discussion, etc., please join the
|
||||
* Agileco community forums at http://forum.agileco.com/
|
||||
*
|
||||
* @link http://www.agileco.com/
|
||||
* @copyright 2004-2008 Agileco, LLC.
|
||||
* @license http://www.agileco.com/agilebill/license1-4.txt
|
||||
* @author Tony Landis <tony@agileco.com>
|
||||
* @package AgileBill
|
||||
* @version 1.4.93
|
||||
*/
|
||||
|
||||
class net_term
|
||||
{
|
||||
var $taxable=1; # are late fees taxable? 0/1
|
||||
|
||||
# Open the constructor for this mod
|
||||
function net_term()
|
||||
{
|
||||
# name of this module:
|
||||
$this->module = "net_term";
|
||||
|
||||
# location of the construct XML file:
|
||||
$this->xml_construct = PATH_MODULES . "" . $this->module . "/" . $this->module . "_construct.xml";
|
||||
|
||||
# open the construct file for parsing
|
||||
$C_xml = new CORE_xml;
|
||||
$construct = $C_xml->xml_to_array($this->xml_construct);
|
||||
|
||||
$this->method = $construct["construct"]["method"];
|
||||
$this->trigger = $construct["construct"]["trigger"];
|
||||
$this->field = $construct["construct"]["field"];
|
||||
$this->table = $construct["construct"]["table"];
|
||||
$this->module = $construct["construct"]["module"];
|
||||
$this->cache = $construct["construct"]["cache"];
|
||||
$this->order_by = $construct["construct"]["order_by"];
|
||||
$this->limit = $construct["construct"]["limit"];
|
||||
}
|
||||
|
||||
### Check usergroup&checkout plugin to determin if net terms available (get best)
|
||||
function termsAllowed($account_id,$checkout_plugin_id)
|
||||
{
|
||||
$db=&DB();
|
||||
$rs=&$db->Execute($sql=sqlSelect($db,"net_term","*","status=1 AND checkout_id=$checkout_plugin_id","fee ASC"));
|
||||
if($rs && $rs->RecordCount() > 0) {
|
||||
global $C_auth;
|
||||
while(!$rs->EOF) {
|
||||
$availarr = unserialize($rs->fields['group_avail']);
|
||||
if(is_array($availarr)) {
|
||||
foreach($availarr as $g) {
|
||||
if($C_auth->auth_group_by_account_id($account_id,$g)) return $rs->fields['id'];
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
return 0;
|
||||
}
|
||||
|
||||
### Task to generate late charges & insert into charge module:
|
||||
function task($VAR)
|
||||
{
|
||||
require_once(PATH_MODULES.'email_template/email_template.inc.php');
|
||||
require_once(PATH_MODULES.'invoice/invoice.inc.php');
|
||||
$invoice = new invoice;
|
||||
|
||||
# get active net terms
|
||||
$db=&DB();
|
||||
$rs=&$db->Execute($sql=sqlSelect($db,"net_term","*","status=1"));
|
||||
if($rs && $rs->RecordCount() > 0)
|
||||
{
|
||||
// loop through net terms
|
||||
while(!$rs->EOF)
|
||||
{
|
||||
$id = $rs->fields['id'];
|
||||
$last_interval = mktime(0,0,0,date('m'), date('d')-$rs->fields['terms'], date('Y'));
|
||||
|
||||
$i=&$db->Execute($sql=sqlSelect($db,"invoice",
|
||||
"id,account_id,total_amt,billed_amt,due_date,net_term_date_last,net_term_intervals",
|
||||
"net_term_id = $id AND
|
||||
(suspend_billing = 0 OR suspend_billing IS NULL) AND
|
||||
(billing_status = 0 OR billing_status IS NULL) AND
|
||||
due_date <= $last_interval AND
|
||||
net_term_date_last <= $last_interval"));
|
||||
if($i && $i->RecordCount() > 0)
|
||||
{
|
||||
|
||||
|
||||
|
||||
// loop through invoices
|
||||
while(!$i->EOF)
|
||||
{
|
||||
$terms = $rs->fields['terms'];
|
||||
echo "<BR>" . $start_interval = $i->fields['net_term_date_last'];
|
||||
echo "<BR>" . $stop_interval = $start_interval+(86400*$terms);
|
||||
|
||||
echo "<BR>". date(UNIX_DATE_FORMAT,$start_interval);
|
||||
|
||||
// charge or suspend?
|
||||
if(!empty($i->fields['net_term_intervals']) && $rs->fields['suspend_intervals'] < $i->fields['net_term_intervals']) {
|
||||
|
||||
// suspend invoice
|
||||
$arr['id'] = $i->fields['id'];
|
||||
$na =& $invoice->voidInvoice($arr,$invoice);
|
||||
|
||||
// suspend billing status
|
||||
$fields=Array('suspend_billing'=>1);
|
||||
$db->Execute($sql=sqlUpdate($db,"invoice",$fields,"id = {$i->fields['id']}"));
|
||||
|
||||
// send suspend e-mail
|
||||
if($rs->fields['enable_emails']) {
|
||||
$email = new email_template;
|
||||
$email->send('net_term_suspend', $i->fields['account_id'], $i->fields['id'], $rs->fields['suspend_intervals'], $i->fields['net_term_intervals']);
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
// calc late fee
|
||||
if($rs->fields['fee_type'] == 1)
|
||||
$fee = $rs->fields['fee'];
|
||||
else
|
||||
$fee = ($i->fields['total_amt'] - $i->fields['billed_amt']) * $rs->fields['fee'];
|
||||
|
||||
// create late charge
|
||||
if($fee>0)
|
||||
{
|
||||
$fields=Array( 'date_orig'=> time(),
|
||||
'status'=> 0,
|
||||
'account_id'=> $i->fields['account_id'],
|
||||
'amount'=> $fee,
|
||||
'sweep_type'=> $rs->fields['sweep_type'],
|
||||
'taxable'=> $this->taxable,
|
||||
'quantity' => 1,
|
||||
'attributes'=> "Name=={$rs->fields['name']}\r\nInterval==".date(UNIX_DATE_FORMAT,$start_interval)." - ".date(UNIX_DATE_FORMAT,$stop_interval), // todo: translate
|
||||
'description'=> $rs->fields['sku']);
|
||||
$db->Execute($sql=sqlInsert($db,"charge",$fields));
|
||||
|
||||
// update invoice
|
||||
$_fields['net_term_intervals'] = $i->fields['net_term_intervals']+1;
|
||||
$_fields['net_term_date_last'] = $stop_interval;
|
||||
$db->Execute($sql=sqlUpdate($db,"invoice",$_fields,"id={$i->fields['id']}"));
|
||||
echo "<BR><BR>$sql";
|
||||
}
|
||||
|
||||
// send late fee/payment reminder e-mail:
|
||||
if($rs->fields['enable_emails']){
|
||||
$email = new email_template;
|
||||
$email->send('net_term_late_notice', $i->fields['account_id'], $i->fields['id'], number_format($fee,2), number_format($rs->fields['suspend_intervals']-$i->fields['net_term_intervals']));
|
||||
}
|
||||
}
|
||||
$i->MoveNext();
|
||||
}
|
||||
}
|
||||
$rs->MoveNext();
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
|
||||
##############################
|
||||
## ADD ##
|
||||
##############################
|
||||
function add($VAR)
|
||||
{
|
||||
$type = "add";
|
||||
$this->method["$type"] = split(",", $this->method["$type"]);
|
||||
$db = new CORE_database;
|
||||
$db->add($VAR, $this, $type);
|
||||
}
|
||||
|
||||
##############################
|
||||
## VIEW ##
|
||||
##############################
|
||||
function view($VAR)
|
||||
{
|
||||
$type = "view";
|
||||
$this->method["$type"] = split(",", $this->method["$type"]);
|
||||
$db = new CORE_database;
|
||||
$db->view($VAR, $this, $type);
|
||||
}
|
||||
|
||||
##############################
|
||||
## UPDATE ##
|
||||
##############################
|
||||
function update($VAR)
|
||||
{
|
||||
$type = "update";
|
||||
$this->method["$type"] = split(",", $this->method["$type"]);
|
||||
$db = new CORE_database;
|
||||
$db->update($VAR, $this, $type);
|
||||
}
|
||||
|
||||
##############################
|
||||
## DELETE ##
|
||||
##############################
|
||||
function delete($VAR)
|
||||
{
|
||||
$db = new CORE_database;
|
||||
$db->mass_delete($VAR, $this, "");
|
||||
}
|
||||
|
||||
##############################
|
||||
## SEARCH FORM ##
|
||||
##############################
|
||||
function search_form($VAR)
|
||||
{
|
||||
$type = "search";
|
||||
$this->method["$type"] = split(",", $this->method["$type"]);
|
||||
$db = new CORE_database;
|
||||
$db->search_form($VAR, $this, $type);
|
||||
}
|
||||
|
||||
##############################
|
||||
## SEARCH ##
|
||||
##############################
|
||||
function search($VAR)
|
||||
{
|
||||
$type = "search";
|
||||
$this->method["$type"] = split(",", $this->method["$type"]);
|
||||
$db = new CORE_database;
|
||||
$db->search($VAR, $this, $type);
|
||||
}
|
||||
|
||||
##############################
|
||||
## SEARCH SHOW ##
|
||||
##############################
|
||||
|
||||
function search_show($VAR)
|
||||
{
|
||||
$type = "search";
|
||||
$this->method["$type"] = split(",", $this->method["$type"]);
|
||||
$db = new CORE_database;
|
||||
$db->search_show($VAR, $this, $type);
|
||||
}
|
||||
|
||||
}
|
||||
?>
|
||||
Reference in New Issue
Block a user