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);
|
||||
}
|
||||
|
||||
}
|
||||
?>
|
||||
70
modules/net_term/net_term_construct.xml
Normal file
70
modules/net_term/net_term_construct.xml
Normal file
@@ -0,0 +1,70 @@
|
||||
<?xml version="1.0" encoding="ISO-8859-1" ?>
|
||||
<construct>
|
||||
<module>net_term</module>
|
||||
<table>net_term</table>
|
||||
<dependancy>charge</dependancy>
|
||||
<cache>0</cache>
|
||||
<order_by>name</order_by>
|
||||
<limit>35</limit>
|
||||
<field>
|
||||
<id>
|
||||
<type>I4</type>
|
||||
<unique>1</unique>
|
||||
</id>
|
||||
<site_id>
|
||||
<type>I4</type>
|
||||
</site_id>
|
||||
<status>
|
||||
<type>L</type>
|
||||
</status>
|
||||
<group_avail>
|
||||
<type>X2</type>
|
||||
<validate>any</validate>
|
||||
<convert>array</convert>
|
||||
</group_avail>
|
||||
<checkout_id>
|
||||
<type>I4</type>
|
||||
<asso_table>checkout</asso_table>
|
||||
<asso_field>name</asso_field>
|
||||
</checkout_id>
|
||||
<name>
|
||||
<type>C(16)</type>
|
||||
<min_len>2</min_len>
|
||||
<max_len>16</max_len>
|
||||
<validate>alphanumeric</validate>
|
||||
<unique>1</unique>
|
||||
</name>
|
||||
<sku>
|
||||
<type>C(16)</type>
|
||||
<validate>alphanumeric</validate>
|
||||
</sku>
|
||||
<fee_type>
|
||||
<type>L</type>
|
||||
</fee_type>
|
||||
<fee>
|
||||
<type>F</type>
|
||||
<validate>float</validate>
|
||||
</fee>
|
||||
<suspend_intervals>
|
||||
<type>I4</type>
|
||||
<validate>numeric</validate>
|
||||
</suspend_intervals>
|
||||
<enable_emails>
|
||||
<type>L</type>
|
||||
</enable_emails>
|
||||
<sweep_type>
|
||||
<type>I4</type>
|
||||
</sweep_type>
|
||||
<terms>
|
||||
<type>I4</type>
|
||||
</terms>
|
||||
</field>
|
||||
<method>
|
||||
<add>id,status,group_avail,checkout_id,name,sku,fee_type,fee,suspend_intervals,enable_emails,sweep_type,terms</add>
|
||||
<update>id,status,group_avail,checkout_id,name,sku,fee_type,fee,suspend_intervals,enable_emails,sweep_type,terms</update>
|
||||
<delete>id,status,group_avail,checkout_id,name,sku,fee_type,fee,suspend_intervals,enable_emails,sweep_type,terms</delete>
|
||||
<view>id,status,group_avail,checkout_id,name,sku,fee_type,fee,suspend_intervals,enable_emails,sweep_type,terms</view>
|
||||
<search>id,status,checkout_id,name,sku,fee_type,fee,suspend_intervals,enable_emails,sweep_type,terms</search>
|
||||
</method>
|
||||
<trigger>0</trigger>
|
||||
</construct>
|
||||
37
modules/net_term/net_term_install.xml
Normal file
37
modules/net_term/net_term_install.xml
Normal file
@@ -0,0 +1,37 @@
|
||||
<?xml version="1.0" encoding="ISO-8859-1" ?>
|
||||
<install>
|
||||
<module_properties>
|
||||
<name>net_term</name>
|
||||
<parent>setup</parent>
|
||||
<notes>This module controls the groups and checkout plugins that net terms will be available to</notes>
|
||||
<menu_display>1</menu_display>
|
||||
<dependancy>charge</dependancy>
|
||||
<sub_modules></sub_modules>
|
||||
</module_properties>
|
||||
<sql_inserts>
|
||||
<module_method>
|
||||
<add>
|
||||
<name>add</name>
|
||||
<page>%%:add</page>
|
||||
<menu_display>1</menu_display>
|
||||
</add>
|
||||
<update>
|
||||
<name>update</name>
|
||||
</update>
|
||||
<delete>
|
||||
<name>delete</name>
|
||||
</delete>
|
||||
<view>
|
||||
<name>view</name>
|
||||
<page>core:search&module=%%&_escape=1</page>
|
||||
<menu_display>1</menu_display>
|
||||
</view>
|
||||
<search>
|
||||
<name>search</name>
|
||||
</search>
|
||||
<search_show>
|
||||
<name>search_show</name>
|
||||
</search_show>
|
||||
</module_method>
|
||||
</sql_inserts>
|
||||
</install>
|
||||
Reference in New Issue
Block a user