webadmin.php

/var/www/enzatesting.onesolution.hk/pdf_ivc_fty0.php

<?php
$formid = "Order";
require_once "inc/configure.php";
require_once "inc/pdf/tcpdf.php";
if(havePermission("DCr")==false
|| havePermission("DPr")==false
//|| havePermission("MDr")==false
//|| havePermission("TDr")==false
){
    
    myerror("Invalid Permission");    
}

function pdf_product_rows($ivc_refid, $ordmain_refid){
    global $dbh, $pdf, $tableBorder, $row_height, $ttl_var;
    $sql2 = "SELECT DISTINCT
dbo.ord_txpako.refid,
dbo.ord_txpako.serialno,    
dbo.ord_dtl.itemno,
dbo.ord_dtl.refid AS orddtl_refid,
dbo.ord_dtl.product_refid,
dbo.inv_product.producttype,
dbo.ord_main.order_nbr,
dbo.inv_product.name_en,
dbo.inv_product.name_sc,
dbo.ord_dtl.[size],
dbo.ord_txpako.product_wt,
dbo.ord_txpako.unitcost,
dbo.ord_txpako.unitfactcost,
dbo.ord_txpako.unitprice,
dbo.ord_txpako.metal_wt,
dbo.ord_txpako.dia_wt,
dbo.ord_txpako.stone_wt,
1 as qty
FROM
dbo.ord_main
INNER JOIN dbo.ord_dtl ON dbo.ord_dtl.main_refid = dbo.ord_main.refid
INNER JOIN dbo.ord_txmain ON dbo.ord_txmain.orddtl_refid = dbo.ord_dtl.refid
INNER JOIN dbo.ord_txpako ON dbo.ord_txpako.txmain_refid = dbo.ord_txmain.refid
INNER JOIN dbo.inv_product ON dbo.ord_dtl.product_refid = dbo.inv_product.refid
WHERE
(dbo.ord_txpako.ivcfty_refid = :ivcfty_refid) AND
dbo.ord_main.refid = :refid";
    $sth2 = $dbh->prepare($sql2);
    $q = $sth2->execute( array(':refid' => $ordmain_refid, ':ivcfty_refid' => $ivc_refid) );
    //echo $sth2->getSQL( array(':refid' => $r['refid'], ':ivcfty_refid' => $refid) ); exit;
    
    while( $row2 = $sth2->fetch() ) {    
        reqnewpage_check('ord_header');
            
        $itemdesc = pak_itemdesc($row2);
        $rowh = max($pdf->getStringHeight(230, $itemdesc), $row_height*2); 
        
        //vdump($row2);
        $pdf->MultiCell(80, $rowh, 
        $row2['itemno'],//.PHP_EOL.'('.$row2['serialno'].')',
        $tableBorder, 'C', 0, 0, '', '', true, 0, false, true, 0, 'M', true);
        $pdf->MultiCell(40, $rowh, 
        resolveCode_master_type_code('PRODTYPE', $row2['producttype'], false, 'en'),
        $tableBorder, 'L', 0, 0, '', '', true, 0, false, true, 0, 'M', true);
        $pdf->MultiCell(230, $rowh, 
        $itemdesc,
        $tableBorder, 'L', 0, 0, '', '', true, 0, false, true, 0, 'M', true);
        $pdf->MultiCell(40, $rowh, 
        $row2['size'],
        $tableBorder, 'C', 0, 0, '', '', true, 0, false, true, 0, 'M', true);
        $pdf->MultiCell(40, $rowh, 
        numf($row2['product_wt'] ,3).' gr',
        $tableBorder, 'C', 0, 0, '', '', true, 0, false, true, 0, 'M', true);
        $pdf->MultiCell(40, $rowh, 
        numf($row2['qty'] ,3),
        $tableBorder, 'C', 0, 0, '', '', true, 0, false, true, 0, 'M', true);        
        $pdf->MultiCell(40, $rowh, 
        number_format($row2['unitfactcost'], 2),
        $tableBorder, 'R', 0, 0, '', '', true, 0, false, true, 0, 'M', true);
        $pdf->MultiCell(50, $rowh, 
        number_format($row2['unitfactcost']*$row2['qty'], 2),
        $tableBorder, 'R', 0, 1, '', '', true, 0, false, true, 0, 'M', true);
            
        ivc_summary($ttl_var, $row2);
        unset($rowh);
    }
}

