PHP FrontReport::TextColLines方法代码示例

function print_po()
{
    global $path_to_root;
    include_once $path_to_root . "reporting/includes/pdf_report.inc";
    $from = $_REQUEST['PARAM_0'];
    $to = $_REQUEST['PARAM_1'];
    $currency = $_REQUEST['PARAM_2'];
    $bankaccount = $_REQUEST['PARAM_3'];
    $email = $_REQUEST['PARAM_4'];
    $comments = $_REQUEST['PARAM_5'];
    if ($from == null) {
        $from = 0;
    }
    if ($to == null) {
        $to = 0;
    }
    $dec = user_price_dec();
    $cols = array(4, 60, 225, 300, 325, 385, 450, 515);
    // $headers in doctext.inc
    $aligns = array('left', 'left', 'left', 'left', 'right', 'right', 'right');
    $params = array('comments' => $comments, 'bankaccount' => $bankaccount);
    $baccount = get_bank_account($params['bankaccount']);
    $cur = get_company_Pref('curr_default');
    if ($email == 0) {
        $rep = new FrontReport(tr('PURCHASE ORDER'), "PurchaseOrderBulk.pdf", user_pagesize());
        $rep->currency = $cur;
        $rep->Font();
        $rep->Info($params, $cols, null, $aligns);
    }
    for ($i = $from; $i <= $to; $i++) {
        $myrow = get_po($i);
        if ($email == 1) {
            $rep = new FrontReport("", "", user_pagesize());
            $rep->currency = $cur;
            $rep->Font();
            $rep->title = tr('PURCHASE ORDER');
            $rep->filename = "PurchaseOrder" . $i . ".pdf";
            $rep->Info($params, $cols, null, $aligns);
        } else {
            $rep->title = tr('PURCHASE ORDER');
        }
        $rep->Header2($myrow, null, $myrow, $baccount, 8);
        $result = get_po_details($i);
        $SubTotal = 0;
        while ($myrow2 = db_fetch($result)) {
            $Net = round($myrow2["unit_price"] * $myrow2["quantity_ordered"], user_price_dec());
            $SubTotal += $Net;
            $DisplayPrice = number_format2($myrow2["unit_price"], $dec);
            $DisplayQty = number_format2($myrow2["quantity_ordered"], user_qty_dec());
            $DisplayNet = number_format2($Net, $dec);
            //$rep->TextCol(0, 1,	$myrow2['item_code'], -2);
            $rep->TextCol(0, 2, $myrow2['description'], -2);
            $rep->TextCol(2, 3, $myrow2['delivery_date'], -2);
            $rep->TextCol(3, 4, $DisplayQty, -2);
            $rep->TextCol(4, 5, $myrow2['units'], -2);
            $rep->TextCol(5, 6, $DisplayPrice, -2);
            $rep->TextCol(6, 7, $DisplayNet, -2);
            $rep->NewLine(1);
            if ($rep->row < $rep->bottomMargin + 15 * $rep->lineHeight) {
                $rep->Header2($myrow, $branch, $sales_order, $baccount);
            }
        }
        if ($myrow['comments'] != "") {
            $rep->NewLine();
            $rep->TextColLines(1, 5, $myrow['comments'], -2);
        }
        $DisplaySubTot = number_format2($SubTotal, $dec);
        $rep->row = $rep->bottomMargin + 15 * $rep->lineHeight;
        $linetype = true;
        $doctype = 8;
        if ($rep->currency != $myrow['curr_code']) {
            include $path_to_root . "reporting/includes/doctext2.inc";
        } else {
            include $path_to_root . "reporting/includes/doctext.inc";
        }
        $rep->TextCol(3, 6, $doc_Sub_total, -2);
        $rep->TextCol(6, 7, $DisplaySubTot, -2);
        $rep->NewLine();
        $DisplayTotal = number_format2($SubTotal, $dec);
        $rep->Font('bold');
        $rep->TextCol(3, 6, $doc_TOTAL_PO, -2);
        $rep->TextCol(6, 7, $DisplayTotal, -2);
        $rep->Font();
        if ($email == 1) {
            $myrow['contact_email'] = $myrow['email'];
            $myrow['DebtorName'] = $myrow['supp_name'];
            $myrow['reference'] = $myrow['order_no'];
            $rep->End($email, $doc_Order_no . " " . $myrow['reference'], $myrow);
        }
    }
    if ($email == 0) {
        $rep->End();
    }
}

