function print_po()
{
global $path_to_root;
include_once $path_to_root . "reporting/includes/pdf_report.inc";
$from = $_REQUEST['PARAM_0'];
$to = $_REQUEST['PARAM_1'];
$currency = $_REQUEST['PARAM_2'];
$bankaccount = $_REQUEST['PARAM_3'];
$email = $_REQUEST['PARAM_4'];
$comments = $_REQUEST['PARAM_5'];
if ($from == null) {
$from = 0;
}
if ($to == null) {
$to = 0;
}
$dec = user_price_dec();
$cols = array(4, 60, 225, 300, 325, 385, 450, 515);
// $headers in doctext.inc
$aligns = array('left', 'left', 'left', 'left', 'right', 'right', 'right');
$params = array('comments' => $comments, 'bankaccount' => $bankaccount);
$baccount = get_bank_account($params['bankaccount']);
$cur = get_company_Pref('curr_default');
if ($email == 0) {
$rep = new FrontReport(tr('PURCHASE ORDER'), "PurchaseOrderBulk.pdf", user_pagesize());
$rep->currency = $cur;
$rep->Font();
$rep->Info($params, $cols, null, $aligns);
}
for ($i = $from; $i <= $to; $i++) {
$myrow = get_po($i);
if ($email == 1) {
$rep = new FrontReport("", "", user_pagesize());
$rep->currency = $cur;
$rep->Font();
$rep->title = tr('PURCHASE ORDER');
$rep->filename = "PurchaseOrder" . $i . ".pdf";
$rep->Info($params, $cols, null, $aligns);
} else {
$rep->title = tr('PURCHASE ORDER');
}
$rep->Header2($myrow, null, $myrow, $baccount, 8);
$result = get_po_details($i);
$SubTotal = 0;
while ($myrow2 = db_fetch($result)) {
$Net = round($myrow2["unit_price"] * $myrow2["quantity_ordered"], user_price_dec());
$SubTotal += $Net;
$DisplayPrice = number_format2($myrow2["unit_price"], $dec);
$DisplayQty = number_format2($myrow2["quantity_ordered"], user_qty_dec());
$DisplayNet = number_format2($Net, $dec);
//$rep->TextCol(0, 1, $myrow2['item_code'], -2);
$rep->TextCol(0, 2, $myrow2['description'], -2);
$rep->TextCol(2, 3, $myrow2['delivery_date'], -2);
$rep->TextCol(3, 4, $DisplayQty, -2);
$rep->TextCol(4, 5, $myrow2['units'], -2);
$rep->TextCol(5, 6, $DisplayPrice, -2);
$rep->TextCol(6, 7, $DisplayNet, -2);
$rep->NewLine(1);
if ($rep->row < $rep->bottomMargin + 15 * $rep->lineHeight) {
$rep->Header2($myrow, $branch, $sales_order, $baccount);
}
}
if ($myrow['comments'] != "") {
$rep->NewLine();
$rep->TextColLines(1, 5, $myrow['comments'], -2);
}
$DisplaySubTot = number_format2($SubTotal, $dec);
$rep->row = $rep->bottomMargin + 15 * $rep->lineHeight;
$linetype = true;
$doctype = 8;
if ($rep->currency != $myrow['curr_code']) {
include $path_to_root . "reporting/includes/doctext2.inc";
} else {
include $path_to_root . "reporting/includes/doctext.inc";
}
$rep->TextCol(3, 6, $doc_Sub_total, -2);
$rep->TextCol(6, 7, $DisplaySubTot, -2);
$rep->NewLine();
$DisplayTotal = number_format2($SubTotal, $dec);
$rep->Font('bold');
$rep->TextCol(3, 6, $doc_TOTAL_PO, -2);
$rep->TextCol(6, 7, $DisplayTotal, -2);
$rep->Font();
if ($email == 1) {
$myrow['contact_email'] = $myrow['email'];
$myrow['DebtorName'] = $myrow['supp_name'];
$myrow['reference'] = $myrow['order_no'];
$rep->End($email, $doc_Order_no . " " . $myrow['reference'], $myrow);
}
}
if ($email == 0) {
$rep->End();
}
}
function print_remittances()
{
global $path_to_root, $systypes_array;
include_once $path_to_root . "/reporting/includes/pdf_report.inc";
$from = $_POST['PARAM_0'];
$to = $_POST['PARAM_1'];
$currency = $_POST['PARAM_2'];
$email = $_POST['PARAM_3'];
$comments = $_POST['PARAM_4'];
$orientation = $_POST['PARAM_5'];
if (!$from || !$to) {
return;
}
$orientation = $orientation ? 'L' : 'P';
$dec = user_price_dec();
$fno = explode("-", $from);
$tno = explode("-", $to);
$from = min($fno[0], $tno[0]);
$to = max($fno[0], $tno[0]);
$cols = array(4, 85, 150, 225, 275, 360, 450, 515);
// $headers in doctext.inc
$aligns = array('left', 'left', 'left', 'left', 'right', 'right', 'right');
$params = array('comments' => $comments);
$cur = get_company_Pref('curr_default');
if ($email == 0) {
$rep = new FrontReport(_('REMITTANCE'), "RemittanceBulk", user_pagesize(), 9, $orientation);
}
if ($orientation == 'L') {
recalculate_cols($cols);
}
for ($i = $from; $i <= $to; $i++) {
if ($fno[0] == $tno[0]) {
$types = array($fno[1]);
} else {
$types = array(ST_BANKPAYMENT, ST_SUPPAYMENT, ST_SUPPCREDIT);
}
foreach ($types as $j) {
$myrow = get_remittance($j, $i);
if (!$myrow) {
continue;
}
$res = get_bank_trans($j, $i);
$baccount = db_fetch($res);
$params['bankaccount'] = $baccount['bank_act'];
if ($email == 1) {
$rep = new FrontReport("", "", user_pagesize(), 9, $orientation);
$rep->title = _('REMITTANCE');
$rep->filename = "Remittance" . $i . ".pdf";
}
$rep->SetHeaderType('Header2');
$rep->currency = $cur;
$rep->Font();
$rep->Info($params, $cols, null, $aligns);
$contacts = get_supplier_contacts($myrow['supplier_id'], 'invoice');
$rep->SetCommonData($myrow, null, $myrow, $baccount, ST_SUPPAYMENT, $contacts);
$rep->NewPage();
$result = get_allocations_for_remittance($myrow['supplier_id'], $myrow['type'], $myrow['trans_no']);
$doctype = ST_SUPPAYMENT;
$total_allocated = 0;
$rep->TextCol(0, 4, _("As advance / full / part / payment towards:"), -2);
$rep->NewLine(2);
while ($myrow2 = db_fetch($result)) {
$rep->TextCol(0, 1, $systypes_array[$myrow2['type']], -2);
$rep->TextCol(1, 2, $myrow2['supp_reference'], -2);
$rep->TextCol(2, 3, sql2date($myrow2['tran_date']), -2);
$rep->TextCol(3, 4, sql2date($myrow2['due_date']), -2);
$rep->AmountCol(4, 5, $myrow2['Total'], $dec, -2);
$rep->AmountCol(5, 6, $myrow2['Total'] - $myrow2['alloc'], $dec, -2);
$rep->AmountCol(6, 7, $myrow2['amt'], $dec, -2);
$total_allocated += $myrow2['amt'];
$rep->NewLine(1);
if ($rep->row < $rep->bottomMargin + 15 * $rep->lineHeight) {
$rep->NewPage();
}
}
$memo = get_comments_string($j, $i);
if ($memo != "") {
$rep->NewLine();
$rep->TextColLines(1, 5, $memo, -2);
}
$rep->row = $rep->bottomMargin + 16 * $rep->lineHeight;
$rep->TextCol(3, 6, _("Total Allocated"), -2);
$rep->AmountCol(6, 7, $total_allocated, $dec, -2);
$rep->NewLine();
$rep->TextCol(3, 6, _("Left to Allocate"), -2);
$myrow['Total'] *= -1;
$myrow['ov_discount'] *= -1;
$rep->AmountCol(6, 7, $myrow['Total'] + $myrow['ov_discount'] - $total_allocated, $dec, -2);
if (floatcmp($myrow['ov_discount'], 0)) {
$rep->NewLine();
$rep->TextCol(3, 6, _("Discount"), -2);
$rep->AmountCol(6, 7, -$myrow['ov_discount'], $dec, -2);
}
$rep->NewLine();
$rep->Font('bold');
$rep->TextCol(3, 6, _("TOTAL REMITTANCE"), -2);
$rep->AmountCol(6, 7, $myrow['Total'], $dec, -2);
$words = price_in_words($myrow['Total'], ST_SUPPAYMENT);
if ($words != "") {
$rep->NewLine(2);
$rep->TextCol(1, 7, $myrow['curr_code'] . ": " . $words, -2);
}
$rep->Font();
if ($email == 1) {
$myrow['DebtorName'] = $myrow['supp_name'];
$rep->End($email);
}
}
}
if ($email == 0) {
$rep->End();
}
}
function print_voucher()
{
global $path_to_root, $systypes_array;
$dim = get_company_pref('use_dimension');
$dimension = $dimension2 = 0;
$voucher_no = $_POST['PARAM_0'];
$to = $_POST['PARAM_1'];
$destination = $_POST['PARAM_2'];
if ($destination) {
include_once $path_to_root . "/reporting/includes/excel_report.inc";
} else {
include_once $path_to_root . "/reporting/includes/pdf_report2.inc";
}
$orientation = $orientation ? 'L' : 'P';
$rep = new FrontReport(_('COMMISSION VOUCHER'), "CommissionVoucherReport", user_pagesize(), 9, $orientation);
$dec = user_price_dec();
$cols = array(-15, 20, 40, 60, 90, 150, 200, 225, 220, 465, 525);
//------------0--1---2---3----4----5----6----7----8----9----10-------
//-----------------------dim1-dim2-----------------------------------
//-----------------------dim1----------------------------------------
//-------------------------------------------------------------------
$aligns = array('left', 'left', 'left', 'left', 'left', 'right', 'right', 'right', 'right', 'right', 'right');
$headers = array('', _('Commission Voucher'), '', '', '', '', '');
if ($orientation == 'L') {
recalculate_cols($cols);
}
$rep->SetHeaderType(0);
$rep->Font();
$rep->Info(null, $cols, null, $aligns);
$rep->NewPage();
$res = get_transaction($voucher_no);
$myrow = db_fetch($res);
$salesman = get_salesman_name($myrow['imc']);
$client = get_customer_name($myrow['client']);
$rep->Font('bold');
// $rep->TextCol(4,8, _("ST. MATTHEW'S PUBLISHING CORPORATION"));
$rep->Font();
$rep->NewLine();
// $rep->TextCol(4,8, _("Tel. Nos. 426-5611 * 433-5385 Telefax: 426-1274"));
$rep->NewLine(5);
$rep->Font('bold');
$rep->SetFontSize(14);
//$rep->TextCol(0,3, _("COMMISSION VOUCHER"));
$rep->Font();
$rep->SetFontSize(10);
$rep->NewLine(4);
$netgross = $myrow['gross'] * ($myrow['commission'] / 100);
//$rep->TextCol(8,9, _("Date:"));
$rep->TextCol(5, 6, $myrow['Dated']);
$year = substr($myrow['dateYear'], 2);
$rep->TextCol(6, 7, $year);
$rep->NewLine(1);
$rep->TextCol(1, 4, $salesman);
$rep->NewLine(3);
//$rep->Line($rep->row - -10);
//$rep->TextCol(2,5, _("EXPLANATION"));
//$rep->TextCol(8,9, _("AMOUNT"));
// $rep->Line($rep->row - 4);
$rep->NewLine(2);
$rep->SetFontSize('8');
$oldrow = $rep->row;
$rep->TextColLines(2, 5, $client);
$newrow = $rep->row;
$rep->row = $oldrow;
$rep->NewLine(3);
$rep->SetFontSize('10');
//$rep->TextCol(8,9, _("Gross: "));
$rep->AmountCol(5, 7, $netgross, 2);
$rep->NewLine(1);
$rep->TextCol(2, 4, $myrow['commission']);
$rep->AmountCol(5, 7, $myrow['with_tax'], 2);
$rep->NewLine(2);
$rep->TextCol(2, 4, $myrow['invoice_no']);
$rep->NewLine(4);
$rep->Font('bold');
$rep->AmountCol(5, 7, $myrow['net_commission'], 2);
$rep->NewLine();
// $rep->Line($rep->row - 4);
// $rep->Line($rep->row - 8);
$rep->NewLine(3);
$rep->Font();
$rep->SetFontSize('9');
//$rep->TextCol(1,4, _("Approved by:"));
// $rep->TextCol(5,8, _("Received payment by:"));
$rep->NewLine(2);
$rep->TextCol(2, 4, _("Checked by:"));
$rep->End();
}
function print_invoices()
{
global $path_to_root, $alternative_tax_include_on_docs, $suppress_tax_rates, $no_zero_lines_amount;
include_once $path_to_root . "/reporting/includes/pdf_report.inc";
$from = $_POST['PARAM_0'];
$to = $_POST['PARAM_1'];
$currency = $_POST['PARAM_2'];
$email = $_POST['PARAM_3'];
$pay_service = $_POST['PARAM_4'];
$comments = $_POST['PARAM_5'];
$customer = $_POST['PARAM_6'];
$orientation = $_POST['PARAM_7'];
if (!$from || !$to) {
return;
}
$orientation = $orientation ? 'L' : 'P';
$dec = user_price_dec();
$fno = explode("-", $from);
$tno = explode("-", $to);
$from = min($fno[0], $tno[0]);
$to = max($fno[0], $tno[0]);
$cols = array(-15, 10, 30, 50, 80, 240, 300, 340, 360, 400);
// $headers in doctext.inc
$aligns = array('right', 'left', 'left', 'left', 'left', 'left', 'right', 'right', 'right', 'right');
$params = array('comments' => $comments);
$cur = get_company_Pref('curr_default');
if ($email == 0) {
$rep = new FrontReport(_('INVOICE'), "InvoiceBulk", user_pagesize(), 9, $orientation);
}
if ($orientation == 'L') {
recalculate_cols($cols);
}
for ($i = $from; $i <= $to; $i++) {
if (!exists_customer_trans(ST_SALESINVOICE, $i)) {
continue;
}
$sign = 1;
$myrow = get_customer_trans($i, ST_SALESINVOICE);
if ($customer && $myrow['debtor_no'] != $customer) {
continue;
}
$baccount = get_default_bank_account($myrow['curr_code']);
$params['bankaccount'] = $baccount['id'];
$branch = get_branch($myrow["branch_code"]);
$salesm = get_salesman_name($branch['salesman']);
$sales_order = get_sales_order_header($myrow["order_"], ST_SALESORDER);
if ($email == 1) {
$rep = new FrontReport("", "", user_pagesize(), 9, $orientation);
$rep->title = _('INVOICE');
$rep->filename = "Invoice" . $myrow['reference'] . ".pdf";
}
$rep->SetHeaderType(0);
$rep->currency = $cur;
$rep->Font();
$rep->Info(null, $cols, null, $aligns);
$contacts = get_branch_contacts($branch['branch_code'], 'invoice', $branch['debtor_no'], true);
$baccount['payment_service'] = $pay_service;
$rep->SetCommonData($myrow, $branch, $sales_order, $baccount, ST_SALESINVOICE, $contacts);
$rep->NewPage();
$result = get_customer_trans_details(ST_SALESINVOICE, $i);
$SubTotal = 0;
$invoice_no = get_custom_no($myrow['trans_no'], ST_SALESINVOICE);
$rep->NewLine(5);
$rep->TextCol(2, 5, $branch['br_name']);
$rep->TextCol(7, 9, $myrow['TranDate']);
$rep->NewLine();
$rep->TextCol(2, 10, $branch['br_address']);
$rep->TextCol(7, 9, "SI - " . $invoice_no);
$rep->NewLine();
$rep->TextCol(0, 2, "Contact: ");
$rep->TextCol(2, 5, $contacts["name"] . $contacts["name2"]);
$rep->TextCol(6, 9, "IMC: " . $salesm);
$rep->NewLine();
$rep->TextCol(2, 5, "");
$rep->NewLine();
$rep->TextCol(2, 5, "");
$rep->NewLine(3);
//$rep->NewLine(2);
$ent = 0;
while ($myrow2 = db_fetch($result)) {
if ($myrow2["quantity"] == 0) {
continue;
}
$Net = round2($sign * ((1 - $myrow2["discount_percent"]) * $myrow2["unit_price"] * $myrow2["quantity"]), user_price_dec());
$SubTotal += $Net;
$DisplayPrice = number_format2($myrow2["unit_price"], 2);
$DisplayQty = number_format2($sign * $myrow2["quantity"], get_qty_dec($myrow2['stock_id']));
$DisplayNet = number_format2($Net, 2);
if ($myrow2["discount_percent"] == 0) {
$DisplayDiscount = "";
} else {
$DisplayDiscount = number_format2($myrow2["discount_percent"] * 100, 2) . "%";
}
//$rep->TextCol(3, 4, $myrow2['stock_id'], -2);
$oldrow = $rep->row;
$rep->TextColLines(4, 6, $myrow2['StockDescription'], -2);
$newrow = $rep->row;
$rep->row = $oldrow;
$ent++;
if ($Net != 0.0 || !is_service($myrow2['mb_flag']) || !isset($no_zero_lines_amount) || $no_zero_lines_amount == 0) {
$rep->TextCol(2, 3, $DisplayQty, -2);
$rep->TextCol(3, 4, $myrow2['units'], -2);
$rep->TextCol(6, 7, $DisplayPrice, -2);
$rep->TextCol(7, 9, $DisplayNet, -2);
}
$rep->row = $newrow;
//$rep->NewLine(1);
if ($rep->row < $rep->bottomMargin + 15 * $rep->lineHeight) {
$rep->NewPage();
}
}
$memo = get_comments_string(ST_SALESINVOICE, $i);
if ($memo != "") {
$rep->NewLine();
$rep->TextColLines(1, 5, $memo, -2);
}
$DisplaySubTot = $SubTotal;
$rep->NewLine(8 - $ent);
$doctype = ST_SALESINVOICE;
$tot = $sign * ($myrow["ov_freight"] + $myrow["ov_gst"] + $myrow["ov_amount"] + $myrow["ov_freight_tax"]);
if ($tot != $SubTotal) {
$discount = $SubTotal * ($myrow['bulk_discount'] / 100);
}
$rep->AmountCol(7, 9, $DisplaySubTot, 2);
$rep->NewLine();
if ($myrow['bulk_discount'] != 0) {
$rep->TextCol(5, 7, "Less Discount: " . $myrow['bulk_discount'] . "%");
}
$rep->AmountCol(7, 9, $discount, 2);
$rep->NewLine();
$DisplayTotal = $sign * ($myrow["ov_freight"] + $myrow["ov_gst"] + $myrow["ov_amount"] + $myrow["ov_freight_tax"]);
$rep->Font('bold');
$rep->AmountCol(7, 9, $DisplayTotal, 2);
}
if ($email == 0) {
$rep->End();
}
}
function print_invoices()
{
global $path_to_root, $alternative_tax_include_on_docs, $suppress_tax_rates, $no_zero_lines_amount;
include_once $path_to_root . "/reporting/includes/pdf_report.inc";
$from = $_POST['PARAM_0'];
$to = $_POST['PARAM_1'];
$currency = $_POST['PARAM_2'];
$email = $_POST['PARAM_3'];
$pay_service = $_POST['PARAM_4'];
$comments = $_POST['PARAM_5'];
$orientation = $_POST['PARAM_6'];
$TotalDiscount = 0;
if (!$from || !$to) {
return;
}
$orientation = $orientation ? 'L' : 'P';
$dec = user_price_dec();
$fno = explode("-", $from);
$tno = explode("-", $to);
$from = min($fno[0], $tno[0]);
$to = max($fno[0], $tno[0]);
$cols = array(4, 60, 225, 300, 325, 385, 450, 515);
// $headers in doctext.inc
$aligns = array('left', 'left', 'right', 'left', 'right', 'right', 'right');
$params = array('comments' => $comments);
$cur = get_company_Pref('curr_default');
if ($email == 0) {
$rep = new FrontReport(_('INVOICE'), "InvoiceBulk", user_pagesize(), 9, $orientation);
}
if ($orientation == 'L') {
recalculate_cols($cols);
}
for ($i = $from; $i <= $to; $i++) {
if (!exists_customer_trans(ST_SALESINVOICE, $i)) {
continue;
}
$sign = 1;
$myrow = get_customer_trans($i, ST_SALESINVOICE);
$transId = get_payment_id($i);
$urrow = get_customer_trans($transId['trans_no_from'], ST_CUSTPAYMENT);
$baccount = get_default_bank_account($myrow['curr_code']);
$params['bankaccount'] = $baccount['id'];
$branch = get_branch($myrow["branch_code"]);
$sales_order = get_sales_order_header($myrow["order_"], ST_SALESORDER);
if ($email == 1) {
$rep = new FrontReport("", "", user_pagesize(), 9, $orientation);
$rep->title = _('INVOICE');
$rep->filename = "Invoice" . $myrow['reference'] . ".pdf";
}
$rep->SetHeaderType('Header2');
$rep->currency = $cur;
$rep->Font();
$rep->Info($params, $cols, null, $aligns);
$contacts = get_branch_contacts($branch['branch_code'], 'invoice', $branch['debtor_no'], true);
$baccount['payment_service'] = $pay_service;
$rep->SetCommonData($myrow, $branch, $sales_order, $baccount, ST_SALESINVOICE, $contacts);
$rep->NewPage();
$result = get_customer_trans_details(ST_SALESINVOICE, $i);
// print_r($result);
$SubTotal = 0;
while ($myrow2 = db_fetch($result)) {
if ($myrow2["quantity"] == 0) {
continue;
}
$Net = round2($sign * ((1 - $myrow2["discount_percent"]) * $myrow2["unit_price"] * $myrow2["quantity"]), user_price_dec());
$SubTotal += $Net;
$DisplayPrice = number_format2($myrow2["unit_price"], $dec);
$DisplayQty = number_format2($sign * $myrow2["quantity"], get_qty_dec($myrow2['stock_id']));
$DisplayNet = number_format2($Net, $dec);
if ($myrow2["discount_percent"] == 0) {
$DisplayDiscount = 0;
} else {
$DisplayDiscount = number_format2($myrow2["discount_percent"] * 100, user_percent_dec()) . "%";
}
$rep->fontSize += 5;
$rep->TextCol(0, 1, $myrow2['stock_id'], -2);
$oldrow = $rep->row;
$rep->TextColLines(1, 5, $myrow2['StockDescription'], -2);
$newrow = $rep->row;
$rep->row = $oldrow;
if ($Net != 0.0 || !is_service($myrow2['mb_flag']) || !isset($no_zero_lines_amount) || $no_zero_lines_amount == 0) {
//$rep->TextCol(2, 3, $DisplayQty, -2);
//$rep->TextCol(3, 4, $myrow2['units'], -2);
$rep->TextCol(5, 6, $DisplayPrice, -2);
//$rep->TextCol(5, 6, $DisplayDiscount, -2);
$rep->TextCol(6, 7, $DisplayNet, -2);
$TotalDiscount += $DisplayPrice * ($DisplayDiscount / 100);
}
$rep->row = $newrow;
//$rep->NewLine(1);
if ($rep->row < $rep->bottomMargin + 15 * $rep->lineHeight) {
$rep->NewPage();
}
$rep->fontSize -= 5;
}
$memo = get_comments_string(ST_SALESINVOICE, $i);
if ($memo != "") {
$rep->NewLine();
$rep->TextColLines(1, 5, $memo, -2);
}
$DisplaySubTot = number_format2($SubTotal, $dec);
$DisplayFreight = number_format2($sign * $myrow["ov_freight"], $dec);
//$customer_record = get_customer_details($myrow['reference']);
$rep->row = $rep->bottomMargin + 15 * $rep->lineHeight;
$doctype = ST_SALESINVOICE;
$rep->fontSize += 4;
$rep->TextCol(3, 6, _("Total: "), -2);
$rep->TextCol(6, 7, $DisplaySubTot + $TotalDiscount, -2);
//$rep->TextCol(6, 7, $DisplaySubTot, -2);
$rep->NewLine();
if ($TotalDiscount > 0 || $urrow['ov_discount'] > 0) {
$rep->TextCol(3, 6, _("Discount(s)") . ": ", -2);
$rep->TextCol(6, 7, '(' . ($TotalDiscount + $urrow['ov_discount']) . ')', -2);
$rep->NewLine();
}
// if($urrow['ov_discount']>0)
// {
// $rep->TextCol(3, 6, _("Cash Discount") . ": ", -2);
// $rep->TextCol(6, 7, '('.$urrow['ov_discount'].')', -2);
// $rep->NewLine();
// }
$rep->TextCol(3, 6, _("Sub-total"), -2);
$rep->TextCol(6, 7, $DisplaySubTot - $urrow['ov_discount'], -2);
$rep->NewLine();
$rep->TextCol(3, 6, _("Paid"), -2);
$rep->TextCol(6, 7, $transId['amt'], -2);
$rep->NewLine();
$rep->TextCol(3, 6, _("Due"), -2);
$rep->TextCol(6, 7, $DisplaySubTot - $urrow['ov_discount'] - $transId['amt'], -2);
$rep->NewLine();
$tax_items = get_trans_tax_details(ST_SALESINVOICE, $i);
$first = true;
while ($tax_item = db_fetch($tax_items)) {
if ($tax_item['amount'] == 0) {
continue;
}
$DisplayTax = number_format2($sign * $tax_item['amount'], $dec);
if (isset($suppress_tax_rates) && $suppress_tax_rates == 1) {
$tax_type_name = $tax_item['tax_type_name'];
} else {
$tax_type_name = $tax_item['tax_type_name'] . " (" . $tax_item['rate'] . "%) ";
}
// if($TotalDiscount>0){
// $rep->TextCol(3, 7, _("Total Discount") . ": " . $TotalDiscount.'+'.$urrow['ov_discount'], -2);
// $rep->NewLine();
// }
if ($tax_item['included_in_price']) {
if (isset($alternative_tax_include_on_docs) && $alternative_tax_include_on_docs == 1) {
if ($first) {
$rep->TextCol(3, 6, _("Total Tax Excluded"), -2);
$rep->TextCol(6, 7, number_format2($sign * $tax_item['net_amount'], $dec), -2);
$rep->NewLine();
}
$rep->TextCol(3, 6, $tax_type_name, -2);
$rep->TextCol(6, 7, $DisplayTax, -2);
$first = false;
}
//else
// $rep->TextCol(3, 7, _("Included") . " " . $tax_type_name . _("Amount") . ": " . $DisplayTax, -2);
} else {
$rep->TextCol(3, 6, $tax_type_name, -2);
$rep->TextCol(6, 7, $DisplayTax, -2);
}
$rep->NewLine();
}
$rep->NewLine();
$DisplayTotal = number_format2($sign * ($myrow["ov_freight"] + $myrow["ov_gst"] + $myrow["ov_amount"] + $myrow["ov_freight_tax"]), $dec);
$rep->Font('bold');
$rep->TextCol(3, 6, _("TOTAL INVOICE"), -2);
$rep->TextCol(6, 7, $DisplayTotal - $urrow['ov_discount'], -2);
//$words = price_in_words($myrow['Total'], ST_SALESINVOICE);
$words = price_in_words($transId['amt'], 0);
// $words =$myrow['Total'];
if ($words != "") {
$rep->NewLine(1);
$rep->TextCol(1, 7, $myrow['curr_code'] . ": " . $words, -2);
}
$rep->fontSize -= 4;
$rep->Font();
if ($email == 1) {
$rep->End($email);
}
}
if ($email == 0) {
$rep->End();
}
}
function printit($from, $to, $currency, $bank, $email, $quote, $comments, $file)
{
global $path_to_root;
global $print_as_quote;
include_once $path_to_root . "reporting/includes/pdf_report.inc";
$dec = user_price_dec();
$cols = array(5, 70, 260, 340, 365, 420, 470, 520);
// $headers in doctext.inc
$aligns = array('left', 'left', 'right', 'left', 'right', 'right', 'right');
$params = array('comments' => $comments, 'bankaccount' => $bankaccount);
$baccount = get_bank_account($params['bankaccount']);
$cur = get_company_Pref('curr_default');
if ($quote == 1) {
$print_as_quote = 1;
}
if ($email == 0) {
if ($quote == 1) {
$rep = new FrontReport(tr("QUOTE"), "QuoteBulk.pdf", user_pagesize());
} else {
$rep = new FrontReport(tr("SALES ORDER"), "SalesOrderBulk.pdf", user_pagesize());
}
$rep->currency = $cur;
$rep->fontSize = 10;
$rep->Font();
$rep->Info($params, $cols, null, $aligns);
}
for ($i = $from; $i <= $to; $i++) {
$myrow = get_sales_order_header($i);
$branch = get_branch($myrow["branch_code"]);
$lang = $branch["lang_code"];
// get language from customer
readstrings($lang);
$tax_group_id = $branch['tax_group_id'];
$tax_rate = 0;
$tax_name = '';
$msg = "Error retrieving tax values";
$sql = "select rate from tax_group_items ";
$sql = $sql . "where tax_group_id=" . $tax_group_id . " limit 1";
$result1 = db_query($sql, $msg);
if (db_num_rows($result1) != 0) {
$myrow1 = db_fetch_row($result1);
$tax_rate = $myrow1[0];
}
$sql = "select name from tax_groups ";
$sql = $sql . "where id=" . $tax_group_id . " limit 1";
$result1 = db_query($sql, $msg);
if (db_num_rows($result1) != 0) {
$myrow1 = db_fetch_row($result1);
$tax_name = $myrow1[0];
}
$tax_included = 0;
if ($email == 1) {
$rep = new FrontReport("", "", user_pagesize());
$rep->currency = $cur;
$rep->Font();
if ($quote == 1) {
$rep->title = tr("QUOTE");
$rep->filename = "Quote" . $i . ".pdf";
} else {
$rep->title = tr("SALES ORDER");
$rep->filename = "SalesOrder" . $i . ".pdf";
}
$rep->Info($params, $cols, null, $aligns);
} else {
$rep->title = $quote == 1 ? tr("QUOTE") : tr("SALES ORDER");
}
$rep->Header2($myrow, $branch, $myrow, $baccount, 9);
$result = get_sales_order_details($i);
$SubTotal = 0;
while ($myrow2 = db_fetch($result)) {
$Net = round((1 - $myrow2["discount_percent"]) * $myrow2["unit_price"] * $myrow2["quantity"], user_price_dec());
$SubTotal += $Net;
$DisplayPrice = number_format2($myrow2["unit_price"], $dec, 1);
$DisplayQty = number_format2($myrow2["quantity"], user_qty_dec(), 1);
$DisplayNet = number_format2($Net, $dec, 1);
$DisplayDate = sql2date($myrow2["date_from"], 1);
if ($myrow2["discount_percent"] == 0) {
$DisplayDiscount = "";
} else {
$DisplayDiscount = number_format2($myrow2["discount_percent"] * 100, user_percent_dec(), 1) . "%";
}
$rep->TextCol(0, 1, $myrow2['stk_code'], -2);
$rep->TextCol(1, 2, $DisplayDate . " " . $myrow2['description'], -2);
$rep->TextCol(2, 3, $DisplayQty, -2);
$rep->TextCol(3, 4, $myrow2['units'], -2);
$rep->TextCol(4, 5, $DisplayPrice, -2);
$rep->TextCol(5, 6, $DisplayDiscount, -2);
$rep->TextCol(6, 7, $DisplayNet, -2);
$rep->NewLine(1);
if ($rep->row < $rep->bottomMargin + 15 * $rep->lineHeight) {
$rep->Header2($myrow, $branch, $sales_order, $baccount);
}
if ($myrow2['notes'] != "") {
$rep->TextColLines(1, 2, $myrow2['notes'], -2);
}
}
if ($myrow['comments'] != "") {
$rep->NewLine();
$rep->TextColLines(1, 5, $myrow['comments'], -2);
}
$DisplaySubTot = number_format2($SubTotal, $dec, 1);
$DisplayFreight = number_format2($myrow["freight_cost"], $dec, 1);
$rep->row = $rep->bottomMargin + 15 * $rep->lineHeight;
$linetype = true;
$doctype = 9;
if ($rep->currency != $myrow['curr_code']) {
include $path_to_root . "reporting/includes/doctext.inc";
} else {
include $path_to_root . "reporting/includes/doctext.inc";
}
$amount = $myrow["freight_cost"] + $SubTotal;
$subtotal3 = number_format2($amount, $dec, 1);
$rep->TextCol(3, 6, $doc_Sub_total, -4);
$rep->TextCol(6, 7, $DisplaySubTot, -4);
$rep->NewLine();
$rep->TextCol(3, 6, $doc_Shipping, -3);
$rep->TextCol(6, 7, $DisplayFreight, -3);
$rep->NewLine();
$rep->TextCol(3, 6, $doc_Sub_total, -2);
$rep->TextCol(6, 7, $subtotal3, -2);
$rep->NewLine();
$amount_tax = $amount / 100 * $tax_rate;
if ($rep->currency == 'CHF') {
$val = $amount_tax;
$val1 = floatval(intval(round($val * 20, 0)) / 20);
$amount_tax = $val1;
}
$amount_tot = $amount + $amount_tax;
$DisplayTax = number_format2($amount_tax, $dec, 1);
$DisplayTotal = number_format2($amount_tot, $dec, 1);
if ($tax_included) {
$rep->TextCol(3, 7, $doc_Included . " " . $tax_nmae . " (" . $tax_rate . "%) " . $doc_Amount . ":" . $DisplayTax, -2);
} else {
$rep->TextCol(3, 6, $tax_name . " (" . $tax_rate . "%)", -2);
$rep->TextCol(6, 7, $DisplayTax, -2);
}
$rep->NewLine();
$rep->Font('bold');
$rep->TextCol(3, 6, $doc_TOTAL_ORDER_INCL, -2);
$rep->TextCol(6, 7, $DisplayTotal, -2);
$rep->Font();
if ($email == 1) {
if ($myrow['contact_email'] == '') {
$myrow['contact_email'] = $branch['email'];
$myrow['DebtorName'] = $branch['br_name'];
}
$rep->End($file);
}
}
if ($email == 0) {
$rep->End($file);
}
}
function print_credits()
{
global $path_to_root, $alternative_tax_include_on_docs, $suppress_tax_rates;
include_once $path_to_root . "/reporting/includes/pdf_report.inc";
$from = $_POST['PARAM_0'];
$to = $_POST['PARAM_1'];
$currency = $_POST['PARAM_2'];
$email = $_POST['PARAM_3'];
$paylink = $_POST['PARAM_4'];
$comments = $_POST['PARAM_5'];
$orientation = $_POST['PARAM_6'];
if (!$from || !$to) {
return;
}
$orientation = $orientation ? 'L' : 'P';
$dec = user_price_dec();
$fno = explode("-", $from);
$tno = explode("-", $to);
$from = min($fno[0], $tno[0]);
$to = max($fno[0], $tno[0]);
$cols = array(0, 10, 50, 100, 150, 200, 250, 300, 350, 380, 450, 480, 550, 600);
// $headers in doctext.inc
$aligns = array('center', 'left', 'left', 'left', 'left', 'left', 'left', 'left', 'right', 'right', 'right', 'right');
$params = array('comments' => $comments);
$cur = get_company_Pref('curr_default');
if ($email == 0) {
$rep = new FrontReport(_('CREDIT NOTE'), "InvoiceBulk", user_pagesize(), 9, $orientation);
}
if ($orientation == 'L') {
recalculate_cols($cols);
}
for ($i = $from; $i <= $to; $i++) {
if (!exists_customer_trans(ST_CUSTCREDIT, $i)) {
continue;
}
$sign = -1;
$myrow = get_customer_trans($i, ST_CUSTCREDIT);
$baccount = get_default_bank_account($myrow['curr_code']);
$params['bankaccount'] = $baccount['id'];
$branch = get_branch($myrow["branch_code"]);
$branch['disable_branch'] = $paylink;
// helper
$sales_order = null;
if ($email == 1) {
$rep = new FrontReport("", "", user_pagesize(), 9, $orientation);
$rep->title = _('CREDIT NOTE');
$rep->filename = "CreditNote" . $myrow['reference'] . ".pdf";
}
$rep->SetHeaderType(0);
$rep->currency = $cur;
$rep->Font();
$rep->Info(null, $cols, null, $aligns);
//$contacts = get_branch_contacts($branch['branch_code'], 'invoice', $branch['debtor_no'], true);
//$rep->SetCommonData($myrow, $branch, $sales_order, $baccount, ST_CUSTCREDIT, $contacts);
$rep->NewPage();
$result = get_customer_trans_details(ST_CUSTCREDIT, $i);
$SubTotal = 0;
//$data = get_custom_no($from, ST_CUSTCREDIT);
$invoice_no = get_sales_invoice_no($myrow['order_'], ST_SALESINVOICE);
$imc = get_imc_name($branch['branch_code']);
$rep->NewLine(8);
$rep->TextCol(8, 10, "Date : " . $myrow['TranDate']);
$rep->NewLine(2);
$oldrow = $rep->row;
$rep->TextColLines(3, 12, "Client : " . $branch['br_name'], -2);
$newrow = $rep->row;
$rep->row = $oldrow;
$rep->NewLine(2);
$rep->TextCol(3, 5, "Invoice # : " . $invoice_no, -2);
$rep->TextCol(8, 10, "IMC: " . $imc, -2);
$rep->NewLine(2);
$rep->TextCol(3, 4, _("QTY"));
$rep->TextCol(5, 7, _("DESCRIPTION"));
$rep->TextCol(8, 9, _("PRICE"));
$rep->TextCol(9, 10, _("AMOUNT"));
$rep->NewLine(2);
while ($myrow2 = db_fetch($result)) {
if ($myrow2["quantity"] == 0) {
continue;
}
$Net = round2($sign * ((1 - $myrow2["discount_percent"]) * $myrow2["unit_price"] * $myrow2["quantity"]), user_price_dec());
$SubTotal += $Net;
$DisplayPrice = number_format2($myrow2["unit_price"], $dec);
$DisplayQty = number_format2($sign * $myrow2["quantity"], get_qty_dec($myrow2['stock_id']));
$DisplayNet = number_format2($Net, $dec);
if ($myrow2["discount_percent"] == 0) {
$DisplayDiscount = "";
} else {
$DisplayDiscount = number_format2($myrow2["discount_percent"] * 100, user_percent_dec()) . "%";
}
//$rep->TextCol(4, 5, $myrow2['stock_id'], -2);
$oldrow = $rep->row;
$rep->TextColLines(4, 8, $myrow2['StockDescription'], -2);
$newrow = $rep->row;
$rep->row = $oldrow;
$rep->TextCol(3, 4, $DisplayQty . " " . $myrow2['units'], -2);
$rep->TextCol(8, 9, $DisplayPrice, -2);
$rep->TextCol(9, 10, $DisplayNet, -2);
$rep->row = $newrow;
//$rep->NewLine(1);
if ($rep->row < $rep->bottomMargin + 15 * $rep->lineHeight) {
$rep->NewPage();
}
}
$memo = get_comments_string(ST_CUSTCREDIT, $i);
if ($memo != "") {
$rep->NewLine();
//$rep->TextColLines(1, 5, $memo, -2);
}
$DisplaySubTot = number_format2($SubTotal, $dec);
$DisplayFreight = number_format2($sign * $myrow["ov_freight"], $dec);
//$rep->row = $rep->bottomMargin + (15 * $rep->lineHeight);
$doctype = ST_CUSTCREDIT;
$rep->TextCol(7, 9, _("Sub-total"), -2);
$rep->TextCol(9, 10, $DisplaySubTot, -2);
$rep->NewLine();
$rep->TextCol(7, 9, _("Shipping"), -2);
$rep->TextCol(9, 10, $DisplayFreight, -2);
$rep->NewLine();
/*$tax_items = get_trans_tax_details(ST_CUSTCREDIT, $i);
$first = true;
while ($tax_item = db_fetch($tax_items))
{
if ($tax_item['amount'] == 0)
continue;
$DisplayTax = number_format2($sign*$tax_item['amount'], $dec);
if (isset($suppress_tax_rates) && $suppress_tax_rates == 1)
$tax_type_name = $tax_item['tax_type_name'];
else
$tax_type_name = $tax_item['tax_type_name']." (".$tax_item['rate']."%) ";
if ($tax_item['included_in_price'])
{
if (isset($alternative_tax_include_on_docs) && $alternative_tax_include_on_docs == 1)
{
if ($first)
{
$rep->TextCol(3, 6, _("Total Tax Excluded"), -2);
$rep->TextCol(6, 7, number_format2($sign*$tax_item['net_amount'], $dec), -2);
$rep->NewLine();
}
$rep->TextCol(3, 6, $tax_type_name, -2);
$rep->TextCol(6, 7, $DisplayTax, -2);
$first = false;
}
else
$rep->TextCol(3, 7, _("Included") . " " . $tax_type_name . _("Amount") . ": " . $DisplayTax, -2);
}
else
{
$rep->TextCol(3, 6, $tax_type_name, -2);
$rep->TextCol(6, 7, $DisplayTax, -2);
}
$rep->NewLine();
}*/
$rep->NewLine();
$DisplayTotal = number_format2($sign * ($myrow["ov_freight"] + $myrow["ov_gst"] + $myrow["ov_amount"] + $myrow["ov_freight_tax"]), $dec);
$rep->Font('bold');
$rep->TextCol(7, 9, _("TOTAL CREDIT"), -2);
$rep->TextCol(9, 10, $DisplayTotal, -2);
$words = price_in_words($myrow['Total'], ST_CUSTCREDIT);
if ($words != "") {
$rep->NewLine(1);
$rep->TextCol(1, 7, $myrow['curr_code'] . ": " . $words, -2);
}
$rep->Font();
if ($email == 1) {
$myrow['dimension_id'] = $paylink;
// helper for pmt link
$rep->End($email);
}
}
if ($email == 0) {
$rep->End();
}
}
function print_invoices()
{
global $path_to_root, $alternative_tax_include_on_docs, $suppress_tax_rates, $no_zero_lines_amount;
include_once $path_to_root . "/reporting/includes/pdf_report.inc";
// $from = $_POST['PARAM_0'];
// $to = $_POST['PARAM_1'];
// $currency = $_POST['PARAM_2'];
$email = 0;
// $pay_service = $_POST['PARAM_4'];
// $comments = $_POST['PARAM_5'];
// $customer = $_POST['PARAM_6'];
$orientation = 'L';
//
// if (!$from || !$to) return;
//
// $orientation = ($orientation ? 'L' : 'P');
// $dec = user_price_dec();
//
// $fno = explode("-", $from);
// $tno = explode("-", $to);
// $from = min($fno[0], $tno[0]);
// $to = max($fno[0], $tno[0]);
$cols = array(4, 60, 225, 300, 325, 385, 450, 515);
// $headers in doctext.inc
$aligns = array('left', 'left', 'right', 'left', 'right', 'right', 'right');
$params = array('comments' => $comments);
$cur = get_company_Pref('curr_default');
if ($email == 0) {
$rep = new FrontReport(_('INVOICE'), "InvoiceBulk", user_pagesize(), 9, $orientation);
}
if ($orientation == 'L') {
recalculate_cols($cols);
}
for ($i = $from; $i <= $to; $i++) {
// if (!exists_customer_trans(ST_SALESINVOICE, $i))
// continue;
// $sign = 1;
// $myrow = get_customer_trans($i, ST_SALESINVOICE);
// if($customer && $myrow['debtor_no'] != $customer) {
// continue;
// }
//$baccount = get_default_bank_account($myrow['curr_code']);
//$params['bankaccount'] = $baccount['id'];
//$branch = get_branch($myrow["branch_code"]);
//$sales_order = get_sales_order_header($myrow["order_"], ST_SALESORDER);
if ($email == 1) {
$rep = new FrontReport("", "", user_pagesize(), 9, $orientation);
$rep->title = _('INVOICE');
$rep->filename = "Invoice" . $myrow['reference'] . ".pdf";
}
$rep->SetHeaderType('Header2');
//$rep->currency = $cur;
$rep->Font();
$rep->Info($params, $cols, null, $aligns);
//$contacts = get_branch_contacts($branch['branch_code'], 'invoice', $branch['debtor_no'], true);
//$baccount['payment_service'] = $pay_service;
//$rep->SetCommonData($myrow, $branch, $sales_order, $baccount, ST_SALESINVOICE, $contacts);
$rep->NewPage();
//$result = get_customer_trans_details(ST_SALESINVOICE, $i);
$result = get_referral_details();
$SubTotal = 0;
while ($myrow2 = db_fetch($result)) {
if ($myrow2["quantity"] == 0) {
continue;
}
$rep->TextCol(0, 1, $myrow2['Date'], -2);
$oldrow = $rep->row;
$rep->TextColLines(1, 2, $myrow2['Invoice'], -2);
$newrow = $rep->row;
$rep->row = $oldrow;
$rep->TextCol(2, 3, $myrow2['Name'], -2);
$rep->TextCol(3, 4, $myrow2['Bill'], -2);
$rep->TextCol(4, 5, $myrow2['10%'], -2);
$rep->TextCol(5, 6, $myrow2['10% Dis'], -2);
$rep->TextCol(6, 7, $myrow2['15%'], -2);
$rep->row = $newrow;
//$rep->NewLine(1);
if ($rep->row < $rep->bottomMargin + 15 * $rep->lineHeight) {
$rep->NewPage();
}
}
$rep->row = $rep->bottomMargin + 15 * $rep->lineHeight;
$doctype = ST_SALESINVOICE;
$rep->TextCol(3, 6, _("Sub-total"), -2);
$rep->TextCol(6, 7, $DisplaySubTot, -2);
$rep->NewLine();
$rep->TextCol(3, 6, _("Shipping"), -2);
$rep->TextCol(6, 7, $DisplayFreight, -2);
$rep->NewLine();
$tax_items = get_trans_tax_details(ST_SALESINVOICE, $i);
$first = true;
while ($tax_item = db_fetch($tax_items)) {
if ($tax_item['amount'] == 0) {
continue;
}
$DisplayTax = number_format2($sign * $tax_item['amount'], $dec);
if (isset($suppress_tax_rates) && $suppress_tax_rates == 1) {
$tax_type_name = $tax_item['tax_type_name'];
} else {
$tax_type_name = $tax_item['tax_type_name'] . " (" . $tax_item['rate'] . "%) ";
}
if ($tax_item['included_in_price']) {
if (isset($alternative_tax_include_on_docs) && $alternative_tax_include_on_docs == 1) {
if ($first) {
$rep->TextCol(3, 6, _("Total Tax Excluded"), -2);
$rep->TextCol(6, 7, number_format2($sign * $tax_item['net_amount'], $dec), -2);
$rep->NewLine();
}
$rep->TextCol(3, 6, $tax_type_name, -2);
$rep->TextCol(6, 7, $DisplayTax, -2);
$first = false;
} else {
$rep->TextCol(3, 7, _("Included") . " " . $tax_type_name . _("Amount") . ": " . $DisplayTax, -2);
}
} else {
$rep->TextCol(3, 6, $tax_type_name, -2);
$rep->TextCol(6, 7, $DisplayTax, -2);
}
$rep->NewLine();
}
$rep->NewLine();
$DisplayTotal = number_format2($sign * ($myrow["ov_freight"] + $myrow["ov_gst"] + $myrow["ov_amount"] + $myrow["ov_freight_tax"]), $dec);
$rep->Font('bold');
$rep->TextCol(3, 6, _("TOTAL INVOICE"), -2);
$rep->TextCol(6, 7, $DisplayTotal, -2);
$words = price_in_words($myrow['Total'], ST_SALESINVOICE);
if ($words != "") {
$rep->NewLine(1);
$rep->TextCol(1, 7, $myrow['curr_code'] . ": " . $words, -2);
}
$rep->Font();
if ($email == 1) {
$rep->End($email);
}
}
if ($email == 0) {
$rep->End();
}
}
function print_receipts()
{
global $path_to_root, $systypes_array;
include_once $path_to_root . "/reporting/includes/pdf_report.inc";
$from = $_POST['PARAM_0'];
$to = $_POST['PARAM_1'];
$currency = $_POST['PARAM_2'];
$comments = $_POST['PARAM_3'];
$orientation = $_POST['PARAM_4'];
if (!$from || !$to) {
return;
}
$orientation = $orientation ? 'L' : 'P';
$dec = user_price_dec();
$fno = explode("-", $from);
$tno = explode("-", $to);
$from = min($fno[0], $tno[0]);
$to = max($fno[0], $tno[0]);
$cols = array(4, 85, 150, 225, 275, 360, 450, 515);
// $headers in doctext.inc
$aligns = array('left', 'left', 'left', 'left', 'right', 'right', 'right');
$params = array('comments' => $comments);
$cur = get_company_Pref('curr_default');
$rep = new FrontReport(_('RECEIPT'), "ReceiptBulk", user_pagesize(), 9, $orientation);
if ($orientation == 'L') {
recalculate_cols($cols);
}
$rep->SetHeaderType('Header2');
$rep->currency = $cur;
$rep->Font();
$rep->Info($params, $cols, null, $aligns);
for ($i = $from; $i <= $to; $i++) {
if ($fno[0] == $tno[0]) {
$types = array($fno[1]);
} else {
$types = array(ST_BANKDEPOSIT, ST_CUSTPAYMENT);
}
foreach ($types as $j) {
$myrow = get_receipt($j, $i);
if (!$myrow) {
continue;
}
$res = get_bank_trans($j, $i);
$baccount = db_fetch($res);
$params['bankaccount'] = $baccount['bank_act'];
$contacts = get_branch_contacts($myrow['branch_code'], 'invoice', $myrow['debtor_no']);
$rep->SetCommonData($myrow, null, $myrow, $baccount, ST_CUSTPAYMENT, $contacts);
$rep->NewPage();
$result = get_allocations_for_receipt($myrow['debtor_no'], $myrow['type'], $myrow['trans_no']);
$doctype = ST_CUSTPAYMENT;
$total_allocated = 0;
$rep->TextCol(0, 4, _("As advance / full / part / payment towards:"), -2);
$rep->NewLine(2);
while ($myrow2 = db_fetch($result)) {
$rep->TextCol(0, 1, $systypes_array[$myrow2['type']], -2);
$rep->TextCol(1, 2, $myrow2['reference'], -2);
$rep->TextCol(2, 3, sql2date($myrow2['tran_date']), -2);
$rep->TextCol(3, 4, sql2date($myrow2['due_date']), -2);
$rep->AmountCol(4, 5, $myrow2['Total'], $dec, -2);
$rep->AmountCol(5, 6, $myrow2['Total'] - $myrow2['alloc'], $dec, -2);
$rep->AmountCol(6, 7, $myrow2['amt'], $dec, -2);
$total_allocated += $myrow2['amt'];
$rep->NewLine(1);
if ($rep->row < $rep->bottomMargin + 15 * $rep->lineHeight) {
$rep->NewPage();
}
}
$memo = get_comments_string($j, $i);
if ($memo != "") {
$rep->NewLine();
$rep->TextColLines(1, 5, $memo, -2);
}
$rep->row = $rep->bottomMargin + 15 * $rep->lineHeight;
$rep->TextCol(3, 6, _("Total Allocated"), -2);
$rep->AmountCol(6, 7, $total_allocated, $dec, -2);
$rep->NewLine();
$rep->TextCol(3, 6, _("Left to Allocate"), -2);
$rep->AmountCol(6, 7, $myrow['Total'] - $total_allocated, $dec, -2);
$rep->NewLine();
$rep->Font('bold');
$rep->TextCol(3, 6, _("TOTAL RECEIPT"), -2);
$rep->AmountCol(6, 7, $myrow['Total'], $dec, -2);
$words = price_in_words($myrow['Total'], ST_CUSTPAYMENT);
if ($words != "") {
$rep->NewLine(1);
$rep->TextCol(0, 7, $myrow['curr_code'] . ": " . $words, -2);
}
$rep->Font();
$rep->NewLine();
$rep->TextCol(6, 7, _("Received / Sign"), -2);
$rep->NewLine();
$rep->TextCol(0, 2, _("By Cash / Cheque* / Draft No."), -2);
$rep->TextCol(2, 4, "______________________________", -2);
$rep->TextCol(4, 5, _("Dated"), -2);
$rep->TextCol(5, 6, "__________________", -2);
$rep->NewLine(1);
$rep->TextCol(0, 2, _("Drawn on Bank"), -2);
$rep->TextCol(2, 4, "______________________________", -2);
$rep->TextCol(4, 5, _("Branch"), -2);
$rep->TextCol(5, 6, "__________________", -2);
$rep->TextCol(6, 7, "__________________");
}
}
$rep->End();
}
function print_supplier_details_listing()
{
global $path_to_root;
$from = $_POST['PARAM_0'];
$more = $_POST['PARAM_1'];
$less = $_POST['PARAM_2'];
$comments = $_POST['PARAM_3'];
$orientation = $_POST['PARAM_4'];
$destination = $_POST['PARAM_5'];
if ($destination) {
include_once $path_to_root . "/reporting/includes/excel_report.inc";
} else {
include_once $path_to_root . "/reporting/includes/pdf_report.inc";
}
$orientation = $orientation ? 'L' : 'P';
$dec = 0;
if ($more != '') {
$morestr = _('Greater than ') . number_format2($more, $dec);
} else {
$morestr = '';
}
if ($less != '') {
$lessstr = _('Less than ') . number_format2($less, $dec);
} else {
$lessstr = '';
}
$more = (double) $more;
$less = (double) $less;
$cols = array(0, 150, 300, 425, 550);
$headers = array(_('Mailing Address:'), _('Turnover'), _('Contact Information'), _('Physical Address'));
$aligns = array('left', 'left', 'left', 'left');
$params = array(0 => $comments, 1 => array('text' => _('Activity Since'), 'from' => $from, 'to' => ''), 2 => array('text' => _('Activity'), 'from' => $morestr, 'to' => $lessstr . " " . get_company_pref("curr_default")));
$rep = new FrontReport(_('Supplier Details Listing'), "SupplierDetailsListing", user_pagesize(), 9, $orientation);
if ($orientation == 'L') {
recalculate_cols($cols);
}
$rep->Font();
$rep->Info($params, $cols, $headers, $aligns);
$rep->NewPage();
$result = get_supplier_details_for_report();
while ($myrow = db_fetch($result)) {
$printsupplier = true;
if ($more != '' || $less != '') {
$turnover = getTransactions($myrow['supplier_id'], $from);
if ($more != 0.0 && $turnover <= (double) $more) {
$printsupplier = false;
}
if ($less != 0.0 && $turnover >= (double) $less) {
$printsupplier = false;
}
}
if ($printsupplier) {
$newrow = 0;
$rep->NewLine();
// Here starts the new report lines 2013-01-28 Joe Hunt
$contacts = get_supplier_contacts($myrow['supplier_id']);
$rep->TextCol(0, 1, $myrow['supp_name']);
$rep->TextCol(1, 2, _('Tax_Id') . ": " . $myrow['gst_no']);
$rep->TextCol(2, 3, $myrow['contact']);
$rep->NewLine();
$adr = Explode("\n", $myrow['address']);
$adr2 = Explode("\n", $myrow['supp_address']);
$count1 = count($adr);
$count2 = count($adr2);
$count1 = max($count1, $count2);
$count1 = max($count1, 4);
if (isset($adr[0])) {
$rep->TextCol(0, 1, $adr[0]);
}
$rep->TextCol(1, 2, _('Currency') . ": " . $myrow['curr_code']);
if (isset($contacts[0])) {
$rep->TextCol(2, 3, $contacts[0]['name'] . " " . $contacts[0]['name2']);
}
if (isset($adr2[0])) {
$rep->TextCol(3, 4, $adr2[0]);
}
$rep->NewLine();
if (isset($adr[1])) {
$rep->TextCol(0, 1, $adr[1]);
}
if ($myrow['dimension_id'] != 0) {
$dim = get_dimension($myrow['dimension_id']);
$rep->TextCol(1, 2, _('Dimension') . ": " . $dim['name']);
}
if (isset($contacts[0])) {
$rep->TextCol(2, 3, _('Ph') . ": " . $contacts[0]['phone']);
}
if (isset($adr2[1])) {
$rep->TextCol(3, 4, $adr2[1]);
}
$rep->NewLine();
if (isset($adr[2])) {
$rep->TextCol(0, 1, $adr[2]);
}
if ($myrow['dimension2_id'] != 0) {
$dim = get_dimension($myrow['dimension2_id']);
$rep->TextCol(1, 2, _('Dimension') . " 2: " . $dim['name']);
}
if ($myrow['notes'] != '') {
$oldrow = $rep->row;
$rep->NewLine();
$rep->TextColLines(1, 2, _("Gereral Notes:") . " " . $myrow['notes'], -2);
$newrow = $rep->row;
$rep->row = $oldrow;
}
if (isset($contacts[0])) {
$rep->TextCol(2, 3, _('Fax') . ": " . $contacts[0]['fax']);
}
if (isset($adr2[2])) {
$rep->TextCol(3, 4, $adr2[2]);
}
if ($more != 0.0 || $less != 0.0) {
$rep->TextCol(1, 2, _('Turnover') . ": " . number_format2($turnover, $dec));
}
for ($i = 3; $i < $count1; $i++) {
$rep->NewLine();
if (isset($adr[$i])) {
$rep->TextCol(0, 1, $adr[$i]);
}
if ($i == 3 && isset($contacts[0]) && isset($contacts[0]['email'])) {
$rep->TextCol(2, 3, _('Email') . ": " . $contacts[0]['email']);
}
if (isset($adr2[$i])) {
$rep->TextCol(3, 4, $adr2[$i]);
}
}
if ($newrow != 0 && $newrow < $rep->row) {
$rep->row = $newrow;
}
$rep->NewLine();
$rep->Line($rep->row + 8);
$rep->NewLine(0, 3);
}
}
$rep->End();
}
function print_workorders()
{
global $path_to_root, $SysPrefs, $dflt_lang;
include_once $path_to_root . "/reporting/includes/pdf_report.inc";
$from = $_POST['PARAM_0'];
$to = $_POST['PARAM_1'];
$email = $_POST['PARAM_2'];
$comments = $_POST['PARAM_3'];
$orientation = $_POST['PARAM_4'];
if (!$from || !$to) {
return;
}
$orientation = $orientation ? 'L' : 'P';
$fno = explode("-", $from);
$tno = explode("-", $to);
$from = min($fno[0], $tno[0]);
$to = max($fno[0], $tno[0]);
$cols = array(4, 60, 190, 255, 320, 385, 450, 515);
// $headers in doctext.inc
$aligns = array('left', 'left', 'left', 'left', 'right', 'right', 'right');
$params = array('comments' => $comments);
$cur = get_company_Pref('curr_default');
if ($email == 0) {
$rep = new FrontReport(_('WORK ORDER'), "WorkOrderBulk", user_pagesize(), 9, $orientation);
}
if ($orientation == 'L') {
recalculate_cols($cols);
}
for ($i = $from; $i <= $to; $i++) {
$myrow = get_work_order($i);
if ($myrow === false) {
continue;
}
$date_ = sql2date($myrow["date_"]);
if ($email == 1) {
$rep = new FrontReport("", "", user_pagesize(), 9, $orientation);
$rep->title = _('WORK ORDER');
$rep->filename = "WorkOrder" . $myrow['wo_ref'] . ".pdf";
}
$rep->SetHeaderType('Header2');
$rep->currency = $cur;
$rep->Font();
$rep->Info($params, $cols, null, $aligns);
$contact = array('email' => $myrow['email'], 'lang' => $dflt_lang, 'name' => $myrow['contact'], 'name2' => '', 'contact');
$rep->SetCommonData($myrow, null, null, '', 26, $contact);
$rep->NewPage();
$result = get_wo_requirements($i);
$rep->TextCol(0, 5, _("Work Order Requirements"), -2);
$rep->NewLine(2);
$has_marked = false;
while ($myrow2 = db_fetch($result)) {
$qoh = 0;
$show_qoh = true;
// if it's a non-stock item (eg. service) don't show qoh
if (!has_stock_holding($myrow2["mb_flag"])) {
$show_qoh = false;
}
if ($show_qoh) {
$qoh = get_qoh_on_date($myrow2["stock_id"], $myrow2["loc_code"], $date_);
}
if ($show_qoh && $myrow2["units_req"] * $myrow["units_issued"] > $qoh && !$SysPrefs->allow_negative_stock()) {
// oops, we don't have enough of one of the component items
$has_marked = true;
} else {
$has_marked = false;
}
if ($has_marked) {
$str = $myrow2['stock_id'] . " ***";
} else {
$str = $myrow2['stock_id'];
}
$rep->TextCol(0, 1, $str, -2);
$rep->TextCol(1, 2, $myrow2['description'], -2);
$rep->TextCol(2, 3, $myrow2['location_name'], -2);
$rep->TextCol(3, 4, $myrow2['WorkCentreDescription'], -2);
$dec = get_qty_dec($myrow2["stock_id"]);
$rep->AmountCol(4, 5, $myrow2['units_req'], $dec, -2);
$rep->AmountCol(5, 6, $myrow2['units_req'] * $myrow['units_issued'], $dec, -2);
$rep->AmountCol(6, 7, $myrow2['units_issued'], $dec, -2);
$rep->NewLine(1);
if ($rep->row < $rep->bottomMargin + 15 * $rep->lineHeight) {
$rep->NewPage();
}
}
$rep->NewLine(1);
$rep->TextCol(0, 5, " *** = " . _("Insufficient stock"), -2);
$memo = get_comments_string(ST_WORKORDER, $i);
if ($memo != "") {
$rep->NewLine();
$rep->TextColLines(1, 5, $memo, -2);
}
if ($email == 1) {
$myrow['DebtorName'] = $myrow['contact'];
$myrow['reference'] = $myrow['wo_ref'];
$rep->End($email);
}
}
if ($email == 0) {
$rep->End();
}
}
function print_deliveries()
{
global $path_to_root;
include_once $path_to_root . "reporting/includes/pdf_report.inc";
$from = $_REQUEST['PARAM_0'];
$to = $_REQUEST['PARAM_1'];
$email = $_REQUEST['PARAM_2'];
$comments = $_REQUEST['PARAM_3'];
if ($from == null) {
$from = 0;
}
if ($to == null) {
$to = 0;
}
$dec = user_price_dec();
$fno = explode("-", $from);
$tno = explode("-", $to);
$cols = array(5, 70, 260, 340, 365, 420, 470, 520);
// $headers in doctext.inc
$aligns = array('left', 'left', 'right', 'left', 'right', 'right', 'right');
$params = array('comments' => $comments);
$cur = get_company_Pref('curr_default');
if ($email == 0) {
$rep = new FrontReport(tr('DELIVERY'), "DeliveryNoteBulk.pdf", user_pagesize());
$rep->currency = $cur;
$rep->fontSize = 10;
$rep->Font();
$rep->Info($params, $cols, null, $aligns);
}
for ($i = $fno[0]; $i <= $tno[0]; $i++) {
if (!exists_customer_trans(13, $i)) {
continue;
}
$myrow = get_customer_trans($i, 13);
$sales_order = get_sales_order_header($myrow["order_"]);
// ?
$branch = get_branch($myrow["branch_code"]);
$lang = $branch["lang_code"];
// get language from customer
readstrings($lang);
$tax_group_id = $branch['tax_group_id'];
$tax_rate = 0;
$tax_name = '';
$msg = "Error retrieving tax values";
$sql = "select rate from tax_group_items ";
$sql = $sql . "where tax_group_id=" . $tax_group_id . " limit 1";
$result1 = db_query($sql, $msg);
if (db_num_rows($result1) != 0) {
$myrow1 = db_fetch_row($result1);
$tax_rate = $myrow1[0];
}
$sql = "select name from tax_groups ";
$sql = $sql . "where id=" . $tax_group_id . " limit 1";
$result1 = db_query($sql, $msg);
if (db_num_rows($result1) != 0) {
$myrow1 = db_fetch_row($result1);
$tax_name = $myrow1[0];
}
$tax_included = 0;
if ($email == 1) {
$rep = new FrontReport("", "", user_pagesize());
$rep->currency = $cur;
$rep->Font();
$rep->title = tr('DELIVERY NOTE');
$rep->filename = "Delivery" . $myrow['reference'] . ".pdf";
$rep->Info($params, $cols, null, $aligns);
} else {
$rep->title = tr('DELIVERY NOTE');
}
$rep->Header2($myrow, $branch, $sales_order, '', 13);
$result = get_customer_trans_details(13, $i);
$SubTotal = 0;
while ($myrow2 = db_fetch($result)) {
$Net = round((1 - $myrow2["discount_percent"]) * $myrow2["unit_price"] * $myrow2["quantity"], user_price_dec());
$SubTotal += $Net;
$DisplayPrice = number_format2($myrow2["unit_price"], $dec, 1);
$DisplayQty = number_format2($myrow2["quantity"], user_qty_dec(), 1);
$DisplayNet = number_format2($Net, $dec, 1);
$DisplayDate = sql2date($myrow2["date_from"], 1);
if ($myrow2["discount_percent"] == 0) {
$DisplayDiscount = "";
} else {
$DisplayDiscount = number_format2($myrow2["discount_percent"] * 100, user_percent_dec(), 1) . "%";
}
$rep->TextCol(0, 1, $myrow2['stock_id'], -2);
$rep->TextCol(1, 2, $DisplayDate . " " . $myrow2['description'], -2);
$rep->TextCol(2, 3, $DisplayQty, -2);
$rep->TextCol(3, 4, $myrow2['units'], -2);
$rep->TextCol(4, 5, $DisplayPrice, -2);
$rep->TextCol(5, 6, $DisplayDiscount, -2);
$rep->TextCol(6, 7, $DisplayNet, -2);
$rep->NewLine(1);
if ($rep->row < $rep->bottomMargin + 15 * $rep->lineHeight) {
$rep->Header2($myrow, $branch, $sales_order, '', 13);
}
}
$comments = get_comments(13, $i);
if ($comments && db_num_rows($comments)) {
$rep->NewLine();
while ($comment = db_fetch($comments)) {
$rep->TextColLines(0, 6, $comment['memo_'], -2);
}
}
$DisplaySubTot = number_format2($SubTotal, $dec, 1);
$DisplayFreight = number_format2($myrow["ov_freight"], $dec, 1);
$rep->row = $rep->bottomMargin + 15 * $rep->lineHeight;
$linetype = true;
$doctype = 13;
if ($rep->currency != $myrow['curr_code']) {
include $path_to_root . "reporting/includes/doctext.inc";
} else {
include $path_to_root . "reporting/includes/doctext.inc";
}
$amount = $myrow["ov_freight"] + $SubTotal;
$subtotal3 = number_format2($amount, $dec, 1);
$rep->TextCol(3, 6, $doc_Sub_total, -2);
$rep->TextCol(6, 7, $DisplaySubTot, -2);
$rep->NewLine();
$rep->TextCol(3, 6, $doc_Shipping, -2);
$rep->TextCol(6, 7, $DisplayFreight, -2);
$rep->NewLine();
$rep->TextCol(3, 6, $doc_Sub_total, -2);
$rep->TextCol(6, 7, $subtotal3, -2);
$rep->NewLine();
$amount_tax = $amount / 100 * $tax_rate;
if ($rep->currency == 'CHF') {
$val = $amount_tax;
$val1 = floatval(intval(round($val * 20, 0)) / 20);
$amount_tax = $val1;
}
$amount_tot = $amount + $amount_tax;
$DisplayTax = number_format2($amount_tax, $dec, 1);
$DisplayTotal = number_format2($amount_tot, $dec, 1);
if ($tax_included) {
$rep->TextCol(3, 7, $doc_Included . " " . $tax_nmae . " (" . $tax_rate . "%) " . $doc_Amount . ":" . $DisplayTax, -2);
} else {
$rep->TextCol(3, 6, $tax_name . " (" . $tax_rate . "%)", -2);
$rep->TextCol(6, 7, $DisplayTax, -2);
}
$rep->NewLine();
$rep->Font('bold');
$rep->TextCol(3, 6, $doc_TOTAL_DELIVERY, -2);
$rep->TextCol(6, 7, $DisplayTotal, -2);
$rep->Font();
/*
$tax_items = get_customer_trans_tax_details(13, $i);
while ($tax_item = db_fetch($tax_items))
{
$DisplayTax = number_format2($tax_item['amount'], $dec,1);
if ($tax_item['included_in_price'])
{
$rep->TextCol(3, 7, $doc_Included . " " . $tax_item['tax_type_name'] .
" (" . $tax_item['rate'] . "%) " . $doc_Amount . ":" . $DisplayTax, -2);
}
else
{
$rep->TextCol(3, 6, $tax_item['tax_type_name'] . " (" .
$tax_item['rate'] . "%)", -2);
$rep->TextCol(6, 7, $DisplayTax, -2);
}
$rep->NewLine();
}
//$rep->NewLine();
$DisplayTotal = number_format2($myrow["ov_freight"] +$myrow["ov_freight_tax"] + $myrow["ov_gst"] +
$myrow["ov_amount"],$dec,1);
$rep->Font('bold');
$rep->TextCol(3, 6, $doc_TOTAL_DELIVERY, - 2);
$rep->TextCol(6, 7, $DisplayTotal, -2);
$rep->Font();
*/
if ($email == 1) {
$myrow['dimension_id'] = $paylink;
// helper for pmt link
if ($myrow['email'] == '') {
$myrow['email'] = $branch['email'];
$myrow['DebtorName'] = $branch['br_name'];
}
$rep->End($email, $doc_Delivery_no . " " . $myrow['reference'], $myrow, 13);
}
}
if ($email == 0) {
$rep->End();
}
}
function print_list_of_journal_entries()
{
global $path_to_root, $systypes_array;
$from = $_POST['PARAM_0'];
$to = $_POST['PARAM_1'];
$systype = $_POST['PARAM_2'];
$comments = $_POST['PARAM_3'];
$orientation = $_POST['PARAM_4'];
$destination = $_POST['PARAM_5'];
if ($destination) {
include_once $path_to_root . "/reporting/includes/excel_report.inc";
} else {
include_once $path_to_root . "/reporting/includes/pdf_report.inc";
}
$orientation = $orientation ? 'L' : 'P';
$dec = user_price_dec();
$cols = array(0, 100, 240, 300, 400, 460, 520, 580);
$headers = array(_('Type/Account'), _('Reference') . '/' . _('Account Name'), _('Date/Dim.'), _('Person/Item/Memo'), _('Debit'), _('Credit'));
$aligns = array('left', 'left', 'left', 'left', 'right', 'right');
$params = array(0 => $comments, 1 => array('text' => _('Period'), 'from' => $from, 'to' => $to), 2 => array('text' => _('Type'), 'from' => $systype == -1 ? _('All') : $systypes_array[$systype], 'to' => ''));
$rep = new FrontReport(_('List of Journal Entries'), "JournalEntries", user_pagesize(), 9, $orientation);
if ($orientation == 'L') {
recalculate_cols($cols);
}
$rep->Font();
$rep->Info($params, $cols, $headers, $aligns);
$rep->NewPage();
if ($systype == -1) {
$systype = null;
}
$trans = get_gl_transactions($from, $to, -1, null, 0, 0, $systype);
$typeno = $type = 0;
$debit = $credit = 0.0;
$totdeb = $totcre = 0.0;
while ($myrow = db_fetch($trans)) {
if ($type != $myrow['type'] || $typeno != $myrow['type_no']) {
if ($typeno != 0) {
$rep->Line($rep->row += 6);
$rep->NewLine();
$rep->AmountCol(4, 5, $debit, $dec);
$rep->AmountCol(5, 6, abs($credit), $dec);
$totdeb += $debit;
$totcre += $credit;
$debit = $credit = 0.0;
$rep->Line($rep->row -= 4);
$rep->NewLine();
}
$typeno = $myrow['type_no'];
$type = $myrow['type'];
$TransName = $systypes_array[$myrow['type']];
$rep->TextCol(0, 1, $TransName . " # " . $myrow['type_no']);
$rep->TextCol(1, 2, get_reference($myrow['type'], $myrow['type_no']));
$rep->DateCol(2, 3, $myrow['tran_date'], true);
$coms = payment_person_name($myrow["person_type_id"], $myrow["person_id"]);
$memo = get_comments_string($myrow['type'], $myrow['type_no']);
if ($memo != '') {
if ($coms == "") {
$coms = $memo;
} else {
$coms .= " / " . $memo;
}
}
$rep->TextColLines(3, 6, $coms);
$rep->NewLine();
}
$rep->TextCol(0, 1, $myrow['account']);
$rep->TextCol(1, 2, $myrow['account_name']);
$dim_str = get_dimension_string($myrow['dimension_id']);
$dim_str2 = get_dimension_string($myrow['dimension2_id']);
if ($dim_str2 != "") {
$dim_str .= "/" . $dim_str2;
}
$rep->TextCol(2, 3, $dim_str);
$rep->TextCol(3, 4, $myrow['memo_']);
if ($myrow['amount'] > 0.0) {
$debit += $myrow['amount'];
$rep->AmountCol(4, 5, abs($myrow['amount']), $dec);
} else {
$credit += $myrow['amount'];
$rep->AmountCol(5, 6, abs($myrow['amount']), $dec);
}
$rep->NewLine(1, 2);
}
if ($typeno != 0) {
$rep->Line($rep->row += 6);
$rep->NewLine();
$rep->AmountCol(4, 5, $debit, $dec);
$rep->AmountCol(5, 6, abs($credit), $dec);
$totdeb += $debit;
$totcre += $credit;
$rep->Line($rep->row -= 4);
$rep->NewLine();
$rep->TextCol(0, 4, _("Total"));
$rep->AmountCol(4, 5, $totdeb, $dec);
$rep->AmountCol(5, 6, abs($totcre), $dec);
$rep->Line($rep->row -= 4);
}
$rep->End();
}
function print_sales_orders()
{
global $path_to_root, $print_as_quote, $no_zero_lines_amount;
include_once $path_to_root . "/reporting/includes/pdf_report.inc";
$from = $_POST['PARAM_0'];
$to = $_POST['PARAM_1'];
$currency = $_POST['PARAM_2'];
$email = $_POST['PARAM_3'];
$print_as_quote = $_POST['PARAM_4'];
$comments = $_POST['PARAM_5'];
$orientation = $_POST['PARAM_6'];
if (!$from || !$to) {
return;
}
$orientation = $orientation ? 'L' : 'P';
$dec = user_price_dec();
$cols = array(4, 60, 225, 300, 325, 385, 450, 515);
// $headers in doctext.inc
$aligns = array('left', 'left', 'right', 'left', 'right', 'right', 'right');
$params = array('comments' => $comments);
$cur = get_company_Pref('curr_default');
if ($email == 0) {
if ($print_as_quote == 0) {
$rep = new FrontReport(_("SALES ORDER"), "SalesOrderBulk", user_pagesize(), 9, $orientation);
} else {
$rep = new FrontReport(_("QUOTE"), "QuoteBulk", user_pagesize(), 9, $orientation);
}
}
if ($orientation == 'L') {
recalculate_cols($cols);
}
for ($i = $from; $i <= $to; $i++) {
$myrow = get_sales_order_header($i, ST_SALESORDER);
$baccount = get_default_bank_account($myrow['curr_code']);
$params['bankaccount'] = $baccount['id'];
$branch = get_branch($myrow["branch_code"]);
if ($email == 1) {
$rep = new FrontReport("", "", user_pagesize(), 9, $orientation);
if ($print_as_quote == 1) {
$rep->title = _('QUOTE');
$rep->filename = "Quote" . $i . ".pdf";
} else {
$rep->title = _("SALES ORDER");
$rep->filename = "SalesOrder" . $i . ".pdf";
}
} else {
$rep->title = $print_as_quote == 1 ? _("QUOTE") : _("SALES ORDER");
}
$rep->SetHeaderType('Header2');
$rep->currency = $cur;
$rep->Font();
$rep->Info($params, $cols, null, $aligns);
$contacts = get_branch_contacts($branch['branch_code'], 'order', $branch['debtor_no'], true);
$rep->SetCommonData($myrow, $branch, $myrow, $baccount, ST_SALESORDER, $contacts);
$rep->NewPage();
$result = get_sales_order_details($i, ST_SALESORDER);
$SubTotal = 0;
$items = $prices = array();
while ($myrow2 = db_fetch($result)) {
$Net = round2((1 - $myrow2["discount_percent"]) * $myrow2["unit_price"] * $myrow2["quantity"], user_price_dec());
$prices[] = $Net;
$items[] = $myrow2['stk_code'];
$SubTotal += $Net;
$DisplayPrice = number_format2($myrow2["unit_price"], $dec);
$DisplayQty = number_format2($myrow2["quantity"], get_qty_dec($myrow2['stk_code']));
$DisplayNet = number_format2($Net, $dec);
if ($myrow2["discount_percent"] == 0) {
$DisplayDiscount = "";
} else {
$DisplayDiscount = number_format2($myrow2["discount_percent"] * 100, user_percent_dec()) . "%";
}
$rep->TextCol(0, 1, $myrow2['stk_code'], -2);
$oldrow = $rep->row;
$rep->TextColLines(1, 2, $myrow2['description'], -2);
$newrow = $rep->row;
$rep->row = $oldrow;
if ($Net != 0.0 || !is_service($myrow2['mb_flag']) || !isset($no_zero_lines_amount) || $no_zero_lines_amount == 0) {
$rep->TextCol(2, 3, $DisplayQty, -2);
$rep->TextCol(3, 4, $myrow2['units'], -2);
$rep->TextCol(4, 5, $DisplayPrice, -2);
$rep->TextCol(5, 6, $DisplayDiscount, -2);
$rep->TextCol(6, 7, $DisplayNet, -2);
}
$rep->row = $newrow;
//$rep->NewLine(1);
if ($rep->row < $rep->bottomMargin + 15 * $rep->lineHeight) {
$rep->NewPage();
}
}
if ($myrow['comments'] != "") {
$rep->NewLine();
$rep->TextColLines(1, 5, $myrow['comments'], -2);
}
$DisplaySubTot = number_format2($SubTotal, $dec);
$DisplayFreight = number_format2($myrow["freight_cost"], $dec);
$rep->row = $rep->bottomMargin + 15 * $rep->lineHeight;
$doctype = ST_SALESORDER;
$rep->TextCol(3, 6, _("Sub-total"), -2);
$rep->TextCol(6, 7, $DisplaySubTot, -2);
$rep->NewLine();
$rep->TextCol(3, 6, _("Shipping"), -2);
$rep->TextCol(6, 7, $DisplayFreight, -2);
$rep->NewLine();
$DisplayTotal = number_format2($myrow["freight_cost"] + $SubTotal, $dec);
if ($myrow['tax_included'] == 0) {
$rep->TextCol(3, 6, _("TOTAL ORDER EX VAT"), -2);
$rep->TextCol(6, 7, $DisplayTotal, -2);
$rep->NewLine();
}
$tax_items = get_tax_for_items($items, $prices, $myrow["freight_cost"], $myrow['tax_group_id'], $myrow['tax_included'], null);
$first = true;
foreach ($tax_items as $tax_item) {
if ($tax_item['Value'] == 0) {
continue;
}
$DisplayTax = number_format2($tax_item['Value'], $dec);
$tax_type_name = $tax_item['tax_type_name'];
if ($myrow['tax_included']) {
if (isset($alternative_tax_include_on_docs) && $alternative_tax_include_on_docs == 1) {
if ($first) {
$rep->TextCol(3, 6, _("Total Tax Excluded"), -2);
$rep->TextCol(6, 7, number_format2($sign * $tax_item['net_amount'], $dec), -2);
$rep->NewLine();
}
$rep->TextCol(3, 6, $tax_type_name, -2);
$rep->TextCol(6, 7, $DisplayTax, -2);
$first = false;
} else {
$rep->TextCol(3, 7, _("Included") . " " . $tax_type_name . " " . _("Amount") . ": " . $DisplayTax, -2);
}
} else {
$SubTotal += $tax_item['Value'];
$rep->TextCol(3, 6, $tax_type_name, -2);
$rep->TextCol(6, 7, $DisplayTax, -2);
}
$rep->NewLine();
}
$rep->NewLine();
$DisplayTotal = number_format2($myrow["freight_cost"] + $SubTotal, $dec);
$rep->Font('bold');
$rep->TextCol(3, 6, _("TOTAL ORDER VAT INCL."), -2);
$rep->TextCol(6, 7, $DisplayTotal, -2);
$words = price_in_words($myrow["freight_cost"] + $SubTotal, ST_SALESORDER);
if ($words != "") {
$rep->NewLine(1);
$rep->TextCol(1, 7, $myrow['curr_code'] . ": " . $words, -2);
}
$rep->Font();
if ($email == 1) {
$rep->End($email);
}
}
if ($email == 0) {
$rep->End();
}
}
function print_credits()
{
global $path_to_root, $alternative_tax_include_on_docs, $suppress_tax_rates;
include_once $path_to_root . "/reporting/includes/pdf_report.inc";
$from = $_POST['PARAM_0'];
$to = $_POST['PARAM_1'];
$currency = $_POST['PARAM_2'];
$email = $_POST['PARAM_3'];
$paylink = $_POST['PARAM_4'];
$comments = $_POST['PARAM_5'];
$orientation = $_POST['PARAM_6'];
if (!$from || !$to) {
return;
}
$orientation = $orientation ? 'L' : 'P';
$dec = 2;
$fno = explode("-", $from);
$tno = explode("-", $to);
$from = min($fno[0], $tno[0]);
$to = max($fno[0], $tno[0]);
$cols = array(-20, 15, 20, 100, 130, 200, 255, 285, 335, 385, 440, 480, 550, 600);
// $headers in doctext.inc
$aligns = array('left', 'left', 'left', 'left', 'left', 'left', 'left', 'right', 'right', 'right', 'right', 'right');
$params = array('comments' => $comments);
$cur = get_company_Pref('curr_default');
if ($email == 0) {
$rep = new FrontReport(_('CREDIT NOTE'), "InvoiceBulk", user_pagesize(), 9, $orientation);
}
if ($orientation == 'L') {
recalculate_cols($cols);
}
for ($i = $from; $i <= $to; $i++) {
if (!exists_customer_trans(ST_CUSTCREDIT, $i)) {
continue;
}
$sign = -1;
$myrow = get_customer_trans($i, ST_CUSTCREDIT);
$baccount = get_default_bank_account($myrow['curr_code']);
$params['bankaccount'] = $baccount['id'];
$branch = get_branch($myrow["branch_code"]);
$branch['disable_branch'] = $paylink;
// helper
$sales_order = null;
if ($email == 1) {
$rep = new FrontReport("", "", user_pagesize(), 9, $orientation);
$rep->title = _('CREDIT NOTE');
$rep->filename = "CreditNote" . $myrow['reference'] . ".pdf";
}
$rep->SetHeaderType(0);
$rep->currency = $cur;
$rep->Font();
$rep->Info(null, $cols, null, $aligns);
//$contacts = get_branch_contacts($branch['branch_code'], 'invoice', $branch['debtor_no'], true);
//$rep->SetCommonData($myrow, $branch, $sales_order, $baccount, ST_CUSTCREDIT, $contacts);
$rep->NewPage();
$result = get_customer_trans_details(ST_CUSTCREDIT, $i);
$SubTotal = 0;
//$data = get_custom_no($from, ST_CUSTCREDIT);
$invoice_no = get_sales_invoice_no($myrow['order_'], ST_SALESINVOICE);
$credit_no = get_custom_no($myrow['trans_no'], ST_CUSTCREDIT);
$imc = get_imc_name($branch['branch_code']);
$rep->NewLine(9);
$rep->TextCol(6, 8, $myrow['TranDate']);
$rep->NewLine(1);
$oldrow = $rep->row;
$rep->TextColLines(0, 12, $branch['br_name'], -2);
$newrow = $rep->row;
$rep->row = $oldrow;
$rep->NewLine(3);
$rep->TextCol(0, 3, "Ref. Invoice # " . $invoice_no, -2);
$rep->TextCol(3, 5, "Credit#" . $credit_no, -2);
$rep->TextCol(5, 8, $imc, -2);
$rep->NewLine(2);
$rep->NewLine(2);
while ($myrow2 = db_fetch($result)) {
if ($myrow2["quantity"] == 0) {
continue;
}
$Net = round2($sign * ((1 - $myrow2["discount_percent"]) * $myrow2["unit_price"] * $myrow2["quantity"]), user_price_dec());
$SubTotal += $Net;
$DisplayPrice = number_format2($myrow2["unit_price"], $dec);
$DisplayQty = number_format2($sign * $myrow2["quantity"], get_qty_dec($myrow2['stock_id']));
$DisplayNet = number_format2($Net, $dec);
if ($myrow2["discount_percent"] == 0) {
$DisplayDiscount = "";
} else {
$DisplayDiscount = number_format2($myrow2["discount_percent"] * 100, user_percent_dec()) . "%";
}
//$rep->TextCol(4, 5, $myrow2['stock_id'], -2);
$oldrow = $rep->row;
$rep->TextColLines(2, 5, $myrow2['StockDescription'], -2);
$newrow = $rep->row;
$rep->row = $oldrow;
$rep->TextCol(0, 1, $DisplayQty . " " . $myrow2['units'], -2);
$rep->TextCol(6, 7, $DisplayPrice, -2);
$rep->TextCol(7, 8, $DisplayNet, -2);
$rep->row = $newrow;
//$rep->NewLine(1);
if ($rep->row < $rep->bottomMargin + 15 * $rep->lineHeight) {
$rep->NewPage();
}
}
$memo = get_comments_string(ST_CUSTCREDIT, $i);
if ($memo != "") {
$rep->NewLine();
//$rep->TextColLines(1, 5, $memo, -2);
}
$DisplaySubTot = $SubTotal;
$DisplayFreight = number_format2($sign * $myrow["ov_freight"], $dec);
$DisplayTotal = $sign * ($myrow["ov_freight"] + $myrow["ov_gst"] + $myrow["ov_amount"] + $myrow["ov_freight_tax"]);
$sub = $myrow["ov_freight"] + $myrow["ov_gst"] + $myrow["ov_amount"] + $myrow["ov_freight_tax"];
$Discount = abs($SubTotal) * ($myrow['bulk_discount'] / 100);
//$rep->row = $rep->bottomMargin + (15 * $rep->lineHeight);
$doctype = ST_CUSTCREDIT;
$rep->NewLine(2);
$rep->Font('bold');
$rep->TextCol(4, 7, _("Total Amount : "), -2);
$rep->AmountCol(7, 8, $DisplaySubTot, 2);
$rep->NewLine();
$rep->TextCol(4, 7, _("Volume Discount : "), -2);
$rep->AmountCol(7, 8, $Discount, 2);
$rep->NewLine();
$rep->TextCol(4, 7, _("Net Amount : "), -2);
$rep->AmountCol(7, 8, $DisplayTotal, 2);
$rep->Font();
if ($email == 1) {
$myrow['dimension_id'] = $paylink;
// helper for pmt link
$rep->End($email);
}
}
if ($email == 0) {
$rep->End();
}
}
function print_invoices()
{
global $path_to_root, $alternative_tax_include_on_docs, $suppress_tax_rates, $no_zero_lines_amount;
include_once $path_to_root . "/reporting/includes/pdf_report.inc";
$from = $_POST['PARAM_0'];
$to = $_POST['PARAM_1'];
$currency = $_POST['PARAM_2'];
$email = $_POST['PARAM_3'];
$pay_service = $_POST['PARAM_4'];
$comments = $_POST['PARAM_5'];
$customer = $_POST['PARAM_6'];
$orientation = $_POST['PARAM_7'];
if (!$from || !$to) {
return;
}
$orientation = $orientation ? 'L' : 'P';
$dec = user_price_dec();
$fno = explode("-", $from);
$tno = explode("-", $to);
$from = min($fno[0], $tno[0]);
$to = max($fno[0], $tno[0]);
$cols = array(4, 40, 60, 100, 200, 250, 300, 320, 400, 450, 500);
// $headers in doctext.inc
$aligns = array('left', 'left', 'left', 'left', 'right', 'right', 'right', 'right', 'right', 'right', 'right');
//$params = array('comments' => $comments);
$cur = get_company_Pref('curr_default');
$company_data = get_company_prefs();
if ($email == 0) {
$rep = new FrontReport(_('INVOICE'), "InvoiceBulk", user_pagesize(), 9, $orientation);
}
if ($orientation == 'L') {
recalculate_cols($cols);
}
for ($i = $from; $i <= $to; $i++) {
if (!exists_customer_trans(ST_SALESINVOICE, $i)) {
continue;
}
$sign = 1;
$myrow = get_customer_trans($i, ST_SALESINVOICE);
if ($customer && $myrow['debtor_no'] != $customer) {
continue;
}
$baccount = get_default_bank_account($myrow['curr_code']);
$params['bankaccount'] = $baccount['id'];
$branch = get_branch($myrow["branch_code"]);
$sales_order = get_sales_order_header($myrow["order_"], ST_SALESORDER);
if ($email == 1) {
$rep = new FrontReport("", "", user_pagesize(), 9, $orientation);
//$rep->title = _('INVOICE');
$rep->filename = "Invoice" . $myrow['reference'] . ".pdf";
}
$rep->SetHeaderType(0);
$rep->currency = $cur;
$rep->Font();
$rep->Info(null, $cols, null, $aligns);
//$contacts = get_branch_contacts($branch['branch_code'], 'invoice', $branch['debtor_no'], true);
//$baccount['payment_service'] = $pay_service;
$salesman = get_imc_code($branch['branch_code']);
$pay_term = get_payment_terms($myrow['payment_terms']);
$branch_data = get_branch_accounts($myrow['branch_code']);
$dt = get_discount($branch_data['sales_discount_account'], $myrow['type'], $myrow['trans_no']);
$invoice_no = get_custom_no($myrow['trans_no'], $myrow['type']);
$contact = getContactPerson($myrow['salesman'], $myrow['debtor_no'], $branch['branch_code']);
$rep->NewPage();
$result = get_customer_trans_details(ST_SALESINVOICE, $i);
$SubTotal = 0;
$rep->NewLine(8);
$rep->TextCol(2, 7, _("CHARGE INVOICE # " . $invoice_no));
$rep->TextCol(8, 9, $myrow['TranDate']);
$rep->NewLine();
$rep->TextCol(2, 7, $branch['br_name']);
if ($dt != 0) {
//$display_bulk_discount = (($sub_total - $myrow['Total']) / $sub_total) * 100;
$tot = $myrow['Total'] + $dt;
$dscnt = ($tot - $myrow['Total']) / $tot * 100;
//$dscnt = ($dt / $myrow['Total']) * 100;
$significant = strlen(substr(strrchr($dscnt, "."), 1));
if ($significant > 2) {
$rep->TextCol(7, 9, floor($dscnt) . "%");
} else {
$rep->TextCol(7, 9, $dscnt . "%");
}
}
$rep->NewLine();
$rep->TextCol(2, 7, $branch['branch_ref']);
$rep->TextCol(8, 9, $salesman);
$rep->NewLine();
$rep->TextCol(2, 6, $contact);
if ($pay_term['terms'] == 'Cash Only') {
$rep->TextCol(8, 9, $pay_term['terms']);
} else {
$rep->TextCol(7, 10, $pay_term['terms']);
}
$rep->NewLine();
$oldrow = $rep->row;
$newrow = $rep->row;
$rep->TextColLines(2, 6, $branch['br_address'], -2);
$rep->row = $oldrow;
$rep->NewLine(5);
$rep->Font('bold');
//$rep->Line($rep->row + 10);
//$rep->TextCol(2,5, _("Item Description"));
//$rep->TextCol(5,6, _("Quantity"));
//$rep->TextCol(7,8, _("Unit Price"));
//$rep->TextCol(9,10, _("Total Amount"));
//$rep->Line($rep->row - 4);
$rep->NewLine(2);
$rep->Font();
while ($myrow2 = db_fetch($result)) {
if ($myrow2["quantity"] == 0) {
continue;
}
$Net = round2($sign * ((1 - $myrow2["discount_percent"]) * $myrow2["unit_price"] * $myrow2["quantity"]), user_price_dec());
$Net2 = round2($sign * ($myrow2["unit_price"] * $myrow2["quantity"]), user_price_dec());
$SubTotal += $Net;
$DisplayPrice = number_format2($myrow2["unit_price"], $dec);
$DisplayQty = number_format2($sign * $myrow2["quantity"], get_qty_dec($myrow2['stock_id']));
$DisplayNet = number_format2($Net, $dec);
$dNet = number_format2($Net2, $dec);
/*if ($myrow2["discount_percent"]==0)
$DisplayDiscount ="";
else
$DisplayDiscount = number_format2($myrow2["discount_percent"]*100,user_percent_dec()) . "%";*/
//if ($myrow["ov_discount"]==0)
// $DisplayDiscount ="";
//else
//$DisplayDiscount = number_format2($myrow["ov_discount"]/$myrow["ov_amount"] * 100,user_percent_dec()) . "%";
//$rep->TextCol(0, 3, $myrow2['stock_id'], -2);
$oldrow = $rep->row;
$rep->TextColLines(0, 5, $myrow2['StockDescription'], -2);
$newrow = $rep->row;
$rep->row = $oldrow;
if ($Net != 0.0 || !is_service($myrow2['mb_flag']) || !isset($no_zero_lines_amount) || $no_zero_lines_amount == 0) {
$rep->TextCol(5, 6, $DisplayQty . " " . $myrow2['units']);
//$rep->TextCol(5, 6, $myrow2['units'], -2);
$rep->TextCol(7, 8, $DisplayPrice, -2);
//$rep->TextCol(5, 6, $DisplayDiscount, -2);
$rep->TextCol(8, 10, $dNet, -2);
}
$rep->row = $newrow;
//$rep->NewLine(1);
if ($rep->row < $rep->bottomMargin + 15 * $rep->lineHeight) {
$rep->NewPage();
}
}
$memo = get_comments_string(ST_SALESINVOICE, $i);
if ($memo != "") {
$rep->NewLine();
$rep->TextColLines(1, 5, $memo, -2);
}
$DisplayNet = number_format2($SubTotal, $dec);
$DisplaySubTot = number_format2($SubTotal, $dec);
$DisplayFreight = number_format2($sign * $myrow["ov_freight"], $dec);
$DisplayTots = number_format2($myrow['Total'], $dec);
$DisplayDiscount = number_format2($SubTotal - $myrow['Total'], $dec);
$rep->row = $rep->bottomMargin + 30 * $rep->lineHeight;
$doctype = ST_SALESINVOICE;
$rep->NewLine();
$rep->Font('bold');
$rep->TextCol(9, 10, $DisplayNet, -2);
$rep->NewLine();
//$rep->TextCol(8, 9, _("Less discount: "));
$rep->TextCol(9, 10, $DisplayDiscount, -2);
$rep->NewLine();
//$rep->TextCol(8, 9, _("Net Amount : "), -2);
$rep->TextCol(9, 10, $DisplayTots, -2);
$rep->NewLine();
/*$tax_items = get_trans_tax_details(ST_SALESINVOICE, $i);
$first = true;
while ($tax_item = db_fetch($tax_items))
{
if ($tax_item['amount'] == 0)
continue;
$DisplayTax = number_format2($sign*$tax_item['amount'], $dec);
if (isset($suppress_tax_rates) && $suppress_tax_rates == 1)
$tax_type_name = $tax_item['tax_type_name'];
else
$tax_type_name = $tax_item['tax_type_name']." (".$tax_item['rate']."%) ";
if ($tax_item['included_in_price'])
{
if (isset($alternative_tax_include_on_docs) && $alternative_tax_include_on_docs == 1)
{
if ($first)
{
$rep->TextCol(3, 6, _("Total Tax Excluded"), -2);
$rep->TextCol(6, 7, number_format2($sign*$tax_item['net_amount'], $dec), -2);
$rep->NewLine();
}
$rep->TextCol(3, 6, $tax_type_name, -2);
$rep->TextCol(6, 7, $DisplayTax, -2);
$first = false;
}
else
$rep->TextCol(3, 7, _("Included") . " " . $tax_type_name . _("Amount") . ": " . $DisplayTax, -2);
}
else
{
$rep->TextCol(3, 6, $tax_type_name, -2);
$rep->TextCol(6, 7, $DisplayTax, -2);
}
$rep->NewLine();
}
$rep->NewLine();
$DisplayTotal = number_format2($sign*($myrow["ov_freight"] + $myrow["ov_gst"] +
$myrow["ov_amount"]+$myrow["ov_freight_tax"]),$dec);*/
//$rep->Font('bold');
//$rep->TextCol(3, 6, _("TOTAL INVOICE"), - 2);
//$rep->TextCol(6, 7, $DisplayTotal, -2);
//$words = price_in_words($myrow['Total'], ST_SALESINVOICE);
//if ($words != "")
//{
// $rep->NewLine(1);
// $rep->TextCol(1, 7, $myrow['curr_code'] . ": " . $words, - 2);
//}
//$rep->Font();
if ($email == 1) {
$rep->End($email);
}
}
if ($email == 0) {
$rep->End();
}
}
function print_customer_details_listing()
{
global $path_to_root;
$from = $_POST['PARAM_0'];
$area = $_POST['PARAM_1'];
$folk = $_POST['PARAM_2'];
$more = $_POST['PARAM_3'];
$less = $_POST['PARAM_4'];
$comments = $_POST['PARAM_5'];
$orientation = $_POST['PARAM_6'];
$destination = $_POST['PARAM_7'];
if ($destination) {
include_once $path_to_root . "/reporting/includes/excel_report.inc";
} else {
include_once $path_to_root . "/reporting/includes/pdf_report.inc";
}
$orientation = $orientation ? 'L' : 'P';
$dec = 0;
if ($area == ALL_NUMERIC) {
$area = 0;
}
if ($folk == ALL_NUMERIC) {
$folk = 0;
}
if ($area == 0) {
$sarea = _('All Areas');
} else {
$sarea = get_area_name($area);
}
if ($folk == 0) {
$salesfolk = _('All Sales Folk');
} else {
$salesfolk = get_salesman_name($folk);
}
if ($more != '') {
$morestr = _('Greater than ') . number_format2($more, $dec);
} else {
$morestr = '';
}
if ($less != '') {
$lessstr = _('Less than ') . number_format2($less, $dec);
} else {
$lessstr = '';
}
$more = (double) $more;
$less = (double) $less;
$cols = array(0, 150, 300, 425, 550);
$headers = array(_('Customer Postal Address'), _('Price/Turnover'), _('Branch Contact Information'), _('Branch Delivery Address'));
$aligns = array('left', 'left', 'left', 'left');
$params = array(0 => $comments, 1 => array('text' => _('Activity Since'), 'from' => $from, 'to' => ''), 2 => array('text' => _('Sales Areas'), 'from' => $sarea, 'to' => ''), 3 => array('text' => _('Sales Folk'), 'from' => $salesfolk, 'to' => ''), 4 => array('text' => _('Activity'), 'from' => $morestr, 'to' => $lessstr . " " . get_company_pref("curr_default")));
$rep = new FrontReport(_('Customer Details Listing'), "CustomerDetailsListing", user_pagesize(), 9, $orientation);
if ($orientation == 'L') {
recalculate_cols($cols);
}
$rep->Font();
$rep->Info($params, $cols, $headers, $aligns);
$rep->NewPage();
$result = get_customer_details_for_report($area, $folk);
$carea = '';
$sman = '';
while ($myrow = db_fetch($result)) {
$printcustomer = true;
if ($more != '' || $less != '') {
$turnover = getTransactions($myrow['debtor_no'], $myrow['branch_code'], $from);
if ($more != 0.0 && $turnover <= (double) $more) {
$printcustomer = false;
}
if ($less != 0.0 && $turnover >= (double) $less) {
$printcustomer = false;
}
}
if ($printcustomer) {
$newrow = 0;
if ($carea != $myrow['description']) {
$rep->fontSize += 2;
$rep->NewLine(2, 7);
$rep->Font('bold');
$rep->TextCol(0, 3, _('Customers in') . " " . $myrow['description']);
$carea = $myrow['description'];
$rep->fontSize -= 2;
$rep->Font();
$rep->NewLine();
}
if ($sman != $myrow['salesman_name']) {
$rep->fontSize += 2;
$rep->NewLine(1, 7);
$rep->Font('bold');
$rep->TextCol(0, 3, $myrow['salesman_name']);
$sman = $myrow['salesman_name'];
$rep->fontSize -= 2;
$rep->Font();
$rep->NewLine();
}
$rep->NewLine();
// Here starts the new report lines 2010-11-02 Joe Hunt
$contacts = get_contacts_for_branch($myrow['branch_code']);
$rep->TextCol(0, 1, $myrow['name']);
$rep->TextCol(1, 2, _('Price List') . ": " . $myrow['sales_type']);
$rep->TextCol(2, 3, $myrow['br_name']);
$rep->NewLine();
$adr = Explode("\n", $myrow['address']);
if ($myrow['br_post_address'] == '') {
$adr2 = Explode("\n", $myrow['br_address']);
} else {
$adr2 = Explode("\n", $myrow['br_post_address']);
}
$count1 = count($adr);
$count2 = count($adr2);
$count1 = max($count1, $count2);
$count1 = max($count1, 4);
if (isset($adr[0])) {
$rep->TextCol(0, 1, $adr[0]);
}
$rep->TextCol(1, 2, _('Currency') . ": " . $myrow['curr_code']);
if (isset($contacts[0])) {
$rep->TextCol(2, 3, $contacts[0]['name'] . " " . $contacts[0]['name2']);
}
if (isset($adr2[0])) {
$rep->TextCol(3, 4, $adr2[0]);
}
$rep->NewLine();
if (isset($adr[1])) {
$rep->TextCol(0, 1, $adr[1]);
}
if ($myrow['dimension_id'] != 0) {
$dim = get_dimension($myrow['dimension_id']);
$rep->TextCol(1, 2, _('Dimension') . ": " . $dim['name']);
}
if (isset($contacts[0])) {
$rep->TextCol(2, 3, _('Ph') . ": " . $contacts[0]['phone']);
}
if (isset($adr2[1])) {
$rep->TextCol(3, 4, $adr2[1]);
}
$rep->NewLine();
if (isset($adr[2])) {
$rep->TextCol(0, 1, $adr[2]);
}
if ($myrow['dimension2_id'] != 0) {
$dim = get_dimension($myrow['dimension2_id']);
$rep->TextCol(1, 2, _('Dimension') . " 2: " . $dim['name']);
}
if ($myrow['notes'] != '') {
$oldrow = $rep->row;
$rep->NewLine();
$rep->TextColLines(1, 2, _("Gereral Notes:") . " " . $myrow['notes'], -2);
$newrow = $rep->row;
$rep->row = $oldrow;
}
if (isset($contacts[0])) {
$rep->TextCol(2, 3, _('Fax') . ": " . $contacts[0]['fax']);
}
if (isset($adr2[2])) {
$rep->TextCol(3, 4, $adr2[2]);
}
if ($more != 0.0 || $less != 0.0) {
$rep->TextCol(1, 2, _('Turnover') . ": " . number_format2($turnover, $dec));
}
for ($i = 3; $i < $count1; $i++) {
$rep->NewLine();
if (isset($adr[$i])) {
$rep->TextCol(0, 1, $adr[$i]);
}
if ($i == 3 && isset($contacts[0]) && isset($contacts[0]['email'])) {
$rep->TextCol(2, 3, _('Email') . ": " . $contacts[0]['email']);
}
if (isset($adr2[$i])) {
$rep->TextCol(3, 4, $adr2[$i]);
}
}
if ($newrow != 0 && $newrow < $rep->row) {
$rep->row = $newrow;
}
$rep->NewLine();
/*
$rep->TextCol(0, 1, $myrow['name']);
$adr = Explode("\n", $myrow['address']);
$count1 = count($adr);
for ($i = 0; $i < $count1; $i++)
$rep->TextCol(0, 1, $adr[$i], 0, ($i + 1) * $rep->lineHeight);
$count1++;
$rep->TextCol(1, 2, _('Price List') . ": " . $myrow['sales_type']);
if ($more != 0.0 || $less != 0.0)
$rep->TextCol(1, 2, _('Turnover') . ": " . number_format2($turnover, $dec), 0, $rep->lineHeight);
$rep->TextCol(2, 3, $myrow['br_name']);
$contacts = get_branch_contacts($myrow['branch_code']);
if (isset($contacts[0]))
{
$rep->TextCol(2, 3, $contacts[0]['name'], 0, $rep->lineHeight);
$rep->TextCol(2, 3, _('Ph') . ": " . $contacts[0]['phone'], 0, 2 * $rep->lineHeight);
$rep->TextCol(2, 3, _('Fax') . ": " . $contacts[0]['fax'], 0, 3 * $rep->lineHeight);
}
$adr = Explode("\n", $myrow['br_address']);
$count2 = count($adr);
for ($i = 0; $i < $count2; $i++)
$rep->TextCol(3, 4, $adr[$i], 0, ($i + 1) * $rep->lineHeight);
//$rep->TextCol(3, 4, $myrow['email'], 0, ($count2 + 1) * $rep->lineHeight);
$count2++;
$count1 = Max($count1, $count2);
$count1 = Max($count1, 4);
$rep->NewLine($count3);
*/
$rep->Line($rep->row + 8);
$rep->NewLine(0, 3);
}
}
$rep->End();
}
function print_po()
{
global $path_to_root, $show_po_item_codes;
include_once $path_to_root . "/reporting/includes/pdf_report.inc";
$from = $_POST['PARAM_0'];
$to = $_POST['PARAM_1'];
$currency = $_POST['PARAM_2'];
$email = $_POST['PARAM_3'];
$comments = $_POST['PARAM_4'];
$orientation = $_POST['PARAM_5'];
if (!$from || !$to) {
return;
}
$orientation = $orientation ? 'L' : 'P';
$dec = user_price_dec();
$cols = array(4, 60, 225, 300, 340, 385, 450, 515);
// $headers in doctext.inc
$aligns = array('left', 'left', 'left', 'right', 'left', 'right', 'right');
$params = array('comments' => $comments);
$cur = get_company_Pref('curr_default');
if ($email == 0) {
$rep = new FrontReport(_('PURCHASE ORDER'), "PurchaseOrderBulk", user_pagesize(), 9, $orientation);
}
if ($orientation == 'L') {
recalculate_cols($cols);
}
for ($i = $from; $i <= $to; $i++) {
$myrow = get_po($i);
$baccount = get_default_bank_account($myrow['curr_code']);
$params['bankaccount'] = $baccount['id'];
if ($email == 1) {
$rep = new FrontReport("", "", user_pagesize(), 9, $orientation);
$rep->title = _('PURCHASE ORDER');
$rep->filename = "PurchaseOrder" . $i . ".pdf";
}
$rep->SetHeaderType('Header2');
$rep->currency = $cur;
$rep->Font();
$rep->Info($params, $cols, null, $aligns);
$contacts = get_supplier_contacts($myrow['supplier_id'], 'order');
$rep->SetCommonData($myrow, null, $myrow, $baccount, ST_PURCHORDER, $contacts);
$rep->NewPage();
$result = get_po_details($i);
$SubTotal = 0;
$items = $prices = array();
while ($myrow2 = db_fetch($result)) {
$data = get_purchase_data($myrow['supplier_id'], $myrow2['item_code']);
if ($data !== false) {
if ($data['supplier_description'] != "") {
$myrow2['description'] = $data['supplier_description'];
}
if ($data['suppliers_uom'] != "") {
$myrow2['units'] = $data['suppliers_uom'];
}
if ($data['conversion_factor'] != 1) {
$myrow2['unit_price'] = round2($myrow2['unit_price'] * $data['conversion_factor'], user_price_dec());
$myrow2['quantity_ordered'] = round2($myrow2['quantity_ordered'] / $data['conversion_factor'], user_qty_dec());
}
}
$Net = round2($myrow2["unit_price"] * $myrow2["quantity_ordered"], user_price_dec());
$prices[] = $Net;
$items[] = $myrow2['item_code'];
$SubTotal += $Net;
$dec2 = 0;
$DisplayPrice = price_decimal_format($myrow2["unit_price"], $dec2);
$DisplayQty = number_format2($myrow2["quantity_ordered"], get_qty_dec($myrow2['item_code']));
$DisplayNet = number_format2($Net, $dec);
if ($show_po_item_codes) {
$rep->TextCol(0, 1, $myrow2['item_code'], -2);
$rep->TextCol(1, 2, $myrow2['description'], -2);
} else {
$rep->TextCol(0, 2, $myrow2['description'], -2);
}
$rep->TextCol(2, 3, sql2date($myrow2['delivery_date']), -2);
$rep->TextCol(3, 4, $DisplayQty, -2);
$rep->TextCol(4, 5, $myrow2['units'], -2);
$rep->TextCol(5, 6, $DisplayPrice, -2);
$rep->TextCol(6, 7, $DisplayNet, -2);
$rep->NewLine(1);
if ($rep->row < $rep->bottomMargin + 15 * $rep->lineHeight) {
$rep->NewPage();
}
}
if ($myrow['comments'] != "") {
$rep->NewLine();
$rep->TextColLines(1, 5, $myrow['comments'], -2);
}
$DisplaySubTot = number_format2($SubTotal, $dec);
$rep->row = $rep->bottomMargin + 15 * $rep->lineHeight;
$doctype = ST_PURCHORDER;
$rep->TextCol(3, 6, _("Sub-total"), -2);
$rep->TextCol(6, 7, $DisplaySubTot, -2);
$rep->NewLine();
$tax_items = get_tax_for_items($items, $prices, 0, $myrow['tax_group_id'], $myrow['tax_included'], null);
$first = true;
foreach ($tax_items as $tax_item) {
if ($tax_item['Value'] == 0) {
continue;
}
$DisplayTax = number_format2($tax_item['Value'], $dec);
$tax_type_name = $tax_item['tax_type_name'];
if ($myrow['tax_included']) {
if (isset($alternative_tax_include_on_docs) && $alternative_tax_include_on_docs == 1) {
if ($first) {
$rep->TextCol(3, 6, _("Total Tax Excluded"), -2);
$rep->TextCol(6, 7, number_format2($sign * $tax_item['net_amount'], $dec), -2);
$rep->NewLine();
}
$rep->TextCol(3, 6, $tax_type_name, -2);
$rep->TextCol(6, 7, $DisplayTax, -2);
$first = false;
} else {
$rep->TextCol(3, 7, _("Included") . " " . $tax_type_name . _("Amount") . ": " . $DisplayTax, -2);
}
} else {
$SubTotal += $tax_item['Value'];
$rep->TextCol(3, 6, $tax_type_name, -2);
$rep->TextCol(6, 7, $DisplayTax, -2);
}
$rep->NewLine();
}
$rep->NewLine();
$DisplayTotal = number_format2($SubTotal, $dec);
$rep->Font('bold');
$rep->TextCol(3, 6, _("TOTAL PO"), -2);
$rep->TextCol(6, 7, $DisplayTotal, -2);
$words = price_in_words($SubTotal, ST_PURCHORDER);
if ($words != "") {
$rep->NewLine(1);
$rep->TextCol(1, 7, $myrow['curr_code'] . ": " . $words, -2);
}
$rep->Font();
if ($email == 1) {
$myrow['DebtorName'] = $myrow['supp_name'];
if ($myrow['reference'] == "") {
$myrow['reference'] = $myrow['order_no'];
}
$rep->End($email);
}
}
if ($email == 0) {
$rep->End();
}
}
function print_invoices()
{
global $path_to_root, $alternative_tax_include_on_docs, $suppress_tax_rates, $no_zero_lines_amount;
include_once $path_to_root . "/reporting/includes/pdf_report.inc";
$from = $_POST['PARAM_0'];
$to = $_POST['PARAM_1'];
$currency = $_POST['PARAM_2'];
$email = $_POST['PARAM_3'];
$pay_service = $_POST['PARAM_4'];
$comments = $_POST['PARAM_5'];
$customer = $_POST['PARAM_6'];
$orientation = $_POST['PARAM_7'];
if (!$from || !$to) {
return;
}
$orientation = $orientation ? 'L' : 'P';
$dec = user_price_dec();
$fno = explode("-", $from);
$tno = explode("-", $to);
$from = min($fno[0], $tno[0]);
$to = max($fno[0], $tno[0]);
$cols = array(-18, 40, 60, 100, 160, 200, 260, 360, 420, 450, 500);
// $headers in doctext.inc
$aligns = array('left', 'left', 'left', 'left', 'right', 'right', 'right', 'right', 'right', 'right', 'right');
//$params = array('comments' => $comments);
$cur = get_company_Pref('curr_default');
$company_data = get_company_prefs();
if ($email == 0) {
$rep = new FrontReport(_('INVOICE'), "InvoiceBulk", user_pagesize(), 9, $orientation);
}
if ($orientation == 'L') {
recalculate_cols($cols);
}
for ($i = $from; $i <= $to; $i++) {
if (!exists_customer_trans(ST_SALESINVOICE, $i)) {
continue;
}
$sign = 1;
$myrow = get_customer_trans($i, ST_SALESINVOICE);
if ($customer && $myrow['debtor_no'] != $customer) {
continue;
}
$baccount = get_default_bank_account($myrow['curr_code']);
$params['bankaccount'] = $baccount['id'];
$branch = get_branch($myrow["branch_code"]);
$sales_order = get_sales_order_header($myrow["order_"], ST_SALESORDER);
if ($email == 1) {
$rep = new FrontReport("", "", user_pagesize(), 9, $orientation);
//$rep->title = _('INVOICE');
$rep->filename = "Invoice" . $myrow['reference'] . ".pdf";
}
$rep->SetHeaderType(0);
$rep->currency = $cur;
$rep->Font();
$rep->Info(null, $cols, null, $aligns);
$salesman = get_imc_code($branch['branch_code']);
$pay_term = get_payment_terms($myrow['payment_terms']);
$branch_data = get_branch_accounts($myrow['branch_code']);
$invoice_no = get_custom_no($myrow['trans_no'], $myrow['type']);
$contact = getContact($myrow['salesman'], $myrow['debtor_no'], $branch['branch_code']);
$cnumber = getContactNumber($myrow['salesman'], $myrow['debtor_no'], $branch['branch_code']);
$rep->NewPage();
$result = get_customer_trans_details(ST_SALESINVOICE, $i);
$SubTotal = 0;
$rep->NewLine(6);
$rep->TextCol(2, 7, $invoice_no);
$rep->TextCol(6, 8, $myrow['TranDate']);
$rep->NewLine();
$rep->TextCol(2, 7, $branch['br_name']);
$rep->TextCol(7, 8, $myrow['bulk_discount'] . "%");
$rep->NewLine();
$rep->TextCol(2, 7, $branch['branch_ref']);
$rep->TextCol(6, 8, $salesman);
$rep->NewLine();
$rep->TextCol(2, 6, $contact . " - " . $cnumber);
if ($pay_term['terms'] == 'C.O.D.' || $pay_term['Cash Only']) {
$rep->TextCol(7, 8, $pay_term['terms'], -2);
} else {
$oldrow = $rep->row;
$newrow = $rep->row;
$rep->TextColLines(7, 9, $pay_term['terms'], -2);
$newrow = $rep->row;
$rep->row = $oldrow;
}
$rep->NewLine();
$oldrow = $rep->row;
$newrow = $rep->row;
$rep->TextColLines(2, 6, $branch['br_address'], -2);
$rep->row = $oldrow;
$rep->NewLine(4);
$rep->Font();
while ($myrow2 = db_fetch($result)) {
if ($myrow2["quantity"] == 0) {
continue;
}
$Net = round2($sign * ((1 - $myrow2["discount_percent"]) * $myrow2["unit_price"] * $myrow2["quantity"]), user_price_dec());
$Net2 = round2($sign * ($myrow2["unit_price"] * $myrow2["quantity"]), user_price_dec());
$SubTotal += $Net;
$DisplayPrice = number_format2($myrow2["unit_price"], 2);
$DisplayQty = number_format2($sign * $myrow2["quantity"], get_qty_dec($myrow2['stock_id']));
$DisplayNet = number_format2($Net, 2);
$dNet = number_format2($Net2, 2);
$oldrow = $rep->row;
$rep->TextColLines(-0.75, 4, $myrow2['StockDescription'], -2);
$newrow = $rep->row;
$rep->row = $oldrow;
if ($Net != 0.0 || !is_service($myrow2['mb_flag']) || !isset($no_zero_lines_amount) || $no_zero_lines_amount == 0) {
$rep->TextCol(4, 5, $DisplayQty . " " . $myrow2['units']);
$rep->TextCol(5, 6, $DisplayPrice, -2);
$rep->TextCol(6, 8, $dNet, -2);
}
$rep->row = $newrow;
if ($rep->row < $rep->bottomMargin + 15 * $rep->lineHeight) {
$rep->NewPage();
}
}
$memo = get_comments_string(ST_SALESINVOICE, $i);
if ($memo != "") {
$rep->NewLine();
$rep->TextColLines(1, 5, $memo, -2);
}
$DisplayNet = number_format2($SubTotal, 2);
$DisplaySubTot = number_format2($SubTotal, 2);
$DisplayTots = number_format2($myrow['Total'], 2);
$DisplayDiscount = number_format2($SubTotal * ($myrow['bulk_discount'] / 100), 2);
$rep->NewLine(3);
$doctype = ST_SALESINVOICE;
$rep->NewLine();
$rep->Font('bold');
$rep->TextCol(6, 7, "TOTAL AMOUNT :");
$rep->TextCol(6, 8, $DisplayNet, -2);
$rep->NewLine();
$rep->TextCol(6, 7, "VOLUME DISCOUNT :");
$rep->TextCol(5, 8, $DisplayDiscount, -2);
$rep->NewLine();
$rep->TextCol(6, 7, _("NET AMOUNT : "), -2);
$rep->TextCol(5, 8, $DisplayTots, -2);
$rep->NewLine();
if ($email == 1) {
$rep->End($email);
}
}
if ($email == 0) {
$rep->End();
}
}
function print_deliveries()
{
global $path_to_root, $packing_slip, $alternative_tax_include_on_docs, $suppress_tax_rates, $no_zero_lines_amount;
include_once $path_to_root . "/reporting/includes/pdf_report.inc";
$from = $_POST['PARAM_0'];
$to = $_POST['PARAM_1'];
$email = $_POST['PARAM_2'];
$packing_slip = $_POST['PARAM_3'];
$comments = $_POST['PARAM_4'];
$orientation = $_POST['PARAM_5'];
if (!$from || !$to) {
return;
}
$orientation = $orientation ? 'L' : 'P';
$dec = user_price_dec();
$fno = explode("-", $from);
$tno = explode("-", $to);
$from = min($fno[0], $tno[0]);
$to = max($fno[0], $tno[0]);
$cols = array(4, 60, 225, 300, 325, 385, 450, 515);
// $headers in doctext.inc
$aligns = array('left', 'left', 'right', 'left', 'right', 'right', 'right');
$params = array('comments' => $comments);
$cur = get_company_Pref('curr_default');
if ($email == 0) {
if ($packing_slip == 0) {
$rep = new FrontReport(_('DELIVERY'), "DeliveryNoteBulk", user_pagesize(), 9, $orientation);
} else {
$rep = new FrontReport(_('PACKING SLIP'), "PackingSlipBulk", user_pagesize(), 9, $orientation);
}
}
if ($orientation == 'L') {
recalculate_cols($cols);
}
for ($i = $from; $i <= $to; $i++) {
if (!exists_customer_trans(ST_CUSTDELIVERY, $i)) {
continue;
}
$myrow = get_customer_trans($i, ST_CUSTDELIVERY);
$branch = get_branch($myrow["branch_code"]);
$sales_order = get_sales_order_header($myrow["order_"], ST_SALESORDER);
// ?
if ($email == 1) {
$rep = new FrontReport("", "", user_pagesize(), 9, $orientation);
if ($packing_slip == 0) {
$rep->title = _('DELIVERY NOTE');
$rep->filename = "Delivery" . $myrow['reference'] . ".pdf";
} else {
$rep->title = _('PACKING SLIP');
$rep->filename = "Packing_slip" . $myrow['reference'] . ".pdf";
}
}
$rep->SetHeaderType('Header2');
$rep->currency = $cur;
$rep->Font();
$rep->Info($params, $cols, null, $aligns);
$contacts = get_branch_contacts($branch['branch_code'], 'delivery', $branch['debtor_no'], true);
$rep->SetCommonData($myrow, $branch, $sales_order, '', ST_CUSTDELIVERY, $contacts);
$rep->NewPage();
$result = get_customer_trans_details(ST_CUSTDELIVERY, $i);
$SubTotal = 0;
while ($myrow2 = db_fetch($result)) {
if ($myrow2["quantity"] == 0) {
continue;
}
$Net = round2((1 - $myrow2["discount_percent"]) * $myrow2["unit_price"] * $myrow2["quantity"], user_price_dec());
$SubTotal += $Net;
$DisplayPrice = number_format2($myrow2["unit_price"], $dec);
$DisplayQty = number_format2($myrow2["quantity"], get_qty_dec($myrow2['stock_id']));
$DisplayNet = number_format2($Net, $dec);
if ($myrow2["discount_percent"] == 0) {
$DisplayDiscount = "";
} else {
$DisplayDiscount = number_format2($myrow2["discount_percent"] * 100, user_percent_dec()) . "%";
}
$rep->TextCol(0, 1, $myrow2['stock_id'], -2);
$oldrow = $rep->row;
$rep->TextColLines(1, 2, $myrow2['StockDescription'], -2);
$newrow = $rep->row;
$rep->row = $oldrow;
if ($Net != 0.0 || !is_service($myrow2['mb_flag']) || !isset($no_zero_lines_amount) || $no_zero_lines_amount == 0) {
$rep->TextCol(2, 3, $DisplayQty, -2);
$rep->TextCol(3, 4, $myrow2['units'], -2);
if ($packing_slip == 0) {
$rep->TextCol(4, 5, $DisplayPrice, -2);
$rep->TextCol(5, 6, $DisplayDiscount, -2);
$rep->TextCol(6, 7, $DisplayNet, -2);
}
}
$rep->row = $newrow;
//$rep->NewLine(1);
if ($rep->row < $rep->bottomMargin + 15 * $rep->lineHeight) {
$rep->NewPage();
}
}
$memo = get_comments_string(ST_CUSTDELIVERY, $i);
if ($memo != "") {
$rep->NewLine();
$rep->TextColLines(1, 5, $memo, -2);
}
$DisplaySubTot = number_format2($SubTotal, $dec);
$DisplayFreight = number_format2($myrow["ov_freight"], $dec);
$rep->row = $rep->bottomMargin + 15 * $rep->lineHeight;
$doctype = ST_CUSTDELIVERY;
if ($packing_slip == 0) {
$rep->TextCol(3, 6, _("Sub-total"), -2);
$rep->TextCol(6, 7, $DisplaySubTot, -2);
$rep->NewLine();
$rep->TextCol(3, 6, _("Shipping"), -2);
$rep->TextCol(6, 7, $DisplayFreight, -2);
$rep->NewLine();
$tax_items = get_trans_tax_details(ST_CUSTDELIVERY, $i);
$first = true;
while ($tax_item = db_fetch($tax_items)) {
if ($tax_item['amount'] == 0) {
continue;
}
$DisplayTax = number_format2($tax_item['amount'], $dec);
if (isset($suppress_tax_rates) && $suppress_tax_rates == 1) {
$tax_type_name = $tax_item['tax_type_name'];
} else {
$tax_type_name = $tax_item['tax_type_name'] . " (" . $tax_item['rate'] . "%) ";
}
if ($tax_item['included_in_price']) {
if (isset($alternative_tax_include_on_docs) && $alternative_tax_include_on_docs == 1) {
if ($first) {
$rep->TextCol(3, 6, _("Total Tax Excluded"), -2);
$rep->TextCol(6, 7, number_format2($tax_item['net_amount'], $dec), -2);
$rep->NewLine();
}
$rep->TextCol(3, 6, $tax_type_name, -2);
$rep->TextCol(6, 7, $DisplayTax, -2);
$first = false;
} else {
$rep->TextCol(3, 7, _("Included") . " " . $tax_type_name . _("Amount") . ": " . $DisplayTax, -2);
}
} else {
$rep->TextCol(3, 6, $tax_type_name, -2);
$rep->TextCol(6, 7, $DisplayTax, -2);
}
$rep->NewLine();
}
$rep->NewLine();
$DisplayTotal = number_format2($myrow["ov_freight"] + $myrow["ov_freight_tax"] + $myrow["ov_gst"] + $myrow["ov_amount"], $dec);
$rep->Font('bold');
$rep->TextCol(3, 6, _("TOTAL DELIVERY INCL. VAT"), -2);
$rep->TextCol(6, 7, $DisplayTotal, -2);
$words = price_in_words($myrow['Total'], ST_CUSTDELIVERY);
if ($words != "") {
$rep->NewLine(1);
$rep->TextCol(1, 7, $myrow['curr_code'] . ": " . $words, -2);
}
$rep->Font();
}
if ($email == 1) {
$rep->End($email);
}
}
if ($email == 0) {
$rep->End();
}
}
function print_check_voucher()
{
global $path_to_root, $systypes_array;
$trans_no = $_POST['PARAM_0'];
$trans_num = $_POST['PARAM_1'];
$cv_no = $_POST['PARAM_2'];
$account = $_POST['PARAM_3'];
$orientation = $_POST['PARAM_4'];
$destination = $_POST['PARAM_5'];
if ($destination) {
include_once $path_to_root . "/reporting/includes/excel_report.inc";
} else {
include_once $path_to_root . "/reporting/includes/pdf_report2.inc";
}
$orientation = $orientation ? 'L' : 'P';
$rep = new FrontReport(_('CHECK VOUCHER'), "CheckVoucher", user_pagesize(), '', $orientation);
$dec = user_price_dec();
$cols = array(0, 30, 50, 125, 175, 200, 265, 285, 360, 425, 460, 542, 550);
$aligns = array('left', 'left', 'left', 'left', 'right', 'right', 'left', 'left', 'right', 'right', 'right');
$rep->SetHeaderType(0);
$rep->Font();
$rep->Info(null, $cols, null, $aligns);
$rep->NewPage();
$ty = explode("-", $trans_no);
$t_type = $ty[1];
if ($t_type != 0) {
$res = get_transaction($trans_no, $t_type);
$res1 = get_heading($trans_no, $t_type);
} else {
$res = get_transaction($trans_no, ST_DISBURSEMENT);
$res1 = get_heading($trans_no, ST_DISBURSEMENT);
}
$myrow = db_fetch($res);
$myrow1 = db_fetch($res1);
$credit = $debit = 0;
//$transtype = ST_DISBURSEMENT;
if ($t_type != 0 || $t_type != '') {
$res2 = get_gl_trans($t_type, $trans_num);
$res3 = get_gl_trans($t_type, $trans_num);
} else {
$res2 = get_gl_trans(ST_DISBURSEMENT, $trans_num);
$res3 = get_gl_trans(ST_DISBURSEMENT, $trans_num);
}
$new_ret = 0;
$return = 0;
//$fiscal = get_year(); //to be use
// $year_no = substr(sql2date($fiscal['begin']), 8); //to be use
// $ser = db_fetch(get_used_series($year_no, $transtype));
// $num = substr($ser['year'], 2);
/* $rep->Font('bold');
$rep->TextCol(7,11, _("ST. MATTHEW'S PUBLISHING CORPORATION"));
$rep->Font();
$rep->NewLine();
$rep->TextCol(7,11, _("Tel. Nos. 426-5611 * 433-5385 Telefax: 426-1274"));
$rep->NewLine(3);
$rep->Font('bold');
$rep->SetFontSize(14);
$rep->TextCol(5,8, _("CHECK VOUCHER"));*/
$rep->NewLine(7);
$rep->SetFontSize(12);
$num = substr($myrow['yearDate'], 2);
$name = payment_person_name($myrow["person_type_id"], $myrow["person_id"]);
$rep->TextCol(2, 6, $name);
$rep->TextCol(9, 11, $num . "-" . str_pad($myrow1['customized_no'], 4, 0, STR_PAD_LEFT));
$rep->NewLine();
if ($myrow1['customized_field'] != 0 || $myrow1['customized_field'] != '') {
$rep->TextCol(0, 4, $myrow1['customized_field']);
} else {
$rep->TextCol(0, 4, _(""));
}
$rep->NewLine(1);
$rep->TextCol(8, 10, $myrow['sqldate']);
$rep->NewLine(5);
// $rep->Line($rep->row - -10);
// $rep->TextCol(4,6, _("PARTICULARS"));
// $rep->TextCol(9,10, _("AMOUNT"));
// $rep->Line($rep->row - 4);
$var = array();
$pos = array();
$neg = array();
$pos_amt = array();
$neg_amt = array();
$tots = 0;
$comment = get_comments_string($cv_no, $trans_num);
while ($myrow2 = db_fetch($res2)) {
$tots = 0;
if (is_bank_account($myrow2['account'])) {
$var = array($myrow2['account']);
$rep->TextCol(1, 8, $comment);
$tots += abs($myrow2['amount']);
}
}
$rep->AmountCol(9, 11, $tots, 2);
$rep->NewLine(2);
// $rep->Line($rep->row - -10);
// $rep->TextCol(1,3, _("DEBIT"));
// $rep->TextCol(7,8, _("CREDIT"));
// $rep->Line($rep->row - 4);
$rep->NewLine(5);
$rep->SetFontSize(12);
while ($myrow3 = db_fetch($res3)) {
$accounts = get_gl_accounts($myrow3['account']);
$account = db_fetch($accounts);
if ($myrow3['amount'] > 0) {
// $rep->Line($rep->row - -10);
//$rep->TextCol(0,4, $account['account_name']);
// $rep->AmountCol(5,6, $myrow3['amount'],2);
// $rep->NewLine();
// $rep->Line($rep->row + 8);
array_push($pos, $account['account_name']);
array_push($pos_amt, $myrow3['amount']);
$debit += $myrow3['amount'];
} else {
array_push($neg, $account['account_name']);
array_push($neg_amt, $myrow3['amount']);
// $rep->Line($rep->row - 4);
// $rep->TextCol(6,8, $account['account_name']);
// $rep->AmountCol(9,11, abs($myrow3['amount']), 2);
// $rep->NewLine();
// $rep->Line($rep->row - 4);
}
}
$result = array_merge($pos, $neg);
$new = array();
for ($i = 0; $i < count($result); $i++) {
$new[] = $pos[$i];
$new[] = $neg[$i];
}
$result2 = array_merge($pos_amt, $neg_amt);
$new2 = array();
for ($j = 0; $j < count($result2); $j++) {
$new2[] = $pos_amt[$j];
$new2[] = $neg_amt[$j];
}
$final_res = array_merge($new, $new2);
$final_array = array();
$final = array();
for ($k = 0; $k < count($final_res); $k++) {
$final[] = $new[$k];
$final[] = $new2[$k];
}
$enter = 0;
for ($i = 0; $i <= count($final_res); $i++) {
//if ($final[$i] != 0)
//{
$rep->TextCol(0, 4, $pos[$i]);
if ($pos_amt[$i] != 0) {
$rep->AmountCol(4, 6, $pos_amt[$i], 2);
}
$rep->TextCol(7, 9, $neg[$i]);
if ($neg_amt[$i] != 0) {
$rep->AmountCol(9, 11, abs($neg_amt[$i]), 2);
}
if ($pos[$i] != "") {
$rep->NewLine();
$enter++;
}
// }
}
$return = 11 - $enter;
//$rep->Line($rep->row - 4);
$rep->NewLine($return);
//$rep->TextCol(0,2, count($final_res));
//$rep->TextCol(4,5, $enter);
//else
// $rep->NewLine($return);
$rep->SetFontSize(10);
// $rep->TextCol(0,2, _("Cash"));
$words = price_in_words($tots, ST_CHEQUE);
$_word = strlen($words);
$first_word = substr($words, 0, 34);
$second_word = substr($words, 34);
// if ($words != "")
// {
//$rep->TextCol(5,7, _("Received the sum of :"));
// $oldrow = $rep->row;
$rep->TextColLines(8, 11, $first_word . "-", -2);
//$newrow = $rep->row;
// $rep->row = $oldrow;
// }
$rep->SetFontSize(10);
$rep->TextCol(1, 3, $myrow1['check_num']);
$tots_dec = price_format($tots);
$rep->TextCol(3, 7, " " . $tots_dec);
$rep->SetFontSize(10);
$rep->TextCol(7, 11, $second_word);
//$rep->TextCol(7,10, _("as payment of the above particulars."));
$rep->NewLine();
$rep->SetFontSize(10);
//$rep->TextCol(0,10, _("Bank/Branch: "));
foreach ($var as $vars) {
// $bank_name = get_bank_name($vars);
$rep->TextCol(2, 10, get_bank_name($vars) . " ");
}
// $rep->TextCol(1,5, $myrow['bank_address']);
$rep->TextCol(7, 9, " " . $tots_dec);
$rep->End();
}