function pdf_extra_rows($ivc_refid, $ordmain_refid){
    global $dbh, $pdf, $tableBorder, $row_height, $ttl_var;
    $sql2 = "SELECT
            dbo.ord_main.order_nbr,
            dbo.ord_dtl_extra.*
            
            FROM
            dbo.ord_dtl_extra
            INNER JOIN dbo.ord_main ON dbo.ord_dtl_extra.main_refid = dbo.ord_main.refid
            WHERE
            dbo.ord_dtl_extra.ivcfty_refid = :ivcfty_refid AND
            dbo.ord_dtl_extra.main_refid = :ordmain_refid
            ORDER BY
            dbo.ord_dtl_extra.refid ASC";
    $sth2 = $dbh->prepare($sql2);
    $q = $sth2->execute( array(':ivcfty_refid' => $ivc_refid, 
                                ':ordmain_refid' => $ordmain_refid) );
    //echo $sth2->getSQL( array(':refid' => $r['refid'], ':ivcfty_refid' => $refid) ); 
    
    for($line=0; $row2 = $sth2->fetch(); $line++ ) {
        reqnewpage_check('ord_header');    
/*
        if($line==0){
            ord_extra_header();    
        }else{
            reqnewpage_check('ord_extra_header');
        }
*/
        $rowh = max($pdf->getStringHeight(240, $itemdesc), $row_height);    
        //vdump($row2);
        $pdf->MultiCell(80, $rowh, 
        'N/A',//.PHP_EOL.'('.$row2['serialno'].')',
        $tableBorder, 'C', 0, 0, '', '', true, 0, false, true, 0, 'M', true);
        $pdf->MultiCell(350, $rowh, 
        $row2['desc'],
        $tableBorder, 'L', 0, 0, '', '', true, 0, false, true, 0, 'M', true);
        $pdf->MultiCell(40, $rowh, 
        numf($row2['qty'] ,3),
        $tableBorder, 'C', 0, 0, '', '', true, 0, false, true, 0, 'M', true);
        $pdf->MultiCell(40, $rowh, 
        number_format($row2['unitfactcost'], 2),
        $tableBorder, 'R', 0, 0, '', '', true, 0, false, true, 0, 'M', true);
        $pdf->MultiCell(50, $rowh, 
        number_format($row2['unitfactcost']*$row2['qty'], 2),
        $tableBorder, 'R', 0, 1, '', '', true, 0, false, true, 0, 'M', true);
            
        ivc_summary($ttl_var, $row2);
        unset($rowh);
    }    
}

