Пример #1
0
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();
    }
}
Пример #2
0
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();
    }
}
Пример #3
0
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();
    }
}
Пример #4
0
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();
    }
}
Пример #5
0
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();
    }
}
Пример #6
0
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();
    }
}
Пример #7
0
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();
    }
}
Пример #8
0
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();
    }
}
Пример #9
0
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();
    }
}
Пример #10
0
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();
    }
}
Пример #11
0
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();
    }
}
Пример #12
0
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();
    }
}
Пример #13
0
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();
}
Пример #14
0
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();
    }
}
Пример #15
0
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();
    }
}
Пример #16
0
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);
    }
}