deon/khosb
Archived
1
0
Fork 0
Code Issues 6 Pull Requests Packages Projects Releases Wiki Activity
This repository has been archived on 2024-04-08. You can view files and clone it, but cannot push or open issues or pull requests.
2e4fa74af1
khosb/modules/invoice/invoice.inc.php
anubis fae6352bf2 Update to PEAR 1.7.2, Image_Canvas 0.3.1, Image_Color 1.0.3, Image_Graph 0.7.2, XML_Parser 1.3.1. 
Removed PHP_Compat, and references to it.
Removed ionCube/Zend/mmCache compatibility checks in test.php script.
Changed minimum PHP requirement to 5.0 in test.php script.
2009-01-04 19:22:54 -05:00

4376 lines
150 KiB
PHP
Raw Blame History

<?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
*/
/**
* The main AgileBill Invoice Class
*/
class invoice
{
/** Enable summary invoice view that rolls multiple instances of the same sku w/identical base&setup price & attributes into one line item */
var $summarizeInvoice=true;
/**
* Holds sku's of line items to exclude from invoice summarys (pdf view only)
*
* @var array
*/
var $summarizeInvoiceExclude;
/** Invoice type, 0=new, 1=recurr */
var $type=0;
/** Invoice Creation Timestamp */
var $date_orig;
/** Last modification Timestamp */
var $date_last;
/** Invoice Id */
var $record_id;
/** Invoice Item Id */
var $item_id=1;
/** Parent Invoice Id for recurring */
var $parent_id;
/** Account Id for invoice */
var $account_id;
/** Affiliate Id of Invoice */
var $affiliate_id;
/** Account Billing Id */
var $account_billing_id;
/** Campaign Id */
var $campaign_id;
/** Reseller Id */
var $reseller_id;
/** Billed Currency Id */
var $billed_currency_id;
/** Actual Billed Currency selected by Client */
var $actual_billed_currency_id;
/** Checkout Plugin Id */
var $checkout_plugin_id;
/** Array of checkout plugin data returned by checkout plugin */
var $checkout_plugin_data;
/** Current Notice Count */
var $notice_count=0;
/** Last Notice Timestamp */
var $notice_date;
/** Due Date Timestamp */
var $due_date;
/** Net Term Id */
var $net_term_id=false;
/** Net Term Last Notice/Late fee Timestamp */
var $net_term_date_last;
/** Net Term Interval Count */
var $net_term_intervals=0;
/** Process Status */
var $process_status=0;
/** Billing Status */
var $billing_status=0;
/** Suspend Billing Status */
var $suspend_billing=0;
/** Printed Invoice Status */
var $print_status=0;
/** Refunded Invoice Status */
var $refund_status=0;
/** Calcuate Taxes */
var $tax=true;
/** Calculate Discounts */
var $discount=true;
/** Total Invoice Amount */
var $total_amt=0;
/** Total Amount Billed */
var $billed_amt=0;
/** Actual total amount billed (converted to local) */
var $actual_billed_amt=0;
/** Total Tax Amount */
var $tax_amt=0;
/** Total Discount Amount */
var $discount_amt=0;
/** Recurring Amount */
var $recur_amt;
/** Recurring Array for Later Processing */
var $recur_arr;
/** IP Address of User */
var $ip=USER_IP;
/** Array of the Invoice items */
var $invoice_item;
/** Array of the discounts for the Invoice items */
var $item_discount;
/** Array of the taxes for the Invoice Items */
var $item_tax;
/** Tracking to determine payment options */
var $any_new=false;
var $any_trial=false;
var $any_recurring=false;
/** Invoice Config Global Options */
var $invoice_delivery=1;
var $invoice_format=0;
var $notice_max=MAX_BILLING_NOTICE;
var $grace_period=GRACE_PERIOD;
/**
* Get the global level invoice settings
*/
function setupGlobal() {
$db=&DB();
$invopt=$db->Execute(sqlSelect($db,"setup_invoice","*",""));
if($invopt && $invopt->RecordCount()) {
$this->invoice_delivery=$invopt->fields['invoice_delivery'];
$this->invoice_format=$invopt->fields['invoice_show_itemized'];
}
}
/**
* Get the account level invoice options
*
* @param int $id Account Id
*/
function setupAccount() {
if(!$this->account_id) return;
$db=&DB();
$acctrs=$db->Execute(sqlSelect($db,"account","invoice_grace,invoice_advance_gen","id=$this->account_id"));
if($acctrs && $acctrs->RecordCount()) {
$this->advance_gen=$acctrs->fields['invoice_advance_gen'];
if($this->grace_period == GRACE_PERIOD && !empty($acctrs->fields['invoice_grace'])) $this->grace_period=$acctrs->fields['invoice_grace'];
}
}
/**
* Initialize new invoice creation
*
* @param bool $type 0=new 1=recur
*/
function initNew($type=0) {
$this->type=$type;
$this->date_orig=time();
$this->date_last=time();
global $C_list;
$this->net_term = $C_list->is_installed('net_term');
// get account invoice defaults
$this->setupAccount();
}
/**
* Commit the current invoice/items/discounts/taxes
*
* @param object $taxObj Object for Tax Calculation
* @param object $discountObj Object for Discount Calculation
* @param bool $email Send customer/admin e-mails
*/
function commitNew(&$taxObj, &$discountObj, $email=true) {
// init DB transaction
$db=&DB();
$db->BeginTrans();
// get invoice id
if(empty($this->record_id)) $this->record_id = sqlGenID($db,"invoice");
// serialized records:
if(is_array($this->checkout_plugin_data)) $this->checkout_plugin_data=serialize($this->checkout_plugin_data);
if(is_array($this->recur_arr)) $this->recur_arr=serialize($this->recur_arr);
// dates & defaults
if(empty($this->due_date)) $this->due_date=time();
if(empty($this->date_orig)) $this->date_orig=time();
if(empty($this->date_last)) $this->date_last=time();
if(empty($this->notice_next_date)) $this->notice_next_date=$this->due_date+86400;
// net terms
if ($this->net_term && !$this->billing_status && $this->total_amt>0) {
include_once(PATH_MODULES.'net_term/net_term.inc.php');
$net=new net_term;
$this->net_term_id = $net->termsAllowed($this->account_id, $this->checkout_plugin_id);
if(empty($this->net_term_date_last)) $this->net_term_date_last=time();
}
// insert invoice
$fields=Array(
'date_orig'=>$this->date_orig,
'date_last'=>$this->date_last,
'parent_id'=>$this->parent_id,
'type'=>$this->type,
'process_status'=>$this->process_status,
'billing_status'=>$this->billing_status,
'suspend_billing'=>$this->suspend_billing,
'refund_status'=>$this->refund_status,
'print_status'=>$this->print_status,
'account_id'=>$this->account_id,
'account_billing_id'=>$this->account_billing_id,
'affiliate_id'=>$this->affiliate_id,
'campaign_id'=>$this->campaign_id,
'reseller_id'=>$this->reseller_id,
'checkout_plugin_id'=>$this->checkout_plugin_id,
'checkout_plugin_data'=>$this->checkout_plugin_data,
'tax_amt'=>$this->tax_amt,
'discount_amt'=>$this->discount_amt,
'total_amt'=>$this->total_amt,
'billed_amt'=>$this->billed_amt,
'recur_amt'=>$this->recur_amt,
'recur_arr'=>$this->recur_arr,
'actual_billed_amt'=>$this->actual_billed_amt,
'billed_currency_id'=>$this->billed_currency_id,
'actual_billed_currency_id'=>$this->actual_billed_currency_id,
'notice_count'=>$this->notice_count,
'notice_max'=>$this->notice_max,
'notice_next_date'=>$this->notice_next_date,
'due_date'=>$this->due_date,
'grace_period'=>$this->grace_period,
'net_term_id'=>$this->net_term_id,
'net_term_date_last'=>$this->net_term_date_last,
'net_term_intervals'=>$this->net_term_intervals,
'ip'=>$this->ip
);
$db->Execute($sql=sqlInsert($db, "invoice", $fields, $this->record_id));
// loop through invoice items
if(is_array($this->invoice_item)) {
foreach($this->invoice_item as $id=>$fields) {
// get an invoice_item id
$invoice_item_id = sqlGenID($db, "invoice_item");
// domain sku's
if ($fields['item_type'] == 2) {
$fields['sku'] = "DOMAIN-".strtoupper($fields['domain_type']);
$fields['price_type'] = '0';
}
// build e-mail item details
if($email) {
$email_instructions='';
if($fields['item_type']<2 && !empty($fields['product_id'])) {
// product, get email instructions and translated name
$translate_prod=$db->Execute(sqlSelect($db,"product_translate","email_template,name","product_id={$fields['product_id']} and language_id=::".SESS_LANGUAGE."::"));
if($translate_prod && $translate_prod->RecordCount()) {
$instructions=$translate_prod->fields['email_template'];
$name=$translate_prod->fields['name'];
} else {
$name=$fields["sku"];
}
} elseif ($fields['item_type'] == 2) {
$name=strtoupper($fields['domain_name'].".".$fields['domain_tld']);
} else {
if(!empty($fields['product_name'])) $name=$fields['product_name']; else $name=$fields['sku'];
}
// add to e-mail array
$email_arr[] = array('Qty' => '('.$fields["quantity"].')', 'Item' => 'SKU '.$fields["sku"], 'Price' => number_format($fields["total_amt"],2), 'Name' => $name, 'Instructions' => $instructions);
}
// insert the invoice item_id
$fields['invoice_id']=$this->record_id;
$fields['date_orig']=time();
$attr = serialize($fields['product_attr']);
$fields['product_attr']=$fields['product_attr_cart'];
$fields['product_attr_cart']=$attr;
$db->Execute($sql=sqlInsert($db, "invoice_item", $fields, $invoice_item_id));
// insert taxes
if($this->tax && $this->tax_amt > 0 && !empty($this->tax_arr[$id])) {
$taxObj->invoice_item($this->record_id, $invoice_item_id, $this->account_id, $this->tax_arr[$id]);
}
// insert discounts
if($this->discount && $this->discount_amt>0 && !empty($this->discount_arr[$id])) {
$discountObj->invoice_item($this->record_id, $invoice_item_id, $this->account_id, $this->discount_arr[$id]);
}
}
}
// complete DB transaction
$db->CompleteTrans();
// complete building e-mail notices and send
if($email) {
include_once(PATH_MODULES.'email_template/email_template.inc.php');
// Create the products order list for the e-mail:
$e_itm_usr = '';
$e_itm_adm = '';
if(is_array($email_arr)) {
foreach($email_arr as $i=>$em) {
$e_itm_usr .= $em['Qty'].' '.$em['Item'].' ('.$em['Name'].') '.$em['Price'];
$e_itm_adm .= $em['Qty'].' '.$em['Item'].' ('.$em['Name'].') '.$em['Price']."\r\n";
if(!empty($email_arr[$i]['Instructions'])) $e_itm_usr .= "\r\n * " . $email_item_arr[$i]['Instructions'];
$e_itm_usr .= "\r\n";
}
$e_arr_user = Array('%products%' => $e_itm_usr);
$e_arr_adm = Array('%products%' => $e_itm_adm);
}
// e-mail invoice creation confirmation
$mail = new email_template;
$mail->send('invoice_confirm_user', $this->account_id, $this->record_id, $this->checkout_plugin_id, $e_arr_user);
$email = new email_template;
$email->send('admin->invoice_confirm_admin', $this->account_id, $this->record_id, $this->checkout_plugin_id, $e_arr_adm);
}
// net terms?
if($this->net_term_id) {
$this->approveInvoice(array('id'=>$this->record_id), $this);
return $this->record_id;
}
// Determine the approval status by checkout plugin type & settings:
if($email && $this->billing_status == 0 && $this->billed_amt > 0 ) {
global $C_list;
if($this->checkout_type == 'redirect') {
// User e-mail alert of due invoice
$email = new email_template;
$email->send('invoice_due_user', $this->account_id, $this->record_id, $user_currency, $C_list->date($this->due_date));
} elseif ($this->checkout_type == 'other') {
// Admin e-mail alert of manual payment processing
$email = new email_template;
$email->send('admin->invoice_due_admin', $this->account_id, $this->record_id, $admin_currency, $C_list->date($this->due_date));
}
} elseif($this->billed_amt>0 ) {
if($email) {
// User alert of payment processed
$email = new email_template;
$email->send('invoice_paid_user', $this->account_id, $this->record_id, $this->billed_currency_id, '');
// Admin alert of payment processed
$email = new email_template;
$email->send('admin->invoice_paid_admin', $this->account_id, $this->record_id, $this->billed_currency_id, '');
}
$this->autoApproveInvoice($this->record_id);
} elseif($this->billed_amt == 0 && $this->billing_status == 1 ) {
$this->autoApproveInvoice($this->record_id);
}
// return invoice id
return $this->record_id;
}
/**
* Add an invoice item
*
* @param int $id Reference ID for use in Cart or false
* @param object $taxObj Object for Tax Calculation
* @param object $discountObj Object for Discount Calculation
* @param int $item_type 0/1=Product/Service/Hosting 2=Domain 3=Add Hoc
* @param string $taxable True, False, or 'validate' to locate the specified $product id and verify
* @param int $service_id If this is for a service upgrade, this will be defined
* @param int $parent_id Item Parent Id
* @param int $product_id Item Product Id
* @param array $product_attr Item attributes from the cart/prev service
* @param string $product_name Item product name
* @param string $sku Item Product SKU
* @param int $quantity Item Quantity
* @param float $price_base Item Base price
* @param float $price_setup Item Setup Price
* @param float $discount_manual Ad Hoc Discount Amount
* @param int $recurring_schedule Item recurring schedule, 0=week, 1=month, 2=quarter, 3=semi-annual, 4=annual, 5=bi-year
* @param int $date_start Date service started
* @param int $date_stop Date service stops
* @param string $domain_name Domain name
* @param string $domain_tld Domain TLD
* @param int $domain_term Domain Term
* @param string $domain_type Domain Type (register, transfer, renew, park, ns_transfer)
*/
function addItem($id, &$taxObj, &$discountObj, $item_type, $taxable=false, $service_id=false, $parent_id=false, $product_id=false, $product_attr=false, $product_name=false, $sku=false, $quantity=1, $price_base=false, $price_setup=false, $discount_manual=false, $recurring_schedule=false, $date_start=false, $date_stop=false, $domain_name=false, $domain_tld=false, $domain_term=false, $domain_type=false) {
$tax_amt=0;
$total_amt=0;
$discount_amt=0;
// define correct qty
if($quantity<=0) $quantity=1;
// determine the reference id for this item
if($id>0) {
$this->item_id=$id;
} else {
$this->item_id++;
}
// get the product details
if($product_id && $item_type<2) {
$db=&DB();
$product=$db->Execute(sqlSelect($db,"product","*","id=$product_id"));
if($product && $product->RecordCount()) {
$taxable = $product->fields['taxable'];
$this->product["$this->item_id"] = $product->fields;
}
// get the tld details
} elseif($item_type==2) {
$db=&DB();
$tld=$db->Execute(sqlSelect($db,"host_tld","*","name=::$domain_tld::"));
if($tld && $tld->RecordCount())
$taxable = $tld->fields['taxable'];
}
// get the product pricing details if product
$price_type=0;
if($price_base===false && $price_setup===false && $product_id && $item_type<2) {
if($product && $product->RecordCount()) {
$price_type=$product->fields['price_type'];
$sku=$product->fields['sku'];
include_once(PATH_MODULES.'product/product.inc.php');
$productObj=new product;
// get pricing for this product:
$prod_price = $productObj->price_prod($product->fields, $recurring_schedule, $this->account_id);
$price_base = $prod_price["base"];
$price_setup = $prod_price["setup"];
// calculate any product attributes fees
$attr_price = $productObj->price_attr($product->fields, $product_attr, $recurring_schedule, $this->account_id);
$price_base += $attr_price["base"];
$price_setup += $attr_price["setup"];
// determine price type for checkout
if ($product->fields["price_type"] == '0')
$this->any_new=true;
else if ($product->fields["price_type"] == '1')
$this->any_recurring=true;
else if ($product->fields["price_type"] == '2')
$this->any_trial=true;
} else {
$this->any_new=true;
}
} else {
$this->any_new=true;
}
// get the TLD pricing details if domain
if($price_base===false && $price_setup===false && $domain_tld && $domain_term && $domain_type) {
include_once(PATH_MODULES.'host_tld/host_tld.inc.php');
$tldObj = new host_tld;
$tldprice = $tldObj->price_tld_arr($domain_tld, $domain_type, false, false, false, $this->account_id);
if($domain_type == "park") {
$price_base = $tldprice;
} else {
$price_base = $tldprice["$domain_term"];
$this->tld_arr["$this->item_id"] = $tldprice;
}
}
// set total amount for this line item before attributes, taxes, or discounts
$price_base *= $quantity;
$price_setup *= $quantity;
$total_amt = ($price_setup + $price_base);
// format product attributes for storage
$product_attr_cart=false;
if(($item_type==0 || $item_type>2) && is_array($product_attr)) $product_attr_cart = $this->get_product_attr_cart($product_attr);
// recurring taxes and arrays
if($price_base>0 && $price_type==1)
{
// increment the total invoice recurring amount
$this->recur_amt += $price_base;
// determine taxes for the recurring amount
if($this->tax && $taxable && $price_base>0 && $this->account_id) {
$recur_tax_arr = $taxObj->calculate($price_base, $this->country_id, $this->state);
if(is_array($recur_tax_arr)) foreach($recur_tax_arr as $tx) $this->recur_amt += $tx['rate'];
}
// get the recurring arrays for price and invoice
if($product && $product->RecordCount()) {
$this->price_arr["$this->item_id"] = $productObj->price_recurr_arr($product->fields, $this->account_id);
$this->recur_arr[] = Array (
'price' => $price_base*$quantity,
'recurr_schedule'=> $recurring_schedule,
'recurr_type' => $product->fields['price_recurr_type'],
'recurr_weekday' => $product->fields['price_recurr_weekday'],
'recurr_week' => $product->fields['price_recurr_week']
);
}
}
// calculate any ad-hoc line item level (admin) discounts
if($this->discount && $discount_manual>0) {
$total_amt -= $discount_manual;
$discount_amt += $discount_manual;
$this->discount_amt += $discount_amt;
$discountObj->add_manual_discount($discount_manual,'MISC',$this->item_id);
}
// account level discounts
if($this->discount && $this->account_id) {
// calculate any database level discounts for this item (both account specific and session specific)
$discount_amt = $discountObj->calc_all_discounts(0, $this->item_id, $product_id, $total_amt, $this->account_id, $this->total_amt+$total_amt);
$total_amt -= $discount_amt;
$this->discount_amt += $discount_amt;
}
// add to total discount array
if(is_array($discountObj->discount_arr)) {
$this->discount_arr["$this->item_id"] = $discountObj->discount_arr;
}
// increment invoice total amount
$this->total_amt += $total_amt;
// calculate any taxes for current item
if($this->tax && $taxable && $total_amt>0 && $this->account_id) {
$tax_arr = $taxObj->calculate($total_amt, $this->country_id, $this->state);
if(is_array($tax_arr)) {
foreach($tax_arr as $tx) $tax_amt += $tx['rate'];
$this->item_tax["$this->item_id"] = $tax_arr;
$this->tax_arr["$this->item_id"] = $tax_arr;
}
$this->tax_amt += $tax_amt;
$this->total_amt += $tax_amt;
}
// store the fields to an array
$this->invoice_item["$this->item_id"]=Array(
'item_type'=>$item_type,
'price_type'=>$price_type,
'taxable'=>$taxable,
'service_id'=>$service_id,
'parent_id'=>$parent_id,
'product_id'=>$product_id,
'product_attr'=>$product_attr,
'product_attr_cart'=>$product_attr_cart,
'product_name'=>$product_name,
'sku'=>$sku,
'quantity'=>$quantity,
'price_base'=>$price_base,
'price_setup'=>$price_setup,
'recurring_schedule'=>$recurring_schedule,
'date_start'=>$date_start,
'date_stop'=>$date_stop,
'domain_name'=>$domain_name,
'domain_tld'=>$domain_tld,
'domain_term'=>$domain_term,
'domain_type'=>$domain_type,
'total_amt'=>$total_amt,
'tax_amt'=>$tax_amt,
'discount_amt'=>$discount_amt
);
}
/**
* Group all taxes to lump sums
*/
function group_taxes() {
if(is_array($this->tax_arr)) {
foreach($this->tax_arr as $taxarr) foreach($taxarr as $taxes) $arr[$taxes["name"]]+=$taxes["rate"];
if(is_array($arr)) {
foreach($arr as $a=>$b) $ret[] = Array('name'=>$a, 'rate'=>$b);
return $ret;
}
}
}
/**
* Group all discounts to lump sums
*/
function group_discounts() {
if(is_array($this->discount_arr)) {
foreach($this->discount_arr as $discarr) foreach($discarr as $discounts) $arr[$discounts["discount"]]+=$discounts["amount"];
if(is_array($arr)) {
foreach($arr as $a=>$b) $ret[] = Array('name'=>$a, 'total'=>$b);
return $ret;
}
}
}
/**
* Build a formatted product attribute list
*
* @param array $attributes
* @return string Formatted product attribute list
*/
function get_product_attr_cart($attributes) {
# Set the attribute array:
if(!empty($attributes) && is_array($attributes)) {
$db=&DB();
$product_attr = false;
foreach($attributes as $id=>$value) {
if (!empty($value)) {
if(is_numeric($id)) {
$attr = $db->Execute(sqlSelect($db,"product_attr","name","id=$id"));
if ($attr && $attr->RecordCount()) $product_attr .= "{$attr->fields['name']}==".ereg_replace("\r\n", "<br>", $value)."\r\n";
} else {
$product_attr .= "{$id}=={$value}\r\n";
}
}
}
}
return $product_attr;
}
/** Custom Tracking
*/
function custom_tracking($VAR)
{
# Get the invoice id
if(SESS_LOGGED == false)
return false;
# Check if we are in the iframe
if(empty($VAR['_escape']) || empty($VAR['confirm']))
{
echo '<iframe id="custom_ecom_track" style="border:0px; width:0px; height:0px;"scrolling="auto" '.
'frameborder="0" SRC="?_page=core:blank&_escape=1&confirm=1&do[]=invoice:custom_tracking&rand='.md5(microtime()).'"></iframe>';
return;
}
# Get the un-tracked invoice details
$db = &DB();
$sql = "SELECT * FROM ".AGILE_DB_PREFIX."invoice WHERE
( custom_affiliate_status IS NULL OR
custom_affiliate_status = 0 )
AND billing_status = ".$db->qstr(1)."
AND site_id = ".$db->qstr(DEFAULT_SITE)."
AND account_id = ".$db->qstr(SESS_ACCOUNT);
$result = $db->Execute($sql);
if ($result === false) {
global $C_debug;
$C_debug->error('','', $db->ErrorMsg(). "\r\n\r\n". $sql);
return false;
}
if($result->RecordCount() == 0) {
echo 'none';
return false;
}
# Get the totals
$invoice = '';
$total_amount = false;
while(!$result->EOF)
{
if(!empty($invoice))
$invoice .= '-';
$invoice .= $result->fields['id'];
$amt = $result->fields["total_amt"];
$total_amount += $amt;
$result->MoveNext();
}
# echo the custom tracking code to the screen:
if(!is_file(PATH_FILES.'tracking.txt')) return false;
$tracking = file_get_contents(PATH_FILES.'tracking.txt');
$tracking = ereg_replace('%%amount%%', "$total_amount", $tracking);
$tracking = ereg_replace('%%invoice%%', $invoice, $tracking);
$tracking = ereg_replace('%%affiliate%%', SESS_AFFILIATE, $tracking);
$tracking = ereg_replace('%%campaign%%', SESS_CAMPAIGN, $tracking);
$tracking = ereg_replace('%%account%%', SESS_ACCOUNT, $tracking);
echo $tracking;
# Update the record so it is not tracked again
$sql = "UPDATE ".AGILE_DB_PREFIX."invoice
SET
custom_affiliate_status = ".$db->qstr('1')."
WHERE
account_id = ".$db->qstr(SESS_ACCOUNT)."
AND
billing_status = ".$db->qstr(1)."
AND
site_id = ".$db->qstr(DEFAULT_SITE);
$rs = $db->Execute($sql);
if ($rs === false) {
global $C_debug;
$C_debug->error('','', $db->ErrorMsg(). "\r\n\r\n". $sql);
}
return true;
}
/** Performance: (for the admin dashboard)
*/
function performance($VAR)
{
global $smarty, $C_list, $C_translate;
# Get the period type, default to month
if (empty($VAR['period']))
$p = 'm';
else
$p = $VAR['period'];
# Determine the correct period language:
if($p=='' or $p == 'm')
{
$pTrans = $C_translate->translate('thismonth','invoice','') . ' '.
$C_translate->translate('vs','invoice','') . ' ' .
$C_translate->translate('lastmonth','invoice','');
$pFore = $C_translate->translate('thismonth','invoice','');
}
elseif ($p == 'w')
{
$pTrans = $C_translate->translate('thisweek','invoice','') . ' '.
$C_translate->translate('vs','invoice','') . ' ' .
$C_translate->translate('lastweek','invoice','');
$pFore = $C_translate->translate('thisweek','invoice','');
}
elseif ($p == 'y')
{
$pTrans = $C_translate->translate('thisyear','invoice','') . ' '.
$C_translate->translate('vs','invoice','') . ' ' .
$C_translate->translate('lastyear','invoice','');
$pFore = $C_translate->translate('thisyear','invoice','');
}
$smarty->assign('period_compare', $pTrans);
$smarty->assign('period_forcast', $pFore);
# Get the period start & end
switch ($p) {
case 'w':
$dow = date('w');
$this_start = mktime(0,0,0,date('m'), date('d')-$dow, date('y'));
$this_end = mktime(23,59,59,date('m'), date('d'), date('y'));
$last_start = mktime(0,0,0,date('m'), date('d', $this_start)-7, date('y'));
$last_end = $this_start-1;
break;
case 'm':
$this_start = mktime(0,0,0,date('m'), 1, date('y'));
$this_end = mktime(23,59,59,date('m'), date('d'), date('y'));
$last_start = mktime(0,0,0, date('m', $this_start)-1, 1, date('y'));
$last_end = $this_start-1;
break;
case 'y':
$this_start = mktime(0,0,0,1,1, date('y', time()));
$this_end = mktime(23,59,59, date('m'), date('d'), date('y'));
$last_start = mktime(0,0,0,1,1, date('y', $this_start)-1);
$last_end = $this_start-1;
break;
}
##############################
# Get sales for this period
##############################
$db = &DB();
$this_amt = 0;
$sql = 'SELECT total_amt FROM ' . AGILE_DB_PREFIX . 'invoice WHERE
date_orig >= ' . $db->qstr( $this_start ) . ' AND
date_orig <= ' . $db->qstr( $this_end ) . ' AND
site_id = ' . $db->qstr(DEFAULT_SITE);
$rs = $db->Execute($sql);
while( !$rs->EOF ) {
$this_amt += $rs->fields['total_amt'];
$rs->MoveNext();
}
$smarty->assign('sales_current', $this_amt);
###############################
# Get sales for last period
###############################
$last_amt = 0;
$sql = 'SELECT total_amt FROM ' . AGILE_DB_PREFIX . 'invoice WHERE
date_orig >= ' . $db->qstr( $last_start ) . ' AND
date_orig <= ' . $db->qstr( $last_end ) . ' AND
site_id = ' . $db->qstr(DEFAULT_SITE);
$rs = $db->Execute($sql);
while( !$rs->EOF ) {
$last_amt += $rs->fields['total_amt'];
$rs->MoveNext();
}
$smarty->assign('sales_previous', $last_amt);
###############################
# Get sales change percentage
###############################
if($last_amt > 0)
$sales_change = $this_amt/$last_amt *100 -100;
else
$sales_change = 0;
if($sales_change == 0)
$sales_change = '';
elseif($sales_change < 0)
$sales_change = '<font color="#990000">' . number_format($sales_change, 1). '%</font>';
else
$sales_change = '+'.number_format($sales_change, 1). '%';
$smarty->assign('sales_change', $sales_change);
#################################
# Get forcast for current period
#################################
switch ($p) {
case 'w':
$dow = date('w')+1;
$forcast_daily = $this_amt/$dow ;
$forcast_l_daily = $last_amt / 7;
@$forcast_change = $forcast_daily / $forcast_1_daily *100 -100;
$forcast_current = $forcast_daily * 7;
break;
case 'm':
$forcast_daily = $this_amt / date('d');
$forcast_1_daily = $last_amt / date('t', mktime(0,0,0,date('m')-1, 1, date('y')));
@$forcast_change = $forcast_daily / $forcast_1_daily *100 -100;
$forcast_current = $forcast_daily * date('t');
break;
case 'y':
$forcast_daily = $this_amt / date('z');
$forcast_1_daily = $last_amt / 356;
@$forcast_change = $forcast_daily / $forcast_1_daily *100 -100;
$forcast_current = $forcast_daily * 365;
break;
}
$smarty->assign('forcast_current', $forcast_current);
###############################
# Get forcast change percentage
###############################
if($last_amt > 0 )
@$forcast_change = $forcast_daily/$forcast_1_daily *100;
else
$forcast_change = 0;
if($forcast_change == 0)
$forcast_change = '-';
elseif($forcast_change < 0)
$forcast_change = '<font color="#990000">' . number_format($forcast_change, 1). '%</font>';
else
$forcast_change = '+'.number_format($forcast_change, 1). '%';
$smarty->assign('forcast_change', $forcast_change);
####################################################
# Get Quota for Today to meet Forcasted sales:
####################################################
$smarty->assign('quota_current', $forcast_daily);
##############################
# Get AR credits for this period
##############################
$this_billed_amt = 0;
$sql = 'SELECT billed_amt FROM ' . AGILE_DB_PREFIX . 'invoice WHERE
date_orig >= ' . $db->qstr( $this_start ) . ' AND
date_orig <= ' . $db->qstr( $this_end ) . ' AND
billed_amt > ' . $db->qstr( 0 ) . ' AND
site_id = ' . $db->qstr(DEFAULT_SITE);
$rs = $db->Execute($sql);
while( !$rs->EOF ) {
$this_billed_amt += $rs->fields['billed_amt'];
$rs->MoveNext();
}
$smarty->assign('ar_credits_current', $this_billed_amt);
###############################
# Get AR credits for last period
###############################
$last_billed_amt = 0;
$sql = 'SELECT billed_amt FROM ' . AGILE_DB_PREFIX . 'invoice WHERE
date_orig >= ' . $db->qstr( $last_start ) . ' AND
date_orig <= ' . $db->qstr( $last_end ) . ' AND
billed_amt > ' . $db->qstr( 0 ) . ' AND
site_id = ' . $db->qstr(DEFAULT_SITE);
$rs = $db->Execute($sql);
while( !$rs->EOF ) {
$last_billed_amt += $rs->fields['billed_amt'];
$rs->MoveNext();
}
$smarty->assign('ar_credits_previous', $last_billed_amt);
###############################
# Get AR Credits change percentage
###############################
if($last_billed_amt > 0)
$ar_change = $this_billed_amt/$last_billed_amt *100 -100;
else
$ar_change = 0;
if($ar_change == 0)
$ar_change = '-';
elseif($ar_change < 0)
$ar_change = '<font color="#990000">' . number_format($ar_change, 1). '%</font>';
else
$ar_change = '+'.number_format($ar_change, 1). '%';
$smarty->assign('ar_credit_change', $ar_change);
##########################################
# Get AR Balance
##########################################
$this_ar_balance = $this_billed_amt - $this_amt;
$last_ar_balance = $last_billed_amt - $last_amt;
$smarty->assign('ar_balance_current', $this_ar_balance);
$smarty->assign('ar_balance_last', $last_ar_balance);
#########################################
# Get Users (current)
#########################################
$sql = 'SELECT id FROM ' . AGILE_DB_PREFIX . 'account WHERE
date_orig >= ' . $db->qstr( $this_start ) . ' AND
date_orig <= ' . $db->qstr( $this_end ) . ' AND
site_id = ' . $db->qstr(DEFAULT_SITE);
$rs = $db->Execute($sql);
$users_current = $rs->RecordCount();
$smarty->assign('users_current', $users_current);
#########################################
# Get Users (previous)
#########################################
$sql = 'SELECT id FROM ' . AGILE_DB_PREFIX . 'account WHERE
date_orig >= ' . $db->qstr( $last_start ) . ' AND
date_orig <= ' . $db->qstr( $last_end ) . ' AND
site_id = ' . $db->qstr(DEFAULT_SITE);
$rs = $db->Execute($sql);
$users_previous = $rs->RecordCount();
$smarty->assign('users_previous', $users_previous);
###############################
# Get users change percentage
###############################
if($users_previous > 0)
@$users_change = $users_current/$users_current *100 -100;
else
$users_change = 0;
if($users_change == 0)
$users_change = '-';
elseif($users_change < 0)
$users_change = '<font color="#990000">' . number_format($users_change, 1). '%</font>';
else
$users_change = '+'.number_format($users_change, 1). '%';
$smarty->assign('users_change', $users_change);
# Get Tickets
if( $C_list->is_installed('ticket') )
{
$smarty->assign('show_tickets', true);
#########################################
# Get Tickets (current)
#########################################
$sql = 'SELECT id FROM ' . AGILE_DB_PREFIX . 'ticket WHERE
date_orig >= ' . $db->qstr( $this_start ) . ' AND
date_orig <= ' . $db->qstr( $this_end ) . ' AND
site_id = ' . $db->qstr(DEFAULT_SITE);
$rs = $db->Execute($sql);
$tickets_current = $rs->RecordCount();
$smarty->assign('tickets_current', $tickets_current);
#########################################
# Get Tickets (previous)
#########################################
$sql = 'SELECT id FROM ' . AGILE_DB_PREFIX . 'ticket WHERE
date_orig >= ' . $db->qstr( $last_start ) . ' AND
date_orig <= ' . $db->qstr( $last_end ) . ' AND
site_id = ' . $db->qstr(DEFAULT_SITE);
$rs = $db->Execute($sql);
$tickets_previous = $rs->RecordCount();
$smarty->assign('tickets_previous', $tickets_previous);
###############################
# Get Tickets change percentage
###############################
if($tickets_previous > 0)
@$tickets_change = $tickets_current/$tickets_current *100 -100;
else
$tickets_change = 0;
if($tickets_change == 0)
$tickets_change = '-';
elseif($tickets_change < 0)
$tickets_change = '<font color="#990000">' . number_format($tickets_change, 1). '%</font>';
else
$tickets_change = '+'.number_format($tickets_change, 1). '%';
$smarty->assign('tickets_change', $tickets_change);
}
# Get Affiliate stats
if( $C_list->is_installed('affiliate') )
{
$smarty->assign('show_affiliates', true);
###########################################
# Get affiliate sales for this period
###########################################
$this_amt = 0;
$sql = 'SELECT total_amt FROM ' . AGILE_DB_PREFIX . 'invoice WHERE
date_orig >= ' . $db->qstr( $this_start ) . ' AND
date_orig <= ' . $db->qstr( $this_end ) . ' AND
affiliate_id != ' . $db->qstr( 0 ) . ' AND
affiliate_id != ' . $db->qstr( '' ) . ' AND
site_id = ' . $db->qstr(DEFAULT_SITE);
$rs = $db->Execute($sql);
while( !$rs->EOF ) {
$this_amt += $rs->fields['total_amt'];
$rs->MoveNext();
}
$smarty->assign('affiliate_sales_current', $this_amt);
##########################################
# Get affiliate sales for last period
##########################################
$last_amt = 0;
$sql = 'SELECT total_amt FROM ' . AGILE_DB_PREFIX . 'invoice WHERE
date_orig >= ' . $db->qstr( $last_start ) . ' AND
date_orig <= ' . $db->qstr( $last_end ) . ' AND
affiliate_id != ' . $db->qstr( 0 ) . ' AND
affiliate_id != ' . $db->qstr( '' ) . ' AND
site_id = ' . $db->qstr(DEFAULT_SITE);
$rs = $db->Execute($sql);
while( !$rs->EOF ) {
$last_amt += $rs->fields['total_amt'];
$rs->MoveNext();
}
$smarty->assign('affiliate_sales_previous', $last_amt);
###########################################
# Get affiliate sales change percentage
###########################################
if($last_amt > 0)
$sales_change = $this_amt/$last_amt *100 -100;
else
$sales_change = 0;
if($sales_change == 0)
$sales_change = '-';
elseif($sales_change < 0)
$sales_change = '<font color="#990000">' . number_format($sales_change, 1). '%</font>';
else
$sales_change = '+'.number_format($sales_change, 1). '%';
$smarty->assign('affiliate_sales_change', $sales_change);
}
/** Get VoIP Performance Data
*/
if( $C_list->is_installed('voip') )
{
# Avg. Call Duration for this period
$rs = $db->Execute(sqlSelect($db, "voip_cdr", "avg(ceiling(billsec/60))", "disposition='ANSWERED' AND date_orig >= $this_start AND date_orig <= $this_end"));
if(empty($rs->fields[0])) $acd=0; else $acd = $rs->fields[0];
$smarty->assign('acd',$acd);
# Avg. Call Duration for last period
$rs = $db->Execute(sqlSelect($db, "voip_cdr", "avg(ceiling(billsec/60))", "disposition='ANSWERED' AND date_orig >= $last_start AND date_orig <= $last_end"));
if(empty($rs->fields[0])) $acd_last=0; else $acd_last = $rs->fields[0];
$smarty->assign('acd_last',$acd_last);
# Get Avg. Call Duration change Percentage
if($acd > 0) $acd_change = $acd/$acd_last*100-100; else $acd_change = 0;
if($acd_change == 0)
$acd_change = '-';
elseif ($acd_change < 0)
$acd_change = '<font color="#990000">' . number_format($acd_change, 1). '%</font>';
else
$acd_change = '+'.number_format($acd_change, 1). '%';
$smarty->assign('acd_change', $acd_change);
# Avg. Successful Rate for this period
$rs = $db->Execute(sqlSelect($db, "voip_cdr", "count(*)", "disposition='ANSWERED' AND date_orig >= $this_start AND date_orig <= $this_end"));
$rs1 = $db->Execute(sqlSelect($db, "voip_cdr", "count(*)", "date_orig >= $this_start AND date_orig <= $this_end"));
if ($rs->fields[0])
$asr = number_format(($rs->fields[0] / $rs1->fields[0]) * 100,3)." %";
else
$asr = "-";
$smarty->assign('asr', $asr);
# Number of CDRs for this period
$cdrs = $rs1->fields[0];
$smarty->assign('cdrs', number_format($cdrs,0));
# Avg. Successful Rate for last period
$rs = $db->Execute(sqlSelect($db, "voip_cdr", "count(*)", "disposition='ANSWERED' AND date_orig >= $last_start AND date_orig <= $last_end"));
$rs1 = $db->Execute(sqlSelect($db, "voip_cdr", "count(*)", "date_orig >= $last_start AND date_orig <= $last_end"));
if ($rs->fields[0])
$asr_last = number_format(($rs->fields[0] / $rs1->fields[0]) * 100,3)." %";
else
$asr_last = "-";
$smarty->assign('asr_last', $asr_last);
# Number of CDRS for last period
$cdrs_last = $rs1->fields[0];
$smarty->assign('cdrs_last', number_format($cdrs_last,0));
# Get Avg. Successful Rate change Percentage
if($asr > 0) $asr_change = $asr/$asr_last*100-100; else $asr_change = 0;
if($asr_change == 0)
$asr_change = '-';
elseif ($asr_change < 0)
$asr_change = '<font color="#990000">' . number_format($asr_change, 1). '%</font>';
else
$asr_change = '+'.number_format($asr_change, 1). '%';
$smarty->assign('asr_change', $asr_change);
# Get Number of CDRs change Percentage
if($cdrs > 0) $cdrs_change = $cdrs/$cdrs_last*100-100; else $cdrs_change = 0;
if($cdrs_change == 0)
$cdrs_change = '-';
elseif ($cdrs_change < 0)
$cdrs_change = '<font color="#990000">' . number_format($cdrs_change, 1). '%</font>';
else
$cdrs_change = '+'.number_format($cdrs_change, 1). '%';
$smarty->assign('cdrs_change', $cdrs_change);
}
# Generate the Calendar Overview
include_once(PATH_MODULES.'core/calendar.inc.php');
$calendar = new calendar;
$start = $calendar->start;
$end = $calendar->end;
global $C_list;
$C_list->currency(DEFAULT_CURRENCY);
$currency_symbol=$C_list->format_currency[DEFAULT_CURRENCY]['symbol'];
# Get the paid/due invoice statistics
$rs = $db->Execute($sql=sqlSelect($db,"invoice","date_orig,total_amt,billing_status,refund_status,billed_amt,suspend_billing","date_orig >= $start && date_orig <= $end"));
if($rs && $rs->RecordCount()) {
while(!$rs->EOF) {
$day = date("j", $rs->fields['date_orig']);
if($rs->fields['billed_amt'] > 0 && ($rs->fields['billing_status'] == 1 || $rs->fields['refund_status'] != 1)) {
$paid[$day] += $rs->fields['billed_amt'];
}
if ($rs->fields['billing_status'] != 1 && $rs->fields['refund_status'] != 1 ) {
$amt = $rs->fields['total_amt'] - $rs->fields['billed_amt'];
$due[$day] += $amt;
}
$rs->MoveNext();
}
if(is_array($paid))
foreach($paid as $day=>$item)
$calendar->add("<b>Paid</b> - {$currency_symbol}". number_format($item,2), $day, 'green', 'green');
if(is_array($due))
foreach($due as $day=>$item)
$calendar->add("<b>Due</b> - {$currency_symbol}". number_format($item,2), $day,'red','red');
}
# Get the upcoming due services
$rs = $db->Execute($sql=sqlSelect($db,"service","date_next_invoice,price","price > 0 AND date_next_invoice >= $start AND date_next_invoice <= $end AND suspend_billing <> 1"));
if($rs && $rs->RecordCount()) {
while(!$rs->EOF) {
$day = date("j", $rs->fields['date_next_invoice']);
$sdue[$day] += $rs->fields['price'];
$rs->MoveNext();
}
foreach($sdue as $day=>$item) {
$calendar->add("<b>Recurring</b> - {$currency_symbol}". number_format($item,2), $day, 'grey', 'grey');
}
}
$calout= $calendar->generate();
$smarty->assign("calendar", $calout);
return;
}
/** AUTO APPROVE INVOICE
*/
function autoApproveInvoice($invoice_id)
{
$do = false;
# Get the invoice details:
$db = &DB();
$q = "SELECT * FROM ".AGILE_DB_PREFIX."invoice WHERE
id = ".$db->qstr($invoice_id)." AND
site_id = ".$db->qstr(DEFAULT_SITE);
$invoice = $db->Execute($q);
if ($invoice === false) {
global $C_debug;
$C_debug->error('invoice.inc.php','autoApproveInvoice', $db->ErrorMsg());
return false;
}
# Get the checkout details:
$q = "SELECT * FROM ".AGILE_DB_PREFIX."checkout WHERE
id = ".$db->qstr($invoice->fields['checkout_plugin_id'])." AND
site_id = ".$db->qstr(DEFAULT_SITE);
$checkout = $db->Execute($q);
if ($checkout === false) {
global $C_debug;
$C_debug->error('invoice.inc.php','autoApproveInvoice', $db->ErrorMsg());
return false;
}
# Get the account details:
$q = "SELECT * FROM ".AGILE_DB_PREFIX."account WHERE
id = ".$db->qstr($invoice->fields['account_id'])." AND
site_id = ".$db->qstr(DEFAULT_SITE);
$account = $db->Execute($q);
if ($account === false) {
global $C_debug;
$C_debug->error('invoice.inc.php','autoApproveInvoice', $db->ErrorMsg());
return false;
}
# is this a recurring invoices, and is manual approvale req?
if ( $invoice->fields['type'] == 1 && $checkout->fields['manual_approval_recur'] != 1) {
$do = true;
}
# Manual approval required for all?
if( $invoice->fields['type'] != 1 && $checkout->fields['manual_approval_all'] != 1) {
$do = true;
}
if(!$do) {
# manual approval req. for invoice amount?
if(!empty($checkout->fields['manual_approval_amount']) && $do == true)
if($checkout->fields['manual_approval_amount'] <= $invoice->fields['total_amt'])
$do = false;
# manual approval req. for user's country?
if(!empty($checkout->fields['manual_approval_country']) && $do == true) {
$arr = unserialize($checkout->fields['manual_approval_country']);
for($i=0; $i<count($arr); $i++) {
if($account->fields['country_id'] == $arr[$i])
$do = false;
}
}
# manual approval req. for user's currency?
if(!empty($checkout->fields['manual_approval_currency']) && $do == true) {
$arr = unserialize($checkout->fields['manual_approval_currency']);
for($i=0; $i<count($arr); $i++) {
if($invoice->fields['actual_billed_currency_id'] == $arr[$i])
$do = false;
}
}
# manual approval req. for user's group(s)?
if(!empty($checkout->fields['manual_approval_group']) && $do == true) {
# Get the group details:
$q = "SELECT group_id FROM ".AGILE_DB_PREFIX."account_group WHERE
account_id = ".$db->qstr($invoice->fields['account_id'])." AND
active = ".$db->qstr('1')." AND
site_id = ".$db->qstr(DEFAULT_SITE);
$groups = $db->Execute($q);
if ($groups === false) {
global $C_debug;
$C_debug->error('invoice.inc.php','autoApproveInvoice', $db->ErrorMsg());
}
$arr = unserialize($checkout->fields['manual_approval_group']);
while(!$groups->EOF) {
for($i=0; $i<count($arr); $i++) {
$idx = $groups->fields["group_id"];
if($idx == $arr[$i])
$do = false;
}
$groups->MoveNext();
}
}
}
if ($do)
{
# Approve the invoice
$arr['id'] = $invoice_id;
$this->approveInvoice($arr, $this);
}
else
{
# Admin manual approval notice
include_once(PATH_MODULES.'email_template/email_template.inc.php');
$mail = new email_template;
$mail->send('invoice_manual_auth_admin', $invoice->fields['account_id'], $invoice->fields['id'], $invoice->fields['checkout_plugin_id'], '');
}
}
/* APPROVE INVOICE
*/
function approveInvoice($VAR)
{
# Get the invoice details:
$db = &DB();
$q = "SELECT * FROM ".AGILE_DB_PREFIX."invoice WHERE
id = ".$db->qstr($VAR['id'])." AND
site_id = ".$db->qstr(DEFAULT_SITE);
$invoice = $db->Execute($q);
if ($invoice === false) {
global $C_debug;
$C_debug->error('invoice.inc.php','approveInvoice', $db->ErrorMsg());
return false;
}
# Validate invoice exists & needs approval:
if($invoice->fields['id'] != $VAR['id'] || $invoice->fields['process_status'] == '1') return false;
# Update the invoice approval status:
$q = "UPDATE ".AGILE_DB_PREFIX."invoice SET
date_last = ".$db->qstr(time()).",
process_status = ".$db->qstr('1')." WHERE
id = ".$db->qstr($VAR['id'])." AND
site_id = ".$db->qstr(DEFAULT_SITE);
$result = $db->Execute($q);
if ($result === false) {
global $C_debug;
$C_debug->error('invoice.inc.php','approveInvoice', $db->ErrorMsg());
return false;
}
# Send approval notice to user:
include_once(PATH_MODULES.'email_template/email_template.inc.php');
$mail = new email_template;
$mail->send('invoice_approved_user', $invoice->fields['account_id'], $VAR['id'], '', '');
# Include the service class
include_once(PATH_MODULES.'service/service.inc.php');
$srvc = new service;
# Determine if services have already been created for this invoice:
if($invoice->fields['type'] != 1 )
{
$q = "SELECT id FROM ".AGILE_DB_PREFIX."service WHERE
invoice_id = ".$db->qstr($VAR['id'])." AND
site_id = ".$db->qstr(DEFAULT_SITE);
$service = $db->Execute($q);
if ($service === false) {
global $C_debug;
$C_debug->error('invoice.inc.php','approveInvoice', $db->ErrorMsg());
return false;
}
if ($service->RecordCount() > 0)
{
# Update services to approved status:
while(!$service->EOF)
{
$srvc->approveService($service->fields['id']);
$service->MoveNext();
}
return true;
}
# Get the parent items in this invoice :
$q = "SELECT * FROM ".AGILE_DB_PREFIX."invoice_item WHERE
( parent_id = 0 OR parent_id IS NULL OR parent_id = '') AND
invoice_id = ".$db->qstr($VAR['id'])." AND
site_id = ".$db->qstr(DEFAULT_SITE);
$ii = $db->Execute($q);
if ($ii === false) {
global $C_debug;
$C_debug->error('invoice.inc.php','approveInvoice', $db->ErrorMsg());
return false;
}
while(!$ii->EOF)
{
if(empty($ii->fields['service_id']))
{
# Add the service
$srvc->invoiceItemToService($ii->fields['id'], $invoice);
# Check for any children items in this invoice:
$q = "SELECT * FROM ".AGILE_DB_PREFIX."invoice_item WHERE
parent_id = ".$db->qstr($ii->fields['id'])." AND
invoice_id = ".$db->qstr($VAR['id'])." AND
site_id = ".$db->qstr(DEFAULT_SITE);
$iii = $db->Execute($q);
if ($iii === false) {
global $C_debug;
$C_debug->error('invoice.inc.php','approveInvoice', $db->ErrorMsg());
return false;
}
while(!$iii->EOF)
{
# Add the service
$srvc->invoiceItemToService($ii->fields['id'], $invoice);
$iii->MoveNext();
}
}
else
{
$srvc = new service;
if($ii->fields['item_type'] == 2 && $ii->fields['domain_type'] == 'renew' ) {
# this is a domain renewal
$srvc->renewDomain( $ii, $invoice->fields['account_billing_id'] );
} else {
# this is an upgrade for an existing service
$srvc->modifyService( $ii, $invoice->fields['account_billing_id'] );
}
}
$ii->MoveNext();
}
}
elseif ($invoice->fields['type'] == 1 )
{
# recurring invoice, just update assoc services
# Loop through invoice items & approve assoc services
$q = "SELECT service_id FROM ".AGILE_DB_PREFIX."invoice_item WHERE
invoice_id = ".$db->qstr($VAR['id'])." AND
site_id = ".$db->qstr(DEFAULT_SITE);
$service = $db->Execute($q);
if ($service === false) {
global $C_debug;
$C_debug->error('invoice.inc.php','voidInvoice', $db->ErrorMsg());
return false;
}
if ($service->RecordCount() > 0)
{
# Include the service class
include_once(PATH_MODULES.'service/service.inc.php');
$srvc = new service;
# Update services to inactive status:
while(!$service->EOF) {
$srvc->approveService($service->fields['service_id']);
$service->MoveNext();
}
}
}
# get account id
if(defined("SESS_ACCOUNT"))
$account_id = SESS_ACCOUNT;
else
$account_id = 0;
# if approved, create a memo
$id = $db->GenID(AGILE_DB_PREFIX . 'invoice_memo_id');
$q = "INSERT INTO ".AGILE_DB_PREFIX."invoice_memo
SET
id = ".$db->qstr($id).",
site_id = ".$db->qstr(DEFAULT_SITE).",
date_orig = ".$db->qstr(time()).",
invoice_id = ".$db->qstr($VAR['id']).",
account_id = ".$db->qstr($account_id).",
type = ".$db->qstr('approval').",
memo = ".$db->qstr('NA');
$memo = $db->Execute($q);
if ($memo === false) {
global $C_debug;
$C_debug->error('invoice.inc.php','approveInvoice', $db->ErrorMsg());
return false;
}
return true;
}
/** VOID INVOICE
*/
function voidInvoice($VAR)
{
# Update the invoice approval status:
$db = &DB();
$q = "UPDATE ".AGILE_DB_PREFIX."invoice SET
date_last = ".$db->qstr(time()).",
process_status = ".$db->qstr('0')." WHERE
id = ".$db->qstr($VAR['id'])." AND
site_id = ".$db->qstr(DEFAULT_SITE);
$update = $db->Execute($q);
if ($update === false) {
global $C_debug;
$C_debug->error('invoice.inc.php','voidInvoice', $db->ErrorMsg());
return false;
}
# Determine if services have already been created for this invoice and deactivate:
$q = "SELECT id FROM ".AGILE_DB_PREFIX."service WHERE
invoice_id = ".$db->qstr($VAR['id'])." AND
site_id = ".$db->qstr(DEFAULT_SITE);
$service = $db->Execute($q);
if ($service === false) {
global $C_debug;
$C_debug->error('invoice.inc.php','voidInvoice', $db->ErrorMsg());
return false;
}
if ($service->RecordCount() > 0)
{
# Include the service class
include_once(PATH_MODULES.'service/service.inc.php');
$srvc = new service;
# Update services to inactive status:
while(!$service->EOF) {
$srvc->voidService($service->fields['id']);
$service->MoveNext();
}
}
# Loop through invoice items & delete assoc services
$q = "SELECT service_id FROM ".AGILE_DB_PREFIX."invoice_item WHERE
invoice_id = ".$db->qstr($VAR['id'])." AND
site_id = ".$db->qstr(DEFAULT_SITE);
$service = $db->Execute($q);
if ($service === false) {
global $C_debug;
$C_debug->error('invoice.inc.php','voidInvoice', $db->ErrorMsg());
return false;
}
if ($service->RecordCount() > 0)
{
# Include the service class
include_once(PATH_MODULES.'service/service.inc.php');
$srvc = new service;
# Update services to inactive status:
while(!$service->EOF) {
$srvc->voidService($service->fields['service_id']);
$service->MoveNext();
}
}
# if voided, create a memo
$id = $db->GenID(AGILE_DB_PREFIX . 'invoice_memo_id');
$q = "INSERT INTO ".AGILE_DB_PREFIX."invoice_memo
SET
id = ".$db->qstr($id).",
site_id = ".$db->qstr(DEFAULT_SITE).",
date_orig = ".$db->qstr(time()).",
invoice_id = ".$db->qstr($VAR['id']).",
account_id = ".$db->qstr(SESS_ACCOUNT).",
type = ".$db->qstr('void').",
memo = ".$db->qstr('NA');
$insert = $db->Execute($q);
if ($insert === false) {
global $C_debug;
$C_debug->error('invoice.inc.php','voidInvoice', $db->ErrorMsg());
return false;
}
return true;
}
/** RECONCILE INVOICE
*/
function reconcile($VAR)
{
global $C_translate, $C_debug;
# validate amt
if( $VAR['amount'] <= 0) {
$C_debug->alert( "Payment amount to low!" );
return false;
}
# get the invoice details
$db = &DB();
$sql = 'SELECT * FROM ' . AGILE_DB_PREFIX . 'invoice WHERE
id = ' . $db->qstr( $VAR['id'] ) . ' AND
site_id = ' . $db->qstr(DEFAULT_SITE);
$rs = $db->Execute($sql);
if ($rs === false) {
global $C_debug;
$C_debug->error('invoice.inc.php','reconcileInvoice', $db->ErrorMsg());
return false;
}
if(@$rs->RecordCount() == 0) return false;
$amt = $VAR['amount'];
$total_amt = $rs->fields['total_amt'];
$billed_amt = $rs->fields['billed_amt'];
$billed_currency_id = $rs->fields['billed_currency_id'];
$actual_billed_amt = $rs->fields['actual_billed_amt'];
$actual_billed_currency_id = $rs->fields['actual_billed_currency_id'];
$due = $total_amt - $billed_amt;
$overpaid = false;
if($amt > $due)
{
$billed = 1;
$update = $total_amt;
$overpaid = $amt - $due;
$C_translate->value['invoice']['amt'] = number_format($overpaid, 2);
$alert = $C_translate->translate('rec_over','invoice','');
}
elseif ($amt == $due)
{
$billed = 1;
$update = $total_amt;
}
else
{
$billed = 0;
$update = $amt + $billed_amt;
}
# Update the invoice record
$sql = 'UPDATE ' . AGILE_DB_PREFIX . 'invoice
SET
billed_amt = ' . $db->qstr( $update ) . ',
billing_status = ' . $db->qstr( $billed ) . '
WHERE
id = ' . $db->qstr( $VAR['id'] ) . ' AND
site_id = ' . $db->qstr(DEFAULT_SITE);
$db->Execute($sql);
# Create a memo
$id = $db->GenID(AGILE_DB_PREFIX . 'invoice_memo_id');
$q = "INSERT INTO ".AGILE_DB_PREFIX."invoice_memo
SET
id = ".$db->qstr($id).",
site_id = ".$db->qstr(DEFAULT_SITE).",
date_orig = ".$db->qstr(time()).",
invoice_id = ".$db->qstr($VAR['id']).",
account_id = ".$db->qstr(SESS_ACCOUNT).",
type = ".$db->qstr('reconcile').",
memo = ".$db->qstr('+ '.number_format($VAR['amount'],2) . " \r\n" . @$VAR['memo']);
$db->Execute($q);
# Reciept printing
include_once PATH_MODULES.'invoice/receipt_print.php';
$receipt = new receipt_print;
$receipt->add($rs, number_format($VAR['amount'],2), number_format($update,2));
# Auto update if billed complete
if($billed)
{
$this->autoApproveInvoice($VAR['id']);
# Get the default currency ISO
$q = "SELECT ".AGILE_DB_PREFIX."invoice_memo
SET
id = ".$db->qstr($id).",
site_id = ".$db->qstr(DEFAULT_SITE).",
date_orig = ".$db->qstr(time()).",
invoice_id = ".$db->qstr($VAR['id']).",
account_id = ".$db->qstr(SESS_ACCOUNT).",
type = ".$db->qstr('reconcile').",
memo = ".$db->qstr('+ '.number_format($VAR['amount'],2) . " \r\n" . @$VAR['memo']);
$currency = $db->Execute($q);
# User invoice creation confirmation
include_once(PATH_MODULES.'email_template/email_template.inc.php');
$email = new email_template;
$email->send('invoice_paid_user', $rs->fields['account_id'], $VAR['id'], $rs->fields['billed_currency_id'], '');
# Admin alert of payment processed
$email = new email_template;
$email->send('admin->invoice_paid_admin', $rs->fields['account_id'], $VAR['id'], $rs->fields['billed_currency_id'], '');
}
# Redirect
if(!empty($VAR['redirect']))
{
echo '
<script language="JavaScript">
window.parent.location=\''.$VAR['redirect'].'\'; ';
if(!empty($alert))
echo 'alert(\''.$alert.'\');';
echo '</script>';
exit;
}
$msg = $C_translate->translate('ref_comp','invoice','');
$C_debug->alert( $msg );
return;
}
/** REFUND INVOICE
*/
function refund($VAR)
{
global $C_translate, $C_debug;
# validate amt
if( $VAR['amount'] <= 0) {
$C_debug->alert( "Refund amount to low!" );
return false;
}
# get the invoice details
$db = &DB();
$sql = 'SELECT * FROM ' . AGILE_DB_PREFIX . 'invoice WHERE
id = ' . $db->qstr( $VAR['id'] ) . ' AND
site_id = ' . $db->qstr(DEFAULT_SITE);
$rs = $db->Execute($sql);
if(@$rs->RecordCount() == 0) return false;
$amt = $VAR['amount'];
$total_amt = $rs->fields['total_amt'];
$billed_amt = $rs->fields['billed_amt'];
$billed_currency_id = $rs->fields['billed_currency_id'];
$actual_billed_amt = $rs->fields['actual_billed_amt'];
$actual_billed_currency_id = $rs->fields['actual_billed_currency_id'];
$update = $billed_amt - $amt;
if($update>0) $billing_status=1; else $billing_status=0;
# Update the invoice record
echo $sql = 'UPDATE ' . AGILE_DB_PREFIX . 'invoice
SET
billed_amt = ' . $db->qstr( $update ) . ',
billing_status = '.$billing_status.',
suspend_billing = 1,
refund_status = 1
WHERE
id = ' . $db->qstr( $VAR['id'] ) . ' AND
site_id = ' . $db->qstr(DEFAULT_SITE);
$update2 = $db->Execute($sql);
if ($update2 === false) {
global $C_debug;
$C_debug->error('invoice.inc.php','refundInvoice', $db->ErrorMsg());
return false;
}
# Create a memo
$id = $db->GenID(AGILE_DB_PREFIX . 'invoice_memo_id');
$q = "INSERT INTO ".AGILE_DB_PREFIX."invoice_memo
SET
id = ".$db->qstr($id).",
site_id = ".$db->qstr(DEFAULT_SITE).",
date_orig = ".$db->qstr(time()).",
invoice_id = ".$db->qstr($VAR['id']).",
account_id = ".$db->qstr(SESS_ACCOUNT).",
type = ".$db->qstr('refund').",
memo = ".$db->qstr('- '.number_format($VAR['amount'],2) . " \r\n" . @$VAR['memo']);
$insert = $db->Execute($q);
if ($insert === false) {
global $C_debug;
$C_debug->error('invoice.inc.php','refundInvoice', $db->ErrorMsg());
return false;
}
# Void:
$this->voidInvoice($VAR, $this);
# Call into the checkout plugin and attempt realtime refund
$billing = $db->Execute($sql=sqlSelect($db, array('account_billing','checkout'), 'A.*,B.checkout_plugin',
"A.id = ::{$rs->fields['account_billing_id']}:: AND A.checkout_plugin_id=B.id"));
if($billing && $billing->RecordCount() && !empty($billing->fields['checkout_plugin'])) {
$plugin_file = PATH_PLUGINS.'checkout/'. $billing->fields['checkout_plugin'] .'.php';
if(is_file($plugin_file)) {
include_once ( $plugin_file );
eval( '$PLG = new plg_chout_' . $billing->fields['checkout_plugin'] . '("'.$billing->fields['checkout_plugin_id'].'");');
if(is_callable(Array($PLG,"refund"))) $PLG->refund($rs->fields, $billing->fields, $amt);
}
}
# Redirect
if(!empty($VAR['redirect'])) {
echo ' <script language="JavaScript"> window.parent.location=\''.$VAR['redirect'].'\'; </script>';
return;
}
$msg = $C_translate->translate('ref_comp','invoice','');
$C_debug->alert( $msg );
return;
}
# Get translated/hardcoded line item description for PDF invoice
function getLineItemDesc($sku,$id,$domain=false,$item_name)
{
if(!empty($item_name)) return $item_name;
global $C_translate;
if(!empty($sku) && $sku == 'DOMAIN-PARK' || $sku == 'DOMAIN-TRANSFER' || $sku == 'DOMAIN-REGISTER' || $sku == 'DOMAIN-RENEW') {
if($sku == 'DOMAIN-REGISTER') $name=$C_translate->translate('register','cart','');
elseif ($sku == 'DOMAIN-TRANSFER') $name=$C_translate->translate('transfer','cart','');
elseif ($sku == 'DOMAIN-PARK') $name=$C_translate->translate('park','cart','');
elseif ($sku == 'DOMAIN-RENEW') $name=$C_translate->translate('renew','cart','');
if($domain) return "$domain \r\n ( $name )";
else return $name;
} else {
include_once(PATH_CORE.'list.inc.php');
$C_list=new CORE_list;
if(empty($this->product_desc["$id"])) {
$desc = $C_list->translate("product_translate", "name", "product_id", $id, "translate_product");
$this->product_desc["$id"] = $desc['name'];
}
if(!empty($this->product_desc["$id"]))
return $this->product_desc["$id"];
else
return $sku;
}
return $sku;
}
/**
* Task based function to e-mail or store printable PDF of all unprinted invoices
*/
function delivery_task()
{
# get all unprinted invoices
$db=&DB();
$invcfg = $db->Execute(sqlSelect($db,"setup_invoice","*","id=::".DEFAULT_SITE."::"));
$rs = $db->SelectLimit($sql=sqlSelect($db,Array("invoice","account"),
"A.id,B.email,B.first_name,B.last_name,B.invoice_delivery,B.invoice_show_itemized",
"(A.billing_status=0 OR A.billing_status IS NULL) AND (A.print_status=0 OR A.print_status=NULL) and A.account_id=B.id and (B.invoice_delivery is not null AND B.invoice_delivery>0)"),100);
if($rs && $rs->RecordCount())
{
//define('FPDF_FONTPATH', PATH_INCLUDES.'pdf/font/');
require_once(PATH_INCLUDES.'pdf/fpdi.php');
require_once(PATH_INCLUDES.'pdf/fpdf_tpl.php');
require_once(PATH_INCLUDES.'pdf/fpdf.php');
require_once(PATH_INCLUDES.'pdf/pdf_invoice_'.$invcfg->fields['invoice_pdf_plugin'].'.inc.php');
// Send the e-mail....
require_once(PATH_INCLUDES."phpmailer/class.phpmailer.php");
$mail = new PHPMailer();
$mail->From = SITE_EMAIL;
$mail->FromName = SITE_NAME;
/*
$mail->SMTPAuth = true;
$mail->Host = "smtp.domain.com";
$mail->Username = "user";
$mail->Password = "pass";
$mail->Mailer = "smtp";
$mail->Debug = true;
*/
while(!$rs->EOF)
{
$pdf = new pdf_invoice_overview();
$pdf->companyName = SITE_NAME;
$pdf->companyAddress = SITE_ADDRESS;
$pdf->companyCity = SITE_CITY;
$pdf->companyState = SITE_STATE;
$pdf->companyZip = SITE_ZIP;
# load the setup_invoice fields into the pdf class
$pdf->load_setup($invcfg);
$pagecount = $pdf->setSourceFile($pdf->getTemplate());
$tplidx = $pdf->ImportPage(1);
$pdf->addPage();
$pdf->useTemplate($tplidx);
# override the show itemized, based on the customers choice
if($rs->fields['invoice_show_itemized'] == 0 || $rs->fields['invoice_show_itemized'] == 1)
$pdf->show_itemized = $rs->fields['invoice_show_itemized'];
$this->pdfInvoiceSummary($rs->fields['id'], $pdf);
$file = tempnam(PATH_FILES, "pdf_inv_".$rs->fields['id']).".pdf";
$pdf->Output($file,'F');
$pdf->closeParsers();
if($rs->fields['invoice_delivery'] == 1) {
$mail->AddAddress($rs->fields['email'], $rs->fields['first_name']. ' ' . $rs->fields['last_name']);
$mail->Subject = "Printable Invoice No. ". $rs->fields['id'];
$mail->Body = "Please find the printable version of invoice number {$rs->fields['id']} attached.\r\n\r\nThank you,\r\n".SITE_NAME;
$mail->AddAttachment($file, "INVOICE_{$rs->fields['id']}.pdf");
if($mail->Send()) {
$fields=Array('print_status'=>1);
$db->Execute(sqlUpdate($db,"invoice",$fields,"id=".$rs->fields['id']));
} else {
echo "Unable to email invoice # {$rs->fields['id']} to {$rs->fields['email']}<BR>";
}
$mail->ClearAddresses();
$mail->ClearAttachments();
} else if($rs->fields['invoice_delivery'] == 2) {
if(copy($file,AGILE_PDF_INVOICE_PATH."invoice_".$rs->fields['id'].".pdf")) {
$fields=Array('print_status'=>1);
$db->Execute(sqlUpdate($db,"invoice",$fields,"id=".$rs->fields['id']));
}
}
// delete tmp file and clean up vars used
unlink($file);
unset($pdf->itemsSummary);
unset($pdf); unset($tplidx); unset($pagecount);
$rs->MoveNext();
}
}
}
/** Display a PDF invoice
*/
function pdf($VAR)
{
# Check invoice
if(empty($VAR['id'])) {
echo 'No Invoice Specified.';
return false;
}
# Check admin authentication:
global $C_auth;
if ($C_auth->auth_method_by_name('invoice','view') == false) {
# Validate on account level
$db = &DB();
$rs = $db->Execute(sqlSelect($db,"invoice","account_id", "id = ::{$VAR['id']}::"));
if ($rs->fields['account_id'] != SESS_ACCOUNT) {
// todo: redirect to login page if not logged
return false;
}
}
$db =& DB();
$invcfg = $db->Execute(sqlSelect($db,"setup_invoice","*","id=::".DEFAULT_SITE."::"));
if (!defined('FPDF_FONTPATH'))
define('FPDF_FONTPATH', PATH_INCLUDES.'pdf/font/');
require_once(PATH_INCLUDES.'pdf/fpdi.php');
require_once(PATH_INCLUDES.'pdf/fpdf_tpl.php');
require_once(PATH_INCLUDES.'pdf/fpdf.php');
require_once(PATH_INCLUDES.'pdf/pdf_invoice_'.$invcfg->fields['invoice_pdf_plugin'].'.inc.php');
ob_start();
$pdf = new pdf_invoice_overview();
$pdf->companyName = SITE_NAME;
$pdf->companyAddress = SITE_ADDRESS;
$pdf->companyCity = SITE_CITY;
$pdf->companyState = SITE_STATE;
$pdf->companyZip = SITE_ZIP;
# load the setup_invoice
$pdf->load_setup($invcfg);
$pagecount = $pdf->setSourceFile($pdf->getTemplate());
$tplidx = $pdf->ImportPage(1);
$pdf->addPage();
$pdf->useTemplate($tplidx);
$this->pdfInvoiceSummary($VAR['id'], $pdf);
$pdf->Output('invoice.pdf','D');
$pdf->closeParsers();
ob_end_flush();
}
/** Export multiple invoices */
function pdfExport(&$rs)
{
$db =& DB();
$invcfg = $db->Execute(sqlSelect($db,"setup_invoice","*",""));
define('FPDF_FONTPATH', PATH_INCLUDES.'pdf/font/');
require_once(PATH_INCLUDES.'pdf/fpdi.php');
require_once(PATH_INCLUDES.'pdf/fpdf_tpl.php');
require_once(PATH_INCLUDES.'pdf/fpdf.php');
require_once(PATH_INCLUDES.'pdf/pdf_invoice_'.$invcfg->fields['invoice_pdf_plugin'].'.inc.php');
ob_start();
$pdf = new pdf_invoice_overview();
$pdf->companyName = SITE_NAME;
$pdf->companyAddress = SITE_ADDRESS;
$pdf->companyCity = SITE_CITY;
$pdf->companyState = SITE_STATE;
$pdf->companyZip = SITE_ZIP;
$pdf->load_setup($invcfg);
$pagecount = $pdf->setSourceFile($pdf->getTemplate());
$tplidx = $pdf->ImportPage(1);
while(!$rs->EOF) {
$pdf->addPage();
$pdf->useTemplate($tplidx);
$this->pdfInvoiceSummary($rs->fields['id'], $pdf);
$rs->MoveNext();
unset($pdf->itemsSummary);
}
$pdf->Output();
$pdf->closeParsers();
ob_end_flush();
}
function pdfInvoiceSummary($id, &$pdf)
{
# Invoice details:
$db = &DB();
$invoice = $db->Execute( $sql = sqlSelect($db, array("invoice", "currency"), "A.*, B.symbol", "A.id = ::$id:: AND B.id = A.billed_currency_id"));
$pdf->setInvoiceFields($invoice->fields);
$pdf->setDueAmt($invoice->fields['total_amt'] - $invoice->fields['billed_amt']);
$pdf->setCurrency($invoice->fields['symbol']);
$pdf->setDateRange( mktime(0,0,0,date('m',$invoice->fields['due_date'])-1, date('d',$invoice->fields['due_date']), date('Y',$invoice->fields['due_date'])), $invoice->fields['due_date']);
$pdf->drawInvoiceNo();
$pdf->drawInvoiceDueDate();
$pdf->drawInvoiceTotalAmt();
$pdf->drawInvoiceDueAmt();
$pdf->drawInvoicePaidAmt();
$pdf->drawInvoiceDiscountAmt();
$pdf->drawInvoiceTaxAmt();
$pdf->drawInvoiceShippingAmt();
$pdf->drawInvoiceRange();
if($invoice->fields['billing_status'] !=1 && $invoice->fields['suspend_billing'] != 1 && $invoice->fields['due_date'] <= time())
$pdf->drawInvoiceDueNotice();
elseif($invoice->fields['billing_status'] == 1)
$pdf->drawInvoicePaidNotice();
# Account details:
$account = $db->Execute("SELECT * FROM ".AGILE_DB_PREFIX."account WHERE id = ".$db->qstr($invoice->fields['account_id'])." AND site_id = ".$db->qstr(DEFAULT_SITE));
$pdf->setAccountFields($account->fields);
$pdf->drawAccountId();
$pdf->drawAccountUsername();
$pdf->drawAccountName();
$pdf->drawAccountMailing();
# Company details:
$pdf->drawCompanyAddress();
$pdf->drawCompanyLogo();
## Get the summary items
$items = & $db->Execute("select sku, item_type, product_name, product_id, sum(quantity) as quantity, (sum(total_amt)) as amount, price_setup, price_base from ".AGILE_DB_PREFIX."invoice_item where invoice_id=".$db->qstr($id)." group by sku, item_type");
$i = 0;
if($items && $items->RecordCount()) {
while (!$items->EOF) {
$items_arr[$i] = $items->fields;
$desc = $this->getLineItemDesc($items->fields['sku'], $items->fields['product_id'], false, $items->fields['product_name']);
$items_arr[$i]['name'] = $desc;
$i++;
if ($items->fields['price_setup']) {
$items_arr[$i]['name'] = $desc." Set-up Charge";
$items_arr[$i]['amount'] = $items->fields['price_setup'];
$i++;
}
$items->MoveNext();
}
}
if ($invoice->fields['discount_amt']) {
$items_arr[$i]['name'] = 'Discount';
$items_arr[$i]['amount'] = -($invoice->fields['discount_amt']);
$i++;
}
if ($invoice->fields['tax_amt']) {
$trs = $db->Execute($sql=sqlSelect($db, Array('invoice_item_tax','tax'),"A.amount,B.description","A.tax_id=B.id AND A.invoice_id=::$id::"));
if($trs && $trs->RecordCount()) {
unset($taxes);
while(!$trs->EOF) {
$taxes["{$trs->fields['description']}"] += $trs->fields["amount"];
$trs->MoveNext();
}
foreach($taxes as $txds=>$txamt) {
$items_arr[$i]['name'] = $txds;
$items_arr[$i]['amount'] = $txamt;
$i++;
}
}
}
$pdf->drawSummaryLineItems($items_arr);
unset($items_arr);
unset($pdf->itemsSummary);
## BEGIN loop for enumerating information in multiple ways on the invoice
$iteration = 0;
while($pdf->drawLineItems_pre($iteration)) {
## Get the line items:
$items = & $db->Execute( sqlSelect($db, "invoice_item", "*", "invoice_id = ::$id::") );
if ($items && $items->RecordCount()) {
while ( !$items->EOF ) {
#$items_arr[] = $items->fields;
// get the date range if set
if(!empty($items->fields['date_start']) && !empty($items->fields['date_stop'])) {
global $C_translate;
$C_translate->value('invoice','start', date(UNIX_DATE_FORMAT,$items->fields['date_start']));
$C_translate->value('invoice','stop', date(UNIX_DATE_FORMAT,$items->fields['date_stop']));
#$smart_items[$ii]['range'] = $C_translate->translate('recur_date_range','invoice','');
}
$cost = $items->fields['price_base'];
$total = $cost * $items->fields['quantity'];
$desc = $this->getLineItemDesc($items->fields['sku'],$items->fields['product_id'], strtolower($items->fields['domain_name'].'.'.$items->fields['domain_tld']), $items->fields['product_name']);
$line = array(
"name" => $desc,
'amount' => $cost,
'sku'=>$items->fields['sku'],
'qty'=>$items->fields['quantity'],
'cost'=>$cost,
'attr'=>$items->fields['product_attr'],
'price_type'=>$items->fields['price_type'],
'price_base'=>$items->fields['price_base'],
'item_type'=>$items->fields['item_type'],
'total_amt'=>$items->fields['total_amt']
);
$pdf->drawLineItems($db, $line);
if ($items->fields['price_setup']) {
$desc .= " Set-up Charge";
$total = $items->fields['price_setup'];
$line = array("name" => $desc, 'amount' => $total, 'qty'=>'1', 'sku'=>$items->fields['sku'], 'cost'=>$total, 'price_base'=>$total, 'price_type'=>999);
$pdf->drawLineItems($db, $line);
}
$items->MoveNext();
}
}
if ($invoice->fields['discount_amt']) {
$desc = 'Discount';
$total = -($invoice->fields['discount_amt']);
$line = array("name" => $desc, 'amount' => $total, 'qty'=>'1', 'cost'=>$total, 'price_base'=>$total, 'price_type'=>999);
$pdf->drawLineItems($db, $line);
}
if ($invoice->fields['tax_amt']) {
$trs = $db->Execute($sql=sqlSelect($db, Array('invoice_item_tax','tax'),"A.amount,B.description","A.tax_id=B.id AND A.invoice_id=::$id::"));
if($trs && $trs->RecordCount()) {
unset($taxes);
while(!$trs->EOF) {
$taxes["{$trs->fields['description']}"] += $trs->fields["amount"];
$trs->MoveNext();
}
foreach($taxes as $txds=>$txamt) {
$line = array("name" => $txds, 'amount' => $txamt, 'qty'=>'1', 'cost'=>$txamt, 'price_base'=>$txamt, 'price_type'=>999);
$pdf->drawLineItems($db, $line);
}
}
}
# Increment the iteration
++$iteration;
}
# Custom functions:
$pdf->drawCustom();
unset($db);
}
/** RESEND DUE NOTICE
*/
function resend($VAR)
{
global $C_debug;
# User invoice creation confirmation
include_once(PATH_MODULES.'email_template/email_template.inc.php');
$mail = new email_template;
$mail->send('invoice_resend', $VAR['account_id'], $VAR['id'], '', '');
# Alert
$C_debug->alert('Sent payment due notice to user');
# Update invoice
$db = &DB();
$q = "SELECT notice_count FROM ".AGILE_DB_PREFIX."invoice WHERE
id = ".$db->qstr($VAR['id'])." AND
site_id = ".$db->qstr(DEFAULT_SITE);
$rs = $db->Execute($q);
$count = $rs->fields['notice_count'] + 1;
$q = "UPDATE ".AGILE_DB_PREFIX."invoice SET
notice_count = ".$db->qstr($count)." WHERE
id = ".$db->qstr($VAR['id'])." AND
site_id = ".$db->qstr(DEFAULT_SITE);
$rs = $db->Execute($q);
}
/**
* Generate all invoices for recurring services/charges/domains
*/
function generate() {
// check if charge module installed
global $C_list;
$charge_installed = $C_list->is_installed('charge');
// get services to be billed grouped by account and date
if(MAX_INV_GEN_PERIOD <= 0) $max_date = time()+86400; else $max_date = time()+(MAX_INV_GEN_PERIOD*86400);
$p=AGILE_DB_PREFIX; $s=DEFAULT_SITE;
$ids=false;
$account=false;
$date=false;
$invoice=false;
$sql = "SELECT DISTINCT service.id as serviceId, account.id as accountId, invoice.id as invoiceId, from_unixtime(service.date_next_invoice,'%Y-%m-%d') as dayGroup
FROM {$p}service as service
JOIN {$p}account as account ON ( service.account_id=account.id and account.site_id={$s} )
LEFT JOIN {$p}invoice as invoice ON ( service.invoice_id=invoice.id and invoice.site_id={$s} )
WHERE service.site_id={$s}
AND service.active = 1
AND ( service.suspend_billing IS NULL OR service.suspend_billing = 0 )
AND ( service.date_next_invoice > 0 AND service.date_next_invoice IS NOT NULL )
AND
((
( account.invoice_advance_gen!='' OR account.invoice_advance_gen is not null ) AND service.date_next_invoice <= (UNIX_TIMESTAMP(CURDATE())+(account.invoice_advance_gen*86400))
) OR (
( account.invoice_advance_gen='' OR account.invoice_advance_gen is null ) AND service.date_next_invoice <= {$max_date}
))
ORDER BY accountId, dayGroup, serviceId";
$db=&DB();
#$db->debug=true;
$rs=$db->Execute($sql);
if($rs === false) {global $C_debug; $C_debug->error('invoice.inc.php','generate()', $sql . " \r\n\r\n " . @$db->ErrorMsg()); }
if($rs && $rs->RecordCount()) {
while(!$rs->EOF) {
if( $ids && ($rs->fields['accountId'] != $account ) || ($rs->fields['dayGroup'] != $date) ) {
$this->generateInvoices($ids, $account, $invoice, $charge_installed);
$ids=false;
}
// set the current account and date
$account=$rs->fields['accountId'];
$invoice=$rs->fields['invoiceId'];
$date=$rs->fields['dayGroup'];
// add to id list
if($ids) $ids.=",";
$ids.=$rs->fields['serviceId'];
$rs->MoveNext();
}
if($ids) $this->generateInvoices($ids, $account, $invoice, $charge_installed);
}
// Generate invoices for any domains expiring in X days.
if($C_list->is_installed('host_tld')) $this->generateDomains();
return true;
}
function generateInvoices($ids, $account_id, $invoice_id, $charge_installed=false) {
if(empty($ids)) return false;
# load required elements
include_once(PATH_MODULES . 'service/service.inc.php');
include_once(PATH_MODULES . 'discount/discount.inc.php');
include_once(PATH_MODULES . 'tax/tax.inc.php');
$taxObj = new tax;
$serviceObj = new service;
# start a transaction
$db=&DB();
#$db->debug=true;
if(AGILE_DB_TYPE == 'mysqlt') {
$db->StartTrans();
if(!$db->hasTransactions) {
global $C_debug;
$msg= "Transactions not supported in 'mysql' driver. Use 'mysqlt' or 'mysqli' driver";
$C_debug->alert($msg);
$C_debug->error('invoice.inc.php','generateInvoices()', "Transactions not supported in 'mysql' driver. Use 'mysqlt' or 'mysqli' driver");
return false;
}
}
# generate an invoice id
$invoice = sqlGenID($db, 'invoice');
# check for any discounts for the parent invoice or account_id
# applied at checkout and should continue to be applied if recurring type discount
$discountObj = new discount;
$discountObj->available_discounts($account_id, 1, $invoice_id);
# beginning totals
$sub_total=0;
$taxable_amount=0;
$tax_amt=0;
$discount_amt=0;
# get the full account and service and invoice details
$p=AGILE_DB_PREFIX; $s=DEFAULT_SITE;
$sql = "SELECT DISTINCT
service.id, service.parent_id, service.invoice_id, service.invoice_item_id, service.account_id, service.account_billing_id, service.product_id,
service.sku, service.active, service.bind, service.type, service.price, service.price_type, service.taxable, service.date_last_invoice, service.date_next_invoice,
service.recur_type, service.recur_schedule, service.recur_weekday, service.recur_week, service.domain_name,
service.domain_tld, service.domain_type, service.domain_term, service.prod_attr, service.prod_attr_cart,
account.currency_id, account.first_name, account.last_name, account.country_id, account.state, account.invoice_grace, account.invoice_advance_gen, account.affiliate_id as account_affiliate_id,
invoice.affiliate_id, invoice.campaign_id, invoice.reseller_id, invoice.checkout_plugin_id, invoice.checkout_plugin_data, invoice.billed_currency_id, invoice.actual_billed_currency_id
FROM {$p}service as service
JOIN {$p}account as account ON ( service.account_id=account.id and account.site_id={$s} )
LEFT JOIN {$p}invoice as invoice ON ( service.invoice_id=invoice.id and invoice.site_id={$s} )
WHERE service.id in ({$ids})";
$service=$db->Execute($sql);
if($service === false) {global $C_debug; $C_debug->error('invoice.inc.php','generateInvoices()1', $sql . " \r\n\r\n " . @$db->ErrorMsg()); $db->FailTrans(); return false; }
if($service && $service->RecordCount()) {
while(!$service->EOF) {
if(empty($service->fields['billed_currency_id'])) $service->fields['billed_currency_id'] = DEFAULT_CURRENCY;
if(empty($service->fields['actual_billed_currency_id'])) $service->fields['actual_billed_currency_id'] = $service->fields['billed_currency_id'];
$this->account_id=$service->fields['account_id'];
$this->parent_id=$service->fields['invoice_id'];
$this->account_billing_id=$service->fields['account_billing_id'];
if(!empty($service->fields['account_affiliate_id']))
$this->affiliate_id=$service->fields['account_affiliate_id'];
else
$this->affiliate_id=$service->fields['affiliate_id'];
$this->campaign_id=$service->fields['campaign_id'];
$this->reseller_id=$service->fields['reseller_id'];
$this->checkout_plugin_id=$service->fields['checkout_plugin_id'];
$this->checkout_plugin_data=$service->fields['checkout_plugin_data'];
$this->billed_currency_id=$service->fields['billed_currency_id'];
$this->actual_billed_currency_id=$service->fields['actual_billed_currency_id'];
$this->invoice_grace=$service->fields['invoice_grace'];
$item_tax_amt=0;
$item_total_amt=0;
$item_discount_amt=0;
# gen item_id
$item = sqlGenID($db, "invoice_item");
# Calculate any recurring discounts for this item
$item_total_amt = $service->fields['price'];
$item_discount_amt = $discountObj->calc_all_discounts(1, $item, $service->fields['product_id'], $service->fields['price'], $service->fields['account_id'], $sub_total+$service->fields['price']);
$item_total_amt -= $item_discount_amt;
$sub_total += $item_total_amt;
$discount_amt += $item_discount_amt;
# calculate any taxes for this item
if($service->fields['taxable'] == 1) {
$item_tax_amt=0;
$item_tax_arr = $taxObj->calculate($item_total_amt, $service->fields['country_id'], $service->fields['state']);
if(is_array($item_tax_arr)) foreach($item_tax_arr as $tx) $item_tax_amt += $tx['rate'];
$tax_amt += $item_tax_amt;
}
# Calculate next invoice date
$next_invoice = $serviceObj->calcNextInvoiceDate($service->fields['date_next_invoice'], $service->fields['recur_schedule'], $service->fields['recur_type'], $service->fields['recur_weekday']);
$due_date = $service->fields['date_next_invoice'];
$recur_schedule=0;
if(!empty($service->fields['recur_schedule'])) $recur_schedule = $service->fields['recur_schedule'];
// create the invoice item
$sql="INSERT INTO {$p}invoice_item SET
id=$item,
site_id=$s,
date_orig=".time().",
invoice_id = $invoice,
account_id={$service->fields['account_id']},
service_id={$service->fields['id']},
product_id={$service->fields['product_id']},
product_attr=".$db->qstr($service->fields['prod_attr']).",
product_attr_cart=".$db->qstr($service->fields['prod_attr_cart']).",
sku=".$db->qstr($service->fields['sku']).",
quantity=1,
item_type=0,
price_type={$service->fields['price_type']},
price_base={$service->fields['price']},
price_setup=0,
recurring_schedule={$recur_schedule},
date_start={$service->fields['date_next_invoice']},
date_stop=$next_invoice,
domain_name=".$db->qstr($service->fields['domain_name']).",
domain_tld=".$db->qstr($service->fields['domain_tld']).",
domain_type=".$db->qstr($service->fields['domain_type']).",
tax_amt=$tax_amt,
total_amt=$item_total_amt,
discount_amt=$item_discount_amt";
$itemrs=$db->Execute($sql);
if($itemrs === false) {global $C_debug; $C_debug->error('invoice.inc.php','generateInvoices()2', $sql . " \r\n\r\n " . @$db->ErrorMsg()); $db->FailTrans(); return false; }
// Insert tax records
$taxObj->invoice_item($invoice, $item, $service->fields['account_id'], @$item_tax_arr);
# Insert discount records
$discountObj->invoice_item($invoice, $item, $service->fields['account_id'], @$discountObj->discount_arr);
// Update the last & next invoice date for this service
$sql="UPDATE {$p}service
SET
date_last_invoice = {$service->fields['date_next_invoice']},
date_next_invoice = $next_invoice
WHERE
site_id=$s AND id = {$service->fields['id']} ";
$srvsrs = $db->Execute($sql);
if($srvsrs === false) {global $C_debug; $C_debug->error('invoice.inc.php','generateInvoices()3', $sql . " \r\n\r\n " . @$db->ErrorMsg()); $db->FailTrans(); return false; }
// get any charges for this service and create them as invoice items
if($charge_installed) {
$sql = "SELECT * FROM ".AGILE_DB_PREFIX."charge WHERE (status=0 or status is null) and site_id=".DEFAULT_SITE." AND service_id = ".$service->fields['id']." AND date_orig < ". $service->fields['date_next_invoice'];
$charge = $db->Execute($sql);
if($charge && $charge->RecordCount()) {
while(!$charge->EOF) {
$item_tax_amt=0;
$item_total_amt=0;
$item_discount_amt=0;
// Calculate any recurring discounts for this charge item
$item_total_amt = ($charge->fields['quantity']*$charge->fields['amount']);
$item_discount_amt = $discountObj->calc_all_discounts(1, $item, $charge->fields['product_id'], $item_total_amt, $service->fields['account_id'], $sub_total+$item_total_amt);
$item_total_amt -= $item_discount_amt;
$sub_total += $item_total_amt;
$discount_amt += $item_discount_amt;
// calculate any taxes for this item
if($charge->fields['taxable'] == 1) {
$item_tax_amt=0;
$item_tax_arr = $taxObj->calculate($chargeamt, $service->fields['country_id'], $service->fields['state']);
if(is_array($item_tax_arr)) foreach($item_tax_arr as $tx) $item_tax_amt += $tx['rate'];
$tax_amt += $item_tax_amt;
}
// create the invoice item
$charge_item_id = sqlGenID($db, 'invoice_item');
$sql = "INSERT INTO {$p}invoice_item SET
id = $charge_item_id,
site_id = $s,
charge_id = {$charge->fields['id']},
date_orig = ".time().",
invoice_id = $invoice,
account_id = ".$this->account_id.",
service_id = ".$db->qstr($service->fields['id']).",
product_id = ".$db->qstr($charge->fields['product_id']).",
product_attr= ".$db->qstr($charge->fields['attributes']).",
sku = ".$db->qstr($service->fields['sku']).",
price_base = ".$db->qstr($charge->fields['amount']).",
quantity = ".$charge->fields['quantity'].",
item_type = 5,
price_type = 0,
price_setup = 0,
tax_amt = $item_tax_amt,
total_amt = $item_total_amt,
discount_amt= $item_discount_amt";
$itemrs=$db->Execute($sql);
if($itemrs === false) {global $C_debug; $C_debug->error('invoice.inc.php','generateInvoices()4', $sql . " \r\n\r\n " . @$db->ErrorMsg()); $db->FailTrans(); return false; }
# Insert tax records
$taxObj->invoice_item($invoice, $charge_item_id, $charge->fields['account_id'], @$item_tax_arr);
# Insert discount records
$discountObj->invoice_item($invoice, $charge_item_id, $charge->fields['account_id'], @$discountObj->discount_arr);
# update charge status
$chargers=$db->Execute("UPDATE ".AGILE_DB_PREFIX."charge set status=1 WHERE id={$charge->fields['id']} AND site_id=".DEFAULT_SITE);
if($chargers === false) {global $C_debug; $C_debug->error('invoice.inc.php','generateInvoices()2', $sql . " \r\n\r\n " . @$db->ErrorMsg()); $db->FailTrans(); return false; }
$charge->MoveNext();
}
}
}
$service->MoveNext();
}
// add any taxes
@$total = $sub_total + $tax_amt;
// get invoice grace period from global/account
if(!empty($this->invoice_grace)) $grace_period=$this->invoice_grace; else $grace_period=GRACE_PERIOD;
$sql = "INSERT INTO {$p}invoice SET
id=$invoice,
site_id=$s,
date_orig = ".time().",
date_last = ".time().",
notice_next_date = ".time().",
type = 1,
process_status = 0,
billing_status = 0,
suspend_billing = 0,
print_status = 0,
refund_status = 0,
billed_amt = 0,
actual_billed_amt = 0,
notice_count = 0,
parent_id = ".$db->qstr($this->parent_id).",
account_id = {$this->account_id},
account_billing_id = ".$db->qstr($this->account_billing_id).",
affiliate_id = ".$db->qstr($this->affiliate_id).",
campaign_id = ".$db->qstr($this->campaign_id).",
reseller_id = ".$db->qstr($this->reseller_id).",
checkout_plugin_id = ".$db->qstr($this->checkout_plugin_id).",
checkout_plugin_data = ".$db->qstr($this->checkout_plugin_data).",
actual_billed_currency_id = ".$db->qstr($this->actual_billed_currency_id).",
billed_currency_id = ".$db->qstr($this->billed_currency_id).",
notice_max = ".$db->qstr(MAX_BILLING_NOTICE).",
grace_period = ".$db->qstr($grace_period).",
tax_amt = ".$tax_amt.",
discount_amt = ".$discount_amt.",
total_amt = ".$total.",
due_date = $due_date";
$invoicers=$db->Execute($sql);
if($invoicers === false) {global $C_debug; $C_debug->error('invoice.inc.php','generateInvoices()2', $sql . " \r\n\r\n " . @$db->ErrorMsg()); $db->FailTrans(); return false; }
}
if(AGILE_DB_TYPE == 'mysqlt') $db->CompleteTrans();
}
/** Invoice expiring domains
*/
function generateDomains()
{
$db = &DB();
define('DEFAULT_DOMAIN_INVOICE', 30); //how far out to generate expiring domain invoices
$expire = time() + (DEFAULT_DOMAIN_INVOICE*86400);
### Get domains expiring soon:
$rs = $db->Execute( sqlSelect( $db, 'service', '*', " active=1 AND domain_date_expire <= $expire AND type = 'domain' AND queue = 'none' AND
( domain_type = 'register' OR domain_type = 'transfer' OR domain_type = 'renew' ) AND
( suspend_billing = 0 OR suspend_billing IS NULL) " ) );
if($rs && $rs->RecordCount() > 0 ) {
while(!$rs->EOF) {
# Check that this domain has not already been invoiced
$invoiced = $db->Execute( sqlSelect ($db, Array('invoice_item','invoice'), Array('A.*','B.*'),
" A.invoice_id = B.id AND A.service_id = {$rs->fields['id']} AND A.sku = 'DOMAIN-RENEW' AND domain_type = 'renew' AND
date_start = {$rs->fields['date_last_invoice']} AND date_stop = {$rs->fields['domain_date_expire']}" ) );
if($invoiced && $invoiced->RecordCount() == 0) {
# Not previously invoiced, generate now!
$this->generatedomaininvoice( $rs->fields, $this );
}
$rs->MoveNext();
}
}
}
/** Invoice expiring domains p2
*/
function generatedomaininvoice( $VAR )
{
include_once(PATH_MODULES . 'tax/tax.inc.php');
$taxObj = new tax;
$db = &DB();
if( is_array( $VAR ) ) {
$expire = time();
$rs = $db->Execute( sqlSelect($db, 'service', '*', " id = ::{$VAR['id']}:: AND active=1
AND type = 'domain' AND queue = 'none' AND
( domain_type = 'register' OR domain_type = 'transfer' OR domain_type = 'renew' ) AND
( suspend_billing = 0 OR suspend_billing IS NULL ) " ));
$service = $rs->fields;
} else {
$service = $VAR;
}
if(empty($service['id'])) {
global $C_debug;
$C_debug->alert("Unable to generate domain renweal invoice due to domain status.");
return false;
}
# Get the parent invoice details:
if(!empty($service['invoice_id'])) {
$rs = $db->Execute( sqlSelect($db, 'invoice', '*', " id = {$service['invoice_id']} ", "" ) );
$invoice = $rs->fields;
} else {
$invoice = false;
}
# Get the account details:
$rs = $db->Execute( sqlSelect($db, 'account', '*', " id = {$service['account_id']} ", "" ) );
$account = $rs->fields;
# Get the account price
include_once(PATH_MODULES.'host_tld/host_tld.inc.php');
$tldObj=new host_tld;
$tld_arr = $tldObj->price_tld_arr($service['domain_tld'], 'renew', false, false, false, $service['account_id']);
foreach($tld_arr as $term => $price) break;
# Calculate taxes:
$rs = $db->Execute($sql=sqlSelect($db,"host_tld","taxable","name = ::{$service['domain_tld']}::"));
if( $service['taxable'] || @$rs->fields['taxable'] ) {
$tax_arr = $taxObj->calculate($price, $account["country_id"], $account["state"]);
} else {
$tax_arr = false;
}
$total = $price;
$tax_amt = 0;
if(is_array($tax_arr)) {
foreach($tax_arr as $tx) {
$tax_amt += $tx['rate'];
}
$total += $tax_amt;
}
# calculate the dates
$expire = $service['domain_date_expire'] + ($term*86400);
$due_date = $service['domain_date_expire'] - (86400*3);
# Create the invoice
$id = sqlGenID( $db, "invoice" );
$insert = $db->Execute( $sql = sqlInsert($db, "invoice",
Array(
'date_orig' => time(),
'date_last' => time(),
'type' => 2,
'process_status' => 0,
'billing_status' => 0,
'suspend_billing' => 0,
'print_status' => 0,
'parent_id' => $service['invoice_id'],
'account_id' => $service['account_id'],
'account_billing_id'=> $service['account_billing_id'],
'affiliate_id' => @$invoice['affiliate_id'],
'campaign_id' => @$invoice['campaign_id'],
'reseller_id' => @$invoice['reseller_id'],
'checkout_plugin_id'=> @$invoice['checkout_plugin_id'],
'tax_amt' => $tax_amt,
'discount_arr' => serialize(@$discount_arr),
'discount_amt' => @$discount_amt,
'total_amt' => $total,
'billed_amt' => 0,
'billed_currency_id'=> DEFAULT_CURRENCY,
'actual_billed_amt' => 0,
'actual_billed_currency_id' => @$invoice['actual_billed_currency_id'],
'notice_count' => 0,
'notice_next_date' => time(),
'notice_max' => MAX_BILLING_NOTICE,
'grace_period' => 0,
'due_date' => $due_date
), $id ) ) ;
# create the invoice item:
if($insert) {
$db->Execute ( $idx = sqlInsert($db, "invoice_item",
Array(
'date_orig' => time(),
'invoice_id' => $id,
'account_id' => $service['account_id'],
'service_id' => $service['id'],
'sku' => 'DOMAIN-RENEW',
'quantity' => 1,
'item_type' => 2,
'price_type' => 0,
'price_base' => $price,
'price_setup' => 0,
'domain_type' => 'renew',
'date_start' => $service['domain_date_expire'],
'date_stop' => $expire,
'domain_name' => $service['domain_name'],
'domain_tld' => $service['domain_tld'],
'domain_term' => $term,
'tax_amt' => $tax_amt,
'total_amt' => $price
) ) );
# Insert tax records
$taxObj->invoice_item($id, $idx, $service['account_id'], @$item_tax_arr);
# Update the service record
$fields=Array('active' => 0);
$db->Execute(sqlUpdate($db,"service",$fields,"id = {$service['id']}"));
global $C_debug;
$C_debug->alert("Generated domain renewal invoice for {$service['domain_name']}.{$service['domain_tld']}");
return $id;
}
}
/** Run AutoBilling and Due Notices
*/
function autobill($VAR)
{
global $VAR, $C_debug, $C_list;
# User invoice creation confirmation
include_once(PATH_MODULES.'email_template/email_template.inc.php');
$mail = new email_template;
# get all due invoices
$db = &DB();
#$db->debug = true;
if(empty($VAR['invoice_id']))
{
$this->bill_one = false;
$sql = 'SELECT * FROM ' . AGILE_DB_PREFIX . 'invoice
WHERE notice_next_date <= ' . $db->qstr( time() ) . '
AND (
billing_status = 0 OR
billing_status IS NULL
) AND (
suspend_billing = 0 OR
suspend_billing IS NULL
)
AND site_id = ' . $db->qstr(DEFAULT_SITE);
$invoice = $db->Execute($sql);
if($invoice->RecordCount() == 0) {
$C_debug->alert('No Invoices to Autobill');
return false;
}
} else {
# get the specified invoice:
$this->bill_one = true;
$sql = 'SELECT * FROM ' . AGILE_DB_PREFIX . 'invoice
WHERE (
billing_status = 0 OR
billing_status IS NULL
)
AND id = ' . $db->qstr($VAR['invoice_id']) . '
AND site_id = ' . $db->qstr(DEFAULT_SITE);
$invoice = $db->Execute($sql);
}
# Check for results
if($invoice->RecordCount() == 0) {
$C_debug->alert('Invoice could not be billed!');
return false;
}
# Loop through results
while(!$invoice->EOF)
{
$db->StartTrans();
$due = true;
# get currency code
$cyid = $invoice->fields['actual_billed_currency_id'];
$billed_currency_id = $invoice->fields['billed_currency_id'];
if(empty($this->currency_iso[$cyid]))
{
$q = "SELECT three_digit,convert_array FROM ". AGILE_DB_PREFIX ."currency WHERE
id = ". $db->qstr($cyid)." AND
site_id = ". $db->qstr(DEFAULT_SITE);
$currb = $db->Execute($q);
$this->format_currency[$cyid] = Array ( 'convert' => unserialize($currb->fields["convert_array"]),
'iso' => $currb->fields["three_digit"]);
}
# get the currency codes (default)
if(empty($this->format_currency[$billed_currency_id]))
{
# Get the billed currency id currency info:
$q = "SELECT three_digit,convert_array FROM ".AGILE_DB_PREFIX."currency WHERE
id = ".$db->qstr($billed_currency_id)." AND
site_id = ".$db->qstr(DEFAULT_SITE);
$currb = $db->Execute($q);
$this->format_currency[$billed_currency_id] = Array ( 'convert' => unserialize($currb->fields["convert_array"]),
'iso' => $currb->fields["three_digit"]);
}
# attempt to autobill?
if(!empty( $invoice->fields['account_billing_id'] ))
{
# get checkout plugin details:
$billing =& $db->Execute($sql=sqlSelect($db, array('account_billing','checkout'), 'A.*,B.checkout_plugin',
"A.id = ::{$invoice->fields['account_billing_id']}:: AND A.checkout_plugin_id=B.id"));
if($billing && $billing->RecordCount() == 1 && !empty($billing->fields['checkout_plugin'])) {
$plugin_file = PATH_PLUGINS.'checkout/'. $billing->fields['checkout_plugin'] .'.php';
if(!is_file($plugin_file)) {
$err = $plugin_file .' missing when autobilling invoice id ' . $invoice->fields['id'];
$C_debug->error('invoice.inc.php','autobill()', $err);
} else {
include_once ( $plugin_file );
eval( '$PLG = new plg_chout_' . $billing->fields['checkout_plugin'] . '("'.$billing->fields['checkout_plugin_id'].'");');
}
} else {
$err = 'account_billing.id '.$invoice->fields['account_billing_id'].' empty or not associated with a checkout plugin when autobilling invoice id ' . $invoice->fields['id'];
$C_debug->error('invoice.inc.php','autobill()', $err);
}
}
# get the actual billed amount
$amount = $invoice->fields['total_amt'] - $invoice->fields['billed_amt'];
$billed_amt = $invoice->fields['total_amt'];
$actual_billed_amt = $invoice->fields['total_amt'];
if($amount <= 0) $due = false;
if(!empty($PLG) && is_object($PLG) && $PLG->type == 'gateway' && $amount > 0)
{
# attempt autobilling if account billing exists and gateway plugin
if($invoice->fields['account_billing_id'] > 0 )
{
/* get the account details */
$account = $db->Execute(sqlSelect($db,"account","id,email","id=::{$invoice->fields['account_id']}"));
/* Convert the invoice amount to the actual billed currency amount */
if($cyid != $invoice->fields['billed_currency_id']) {
$conversion = $this->format_currency[$billed_currency_id]["convert"][$cyid]["rate"];
$amount *= $conversion;
$actual_billed_amt = $invoice->fields['actual_billed_amt'] + $amount;
}
/* load the billing details from the database */
$PLG->setBillingFromDBObj($billing, true);
/* attempt to auto-bill */
if(!$checkout_plugin_data = $PLG->bill_checkout( number_format($amount,2), $invoice->fields['id'], $this->format_currency[$cyid]['iso'], $account->fields, 0,0) ) {
$due = true;
$email = new email_template;
$email->send('invoice_decline_user', $invoice->fields['account_id'], $invoice->fields['id'],$C_list->format_currency($invoice->fields['total_amt'],$cyid), $C_list->date($invoice->fields['due_date']));
$email = new email_template;
$email->send('admin->invoice_decline_admin', $invoice->fields['account_id'], $invoice->fields['id'], $C_list->format_currency($invoice->fields['total_amt'],''), $C_list->date($invoice->fields['due_date']));
} else {
$due = false;
}
}
}
# send proper alert & manage services
if ($due)
{
# determine if overdue
$due = $invoice->fields['due_date'];
$grace = $invoice->fields['grace_period'];
if(time() < $due+(86400*$grace))
{
if($invoice->fields['notice_count'] <= 0)
{
# send out first alert - new invoice created!
$email = new email_template;
$email->send('invoice_recur_user', $invoice->fields['account_id'], $invoice->fields['id'], $C_list->format_currency($invoice->fields['total_amt'],$cyid), $C_list->date($invoice->fields['due_date']));
$email = new email_template;
$email->send('admin->invoice_recur_admin', $invoice->fields['account_id'], $invoice->fields['id'], $C_list->format_currency($invoice->fields['total_amt'],''), $C_list->date($invoice->fields['due_date']));
}
else
{
# send out payment due notice
if(empty($PLG) || $PLG->type == 'gateway') {
$email = new email_template;
$email->send('invoice_due_user', $invoice->fields['account_id'], $invoice->fields['id'], $this->format_currency[$cyid]["iso"], $C_list->date($invoice->fields['due_date']));
$email = new email_template;
$email->send('admin->invoice_due_admin', $invoice->fields['account_id'], $invoice->fields['id'], $this->format_currency[$billed_currency_id]["iso"], $C_list->date($invoice->fields['due_date']));
}
elseif($PLG->type == 'redirect') {
$email = new email_template;
$email->send('invoice_due_user', $invoice->fields['account_id'], $invoice->fields['id'], $this->format_currency[$cyid]["iso"], $C_list->date($invoice->fields['due_date']));
} elseif ($PLG->type == 'other') {
$email = new email_template;
$email->send('admin->invoice_due_admin', $invoice->fields['account_id'], $invoice->fields['id'], $this->format_currency[$billed_currency_id]["iso"], $C_list->date($invoice->fields['due_date']));
}
}
# increment notice counter
$sql = 'UPDATE ' . AGILE_DB_PREFIX . 'invoice SET
notice_count = ' . $db->qstr($invoice->fields['notice_count']+1) . ',
notice_next_date = ' . $db->qstr(time()+86400*3) . '
WHERE
id = ' . $db->qstr( $invoice->fields['id'] ) . ' AND
site_id = ' . $db->qstr(DEFAULT_SITE);
$db->Execute($sql);
}
else
{
# send service cancelation notice
$email = new email_template;
$email->send('service_suspend_user', $invoice->fields['account_id'], $invoice->fields['id'], $C_list->format_currency($invoice->fields['total_amt'],$cyid), $C_list->date($invoice->fields['due_date']));
$email = new email_template;
$email->send('admin->service_suspend_admin', $invoice->fields['account_id'], $invoice->fields['id'], $C_list->format_currency($invoice->fields['total_amt'],''), $C_list->date($invoice->fields['due_date']));
# overdue - cancel services
$vara['id'] = $invoice->fields['id'];
$this->voidInvoice($vara, $this);
# suspend billing activity
$sql = 'UPDATE ' . AGILE_DB_PREFIX . 'invoice SET
notice_count = ' . $db->qstr($invoice->fields['notice_count']+1) . ',
suspend_billing = ' . $db->qstr('1') . '
WHERE
id = ' . $db->qstr( $invoice->fields['id'] ) . ' AND
site_id = ' . $db->qstr(DEFAULT_SITE);
$db->Execute($sql);
}
}
else
{
# update billing stauts
$sql = 'UPDATE ' . AGILE_DB_PREFIX . 'invoice SET
notice_count = ' . $db->qstr($invoice->fields['notice_count']+1) . ',
billing_status = ' . $db->qstr('1') . ',
billed_amt = ' . $db->qstr($billed_amt) . ',
actual_billed_amt = ' . $db->qstr($actual_billed_amt) . '
WHERE
id = ' . $db->qstr( $invoice->fields['id'] ) . ' AND
site_id = ' . $db->qstr(DEFAULT_SITE);
$db->Execute($sql);
# update invoice via autoapproveInvoice
$this->autoApproveInvoice($invoice->fields['id']);
# User alert of payment processed
$email = new email_template;
$email->send('invoice_paid_user', $invoice->fields['account_id'], $invoice->fields['id'], $this->format_currency[$cyid]['iso'], '');
# Admin alert of payment processed
$email = new email_template;
$email->send('admin->invoice_paid_admin', $invoice->fields['account_id'], $invoice->fields['id'], $this->format_currency[$billed_currency_id]['iso'], '');
}
$invoice->MoveNext();
unset($PLG);
/* finish transaction */
$db->CompleteTrans();
}
}
/**
* Find out if a user has unpaid invoices
*/
function has_unpaid($VAR) {
if(!SESS_LOGGED) return false;
$db=&DB();
$inv=$db->Execute($sql=sqlSelect($db,"invoice","SUM(total_amt-billed_amt) as total",
"account_id=".SESS_ACCOUNT." AND billing_status=0 AND refund_status=0"));
if($inv && $inv->RecordCount() && $inv->fields['total']>0) {
global $smarty, $C_list;
//$act= $db->Execute(sqlSelect($db,"account","currency_id","id=));
$smarty->assign('has_unpaid', $C_list->format_currency_num($inv->fields['total'],SESS_CURRENCY));
}
}
/**
* Get the totals for multiple invoices or for a group of invoices stored in temp
*/
function multiple_invoice_total($invoice,$account_id=SESS_ACCOUNT)
{
$db = &DB();
if(empty($invoice) || eregi(",", $invoice)) {
$id_list='';
if(!empty($invoice)) {
$id = split(',', $invoice);
for($i=0; $i<count($id); $i++) {
if($id[$i] != '') {
if($i == 0) {
$id_list .= " id = " .$db->qstr($id[$i])." ";
$ii++;
} else {
$id_list .= " OR id = " .$db->qstr($id[$i]). " ";
$ii++;
}
}
}
if(!empty($id_list)) $id_list = "( $id_list ) AND ";
}
// get invoice totals
$total=0;
$inv=$db->Execute($sql=sqlSelect($db,"invoice","id,total_amt,billed_amt", "$id_list account_id=".SESS_ACCOUNT." AND billing_status=0 AND refund_status=0"));
if($inv && $inv->RecordCount()) {
while(!$inv->EOF) {
$this->invoice[] = $inv->fields['id'];
$total += ($inv->fields['total_amt']-$inv->fields['billed_amt']);
$inv->MoveNext();
}
return $total;
} else {
return false;
}
} else {
// get total from temp data
$inv=$db->Execute($sql=sqlSelect($db,"temporary_data","data,field1 as total","field2=::$invoice::"));
if($inv && $inv->RecordCount() && $inv->fields['total'] > 0) {
if(!empty($inv->fields['field2'])) $this->invoice=unserialize($inv->fields['data']);
return $inv->fields['total'];
} else {
return false;
}
}
return false;
}
/**
* Preview checkout of multiple invoices
*/
function checkout_multiple_preview($VAR)
{
global $smarty,$C_list;
if(!SESS_LOGGED) return false;
$db=&DB();
$total = $this->multiple_invoice_total(@$VAR['id'],SESS_ACCOUNT);
if($total > 0 && count($this->invoice) > 1)
{
// get country id for checkout options
$account=sqlSelect($db, "account", "country_id", "id=".SESS_ACCOUNT);
// get payment options
include_once(PATH_MODULES.'checkout/checkout.inc.php');
$checkout = new checkout;
$checkoutoptions = $checkout->get_checkout_options(SESS_ACCOUNT, $total, false, $account->fields['country_id'],true);
// get a temporary id (48 hours)
$id=sqlGenID($db, "temporary_data");
$invoice["id"] = "MULTI-$id";
$invoice["total"] = $total;
$fields=Array('date_orig'=>time(), 'date_expire'=>time()+86400*3, 'field2'=> $invoice['id'], 'field1'=>$total, 'data'=>serialize($this->invoice));
$id = & $db->Execute(sqlInsert($db,"temporary_data",$fields));
$smarty->assign('invoice', $invoice);
$smarty->assign('total', $C_list->format_currency_num($total,SESS_CURRENCY));
$smarty->assign('checkoutoptions', $checkoutoptions);
} elseif (count($this->invoice) == 1) {
$id = $this->invoice[0];
echo "<script language=javascript>document.location.href='?_page=invoice:user_view&id=".$id."';</script>";
} else {
echo "No due invoices selected for payment.";
}
}
/** Run checkout plugin for billing
*/
function checkoutnow($VAR)
{
global $C_translate, $smarty, $C_list, $VAR;
# Validate user logged in:
if(SESS_LOGGED != '1') {
echo '<script language="JavaScript">alert("You must be logged in to complete this purchase! Please refresh this page in your browser to login now...");</script>';
return false;
}
$db = &DB();
if(eregi("MULTI-", @$VAR['invoice_id'])) {
// get multi-invoice details
$total = $this->multiple_invoice_total(@$VAR['invoice_id'],SESS_ACCOUNT);
if(!$total) return false;
$recur_amt=false;
$recur_arr=false;
$account_id=SESS_ACCOUNT;
$this->invoice[]=$VAR['invoice_id'];
$this->invoice_id=$VAR['invoice_id'];
$CURRENCY = DEFAULT_CURRENCY;
$multi=true;
} else {
# Validate the invoice selected, & get the totals:
$sql = 'SELECT * FROM ' . AGILE_DB_PREFIX . 'invoice WHERE site_id = '.$db->qstr(DEFAULT_SITE).' AND id = ' . $db->qstr($VAR['invoice_id']);
$result = $db->Execute($sql);
if(!$result || $result->RecordCount() == 0) return false;
# Determine the price & currency
if($result->fields['billed_currency_id'] != $result->fields['actual_billed_currency_id']) {
global $C_list;
$CURRENCY = $result->fields['actual_billed_currency_id'];
if($result->fields['billed_amt'] <= 0)
$total = $C_list->format_currency_decimal ($result->fields['total_amt'], $CURRENCY);
else
$total = $C_list->format_currency_decimal ($result->fields['total_amt'], $CURRENCY) - $result->fields['actual_billed_amt'];
} else {
$CURRENCY = $result->fields['billed_currency_id'];
$total = $result->fields['total_amt']-$result->fields['billed_amt'];
}
$recur_amt=$result->fields['recur_amt'];
if($recur_amt>0) $recur_amt = $C_list->format_currency_decimal ($recur_amt, $CURRENCY);
@$recur_arr=unserialize($result->fields['recur_arr']);
$account_id=$result->fields['account_id'];
$this->invoice_id=$result->fields['id'];
$this->invoice[]=$result->fields['id'];
$multi=false;
}
$amount = round($total, 2);
# Get the account details:
$sql = 'SELECT * FROM ' . AGILE_DB_PREFIX . 'account WHERE site_id = ' . $db->qstr(DEFAULT_SITE) . ' AND id = ' . $db->qstr($account_id);
$account = $db->Execute($sql);
if (!$account || !$account->RecordCount()) return false;
# Validate checkout option selected is allowed for purchase:
$q = "SELECT * FROM ".AGILE_DB_PREFIX."checkout WHERE site_id = ".$db->qstr(DEFAULT_SITE)." AND id = ".$db->qstr(@$VAR['option'])." AND active = 1 AND ";
if($recur_amt>0 && @$billed_amt == 0 ) $q .= "allow_recurring = 1 "; else $q .= "allow_new = 1 ";
$chopt = $db->Execute($q);
if (!$chopt || !$chopt->RecordCount()) return false;
if($chopt && $chopt->RecordCount()) {
$show = true;
if ( @$chopt->fields["total_maximum"] != "" && $total > $chopt->fields["total_maximum"] ) $show = false;
if ( @$chopt->fields["total_miniumum"] != "" && $total < $chopt->fields["total_miniumum"] ) $show = false;
}
if(!$show) {
echo '<script language=Javascript> alert("Unable to checkout with the selected method, please select another."); </script> ';
return false;
}
# Load the checkout plugin:
$plugin_file = PATH_PLUGINS . 'checkout/'. $chopt->fields["checkout_plugin"] . '.php';
include_once ( $plugin_file );
eval ( '$PLG = new plg_chout_' . $chopt->fields["checkout_plugin"] . '("'.@$VAR["option"].'");');
if(!empty($VAR['account_billing_id']) && @$VAR['new_card']==2) {
/* validate credit card on file details */
$account_billing_id=$VAR['account_billing_id'];
if(!$PLG->setBillingFromDB($account_id, $account_billing_id, $VAR['option'])) {
global $C_debug;
$C_debug->alert("Sorry, we cannot use that billing record for this purchase.");
return false;
}
} else {
/* use passed in vars */
$PLG->setBillingFromParams($VAR);
}
# Set Invoice Vars:
$this->total_amt = $amount;
$this->currency_iso = $C_list->currency_iso($CURRENCY);
$this->currency_iso_admin = $C_list->currency_iso($CURRENCY);
$this->account_id = $account_id;
$this->actual_billed_currency_id = $CURRENCY;
$this->billed_currency_id = $CURRENCY;
$this->checkout_plugin_id = @$VAR["option"];
# Run the plugin bill_checkout() method:
$this->checkout_plugin_data = $PLG->bill_checkout( $amount, $this->invoice_id, $this->currency_iso, $account->fields, $recur_amt, $recur_arr);
# redirect
if(!empty($this->checkout_plugin_data['redirect'])) echo $this->checkout_plugin_data['redirect'];
# determine results
if( $this->checkout_plugin_data === false ) {
if(!empty($PLG->redirect)) echo $PLG->redirect;
return false;
} elseif ($PLG->type == "gateway" && empty($PLG->redirect)) {
if(empty($this->admin_checkout)) {
$VAR['_page'] = "invoice:thankyou";
} else {
$VAR['_page'] = "invoice:view";
}
} elseif ($PLG->type == "redirect") {
echo "<html><head></head><body><center>
Please wait while we redirect you to the secure payment site....
{$PLG->redirect}</center></body></html>";
}
# Call the Plugin method for storing the checkout data, if new data entered:
$this->account_billing_id = $PLG->store_billing($VAR, $PLG);
# Load the email template module
include_once(PATH_MODULES.'email_template/email_template.inc.php');
$mail = new email_template;
# Update billing details for this invoice, if realtime billing succeeded:
if($PLG->type == 'gateway' || $amount == 0) {
$q = "UPDATE ".AGILE_DB_PREFIX."invoice
SET
account_billing_id = " .$db->qstr($this->account_billing_id). ",
billing_status = " .$db->qstr(1). ",
billed_amt = " .$db->qstr($total). ",
actual_billed_amt = " .$db->qstr($amount). ",
date_last = " .$db->qstr(time()). ",
checkout_plugin_id = " .$db->qstr($this->checkout_plugin_id) .",
checkout_plugin_data = " .$db->qstr(serialize($this->checkout_plugin_data)). "
WHERE
site_id = ".$db->qstr(DEFAULT_SITE)." AND
id = ".$db->qstr($this->invoice_id);
$rst = $db->Execute($q);
if ($rst === false) {
global $C_debug;
$C_debug->error('invoice.inc.php','checkoutnow', $db->ErrorMsg());
return false;
}
// loop through each invoice paid
foreach($this->invoice as $this->invoice_id) {
# Send billed e-mail notice to user
$email = new email_template;
$email->send('invoice_paid_user', $this->account_id, $this->invoice_id, $this->currency_iso, '');
# Admin alert of payment processed
$email = new email_template;
$email->send('admin->invoice_paid_admin', $this->account_id, $this->invoice_id, $this->currency_iso_admin, '');
# Submit the invoice for approval
$arr['id'] = $this->invoice_id;
$this->approveInvoice($arr, $this);
}
} else {
# Just update the last_date and plugin data
$q = "UPDATE ".AGILE_DB_PREFIX."invoice
SET
account_billing_id = " .$db->qstr($this->account_billing_id). ",
date_last = " .$db->qstr(time()). ",
checkout_plugin_id = " .$db->qstr($this->checkout_plugin_id) .",
checkout_plugin_data = " .$db->qstr(serialize($this->checkout_plugin_data)). "
WHERE
site_id = ".$db->qstr(DEFAULT_SITE)." AND
id = ".$db->qstr($this->invoice_id);
$rst = $db->Execute($q);
if ($rst === false) {
global $C_debug;
$C_debug->error('invoice.inc.php','checkoutnow', $db->ErrorMsg());
return false;
}
# Admin e-mail alert of manual payment processing
if ( $PLG->name == 'MANUAL' ) {
$date_due = $C_list->date(time());
foreach($this->invoice as $this->invoice_id) {
$email = new email_template;
$email->send('admin->invoice_due_admin', $this->account_id, $this->invoice_id, '', $date_due);
}
global $C_debug;
$C_debug->alert($C_translate->translate('manual_alert','checkout'));
}
}
}
/** create modified array for invoice summarization
*/
function summarizeLineItems($smart_items)
{
//$ignore['SKU']=true;
$sum=false;
if(is_array($smart_items)) {
foreach($smart_items as $it) {
if(empty($sum["{$it["sku"]}"])) {
// unique line item
if(empty($ignore["{$it["sku"]}"])) $sum["{$it["sku"]}"][] = $it;
} else {
// is unique price/attributes?
$unique=true;
foreach($sum["{$it["sku"]}"] as $sid => $flds) {
if( $flds["price_base"] == $it["price_base"] && $flds["price_setup"] == $it["price_setup"] && $flds['product_attr'] == $it['product_attr'] ) {
$sum["{$it["sku"]}"]["$sid"]["quantity"] += 1;
$unique = false;
break;
}
}
// unique line item
if($unique) $sum["{$it["sku"]}"][] = $it;
}
}
}
if(!empty($sum)) {
unset($smart_items);
foreach($sum as $sku => $item) foreach($item as $sitem) $smart_items[] = $sitem;
return $smart_items;
}
}
/** VIEW
*/
function view($VAR)
{
global $C_translate, $C_list;
$this->invoice_construct();
$type = "view";
$this->method["$type"] = split(",", $this->method["$type"]);
$db = &DB();
# set the field list for this method:
$arr = $this->method[$type];
# loop through the field list to create the sql queries
$field_list = '';
$i=0;
while (list ($key, $value) = each ($arr))
{
if($i == 0)
{
$field_var = $this->table . '_' . $value;
$field_list .= $value;
}
else
{
$field_var = $this->table . '_' . $value;
$field_list .= "," . $value;
}
$i++;
}
if(isset($VAR["id"]))
{
$id = split(',',$VAR["id"]);
for($i=0; $i<count($id); $i++)
{
if($id[$i] != '')
{
if($i == 0)
{
$id_list .= " id = " .$db->qstr($id[$i])." ";
$ii++;
}
else
{
$id_list .= " OR id = " .$db->qstr($id[$i]). " ";
$ii++;
}
}
}
}
if($ii>0)
{
$any_trial = false;
$any_recurring = false;
$any_new = false;
# generate the full query
$q = "SELECT
$field_list
FROM
".AGILE_DB_PREFIX."$this->table
WHERE
$id_list
AND site_id = '" . DEFAULT_SITE . "'
ORDER BY $this->order_by
LIMIT 0,1";
$result = $db->Execute($q);
if ($result === false)
{
global $C_debug;
$C_debug->error('invoice.inc.php','view', $db->ErrorMsg());
if(isset($this->trigger["$type"]))
{
include_once(PATH_CORE . 'trigger.inc.php');
$trigger = new CORE_trigger;
$trigger->trigger($this->trigger["$type"], 0, $VAR);
}
return;
}
### Set it as a class variable:
$this->result = $result;
# put the results into a smarty accessable array
$i=0;
$ii=0;
$class_name = TRUE;
while (!$result->EOF)
{
$smart[$i] = $result->fields;
## get the product plugin name
if(!empty($result->fields['checkout_plugin_id'])) {
$cplg = $db->Execute(sqlSelect($db,"checkout","name","id = {$result->fields['checkout_plugin_id']}"));
if($cplg && $cplg->RecordCount()) $smart[$i]['checkout_plugin'] = $cplg->fields['name'];
}
if($result->fields['total_amt'] == 0)
$smart[$i]['balance'] = 0;
else
$smart[$i]['balance'] = $result->fields['total_amt'] - $result->fields['billed_amt'];
## Get the tax details
if( !empty($result->fields['tax_amt']) ) {
$trs = $db->Execute($sql=sqlSelect($db, Array('invoice_item_tax','tax'),"A.amount,B.description","A.tax_id=B.id AND A.invoice_id={$result->fields['id']}"));
if($trs && $trs->RecordCount()) {
while(!$trs->EOF) {
$taxes["{$trs->fields['description']}"] += $trs->fields["amount"];
$trs->MoveNext();
}
foreach($taxes as $txds=>$txamt)
$smart[$i]["tax_arr"][] = Array('description'=>$txds, 'amount'=>$txamt);
}
}
## Get the discount details
if( !empty($result->fields['discount_amt']) ) {
$drs = $db->Execute($sql=sqlSelect($db, 'invoice_item_discount',"amount,discount","invoice_id={$result->fields['id']}"));
if($drs && $drs->RecordCount()) {
while(!$drs->EOF) {
$discounts["{$drs->fields['discount']}"] += $drs->fields["amount"];
$drs->MoveNext();
}
$dhtml='';
foreach($discounts as $dsds=>$dsamt) $dhtml .= '<a href=\'?_page=core:search&module=discount&discount_name='.$dsds.'\'>'.$dsds.'</a> - '. number_format($dsamt, 2) . "<br>";
$smart[$i]['discount_popup'] = $dhtml;
$dhtml='';
foreach($discounts as $dsds=>$dsamt) $dhtml .= $dsds.' - '. number_format($dsamt, 2) . "<br>";
$smart[$i]['discount_popup_user'] = $dhtml;
}
}
## Get the checkout plugin details:
if(!empty($result->fields['checkout_plugin_data'])) {
$plugin_data = unserialize($result->fields['checkout_plugin_data']);
if(is_array($plugin_data)) {
$smart[$i]['checkout_plugin_data'] = $plugin_data;
} else {
$smart[$i]['checkout_plugin_data'] = Array(0 => $result->fields['checkout_plugin_data']);
}
}
## Get the line items:
$q = "SELECT * FROM ".AGILE_DB_PREFIX."invoice_item WHERE
invoice_id = ". $db->qstr($result->fields['id'])." AND
site_id = ". $db->qstr(DEFAULT_SITE);
if($C_list->is_installed('voip')) {
$q .= " AND item_type!=5";
}
$items = $db->Execute($q);
if ($items === false) {
global $C_debug;
$C_debug->error('invoice.inc.php','view', $db->ErrorMsg());
return false;
}
$ii =0;
while ( !$items->EOF )
{
$smart_items[$ii] = $items->fields;
// get the product attribs
if(!empty($items->fields['product_attr']))
{
@$attrib = explode("\r\n", $items->fields['product_attr']);
$js='';
for($attr_i = 0; $attr_i < count( $attrib ); $attr_i++)
{
$attributei = explode('==', $attrib[$attr_i]);
if(!empty($attributei[0]) && !empty($attributei[1])) {
$js .= "<u>" . $attributei[0] . "</u> : ". $attributei[1] . " <BR>";
}
}
$smart_items[$ii]['attribute_popup'] = $js;
}
// get the date range if set
if(!empty($items->fields['date_start']) && !empty($items->fields['date_stop']))
{
$C_translate->value('invoice','start', date(UNIX_DATE_FORMAT,$items->fields['date_start']));
$C_translate->value('invoice','stop', date(UNIX_DATE_FORMAT,$items->fields['date_stop']));
$smart_items[$ii]['range'] = $C_translate->translate('recur_date_range','invoice','');
}
// Set charge type for payment option list:
$any_new = true;
if ($items->fields["price_type"] == '1' && !empty($result->fields['recurr_arr']) && is_array(unserialize($result->fields['recurr_arr'])))
$any_recurring = true;
$items->MoveNext();
$ii++;
}
## Create a summary (for duplicate skus w/identical price,and attributes, roll into a single value
if($this->summarizeInvoice) {
$tmp = $smart_items;
unset($smart_items);
$smart_items = $this->summarizeLineItems($tmp);
}
### GET THE CHECKOUT (PAYMENT) OPTIONS
if($VAR['_page'] != 'invoice:view')
{
# get the converted amount due:
if($result->fields['billed_currency_id'] != $result->fields['actual_billed_currency_id'])
{
global $C_list;
$CURRENCY = $result->fields['actual_billed_currency_id'];
if($result->fields['billed_amt'] <= 0)
$total = $C_list->format_currency_decimal ($result->fields['total_amt'], $CURRENCY);
else
$total = $C_list->format_currency_decimal ($result->fields['total_amt'], $CURRENCY) - $result->fields['actual_billed_amt'];
} else {
$CURRENCY = $result->fields['billed_currency_id'];
$total = $result->fields['total_amt']-$result->fields['billed_amt'];
}
$q = "SELECT * FROM ".AGILE_DB_PREFIX."checkout WHERE site_id = ". DEFAULT_SITE ." AND active = 1";
if($any_trial) $q .= " AND allow_trial = ".$db->qstr('1');
if($any_recurring) $q .= " AND allow_recurring = ".$db->qstr('1');
if($any_new) $q .= " AND allow_new = ".$db->qstr('1');
$chopt = $db->Execute($q);
if ($chopt === false) {
global $C_debug;
$C_debug->error('invoice.inc.php','view', $db->ErrorMsg());
return false;
}
if($chopt != false && $chopt->RecordCount() > 0) {
while( !$chopt->EOF ) {
$show = true;
# Check that the cart total is not to high:
if ( $chopt->fields["total_maximum"] != "" &&
$result->fields['total_amt'] >= $chopt->fields["total_maximum"] ) {
$show = false;
}
# Check that the cart total is not to low:
if ( $chopt->fields["total_miniumum"] != "" &&
$result->fields['total_amt'] <= $chopt->fields["total_miniumum"] ) {
$show = false;
}
# Check that the group requirement is met:
if ( $show && !empty ( $chopt->fields["required_groups"] ) ) {
global $C_auth;
$arr = unserialize ( $chopt->fields["required_groups"] );
if(count($arr) > 0 && !empty($arr[0])) $show = false;
for ( $i=0; $i<count($arr); $i++ ) {
if($C_auth->auth_group_by_id($arr[$i])) {
$show = true;
$i=count($arr);
}
}
}
# Check that the customer is not ordering a blocked SKU:
if ( $show && !empty ( $chopt->fields["excluded_products"] ) ) {
$arr = unserialize ( $chopt->fields["excluded_products"] );
if(count($arr) > 0) {
for($i=0; $i<count($smart_items); $i++) {
for($isk=0; $isk<count($arr); $isk++) {
if($smart_items[$i]['product_id'] == $arr[$isk] && !empty($arr[$isk]) && !empty($smart_items[$i]['product_id']) ) {
$show = false;
$i=count($smart);
$isk=count($arr);
}
}
}
}
}
$list_ord = 100;
if ( $show ) {
# Check if this method should be the default method:
# By Amount:
if ( !empty ( $chopt->fields["default_when_amount"] ) ) {
$arr = unserialize ( $chopt->fields["default_when_amount"] );
for ( $idx=0; $idx<count($arr); $idx++ ) {
if ( $total >= $arr[$idx] ) $list_ord--;
$idx=count($arr);
}
}
# By Currency
if ( !empty ( $chopt->fields["default_when_currency"] ) ) {
$arr = unserialize ( $chopt->fields["default_when_currency"] );
for ( $idx=0; $idx<count($arr); $idx++ ) {
if ( $CURRENCY == $arr[$idx] ) $list_ord--;
$idx=count($arr);
}
}
# By Group
if ( !empty ( $chopt->fields["default_when_group"] ) ) {
$arr = unserialize ( $chopt->fields["default_when_group"] );
global $C_auth;
for ( $idx=0; $idx<count($arr); $idx++ ) {
if ( $C_auth->auth_group_by_id( $arr[$idx] ) ) $list_ord--;
$idx=count($arr);
}
}
# By Country
if ( !empty ( $chopt->fields["default_when_country"] ) ) {
$arr = unserialize ( $chopt->fields["default_when_country"] );
for ( $idx=0; $idx<count($arr); $idx++ ) {
if ( $account->fields["country_id"] == $arr[$idx] ) $list_ord--;
$idx=count($arr);
}
}
# Add to the array
$checkout_optionsx[] = Array ('sort' => $list_ord,
'fields' => $chopt->fields);
}
$chopt->MoveNext();
}
# Sort the checkout_options array by the [fields] element
if(count($checkout_optionsx) > 0 ) {
foreach ( $checkout_optionsx as $key => $row )
$sort[$key] = $row["sort"];
array_multisort ( $sort, SORT_ASC, $checkout_optionsx );
}
}
}
$result->MoveNext();
$i++;
}
# get the result count:
$results = $result->RecordCount();
### No results:
if($result->RecordCount() == 0)
{
global $C_debug;
$C_debug->error("CORE:database.inc.php", "view()", "The selected record does not
exist any longer, or your account is not authorized to view it");
return;
}
# define the DB vars as a Smarty accessible block
global $smarty;
# define the results
$smarty->assign('cart', $smart_items);
$smarty->assign($this->table, $smart);
#$smarty->assign('results', $search->results);
$smarty->assign('checkoutoptions', $checkout_optionsx);
}
}
/** UPDATE
*/
function update($VAR)
{
$this->invoice_construct();
$type = "update";
$this->method["$type"] = split(",", $this->method["$type"]);
$db = new CORE_database;
$db->update($VAR, $this, $type);
}
/** DELETE
*/
function delete($VAR)
{
$this->invoice_construct();
$dbx = new CORE_database;
$db = &DB();
### Get the array
if(isset($VAR["delete_id"]))
$id = split(',', $VAR["delete_id"]);
elseif (isset($VAR["id"]))
$id = split(',', $VAR["id"]);
### Load the service module
include_once(PATH_MODULES.'service/service.inc.php');
$service = new service;
### Loop:
for($i=0; $i<count($id); $i++)
{
### Loop through all services for this invoice and delete:
$q = "SELECT * FROM ".AGILE_DB_PREFIX."service WHERE
invoice_id = ".$db->qstr( $id[$i] )." AND
site_id = ".$db->qstr(DEFAULT_SITE);;
$rs = $db->Execute($q);
if ($rs === false) {
global $C_debug;
$C_debug->error('invoice.inc.php','delete', $db->ErrorMsg());
return false;
}
if (@$rs->RecordCount() > 0) {
while ( !$rs->EOF ) {
$arr['id'] = $rs->fields['id'];
$service->delete($arr, $service);
$rs->MoveNext();
}
}
### Delete the service record
$arr['id'] = $id[$i];
$this->associated_DELETE[] = Array ('table' => 'invoice_commission', 'field' => 'invoice_id');
$this->associated_DELETE[] = Array ('table' => 'invoice_item', 'field' => 'invoice_id');
$this->associated_DELETE[] = Array ('table' => 'invoice_memo', 'field' => 'invoice_id');
$this->associated_DELETE[] = Array ('table' => 'service', 'field' => 'invoice_id');
$this->associated_DELETE[] = Array ('table' => 'invoice_item_tax', 'field' => 'invoice_id');
$this->associated_DELETE[] = Array ('table' => 'invoice_item_discount', 'field' => 'invoice_id');
$dbx->mass_delete($arr, $this, "");
}
}
/** SEARCH FORM
*/
function search_form($VAR)
{
$this->invoice_construct();
$type = "search";
$this->method["$type"] = split(",", $this->method["$type"]);
$db = new CORE_database;
$db->search_form($VAR, $this, $type);
}
/** SEARCH
*/
function search($VAR)
{
$this->invoice_construct();
$type = "search";
$this->method["$type"] = split(",", $this->method["$type"]);
$db = &DB();
include_once(PATH_CORE . 'validate.inc.php');
$validate = new CORE_validate;
# set the search criteria array
$arr = $VAR;
# convert invoice_discount_arr
if(!empty($VAR['invoice_discount_arr']))
$arr['invoice_discount_arr'] = '%"'.$VAR['invoice_discount_arr'].'"%';
# loop through the submitted field_names to get the WHERE statement
$where_list = '';
$i=0;
while (list ($key, $value) = each ($arr))
{
if($i == 0)
{
if($value != '')
{
$pat = "^" . $this->module . "_";
if(eregi($pat, $key))
{
$field = eregi_replace($pat,"",$key);
if(eregi('%',$value))
{
# do any data conversion for this field (date, encrypt, etc...)
if(isset($this->field["$field"]["convert"]) && $this->field["$field"]["convert"] != 'array')
{
$value = $validate->convert($field, $value, $this->field["$field"]["convert"]);
}
$where_list .= " WHERE ".AGILE_DB_PREFIX."invoice.".$field . " LIKE " . $db->qstr($value, get_magic_quotes_gpc());
$i++;
}
else
{
# check if array
if(is_array($value))
{
for($i_arr=0; $i_arr < count($value); $i_arr++)
{
if($value["$i_arr"] != '')
{
# determine any field options (=, >, <, etc...)
$f_opt = '=';
$pat_field = $this->module.'_'.$field;
$VAR['field_option']["$pat_field"]["$i_arr"];
if(isset($VAR['field_option']["$pat_field"]["$i_arr"]))
{
$f_opt = $VAR['field_option']["$pat_field"]["$i_arr"];
# error checking, safety precaution
if($f_opt != '=' && $f_opt != '>' && $f_opt != '<' && $f_opt != '>=' && $f_opt != '<=' && $f_opt != '!=')
$f_opt = '=';
}
# do any data conversion for this field (date, encrypt, etc...)
if(isset($this->field["$field"]["convert"]) && $this->field["$field"]["convert"] != 'array')
{
$value["$i_arr"] = $validate->convert($field, $value["$i_arr"], $this->field["$field"]["convert"]);
}
if($i_arr == 0)
{
$where_list .= " WHERE ".AGILE_DB_PREFIX."invoice.".$field . " $f_opt " . $db->qstr($value["$i_arr"], get_magic_quotes_gpc());
$i++;
}
else
{
$where_list .= " AND ".AGILE_DB_PREFIX."invoice.".$field . " $f_opt " . $db->qstr($value["$i_arr"], get_magic_quotes_gpc());
$i++;
}
}
}
}
else
{
$where_list .= " WHERE ".AGILE_DB_PREFIX."invoice.".$field . " = " . $db->qstr($value, get_magic_quotes_gpc());
$i++;
}
}
}
}
}
else
{
if($value != '')
{
$pat = "^" . $this->module . "_";
if(eregi($pat, $key))
{
$field = eregi_replace($pat,"",$key);
if(eregi('%',$value))
{
# do any data conversion for this field (date, encrypt, etc...)
if(isset($this->field["$field"]["convert"]) && $this->field["$field"]["convert"] != 'array')
{
$value = $validate->convert($field, $value, $this->field["$field"]["convert"]);
}
$where_list .= " AND ".AGILE_DB_PREFIX."invoice.".$field . " LIKE " . $db->qstr($value, get_magic_quotes_gpc());
$i++;
}
else
{
# check if array
if(is_array($value))
{
for($i_arr=0; $i_arr < count($value); $i_arr++)
{
if($value["$i_arr"] != '')
{
# determine any field options (=, >, <, etc...)
$f_opt = '=';
$pat_field = $this->module.'_'.$field;
if(isset($VAR['field_option']["$pat_field"]["$i_arr"]))
{
$f_opt = $VAR['field_option']["$pat_field"]["$i_arr"];
# error checking, safety precaution
if($f_opt != '=' && $f_opt != '>' && $f_opt != '<' && $f_opt != '>=' && $f_opt != '<=' && $f_opt != '!=')
$f_opt = '=';
}
# do any data conversion for this field (date, encrypt, etc...)
if(isset($this->field["$field"]["convert"]) && $this->field["$field"]["convert"] != 'array')
{
$value["$i_arr"] = $validate->convert($field, $value["$i_arr"], $this->field["$field"]["convert"]);
}
$where_list .= " AND ".AGILE_DB_PREFIX."invoice.". $field . " $f_opt " . $db->qstr($value["$i_arr"], get_magic_quotes_gpc());
$i++;
}
}
}
else
{
$where_list .= " AND ".AGILE_DB_PREFIX."invoice.". $field . " = ". $db->qstr($value, get_magic_quotes_gpc());
$i++;
}
}
}
}
}
}
# Code for attribute searches:
if(!empty($VAR['join_product_id']) && !empty($VAR['item_attributes']))
{
$attr_arr = $VAR['item_attributes'];
for($ati=0; $ati<count($attr_arr); $ati++)
{
if(!empty($attr_arr[$ati]['0']))
{
if($where_list == '')
$where_list .= ' WHERE ';
else
$where_list .= ' AND ';
$where_list .= AGILE_DB_PREFIX."invoice_item.product_attr LIKE " .
$db->qstr("%{$attr_arr[$ati]['0']}=={$attr_arr[$ati]['1']}%");
}
}
}
# get limit type
if(isset($VAR['limit']))
{
$limit = $VAR['limit'];
}
else
{
$limit = $this->limit;
}
# get order by
if(isset($VAR['order_by']))
{
$order_by = $VAR['order_by'];
}
else
{
$order_by = $this->order_by;
}
## SELECT FROM
$p = AGILE_DB_PREFIX;
$q = "SELECT DISTINCT {$p}invoice.id FROM ".AGILE_DB_PREFIX."invoice ";
$q_save = "SELECT DISTINCT %%fieldList%%,{$p}invoice.id FROM {$p}invoice ";
## LEFT JOIN
if( !empty($VAR['join_product_id']) || !empty($VAR['join_service_id']) ||
!empty($VAR['join_domain_name']) || !empty($VAR['join_domain_tld']) ||
!empty($VAR['join_memo_text']) )
{
# JOIN ON PRODUCT DETAILS:
if(!empty($VAR['join_product_id']) || !empty($VAR['join_service_id']) || !empty($VAR['join_domain_name']) || !empty($VAR['join_domain_tld']))
{
$q .= " LEFT JOIN {$p}invoice_item ON {$p}invoice_item.invoice_id = {$p}invoice.id";
$q_save .= " LEFT JOIN {$p}invoice_item ON {$p}invoice_item.invoice_id = {$p}invoice.id";
if($where_list == '') {
$q .= " WHERE {$p}invoice_item.site_id = " . $db->qstr(DEFAULT_SITE);
$q_save .= " WHERE {$p}invoice_item.site_id = " . $db->qstr(DEFAULT_SITE);
} else {
$q .= $where_list ." AND {$p}invoice_item.site_id = " . $db->qstr(DEFAULT_SITE);
$q_save .= $where_list ." AND {$p}invoice_item.site_id = " . $db->qstr(DEFAULT_SITE);
}
# AND (invoice_item.product_id)
if(!empty($VAR['join_product_id'])) {
$q .= " AND {$p}invoice_item.product_id = " . $db->qstr($VAR['join_product_id']);
$q_save .= " AND {$p}invoice_item.product_id = " . $db->qstr($VAR['join_product_id']);
}
# AND (invoice_item.service_id)
if(!empty($VAR['join_service_id'])) {
$q .= " AND {$p}invoice_item.service_id = " . $db->qstr($VAR['join_service_id']);
$q_save .= " AND {$p}invoice_item.service_id = " . $db->qstr($VAR['join_service_id']);
}
# AND (invoice_item.domain_name)
if(!empty($VAR['join_domain_name'])) {
if(!ereg('%',$VAR['join_domain_name']) ) $qtype = ' = '; else $qtype = ' LIKE ';
$q .= " AND {$p}invoice_item.domain_name $qtype " . $db->qstr($VAR['join_domain_name']);
$q_save .= " AND {$p}invoice_item.domain_name $qtype " . $db->qstr($VAR['join_domain_name']);
}
# AND (invoice_item.domain_tld)
if(!empty($VAR['join_domain_tld'])) {
if(!ereg('%',$VAR['join_domain_tld']) ) $qtype = ' = '; else $qtype = ' LIKE ';
$q .= " AND {$p}invoice_item.domain_tld $qtype " . $db->qstr($VAR['join_domain_tld']);
$q_save .= " AND {$p}invoice_item.domain_tld $qtype " . $db->qstr($VAR['join_domain_tld']);
}
}
# JOIN ON MEMO TEXT:
if(!empty($VAR['join_memo_text']))
{
$q .= " LEFT JOIN {$p}invoice_memo ON {$p}invoice_memo.invoice_id = {$p}invoice.id";
$q_save .= " LEFT JOIN {$p}invoice_memo ON {$p}invoice_memo.invoice_id = {$p}invoice.id";
if($where_list == '') {
$q .= " WHERE {$p}invoice_memo.site_id = " . $db->qstr(DEFAULT_SITE);
$q_save .= " WHERE {$p}invoice_memo.site_id = " . $db->qstr(DEFAULT_SITE);
} else {
$q .= $where_list ." AND {$p}invoice_memo.site_id = " . $db->qstr(DEFAULT_SITE);
$q_save .= $where_list ." AND {$p}invoice_memo.site_id = " . $db->qstr(DEFAULT_SITE);
}
$q .= " AND {$p}invoice_memo.memo LIKE " . $db->qstr('%'. $VAR['join_memo_text'] .'%');
$q_save .= " AND {$p}invoice_memo.memo LIKE " . $db->qstr('%'. $VAR['join_memo_text'] .'%');
}
$q .= " AND {$p}invoice.site_id = ". DEFAULT_SITE;
$q_save .= ' AND ';
}
else
{
if($where_list == '') {
$q .= "WHERE {$p}invoice.site_id = ". DEFAULT_SITE;
$q_save .= ' WHERE ';
}
else
{
$q .= $where_list . " AND {$p}invoice.site_id = ". DEFAULT_SITE;
$q_save .= $where_list . ' AND ';
}
}
///////////////// debug
#echo $q;
#exit;
# run the database query
$result = $db->Execute($q);
# error reporting
if ($result === false)
{
global $C_debug;
$C_debug->error('invoice.inc.php','search', $db->ErrorMsg());
return false;
}
# get the result count:
$results = $result->RecordCount();
# get the first record id:
if($results == 1) $record_id = $result->fields['id'];
# define the DB vars as a Smarty accessible block
global $smarty;
# Create the definition for fast-forwarding to a single record:
if ($results == 1 && !isset($this->fast_forward))
{
$smarty->assign('record_id', $record_id);
}
# create the search record:
if($results > 0)
{
# create the search record
include_once(PATH_CORE . 'search.inc.php');
$search = new CORE_search;
$arr['module'] = $this->module;
$arr['sql'] = $q_save;
$arr['limit'] = $limit;
$arr['order_by']= $order_by;
$arr['results'] = $results;
$search->add($arr);
# define the search id and other parameters for Smarty
$smarty->assign('search_id', $search->id);
# page:
$smarty->assign('page', '1');
# limit:
$smarty->assign('limit', $limit);
# order_by:
$smarty->assign('order_by', $order_by);
}
# define the result count
$smarty->assign('results', $results);
}
/** SEARCH SHOW
*/
function search_show($VAR)
{
$this->invoice_construct();
$type = "search";
$this->method["$type"] = split(",", $this->method["$type"]);
# set the field list for this method:
$arr = $this->method[$type];
$field_list = '';
$i=0;
while (list ($key, $value) = each ($arr))
{
if($i == 0)
{
$field_var = $this->table . '_' . $value;
$field_list .= AGILE_DB_PREFIX . "invoice" . "." . $value;
// determine if this record is linked to another table/field
if($this->field[$value]["asso_table"] != "")
{
$this->linked[] = array('field' => $value, 'link_table' => $this->field[$value]["asso_table"], 'link_field' => $this->field[$value]["asso_field"]);
}
}
else
{
$field_var = $this->table . '_' . $value;
$field_list .= "," . AGILE_DB_PREFIX . "invoice" . "." . $value;
// determine if this record is linked to another table/field
if($this->field[$value]["asso_table"] != "")
{
$this->linked[] = array('field' => $value, 'link_table' => $this->field[$value]["asso_table"], 'link_field' => $this->field[$value]["asso_field"]);
}
}
$i++;
}
# get the search details:
if(isset($VAR['search_id'])) {
include_once(PATH_CORE . 'search.inc.php');
$search = new CORE_search;
$search->get($VAR['search_id']);
} else {
# invalid search!
echo '<BR> The search terms submitted were invalid!'; # translate... # alert
if(isset($this->trigger["$type"])) {
include_once(PATH_CORE . 'trigger.inc.php');
$trigger = new CORE_trigger;
$trigger->trigger($this->trigger["$type"], 0, $VAR);
}
}
# get the sort order details:
if(isset($VAR['order_by']) && $VAR['order_by'] != "") {
$order_by = ' ORDER BY ' . $VAR['order_by'];
$smarty_order = $VAR['order_by'];
} else {
$order_by = ' ORDER BY ' . $this->order_by;
$smarty_order = $search->order_by;
}
# determine the sort order
if(isset($VAR['desc'])) {
$order_by .= ' DESC';
$smarty_sort = 'desc=';
} else if(isset($VAR['asc'])) {
$order_by .= ' ASC';
$smarty_sort = 'asc=';
} else {
if (!eregi('date',$smarty_order)) {
$order_by .= ' ASC';
$smarty_sort = 'asc=';
} else {
$order_by .= ' DESC';
$smarty_sort = 'desc=';
}
}
# determine the offset & limit
$current_page=1;
$offset=-1;
if (!empty($VAR['page'])) $current_page = $VAR['page'];
if (empty($search->limit)) $search->limit=25;
if($current_page>1) $offset = (($current_page * $search->limit) - $search->limit);
# generate the full query
$db = &DB();
$q = eregi_replace("%%fieldList%%", $field_list, $search->sql);
$q = eregi_replace("%%tableList%%", AGILE_DB_PREFIX.$construct->table, $q);
$q = eregi_replace("%%whereList%%", "", $q);
$q .= " ".AGILE_DB_PREFIX . "invoice.site_id = '" . DEFAULT_SITE . "'";
$q .= $order_by;
//////////////////
#echo "<BR> $q <BR>";
$result = $db->SelectLimit($q, $search->limit, $offset);
# error reporting
if ($result === false)
{
global $C_debug;
$C_debug->error('invoice.inc.php','search', $db->ErrorMsg());
if(isset($this->trigger["$type"]))
{
include_once(PATH_CORE . 'trigger.inc.php');
$trigger = new CORE_trigger;
$trigger->trigger($this->trigger["$type"], 0, $VAR);
}
return;
}
# put the results into a smarty accessable array
$i=0;
$class_name = TRUE;
while (!$result->EOF) {
$smart[$i] = $result->fields;
$amount += $result->fields['total_amt'];
if($class_name)
{
$smart[$i]['_C'] = 'row1';
$class_name = FALSE;
} else {
$smart[$i]['_C'] = 'row2';
$class_name = TRUE;
}
$result->MoveNext();
$i++;
}
# get any linked fields
if($i > 0)
{
$db_join = new CORE_database;
$this->result = $db_join->join_fields($smart, $this->linked);
}
else
{
$this->result = $smart;
}
# get the result count:
$results = $result->RecordCount();
# define the DB vars as a Smarty accessible block
global $smarty;
# define the results
$smarty->assign($this->table, $this->result);
$smarty->assign('page', $VAR['page']);
$smarty->assign('order', $smarty_order);
$smarty->assign('sort', $smarty_sort);
$smarty->assign('limit', $search->limit);
$smarty->assign('search_id',$search->id);
$smarty->assign('results', $search->results);
global $C_list;
$smarty->assign('total_amount', $C_list->format_currency($amount,DEFAULT_CURRENCY));
# get the total pages for this search:
if(empty($search->limit))
$this->pages = 1;
else
$this->pages = intval($search->results / $search->limit);
if ($search->results % $search->limit) $this->pages++;
# total pages
$smarty->assign('pages', $this->pages);
# current page
$smarty->assign('page', $current_page);
$page_arr = '';
for($i=0; $i <= $this->pages; $i++)
{
if ($this->page != $i) $page_arr[] = $i;
}
# page array for menu
$smarty->assign('page_arr', $page_arr);
}
/** USER SEARCH
*/
function user_search($VAR)
{
if(!SESS_LOGGED) return false;
$VAR['invoice_account_id'] = SESS_ACCOUNT;
$this->invoice_construct();
$type = "search";
$this->method["$type"] = split(",", $this->method["$type"]);
$db = new CORE_database;
$db->search($VAR, $this, $type);
}
/** USER SEARCH SHOW
*/
function user_search_show($VAR)
{
if(!SESS_LOGGED) return false;
$this->invoice_construct();
$type = "search";
$this->method["$type"] = split(",", $this->method["$type"]);
$db = new CORE_database;
$db->search_show($VAR, $this, $type);
}
/** USER VIEW
*/
function user_view($VAR)
{
global $C_auth;
if(!SESS_LOGGED) return false;
// verify the account_id for this order is the SESS_ACCOUNT
if ( $C_auth->auth_method_by_name('invoice','view') == false)
{
$id = split(',',$VAR['id']);
$db = &DB();
$q = "SELECT account_id FROM ".AGILE_DB_PREFIX."invoice WHERE
id = ".$db->qstr($id[0])." AND
site_id = ".$db->qstr(DEFAULT_SITE);
$rs = $db->Execute($q);
if ($rs === false) {
global $C_debug;
$C_debug->error('invoice.inc.php','user_view', $db->ErrorMsg());
return false;
}
if ($rs->fields['account_id'] != SESS_ACCOUNT) return false;
}
$this->view($VAR, $this);
}
/** SEARCH EXPORT
*/
function search_export($VAR)
{
$this->invoice_construct();
# require the export class
require_once (PATH_CORE . "export.inc.php");
# Call the correct export function for inline browser display, download, email, or web save.
if($VAR["format"] == "excel")
{
$type = "export_excel";
$this->method["$type"] = split(",", $this->method["$type"]);
$export = new CORE_export;
$export->search_excel($VAR, $this, $type);
}
else if ($VAR["format"] == "pdf")
{
$type = "export_pdf";
$this->method["$type"] = split(",", $this->method["$type"]);
$export = new CORE_export;
$export->pdf_invoice($VAR, $this, $type);
}
else if ($VAR["format"] == "xml")
{
$type = "export_xml";
$this->method["$type"] = split(",", $this->method["$type"]);
$export = new CORE_export;
$export->search_xml($VAR, $this, $type);
}
else if ($VAR["format"] == "csv")
{
$type = "export_csv";
$this->method["$type"] = split(",", $this->method["$type"]);
$export = new CORE_export;
$export->search_csv($VAR, $this, $type);
}
else if ($VAR["format"] == "tab")
{
$type = "export_tab";
$this->method["$type"] = split(",", $this->method["$type"]);
$export = new CORE_export;
$export->search_tab($VAR, $this, $type);
}
}
function invoice_construct()
{
$this->module = "invoice";
$this->xml_construct = PATH_MODULES . "" . $this->module . "/" . $this->module . "_construct.xml";
include_once(PATH_CORE.'xml.inc.php');
$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"];
}
}
?>
Reference in New Issue View Git Blame Copy Permalink