function pdf_rm_rows($ivc_refid, $ordmain_refid){
    global $dbh, $pdf, $tableBorder, $row_height, $ttl_var;
    $sql2 = "SELECT
dbo.ord_dtl_rm.itemno,
dbo.ord_dtl_rm.itemnoid,
dbo.ord_dtl_rm.bomcategory,
dbo.ord_main.order_nbr,
dbo.ord_txpako_rm.unitcost,
dbo.ord_txpako_rm.unitfactcost,
dbo.ord_txpako_rm.unitprice,
dbo.ord_txpako_rm.*
FROM
dbo.ord_txpako_rm
INNER JOIN dbo.ord_dtl_rm ON dbo.ord_txpako_rm.orddtlrm_refid = dbo.ord_dtl_rm.refid
INNER JOIN dbo.ord_main ON dbo.ord_dtl_rm.main_refid = dbo.ord_main.refid
WHERE
dbo.ord_txpako_rm.ivcfty_refid = :ivcfty_refid AND
dbo.ord_dtl_rm.main_refid = :ordmain_refid";
    $sth2 = $dbh->prepare($sql2);
    $q = $sth2->execute( array(':ivcfty_refid' => $ivc_refid, 
                                ':ordmain_refid' => $ordmain_refid) );
/*
    echo $sth2->getSQL( array(':ivcfty_refid' => $ivc_refid, 
                                ':ordmain_refid' => $ordmain_refid) ); 
*/
    
    for($line=0; $row2 = $sth2->fetch(); $line++ ) {
        $table = inv_getBomcategyTablename($row2['bomcategory']);
        $item = getDB($table, $row2['itemnoid']);
        $row2['qty'] = ($item['uom_price']==$row2['uom_wt']) ? $row2['rm_wt'] : $row2['txqty'];
                        
        reqnewpage_check('ord_header');    

        $rowh = max($pdf->getStringHeight(240, $itemdesc), $row_height);    
        //vdump($row2);
        $pdf->MultiCell(80, $rowh, 
        $row2['itemno'],//.PHP_EOL.'('.$row2['serialno'].')',
        $tableBorder, 'C', 0, 0, '', '', true, 0, false, true, 0, 'M', true);
        $pdf->MultiCell(310, $rowh, 
        $item['name_en'],
        $tableBorder, 'L', 0, 0, '', '', true, 0, false, true, 0, 'M', true);
        $pdf->MultiCell(40, $rowh, 
        numf($row2['rm_wt'] ,3).' '.$row2['uom_wt'],
        $tableBorder, 'C', 0, 0, '', '', true, 0, false, true, 0, 'M', true);
        $pdf->MultiCell(40, $rowh, 
        numf($row2['txqty'] ,3).' '.$row2['uom_qty'],
        $tableBorder, 'C', 0, 0, '', '', true, 0, false, true, 0, 'M', true);
        $pdf->MultiCell(40, $rowh, 
        number_format($row2['unitfactcost'], 2),
        $tableBorder, 'R', 0, 0, '', '', true, 0, false, true, 0, 'M', true);
        $pdf->MultiCell(50, $rowh, 
        number_format($row2['unitfactcost']*$row2['qty'], 2),
        $tableBorder, 'R', 0, 1, '', '', true, 0, false, true, 0, 'M', true);
        //exit;    
        ivc_summary($ttl_var, $row2);
        unset($rowh);
    }
}


function getMainMat($orddtl_refid){
    global $dbh;

    $sql = "SELECT top 1
            dbo.inv_material.mattype
            
            FROM
            dbo.ord_item_bom
            INNER JOIN dbo.inv_material ON dbo.ord_item_bom.itemnoid = dbo.inv_material.refid
            WHERE
            dbo.ord_item_bom.orddtl_refid = :orddtl_refid AND
            dbo.ord_item_bom.bomcategy = 'Material'
            ORDER BY
            dbo.ord_item_bom.qty DESC
            ";            
    $sth = $dbh->prepare($sql);
    $sth->execute( array(':orddtl_refid' => $orddtl_refid) );
     //echo $sth->getSQL( array(':orddtl_refid' => $orddtl_refid) ); 
    return $sth->fetch(PDO::FETCH_ASSOC);    
}

function ivc_summary(&$ttl_var, $row2){
    $ttl_var['amount'] += $row2['unitfactcost']*$row2['qty'];    
    $ttl_var['qty'] += $row2['qty'];    
    $ttl_var['product_wt'] += $row2['product_wt'];    
    $ttl_var['dia_wt'] += $row2['dia_wt'];    
    $ttl_var['stone_wt'] += $row2['stone_wt'];    
    
    $bomlist = getMainMat( $row2['orddtl_refid'] );
    //vdump($bomlist);
    if(is_array($bomlist)){
        foreach($bomlist as $bom){
            //vdump($bom);
            //$ttl_var['metal_wt'][$bom['mattype']] += $row2['metal_wt'];
            $ttl_var['metal_wt'][$bom] += $row2['metal_wt'];
        }
    }
    //vdump($ttl_var);
    return $ttl_var;
}