function print_remittances()
{
    global $path_to_root, $systypes_array;
    include_once $path_to_root . "/reporting/includes/pdf_report.inc";
    $from = $_POST['PARAM_0'];
    $to = $_POST['PARAM_1'];
    $currency = $_POST['PARAM_2'];
    $email = $_POST['PARAM_3'];
    $comments = $_POST['PARAM_4'];
    $orientation = $_POST['PARAM_5'];
    if (!$from || !$to) {
        return;
    }
    $orientation = $orientation ? 'L' : 'P';
    $dec = user_price_dec();
    $fno = explode("-", $from);
    $tno = explode("-", $to);
    $from = min($fno[0], $tno[0]);
    $to = max($fno[0], $tno[0]);
    $cols = array(4, 85, 150, 225, 275, 360, 450, 515);
    // $headers in doctext.inc
    $aligns = array('left', 'left', 'left', 'left', 'right', 'right', 'right');
    $params = array('comments' => $comments);
    $cur = get_company_Pref('curr_default');
    if ($email == 0) {
        $rep = new FrontReport(_('REMITTANCE'), "RemittanceBulk", user_pagesize(), 9, $orientation);
    }
    if ($orientation == 'L') {
        recalculate_cols($cols);
    }
    for ($i = $from; $i <= $to; $i++) {
        if ($fno[0] == $tno[0]) {
            $types = array($fno[1]);
        } else {
            $types = array(ST_BANKPAYMENT, ST_SUPPAYMENT, ST_SUPPCREDIT);
        }
        foreach ($types as $j) {
            $myrow = get_remittance($j, $i);
            if (!$myrow) {
                continue;
            }
            $res = get_bank_trans($j, $i);
            $baccount = db_fetch($res);
            $params['bankaccount'] = $baccount['bank_act'];
            if ($email == 1) {
                $rep = new FrontReport("", "", user_pagesize(), 9, $orientation);
                $rep->title = _('REMITTANCE');
                $rep->filename = "Remittance" . $i . ".pdf";
            }
            $rep->SetHeaderType('Header2');
            $rep->currency = $cur;
            $rep->Font();
            $rep->Info($params, $cols, null, $aligns);
            $contacts = get_supplier_contacts($myrow['supplier_id'], 'invoice');
            $rep->SetCommonData($myrow, null, $myrow, $baccount, ST_SUPPAYMENT, $contacts);
            $rep->NewPage();
            $result = get_allocations_for_remittance($myrow['supplier_id'], $myrow['type'], $myrow['trans_no']);
            $doctype = ST_SUPPAYMENT;
            $total_allocated = 0;
            $rep->TextCol(0, 4, _("As advance / full / part / payment towards:"), -2);
            $rep->NewLine(2);
            while ($myrow2 = db_fetch($result)) {
                $rep->TextCol(0, 1, $systypes_array[$myrow2['type']], -2);
                $rep->TextCol(1, 2, $myrow2['supp_reference'], -2);
                $rep->TextCol(2, 3, sql2date($myrow2['tran_date']), -2);
                $rep->TextCol(3, 4, sql2date($myrow2['due_date']), -2);
                $rep->AmountCol(4, 5, $myrow2['Total'], $dec, -2);
                $rep->AmountCol(5, 6, $myrow2['Total'] - $myrow2['alloc'], $dec, -2);
                $rep->AmountCol(6, 7, $myrow2['amt'], $dec, -2);
                $total_allocated += $myrow2['amt'];
                $rep->NewLine(1);
                if ($rep->row < $rep->bottomMargin + 15 * $rep->lineHeight) {
                    $rep->NewPage();
                }
            }
            $memo = get_comments_string($j, $i);
            if ($memo != "") {
                $rep->NewLine();
                $rep->TextColLines(1, 5, $memo, -2);
            }
            $rep->row = $rep->bottomMargin + 16 * $rep->lineHeight;
            $rep->TextCol(3, 6, _("Total Allocated"), -2);
            $rep->AmountCol(6, 7, $total_allocated, $dec, -2);
            $rep->NewLine();
            $rep->TextCol(3, 6, _("Left to Allocate"), -2);
            $myrow['Total'] *= -1;
            $myrow['ov_discount'] *= -1;
            $rep->AmountCol(6, 7, $myrow['Total'] + $myrow['ov_discount'] - $total_allocated, $dec, -2);
            if (floatcmp($myrow['ov_discount'], 0)) {
                $rep->NewLine();
                $rep->TextCol(3, 6, _("Discount"), -2);
                $rep->AmountCol(6, 7, -$myrow['ov_discount'], $dec, -2);
            }
            $rep->NewLine();
            $rep->Font('bold');
            $rep->TextCol(3, 6, _("TOTAL REMITTANCE"), -2);
            $rep->AmountCol(6, 7, $myrow['Total'], $dec, -2);
            $words = price_in_words($myrow['Total'], ST_SUPPAYMENT);
            if ($words != "") {
                $rep->NewLine(2);
//.........这里部分代码省略.........

function print_voucher()
{
    global $path_to_root, $systypes_array;
    $dim = get_company_pref('use_dimension');
    $dimension = $dimension2 = 0;
    $voucher_no = $_POST['PARAM_0'];
    $to = $_POST['PARAM_1'];
    $destination = $_POST['PARAM_2'];
    if ($destination) {
        include_once $path_to_root . "/reporting/includes/excel_report.inc";
    } else {
        include_once $path_to_root . "/reporting/includes/pdf_report2.inc";
    }
    $orientation = $orientation ? 'L' : 'P';
    $rep = new FrontReport(_('COMMISSION VOUCHER'), "CommissionVoucherReport", user_pagesize(), 9, $orientation);
    $dec = user_price_dec();
    $cols = array(-15, 20, 40, 60, 90, 150, 200, 225, 220, 465, 525);
    //------------0--1---2---3----4----5----6----7----8----9----10-------
    //-----------------------dim1-dim2-----------------------------------
    //-----------------------dim1----------------------------------------
    //-------------------------------------------------------------------
    $aligns = array('left', 'left', 'left', 'left', 'left', 'right', 'right', 'right', 'right', 'right', 'right');
    $headers = array('', _('Commission Voucher'), '', '', '', '', '');
    if ($orientation == 'L') {
        recalculate_cols($cols);
    }
    $rep->SetHeaderType(0);
    $rep->Font();
    $rep->Info(null, $cols, null, $aligns);
    $rep->NewPage();
    $res = get_transaction($voucher_no);
    $myrow = db_fetch($res);
    $salesman = get_salesman_name($myrow['imc']);
    $client = get_customer_name($myrow['client']);
    $rep->Font('bold');
    // $rep->TextCol(4,8, _("ST. MATTHEW'S PUBLISHING CORPORATION"));
    $rep->Font();
    $rep->NewLine();
    // $rep->TextCol(4,8, _("Tel. Nos. 426-5611 * 433-5385 Telefax: 426-1274"));
    $rep->NewLine(5);
    $rep->Font('bold');
    $rep->SetFontSize(14);
    //$rep->TextCol(0,3, _("COMMISSION VOUCHER"));
    $rep->Font();
    $rep->SetFontSize(10);
    $rep->NewLine(4);
    $netgross = $myrow['gross'] * ($myrow['commission'] / 100);
    //$rep->TextCol(8,9, _("Date:"));
    $rep->TextCol(5, 6, $myrow['Dated']);
    $year = substr($myrow['dateYear'], 2);
    $rep->TextCol(6, 7, $year);
    $rep->NewLine(1);
    $rep->TextCol(1, 4, $salesman);
    $rep->NewLine(3);
    //$rep->Line($rep->row  - -10);
    //$rep->TextCol(2,5, _("EXPLANATION"));
    //$rep->TextCol(8,9, _("AMOUNT"));
    // $rep->Line($rep->row  - 4);
    $rep->NewLine(2);
    $rep->SetFontSize('8');
    $oldrow = $rep->row;
    $rep->TextColLines(2, 5, $client);
    $newrow = $rep->row;
    $rep->row = $oldrow;
    $rep->NewLine(3);
    $rep->SetFontSize('10');
    //$rep->TextCol(8,9, _("Gross: "));
    $rep->AmountCol(5, 7, $netgross, 2);
    $rep->NewLine(1);
    $rep->TextCol(2, 4, $myrow['commission']);
    $rep->AmountCol(5, 7, $myrow['with_tax'], 2);
    $rep->NewLine(2);
    $rep->TextCol(2, 4, $myrow['invoice_no']);
    $rep->NewLine(4);
    $rep->Font('bold');
    $rep->AmountCol(5, 7, $myrow['net_commission'], 2);
    $rep->NewLine();
    // $rep->Line($rep->row  - 4);
    // $rep->Line($rep->row  - 8);
    $rep->NewLine(3);
    $rep->Font();
    $rep->SetFontSize('9');
    //$rep->TextCol(1,4, _("Approved by:"));
    // $rep->TextCol(5,8, _("Received payment by:"));
    $rep->NewLine(2);
    $rep->TextCol(2, 4, _("Checked by:"));
    $rep->End();
}

function print_invoices()
{
    global $path_to_root, $alternative_tax_include_on_docs, $suppress_tax_rates, $no_zero_lines_amount;
    include_once $path_to_root . "/reporting/includes/pdf_report.inc";
    $from = $_POST['PARAM_0'];
    $to = $_POST['PARAM_1'];
    $currency = $_POST['PARAM_2'];
    $email = $_POST['PARAM_3'];
    $pay_service = $_POST['PARAM_4'];
    $comments = $_POST['PARAM_5'];
    $customer = $_POST['PARAM_6'];
    $orientation = $_POST['PARAM_7'];
    if (!$from || !$to) {
        return;
    }
    $orientation = $orientation ? 'L' : 'P';
    $dec = user_price_dec();
    $fno = explode("-", $from);
    $tno = explode("-", $to);
    $from = min($fno[0], $tno[0]);
    $to = max($fno[0], $tno[0]);
    $cols = array(-15, 10, 30, 50, 80, 240, 300, 340, 360, 400);
    // $headers in doctext.inc
    $aligns = array('right', 'left', 'left', 'left', 'left', 'left', 'right', 'right', 'right', 'right');
    $params = array('comments' => $comments);
    $cur = get_company_Pref('curr_default');
    if ($email == 0) {
        $rep = new FrontReport(_('INVOICE'), "InvoiceBulk", user_pagesize(), 9, $orientation);
    }
    if ($orientation == 'L') {
        recalculate_cols($cols);
    }
    for ($i = $from; $i <= $to; $i++) {
        if (!exists_customer_trans(ST_SALESINVOICE, $i)) {
            continue;
        }
        $sign = 1;
        $myrow = get_customer_trans($i, ST_SALESINVOICE);
        if ($customer && $myrow['debtor_no'] != $customer) {
            continue;
        }
        $baccount = get_default_bank_account($myrow['curr_code']);
        $params['bankaccount'] = $baccount['id'];
        $branch = get_branch($myrow["branch_code"]);
        $salesm = get_salesman_name($branch['salesman']);
        $sales_order = get_sales_order_header($myrow["order_"], ST_SALESORDER);
        if ($email == 1) {
            $rep = new FrontReport("", "", user_pagesize(), 9, $orientation);
            $rep->title = _('INVOICE');
            $rep->filename = "Invoice" . $myrow['reference'] . ".pdf";
        }
        $rep->SetHeaderType(0);
        $rep->currency = $cur;
        $rep->Font();
        $rep->Info(null, $cols, null, $aligns);
        $contacts = get_branch_contacts($branch['branch_code'], 'invoice', $branch['debtor_no'], true);
        $baccount['payment_service'] = $pay_service;
        $rep->SetCommonData($myrow, $branch, $sales_order, $baccount, ST_SALESINVOICE, $contacts);
        $rep->NewPage();
        $result = get_customer_trans_details(ST_SALESINVOICE, $i);
        $SubTotal = 0;
        $invoice_no = get_custom_no($myrow['trans_no'], ST_SALESINVOICE);
        $rep->NewLine(5);
        $rep->TextCol(2, 5, $branch['br_name']);
        $rep->TextCol(7, 9, $myrow['TranDate']);
        $rep->NewLine();
        $rep->TextCol(2, 10, $branch['br_address']);
        $rep->TextCol(7, 9, "SI - " . $invoice_no);
        $rep->NewLine();
        $rep->TextCol(0, 2, "Contact: ");
        $rep->TextCol(2, 5, $contacts["name"] . $contacts["name2"]);
        $rep->TextCol(6, 9, "IMC: " . $salesm);
        $rep->NewLine();
        $rep->TextCol(2, 5, "");
        $rep->NewLine();
        $rep->TextCol(2, 5, "");
        $rep->NewLine(3);
        //$rep->NewLine(2);
        $ent = 0;
        while ($myrow2 = db_fetch($result)) {
            if ($myrow2["quantity"] == 0) {
                continue;
            }
            $Net = round2($sign * ((1 - $myrow2["discount_percent"]) * $myrow2["unit_price"] * $myrow2["quantity"]), user_price_dec());
            $SubTotal += $Net;
            $DisplayPrice = number_format2($myrow2["unit_price"], 2);
            $DisplayQty = number_format2($sign * $myrow2["quantity"], get_qty_dec($myrow2['stock_id']));
            $DisplayNet = number_format2($Net, 2);
            if ($myrow2["discount_percent"] == 0) {
                $DisplayDiscount = "";
            } else {
                $DisplayDiscount = number_format2($myrow2["discount_percent"] * 100, 2) . "%";
            }
            //$rep->TextCol(3, 4,	$myrow2['stock_id'], -2);
            $oldrow = $rep->row;
            $rep->TextColLines(4, 6, $myrow2['StockDescription'], -2);
            $newrow = $rep->row;
            $rep->row = $oldrow;
            $ent++;
            if ($Net != 0.0 || !is_service($myrow2['mb_flag']) || !isset($no_zero_lines_amount) || $no_zero_lines_amount == 0) {
//.........这里部分代码省略.........

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);
        }
//.........这里部分代码省略.........

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);
        }
//.........这里部分代码省略.........

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);
//.........这里部分代码省略.........

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'] . "%) ";
//.........这里部分代码省略.........

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->Font();
    $rep->Info($params, $cols, $headers, $aligns);
    $rep->NewPage();
    $result = get_supplier_details_for_report();
    while ($myrow = db_fetch($result)) {
        $printsupplier = true;
        if ($more != '' || $less != '') {
            $turnover = getTransactions($myrow['supplier_id'], $from);
            if ($more != 0.0 && $turnover <= (double) $more) {
                $printsupplier = false;
            }
            if ($less != 0.0 && $turnover >= (double) $less) {
                $printsupplier = false;
            }
        }
        if ($printsupplier) {
            $newrow = 0;
            $rep->NewLine();
            // Here starts the new report lines 2013-01-28 Joe Hunt
            $contacts = get_supplier_contacts($myrow['supplier_id']);
            $rep->TextCol(0, 1, $myrow['supp_name']);
            $rep->TextCol(1, 2, _('Tax_Id') . ": " . $myrow['gst_no']);
            $rep->TextCol(2, 3, $myrow['contact']);
            $rep->NewLine();
            $adr = Explode("\n", $myrow['address']);
            $adr2 = Explode("\n", $myrow['supp_address']);
            $count1 = count($adr);
            $count2 = count($adr2);
            $count1 = max($count1, $count2);
            $count1 = max($count1, 4);
            if (isset($adr[0])) {
                $rep->TextCol(0, 1, $adr[0]);
            }
            $rep->TextCol(1, 2, _('Currency') . ": " . $myrow['curr_code']);
            if (isset($contacts[0])) {
                $rep->TextCol(2, 3, $contacts[0]['name'] . " " . $contacts[0]['name2']);
            }
            if (isset($adr2[0])) {
                $rep->TextCol(3, 4, $adr2[0]);
            }
            $rep->NewLine();
            if (isset($adr[1])) {
                $rep->TextCol(0, 1, $adr[1]);
            }
            if ($myrow['dimension_id'] != 0) {
                $dim = get_dimension($myrow['dimension_id']);
                $rep->TextCol(1, 2, _('Dimension') . ": " . $dim['name']);
            }
            if (isset($contacts[0])) {
                $rep->TextCol(2, 3, _('Ph') . ": " . $contacts[0]['phone']);
            }
            if (isset($adr2[1])) {
                $rep->TextCol(3, 4, $adr2[1]);
            }
            $rep->NewLine();
            if (isset($adr[2])) {
                $rep->TextCol(0, 1, $adr[2]);
            }
            if ($myrow['dimension2_id'] != 0) {
                $dim = get_dimension($myrow['dimension2_id']);
                $rep->TextCol(1, 2, _('Dimension') . " 2: " . $dim['name']);
            }
            if ($myrow['notes'] != '') {
                $oldrow = $rep->row;
                $rep->NewLine();
                $rep->TextColLines(1, 2, _("Gereral Notes:") . " " . $myrow['notes'], -2);
                $newrow = $rep->row;
                $rep->row = $oldrow;
            }
            if (isset($contacts[0])) {
                $rep->TextCol(2, 3, _('Fax') . ": " . $contacts[0]['fax']);
            }
            if (isset($adr2[2])) {
                $rep->TextCol(3, 4, $adr2[2]);
            }
            if ($more != 0.0 || $less != 0.0) {
                $rep->TextCol(1, 2, _('Turnover') . ": " . number_format2($turnover, $dec));
            }
            for ($i = 3; $i < $count1; $i++) {
                $rep->NewLine();
                if (isset($adr[$i])) {
                    $rep->TextCol(0, 1, $adr[$i]);
                }
                if ($i == 3 && isset($contacts[0]) && isset($contacts[0]['email'])) {
                    $rep->TextCol(2, 3, _('Email') . ": " . $contacts[0]['email']);
                }
                if (isset($adr2[$i])) {
                    $rep->TextCol(3, 4, $adr2[$i]);
                }
            }
            if ($newrow != 0 && $newrow < $rep->row) {
                $rep->row = $newrow;
            }
            $rep->NewLine();
            $rep->Line($rep->row + 8);
            $rep->NewLine(0, 3);
        }
    }
    $rep->End();
}

function print_workorders()
{
    global $path_to_root, $SysPrefs, $dflt_lang;
    include_once $path_to_root . "/reporting/includes/pdf_report.inc";
    $from = $_POST['PARAM_0'];
    $to = $_POST['PARAM_1'];
    $email = $_POST['PARAM_2'];
    $comments = $_POST['PARAM_3'];
    $orientation = $_POST['PARAM_4'];
    if (!$from || !$to) {
        return;
    }
    $orientation = $orientation ? 'L' : 'P';
    $fno = explode("-", $from);
    $tno = explode("-", $to);
    $from = min($fno[0], $tno[0]);
    $to = max($fno[0], $tno[0]);
    $cols = array(4, 60, 190, 255, 320, 385, 450, 515);
    // $headers in doctext.inc
    $aligns = array('left', 'left', 'left', 'left', 'right', 'right', 'right');
    $params = array('comments' => $comments);
    $cur = get_company_Pref('curr_default');
    if ($email == 0) {
        $rep = new FrontReport(_('WORK ORDER'), "WorkOrderBulk", user_pagesize(), 9, $orientation);
    }
    if ($orientation == 'L') {
        recalculate_cols($cols);
    }
    for ($i = $from; $i <= $to; $i++) {
        $myrow = get_work_order($i);
        if ($myrow === false) {
            continue;
        }
        $date_ = sql2date($myrow["date_"]);
        if ($email == 1) {
            $rep = new FrontReport("", "", user_pagesize(), 9, $orientation);
            $rep->title = _('WORK ORDER');
            $rep->filename = "WorkOrder" . $myrow['wo_ref'] . ".pdf";
        }
        $rep->SetHeaderType('Header2');
        $rep->currency = $cur;
        $rep->Font();
        $rep->Info($params, $cols, null, $aligns);
        $contact = array('email' => $myrow['email'], 'lang' => $dflt_lang, 'name' => $myrow['contact'], 'name2' => '', 'contact');
        $rep->SetCommonData($myrow, null, null, '', 26, $contact);
        $rep->NewPage();
        $result = get_wo_requirements($i);
        $rep->TextCol(0, 5, _("Work Order Requirements"), -2);
        $rep->NewLine(2);
        $has_marked = false;
        while ($myrow2 = db_fetch($result)) {
            $qoh = 0;
            $show_qoh = true;
            // if it's a non-stock item (eg. service) don't show qoh
            if (!has_stock_holding($myrow2["mb_flag"])) {
                $show_qoh = false;
            }
            if ($show_qoh) {
                $qoh = get_qoh_on_date($myrow2["stock_id"], $myrow2["loc_code"], $date_);
            }
            if ($show_qoh && $myrow2["units_req"] * $myrow["units_issued"] > $qoh && !$SysPrefs->allow_negative_stock()) {
                // oops, we don't have enough of one of the component items
                $has_marked = true;
            } else {
                $has_marked = false;
            }
            if ($has_marked) {
                $str = $myrow2['stock_id'] . " ***";
            } else {
                $str = $myrow2['stock_id'];
            }
            $rep->TextCol(0, 1, $str, -2);
            $rep->TextCol(1, 2, $myrow2['description'], -2);
            $rep->TextCol(2, 3, $myrow2['location_name'], -2);
            $rep->TextCol(3, 4, $myrow2['WorkCentreDescription'], -2);
            $dec = get_qty_dec($myrow2["stock_id"]);
            $rep->AmountCol(4, 5, $myrow2['units_req'], $dec, -2);
            $rep->AmountCol(5, 6, $myrow2['units_req'] * $myrow['units_issued'], $dec, -2);
            $rep->AmountCol(6, 7, $myrow2['units_issued'], $dec, -2);
            $rep->NewLine(1);
            if ($rep->row < $rep->bottomMargin + 15 * $rep->lineHeight) {
                $rep->NewPage();
            }
        }
        $rep->NewLine(1);
        $rep->TextCol(0, 5, " *** = " . _("Insufficient stock"), -2);
        $memo = get_comments_string(ST_WORKORDER, $i);
        if ($memo != "") {
            $rep->NewLine();
            $rep->TextColLines(1, 5, $memo, -2);
        }
        if ($email == 1) {
            $myrow['DebtorName'] = $myrow['contact'];
            $myrow['reference'] = $myrow['wo_ref'];
            $rep->End($email);
        }
    }
    if ($email == 0) {
        $rep->End();
    }
//.........这里部分代码省略.........

//.........这里部分代码省略.........
            $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);

function print_list_of_journal_entries()
{
    global $path_to_root, $systypes_array;
    $from = $_POST['PARAM_0'];
    $to = $_POST['PARAM_1'];
    $systype = $_POST['PARAM_2'];
    $comments = $_POST['PARAM_3'];
    $orientation = $_POST['PARAM_4'];
    $destination = $_POST['PARAM_5'];
    if ($destination) {
        include_once $path_to_root . "/reporting/includes/excel_report.inc";
    } else {
        include_once $path_to_root . "/reporting/includes/pdf_report.inc";
    }
    $orientation = $orientation ? 'L' : 'P';
    $dec = user_price_dec();
    $cols = array(0, 100, 240, 300, 400, 460, 520, 580);
    $headers = array(_('Type/Account'), _('Reference') . '/' . _('Account Name'), _('Date/Dim.'), _('Person/Item/Memo'), _('Debit'), _('Credit'));
    $aligns = array('left', 'left', 'left', 'left', 'right', 'right');
    $params = array(0 => $comments, 1 => array('text' => _('Period'), 'from' => $from, 'to' => $to), 2 => array('text' => _('Type'), 'from' => $systype == -1 ? _('All') : $systypes_array[$systype], 'to' => ''));
    $rep = new FrontReport(_('List of Journal Entries'), "JournalEntries", user_pagesize(), 9, $orientation);
    if ($orientation == 'L') {
        recalculate_cols($cols);
    }
    $rep->Font();
    $rep->Info($params, $cols, $headers, $aligns);
    $rep->NewPage();
    if ($systype == -1) {
        $systype = null;
    }
    $trans = get_gl_transactions($from, $to, -1, null, 0, 0, $systype);
    $typeno = $type = 0;
    $debit = $credit = 0.0;
    $totdeb = $totcre = 0.0;
    while ($myrow = db_fetch($trans)) {
        if ($type != $myrow['type'] || $typeno != $myrow['type_no']) {
            if ($typeno != 0) {
                $rep->Line($rep->row += 6);
                $rep->NewLine();
                $rep->AmountCol(4, 5, $debit, $dec);
                $rep->AmountCol(5, 6, abs($credit), $dec);
                $totdeb += $debit;
                $totcre += $credit;
                $debit = $credit = 0.0;
                $rep->Line($rep->row -= 4);
                $rep->NewLine();
            }
            $typeno = $myrow['type_no'];
            $type = $myrow['type'];
            $TransName = $systypes_array[$myrow['type']];
            $rep->TextCol(0, 1, $TransName . " # " . $myrow['type_no']);
            $rep->TextCol(1, 2, get_reference($myrow['type'], $myrow['type_no']));
            $rep->DateCol(2, 3, $myrow['tran_date'], true);
            $coms = payment_person_name($myrow["person_type_id"], $myrow["person_id"]);
            $memo = get_comments_string($myrow['type'], $myrow['type_no']);
            if ($memo != '') {
                if ($coms == "") {
                    $coms = $memo;
                } else {
                    $coms .= " / " . $memo;
                }
            }
            $rep->TextColLines(3, 6, $coms);
            $rep->NewLine();
        }
        $rep->TextCol(0, 1, $myrow['account']);
        $rep->TextCol(1, 2, $myrow['account_name']);
        $dim_str = get_dimension_string($myrow['dimension_id']);
        $dim_str2 = get_dimension_string($myrow['dimension2_id']);
        if ($dim_str2 != "") {
            $dim_str .= "/" . $dim_str2;
        }
        $rep->TextCol(2, 3, $dim_str);
        $rep->TextCol(3, 4, $myrow['memo_']);
        if ($myrow['amount'] > 0.0) {
            $debit += $myrow['amount'];
            $rep->AmountCol(4, 5, abs($myrow['amount']), $dec);
        } else {
            $credit += $myrow['amount'];
            $rep->AmountCol(5, 6, abs($myrow['amount']), $dec);
        }
        $rep->NewLine(1, 2);
    }
    if ($typeno != 0) {
        $rep->Line($rep->row += 6);
        $rep->NewLine();
        $rep->AmountCol(4, 5, $debit, $dec);
        $rep->AmountCol(5, 6, abs($credit), $dec);
        $totdeb += $debit;
        $totcre += $credit;
        $rep->Line($rep->row -= 4);
        $rep->NewLine();
        $rep->TextCol(0, 4, _("Total"));
        $rep->AmountCol(4, 5, $totdeb, $dec);
        $rep->AmountCol(5, 6, abs($totcre), $dec);
        $rep->Line($rep->row -= 4);
    }
    $rep->End();
}

function print_sales_orders()
{
    global $path_to_root, $print_as_quote, $no_zero_lines_amount;
    include_once $path_to_root . "/reporting/includes/pdf_report.inc";
    $from = $_POST['PARAM_0'];
    $to = $_POST['PARAM_1'];
    $currency = $_POST['PARAM_2'];
    $email = $_POST['PARAM_3'];
    $print_as_quote = $_POST['PARAM_4'];
    $comments = $_POST['PARAM_5'];
    $orientation = $_POST['PARAM_6'];
    if (!$from || !$to) {
        return;
    }
    $orientation = $orientation ? 'L' : 'P';
    $dec = user_price_dec();
    $cols = array(4, 60, 225, 300, 325, 385, 450, 515);
    // $headers in doctext.inc
    $aligns = array('left', 'left', 'right', 'left', 'right', 'right', 'right');
    $params = array('comments' => $comments);
    $cur = get_company_Pref('curr_default');
    if ($email == 0) {
        if ($print_as_quote == 0) {
            $rep = new FrontReport(_("SALES ORDER"), "SalesOrderBulk", user_pagesize(), 9, $orientation);
        } else {
            $rep = new FrontReport(_("QUOTE"), "QuoteBulk", user_pagesize(), 9, $orientation);
        }
    }
    if ($orientation == 'L') {
        recalculate_cols($cols);
    }
    for ($i = $from; $i <= $to; $i++) {
        $myrow = get_sales_order_header($i, ST_SALESORDER);
        $baccount = get_default_bank_account($myrow['curr_code']);
        $params['bankaccount'] = $baccount['id'];
        $branch = get_branch($myrow["branch_code"]);
        if ($email == 1) {
            $rep = new FrontReport("", "", user_pagesize(), 9, $orientation);
            if ($print_as_quote == 1) {
                $rep->title = _('QUOTE');
                $rep->filename = "Quote" . $i . ".pdf";
            } else {
                $rep->title = _("SALES ORDER");
                $rep->filename = "SalesOrder" . $i . ".pdf";
            }
        } else {
            $rep->title = $print_as_quote == 1 ? _("QUOTE") : _("SALES ORDER");
        }
        $rep->SetHeaderType('Header2');
        $rep->currency = $cur;
        $rep->Font();
        $rep->Info($params, $cols, null, $aligns);
        $contacts = get_branch_contacts($branch['branch_code'], 'order', $branch['debtor_no'], true);
        $rep->SetCommonData($myrow, $branch, $myrow, $baccount, ST_SALESORDER, $contacts);
        $rep->NewPage();
        $result = get_sales_order_details($i, ST_SALESORDER);
        $SubTotal = 0;
        $items = $prices = array();
        while ($myrow2 = db_fetch($result)) {
            $Net = round2((1 - $myrow2["discount_percent"]) * $myrow2["unit_price"] * $myrow2["quantity"], user_price_dec());
            $prices[] = $Net;
            $items[] = $myrow2['stk_code'];
            $SubTotal += $Net;
            $DisplayPrice = number_format2($myrow2["unit_price"], $dec);
            $DisplayQty = number_format2($myrow2["quantity"], get_qty_dec($myrow2['stk_code']));
            $DisplayNet = number_format2($Net, $dec);
            if ($myrow2["discount_percent"] == 0) {
                $DisplayDiscount = "";
            } else {
                $DisplayDiscount = number_format2($myrow2["discount_percent"] * 100, user_percent_dec()) . "%";
            }
            $rep->TextCol(0, 1, $myrow2['stk_code'], -2);
            $oldrow = $rep->row;
            $rep->TextColLines(1, 2, $myrow2['description'], -2);
            $newrow = $rep->row;
            $rep->row = $oldrow;
            if ($Net != 0.0 || !is_service($myrow2['mb_flag']) || !isset($no_zero_lines_amount) || $no_zero_lines_amount == 0) {
                $rep->TextCol(2, 3, $DisplayQty, -2);
                $rep->TextCol(3, 4, $myrow2['units'], -2);
                $rep->TextCol(4, 5, $DisplayPrice, -2);
                $rep->TextCol(5, 6, $DisplayDiscount, -2);
                $rep->TextCol(6, 7, $DisplayNet, -2);
            }
            $rep->row = $newrow;
            //$rep->NewLine(1);
            if ($rep->row < $rep->bottomMargin + 15 * $rep->lineHeight) {
                $rep->NewPage();
            }
        }
        if ($myrow['comments'] != "") {
            $rep->NewLine();
            $rep->TextColLines(1, 5, $myrow['comments'], -2);
        }
        $DisplaySubTot = number_format2($SubTotal, $dec);
        $DisplayFreight = number_format2($myrow["freight_cost"], $dec);
        $rep->row = $rep->bottomMargin + 15 * $rep->lineHeight;
        $doctype = ST_SALESORDER;
        $rep->TextCol(3, 6, _("Sub-total"), -2);
        $rep->TextCol(6, 7, $DisplaySubTot, -2);
        $rep->NewLine();
//.........这里部分代码省略.........

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();
//.........这里部分代码省略.........