function ord_header(){
    global $pdf, $tableBorder, $row_height;
    $pdf->SetFont('data_fonts_droidsansfallback', '', 8);
    $pdf->MultiCell(80, $row_height*2, 
    'Product Number',
    $tableBorder, 'C', 1, 0, '', '', true, 0, false, true, 0, 'M');
    $pdf->MultiCell(40, $row_height*2, 
    'Product'.PHP_EOL.'Type',
    $tableBorder, 'C', 1, 0, '', '', true, 0, false, true, 0, 'M');
    $pdf->MultiCell(230, $row_height*2, 
    'Description',
    $tableBorder, 'C', 1, 0, '', '', true, 0, false, true, 0, 'M');

    $pdf->MultiCell(40, $row_height*2, 
    'Size',
    $tableBorder, 'C', 1, 0, '', '', true, 0, false, true, 0, 'M');
    $pdf->MultiCell(40, $row_height*2, 
    'Total'.PHP_EOL.'Weight',
    $tableBorder, 'C', 1, 0, '', '', true, 0, false, true, 0, 'M');
    $pdf->MultiCell(40, $row_height*2, 
    'Qty',
    $tableBorder, 'C', 1, 0, '', '', true, 0, false, true, 0, 'M');    
    $pdf->MultiCell(40, $row_height*2, 
    'Unit'.PHP_EOL.'Price',
    $tableBorder, 'C', 1, 0, '', '', true, 0, false, true, 0, 'M');
    $pdf->MultiCell(50, $row_height*2, 
    'Amount'.PHP_EOL.'USD',
    $tableBorder, 'C', 1, 1, '', '', true, 0, false, true, 0, 'M');
    $pdf->SetFont('data_fonts_droidsansfallback', '', 7);
}

/*
function ord_extra_header(){
    //echo "ord_extra_header()"; exit;
    
    global $pdf, $tableBorder, $row_height;
    $pdf->SetFont('data_fonts_droidsansfallback', '', 8);
    $pdf->MultiCell(80, $row_height, 
    'Order Number',
    $tableBorder, 'C', 1, 0, '', '', true, 0, false, true, 0, 'M');

    $pdf->MultiCell(300, $row_height, 
    'Description',
    $tableBorder, 'C', 1, 0, '', '', true, 0, false, true, 0, 'M');
    $pdf->MultiCell(60, $row_height, 
    'Qty',
    $tableBorder, 'C', 1, 0, '', '', true, 0, false, true, 0, 'M');

    $pdf->MultiCell(60, $row_height, 
    'Unit Price',
    $tableBorder, 'C', 1, 0, '', '', true, 0, false, true, 0, 'M');
    $pdf->MultiCell(60, $row_height, 
    'Amount',
    $tableBorder, 'C', 1, 1, '', '', true, 0, false, true, 0, 'M');
    $pdf->SetFont('data_fonts_droidsansfallback', '', 7);
}
*/

function reqnewpage_check($fn, $margin=0){
    global $pdf, $pagebreakpt;
    if($pdf->getY() + $margin > $pagebreakpt){
        //page break
        $pdf->addPage();
        //print user defined header function
        call_user_func($fn);
        return true;
    }
    return false;
}

$refid = (int)setDefaultReqVar("refid", '');
//$editable = setDefaultReqVar("edit", 0);

if($refid){
    $sql = "SELECT * from ivc_fty WHERE refid = :refid";
    $sth = $dbh->prepare($sql);
    $sth->execute(  array(':refid' => $refid) );
} else {
    exit;
}
$row = $sth->fetch();
$header = $row;
$customer = getDB_master_customer($row['ivc_customer']);
unset($sth);


$row_height = 15;
$height_2row = $row_height * 2;
$showBorder = 0;
$tableBorder = 1;
//vdump($req);
//var_dump($row);

class doc extends TCPDF{
    //Page header
    public function Header(){
        global $row; 
        $image_file = 'image/ENZA-Logo.jpg';
        $this->Image($image_file, 200, 20, 200, '', '', '', '', '');
        //$this->Image($image_file, 125, 20, 350, '', '', '', '', '');
        //$this->Image($image_file, 50, 20, 500, '', '', '', '', '');

// define barcode style
$style = array(
    'position' => '',
    'align' => 'C',
    'stretch' => false,
    'fitwidth' => true,
    'cellfitalign' => '',
    'border' => true,
    'hpadding' => 'auto',
    'vpadding' => 'auto',
    'fgcolor' => array(0,0,0),
    'bgcolor' => false, //array(255,255,255),
    'text' => true,
    'font' => 'helvetica',
    'fontsize' => 8,
    'stretchtext' => 4
);

        //$this->write1DBarcode($row['delnote_nbr'], 'C128', '460', '40', '200', 40, 0.8, $style, 'N');
        
        $this->SetFont('data_fonts_droidsansfallback', 'B', 10);    // bold
        $this->SetY(75);
        
        $this->MultiCell(560, 0, 
        ''.PHP_EOL.
        PHP_EOL.
        "深圳恩佳珠宝有限公司".PHP_EOL.
        "SHENZHEN ENZA JEWELLERY CO. LTD.",
        0, 'C', 0, 1);
        
        $this->ln(20);
        
        //$this->ln(5);
        $GLOBALS['x_main']= $this->GetX();
        $GLOBALS['y_main']= $this->GetY();
    }

    // Page footer
    public function Footer(){
        global $showBorder;
        $this->SetY(-80);
        
        // Set font
        //$this->SetFont('helvetica', 'I', 8);
        $this->SetFont('data_fonts_droidsansfallback', '', 6);
//        $showBorder=1;
        //addresses
        $this->MultiCell(180, $row_height, 
        'ENZA JEWELLERY LTD.'.PHP_EOL.
// 'Heng Ngai Jewllery Centre,'.PHP_EOL.
// 'Room 14, 11/fl, 4 Hok Yuen street east'.PHP_EOL.
// 'Hung Hom, Hong Kong'.PHP_EOL.
'Unit D5, 9/F, Kaiser Estate, Phase 1, No.37-45 Man Yue'.PHP_EOL.
'Street, Hung Hom, Kowloon, Hong Kong'.PHP_EOL.
'Tel: +852 2180 7118 – Fax: +852 2180 7121'.PHP_EOL,
        $showBorder, 'C', 0, 0);
        
        $this->MultiCell(190, $row_height, 
        'SHENZHEN ENZA JEWELLERY CO. LTD.'.PHP_EOL.
'Building B4, 10th/FL,'.PHP_EOL.
'Lilang International jewellery park, 31, Bulan road'.PHP_EOL.
'Shang Lilang, Shenzhen, Guangdong, China'.PHP_EOL.
'Tel: +86 755-89240329 – Fax: +86 755 2180 7121',
        $showBorder, 'C', 0, 0);
        
        $this->MultiCell(190, $row_height, 
        'SHENZHEN ENZA JEWELLERY CO. LTD.'.PHP_EOL.
'Building 6, 4th/FL,Wan Shan Jewellery Park'.PHP_EOL.
'Tian Bei, 4th road Luohu district'.PHP_EOL.
'Shenzhen, Guangdong, China'.PHP_EOL.
'Tel: +86 755 2550 3529 - Fax: +86 755 2553 1507',
        $showBorder, 'C', 0, 1);        
        
        $this->ln(10);
                
        // Page number
        $this->SetX(35);
        $this->Cell(0, 10, ''.$this->getAliasNumPage().'/'.$this->getAliasNbPages(), $showBorder, false, 'C', 0, '', 0, false, 'T', 'M');
    }
}

// create new PDF document
$pdf = new doc('P', 'pt', 'A4', true, 'UTF-8', false);
// size reference 'A4' : {$pf = array(  595.276,  841.890); break;}

// set document information
$pdf->SetCreator('ENZA');
$pdf->SetAuthor('ENZA');
$pdf->SetTitle('ENZA');
$pdf->SetSubject('ENZA');
$pdf->SetKeywords('ENZA');
// set default header data
//$pdf->SetHeaderData(PDF_HEADER_LOGO, PDF_HEADER_LOGO_WIDTH, PDF_HEADER_TITLE.' 008', PDF_HEADER_STRING);
// set header and footer fonts
//$pdf->setHeaderFont(Array(data_fonts_droidsansfallback, '', PDF_FONT_SIZE_MAIN));
//$pdf->setFooterFont(Array(PDF_FONT_NAME_DATA, '', PDF_FONT_SIZE_DATA));
// set default monospaced font
$pdf->SetDefaultMonospacedFont(PDF_FONT_MONOSPACED);
//set margins
$pdf->SetMargins(PDF_MARGIN_LEFT, 75, PDF_MARGIN_RIGHT);    // left, top, right
$pdf->SetHeaderMargin(10);

$pdf->SetCellPadding(5);
//set auto page breaks
$pdf->SetFooterMargin(PDF_MARGIN_FOOTER);
$pdf->SetAutoPageBreak(TRUE, 90);
//set image scale factor
$pdf->setImageScale(1.3333);
//set some language-dependent strings
$pdf->setLanguageArray($l);
// set font
//$pdf->SetFont('data_fonts_droidsansfallback', '', 12);    // bold
$pdf->SetFont('data_fonts_droidsansfallback', '', 8);
// set color for background
$pdf->SetFillColor(222, 222, 222);
$pagebreakpt =720;

// add a page
$pdf->AddPage();

$pdf->SetTopMargin($y_main);    
$x_main= $pdf->GetX();

$pdf->MultiCell(300, $row_height, 
'Invoicing address - 发票地址:'.PHP_EOL,
$showBorder, 'L', 0, 0);

$pdf->MultiCell(90, $row_height, 
'Invoice Date: ',
$showBorder, 'L', 0, 0);
$pdf->MultiCell(150, $row_height, 
date_format(date_create($row['launch_date']), 'l, F d, Y'),
//$row['launch_date'], //date("l, F d, Y")
$showBorder, 'R', 0, 1);

//$pdf->SetFont('data_fonts_droidsansfallback', 'B', 9);
$pdf->MultiCell(300, $row_height, 
html_entity_decode($customer['companyname_en'], ENT_QUOTES),
$showBorder, 'L', 0, 0);
//$pdf->SetFont('data_fonts_droidsansfallback', '', 8);
$pdf->MultiCell(90, $row_height, 
'Invoice number: ',
$showBorder, 'L', 0, 0);
$pdf->MultiCell(150, $row_height, 
$row['ivc_nbr'],
$showBorder, 'R', 0, 1);

$pdf->MultiCell(300, $row_height, 
html_entity_decode(buildAddressFormat($customer['invaddr1'], $customer['invpostcode'], $customer['invcity'], $customer['invcountry'], $customer['invtelno'], $customer['invfaxno']), ENT_QUOTES).PHP_EOL,
$showBorder, 'L', 0, 1);

$pdf->MultiCell(300, $row_height, 
'Shipping address - 送货地址:'.PHP_EOL,
$showBorder, 'L', 0, 0);

$pdf->MultiCell(90, $row_height, 
'Transporter: ',
$showBorder, 'L', 0, 0);
$pdf->MultiCell(150, $row_height, 
resolveCode_master_type_code('TRANSPORTER', $customer['favtransporteur']),
$showBorder, 'R', 0, 1);

//$pdf->SetFont('data_fonts_droidsansfallback', 'B', 9);
$pdf->MultiCell(300, $row_height, 
html_entity_decode($customer['companyname_en'], ENT_QUOTES),
$showBorder, 'L', 0, 0);
//$pdf->SetFont('data_fonts_droidsansfallback', '', 8);


$pdf->MultiCell(90, $row_height, 
'Tracking number: ',
$showBorder, 'L', 0, 0);
$pdf->MultiCell(150, $row_height, 
$row['tracking_nbr'],
$showBorder, 'R', 0, 1);

$pdf->MultiCell(300, $row_height, 
html_entity_decode(buildAddressFormat($customer['deladdr'], $customer['delpostcode'], $customer['delcity'], $customer['delcountry'], $customer['deltelno'], $customer['delfaxno']), ENT_QUOTES).PHP_EOL,
$showBorder, 'L', 0, 1);

$pdf->Ln(10);



//$pdf->SetY( $y_main+10 );
//-----------------------DATA---------------------

ord_header();

$sql = "SELECT
    tmp_ord.main_refid AS refid,
    dbo.ord_main.order_nbr,
    dbo.ord_main.custorder_ref,
    dbo.ord_main.launch_date,
    dbo.ord_main.del_date,
    dbo.ord_main.confirm_date,
    dbo.ord_main.remark,
    dbo.master_customer.custname_en,
    dbo.master_customer.custname_sc,
    SUM (tmp_ord.qty_ready) AS qty_ready,
    SUM (tmp_ord.ttlcost) AS ttlcost,
    SUM (tmp_ord.ttlfactcost) AS ttlfactcost,
    SUM (tmp_ord.ttlprice) AS ttlprice
FROM
    (
        (
            SELECT
                dbo.ord_dtl.main_refid,
                dbo.ord_txpako.txqty AS qty_ready,
                dbo.ord_txpako.unitcost AS ttlcost,
                dbo.ord_txpako.unitfactcost AS ttlfactcost,
                (
                    dbo.ord_txpako.unitprice * isnull(dbo.ord_txpako.discount, 1)
                ) AS ttlprice
            FROM
                dbo.ord_txpako
            INNER JOIN dbo.ord_dtl ON dbo.ord_txpako.orddtl_refid = dbo.ord_dtl.refid
            WHERE
                dbo.ord_txpako.ivcfty_refid = :ivcfty_refid_1
            $sql_clause
        )
        UNION
            (
                SELECT
                    dbo.ord_dtl_extra.main_refid,
                    dbo.ord_dtl_extra.qty AS qty_ready,
                    0 AS ttlcost,
                    0 AS ttlfactcost,
                    (
                        dbo.ord_dtl_extra.unitprice * dbo.ord_dtl_extra.qty * dbo.ord_dtl_extra.discount
                    ) AS ttlprice
                FROM
                    dbo.ord_dtl_extra
                WHERE
                    dbo.ord_dtl_extra.ivcfty_refid = :ivcfty_refid_2
                $sql_clause_extra
            )
        UNION
            (
                SELECT
                    dbo.ord_dtl_rm.main_refid,
                    dbo.ord_txpako_rm.txqty AS qty_ready,
                    dbo.ord_txpako_rm.unitcost AS ttlcost,
                    dbo.ord_txpako_rm.unitfactcost AS ttlfactcost,
                    (
                        dbo.ord_txpako_rm.unitprice * isnull(dbo.ord_txpako_rm.discount, 1)
                    ) AS ttlprice
                FROM
                    dbo.ord_txpako_rm
                INNER JOIN dbo.ord_dtl_rm ON dbo.ord_txpako_rm.orddtlrm_refid = dbo.ord_dtl_rm.refid
                WHERE
                    dbo.ord_txpako_rm.ivcfty_refid = :ivcfty_refid_3
                $sql_clause_rm
            )
    ) AS tmp_ord
INNER JOIN dbo.ord_main ON tmp_ord.main_refid = dbo.ord_main.refid
INNER JOIN dbo.master_customer ON dbo.ord_main.custcode = dbo.master_customer.custcode
GROUP BY
    tmp_ord.main_refid,
    dbo.ord_main.order_nbr,
    dbo.ord_main.custorder_ref,
    dbo.ord_main.launch_date,
    dbo.ord_main.del_date,
    dbo.ord_main.confirm_date,
    dbo.ord_main.remark,
    dbo.master_customer.custname_en,
    dbo.master_customer.custname_sc";
    
        
    $sth = $dbh->prepare($sql);
    $q = $sth->execute( array(':ivcfty_refid_1'=>$refid, 
                                ':ivcfty_refid_2'=>$refid, 
                                ':ivcfty_refid_3'=>$refid) );
//echo $sth->getSQL( array(':ivcfty_refid'=>$refid) ) . HTML_EOL;
pdo_showerror($sth, $q);

$ttl_var = array();
while($r = $sth->fetch()){
    reqnewpage_check('ord_header', $row_height);
    
    $pdf->MultiCell(120, $row_height, 
    'Order Number: '.$r['order_nbr'].PHP_EOL,
    $showBorder, 'L', 0, 0);
    $pdf->MultiCell(200, $row_height, 
    'Customer reference: '.html_entity_decode($r['custorder_ref'], ENT_QUOTES).PHP_EOL,
    $showBorder, 'L', 0, 0);
    $pdf->MultiCell(100, $row_height, 
    'Gold price: '.numf(getMatPrice('gold', $r['launch_date'])),//.substr(datef($r['launch_date']),0,10).PHP_EOL,
    $showBorder, 'L', 0, 0);
    $pdf->MultiCell(140, $row_height, 
    'Order Remaining Qty: '.ord_getOrdRemainQTY($r['refid'], $row['refid']).PHP_EOL,
    $showBorder, 'L', 0, 1);    
    
    pdf_product_rows($refid, $r['refid']);
    
    pdf_rm_rows($refid, $r['refid']);
    
    pdf_extra_rows($refid, $r['refid']);
}



//vdump($ttl_var); exit;
$pdf->SetFont('data_fonts_droidsansfallback', '', 8);
$pdf->MultiCell(430, $row_height, 
'Total',
$tableBorder, 'L', 1, 0);
$pdf->MultiCell(40, $row_height, 
numf($ttl_var['qty'] ,3),
$tableBorder, 'C', 1, 0);
$pdf->MultiCell(90, $row_height, 
number_format($ttl_var['amount'], 2),
$tableBorder, 'R', 1, 1);



$pdf->Ln();
//information-------------------------------------------------------------
$tmpcol_1 = '';
$tmpcol_2 = '';
        
if( is_array($ttl_var['metal_wt']) ){
    foreach( $ttl_var['metal_wt'] as $mat => $wt ){
        $tmpcol_1 .= resolveCode_master_type_code('MATTYPE', $mat, false, 'en').PHP_EOL;
        $tmpcol_2 .= numf($wt).' gr'.PHP_EOL;
    }    
}

$tmpcol_1.= 'Diamonds'.PHP_EOL.
            'Stones'.PHP_EOL.
            'Products';
            
$tmpcol_2.= numf($ttl_var['dia_wt'] ,3).' ct'.PHP_EOL.
            numf($ttl_var['stone_wt'] ,3).' ct'.PHP_EOL.
            numf($ttl_var['product_wt']).' gr';

$tmpcol_3=
'Thanks to transfer the amount of: '.number_format($ttl_var['amount'], 2).' USD'.PHP_EOL.
'To: ICBC Shuibei branch'.PHP_EOL.
'      1st/FL, build 31, Beili Garden'.PHP_EOL.
'      Shuibei, 2nd road, Luohu, Shenzhen'.PHP_EOL.
'Acc. No: 40000 2380 9200 136 485'.PHP_EOL.
'Beneficiary: SHENZHEN ENZA JEWELLERY CO, LTD.'.PHP_EOL.
'Terms of payment:      30 days'.PHP_EOL.
'Date of payment:         '.date_format(date_create($row['due_date']), 'M d, Y');//.$row['due_date'];

$tmpcol_4='Shipping:'.PHP_EOL.'Total EXW:'.PHP_EOL.'Total CIF:'.PHP_EOL.'Deposit:'.PHP_EOL.'Total due:';
$tmpcol_5='………………'.PHP_EOL.'………………'.PHP_EOL.'………………'.PHP_EOL.'………………'.PHP_EOL.'………………';

$tmp_h = max( $pdf->getStringHeight(60, $tmpcol_1), 
                $pdf->getStringHeight(70, $tmpcol_2), 
                $pdf->getStringHeight(200, $tmpcol_3), 
                $pdf->getStringHeight(50, $tmpcol_4), 
                $pdf->getStringHeight(50, $tmpcol_5) )+2;
//$pdf->Write('', $pdf->getY() + $tmp_h );                
if  ($pdf->getY() + $tmp_h > $pagebreakpt) {    
        $pdf->addPage();
}
$pdf->MultiCell(130, $row_height, 
'Weight Recap',
$tableBorder, 'C', 1, 0);
$pdf->MultiCell(130, $row_height, 
'',
$showBorder, 'C', 0, 0);
$pdf->MultiCell(300, $row_height, 
'Invoice information',
$tableBorder, 'C', 1, 1);

$pdf->MultiCell(60, $tmp_h, 
$tmpcol_1,
$tableBorder, 'L', 0, 0);
$pdf->MultiCell(70, $tmp_h, 
$tmpcol_2,
$tableBorder, 'R', 0, 0);
$pdf->MultiCell(130, $tmp_h, 
'',
$showBorder, 'R', 0, 0);
$pdf->MultiCell(200, $tmp_h, 
$tmpcol_3,
$tableBorder, 'L', 0, 0);
$pdf->MultiCell(50, $tmp_h, 
$tmpcol_4,
$tableBorder, 'L', 0, 0);
$pdf->MultiCell(50, $tmp_h, 
$tmpcol_5,
$tableBorder, 'L', 0, 1);
//$pdf->Ln();

$pdf->SetFont('data_fonts_droidsansfallback', '', 8);
$pdf->MultiCell(560, $row_height, 
'** The customer hereby accepts to pay its own local bank charges. We do not pay overseas bank charges. Complaints do not confer on the customer the right to suspend the payment due.',
$showBorder, 'L', 0, 1);

//Close and output PDF document
$filename = "Invoice_".$row['ivc_nbr'].".pdf";

$pdf->Output($filename, 'I');
//$pdf->Output($filename, 'D');
?>