print_sample_barcode.php.oneline

<?php 

session_start();



include 'common.php';

require_once('tcpdf/config/lang/eng.php');

require_once('tcpdf/tcpdf.php');





//echo '<pre>';

//print_r($GLOBALS);

//echo '</pre>';





/*

2015-01-02: added str_pad to tackle problem of barcode reading when sample_id<100)



*/



function print_duplicate_lable($pdf, $style, $sample_id)

{

	$link=start_nchsls();

	$sql='select * from sample where sample_id=\''.$sample_id.'\'';

	$result=mysql_query($sql,$link);if($result===FALSE){echo mysql_error(); return FALSE;}

	$return_array=mysql_fetch_assoc($result);	//only one is returned



	if($return_array['preservative']=='None')

	{

		$tube='s';

	}

	else if($return_array['preservative']=='Fluoride')

	{

		$tube='F';

	}

	else

	{

		$tube='';

	}

	

	for($i=0;$i<1;$i++)

	{

		$pdf->AddPage();

		//$pdf->SetXY(02,02);

		//$pdf->SetFont('times', '', 10);

		//$pdf->Cell (45,05,$return_array['patient_name'].' '.$return_array['patient_id'] ,$border=0, $ln=0, $align='', $fill=false, $link='', $stretch=1, $ignore_min_height=false, $calign='T', $valign='M');		



		//now cursor is at 2,7									  x  y   w    h

		if($return_array['sample_id']<100)

		{

			$si=str_pad($return_array['sample_id'],3,'0',STR_PAD_LEFT);

		}

		else

		{

			$si=$return_array['sample_id'];

		}

		

		$pdf->write1DBarcode($si, 'C128', 02, 5 , 35, 13, 0.4, $style, 'N');

		

		// Start Transformation

		$pdf->SetFont('helveticaB', '', 8);

		$pdf->StartTransform();

		// Rotate 90 degrees counter-clockwise centered by (70,110) which is the lower left corner of the rectangle

		$pdf->Rotate(90, 43, 18);

		//$pdf->Text(39, 18, $tube.'-'.$return_array['sample_id'].'-'.$return_array['patient_name']);

		$pdf->SetXY(40,18);

		$tt=$tube.'-'.$return_array['sample_id'].' '.substr($return_array['patient_name'],0,8);

		$pdf->Cell(18,5,$tt,$border=0, $ln=0, $align='', $fill=false, $link='', $stretch=2, $ignore_min_height=false, $calign='T', $valign='M');		



		// Stop Transformation

		$pdf->StopTransform();



//		$pdf->write1DBarcode($return_array['sample_id'], 'C128', 30, 5 , 20, 13, 0.4, $style, 'N');



		//now cursor is at 2,17

		//$pdf->SetFont('times', '', 10);

		//$pdf->SetXY(02,17);

		//$pdf->Cell (38,5,$return_array['clinician'].'/'.$return_array['unit'].'/'.$return_array['location'],$border=0, $ln=0, $align='', $fill=false, $link='', $stretch=1, $ignore_min_height=false, $calign='T', $valign='M');		



		//now cursor is at 40,17

		

		$tt_below_barcode=$tube.'-'.substr($return_array['patient_name'],0,13);

		$pdf->SetFont('helveticaB', '', 13);

		

		$pdf->SetXY(5,18);

		$pdf->Cell (25,5,$tt_below_barcode,$border=0, $ln=0, $align='', $fill=false, $link='', $stretch=2, $ignore_min_height=false, $calign='T', $valign='M');		

		

		//$pdf->SetXY(42,18);

		//$pdf->Cell (7,5,$tube,$border=0, $ln=0, $align='', $fill=false, $link='', $stretch=2, $ignore_min_height=false, $calign='T', $valign='M');		

	}	

}



class MYPDF_BARCODE extends TCPDF 

{

	public function Header() 

	{



	}



	// Page footer

	public function Footer() 

	{



	}

}



login_varify();



	// for barcode

	$style = array(

		'position' => '',

		'align' => 'C',

		'stretch' => false,

		'fitwidth' => true,

		'cellfitalign' => '',

		'border' => false,

		'hpadding' => 'auto',

		'vpadding' => '0',

		'fgcolor' => array(0,0,0),

		'bgcolor' => false, //array(255,255,255),

		'text' => true,

		'font' => 'helvetica',

		'fontsize' => 10,

		'stretchtext' => 4

	);





	$pdf = new MYPDF_BARCODE('', 'mm', array("50","25"), true, 'UTF-8', false);

	

	$pdf->SetMargins(0,0, $right=-1, $keepmargins=true);

	$pdf->setPrintFooter(false);

	$pdf->setPrintHeader(false);

	$pdf->SetAutoPageBreak(TRUE, 0);

	$pdf->setCellPaddings(0,0,0,0);







	//minimum 2 mm margin

	//25-4=21 available Y

	//50-5=46 available X

	//5 line 1, 10 barcode, 5 line 3



$sample_id_list=explode("|",$_POST['list_of_samples']);

//print_r($sample_id_list);



foreach($sample_id_list as $key=>$value)

{

	if(strlen($value)>0)

	{

		print_duplicate_lable($pdf,$style,$value);	

	}

}



$filename=str_replace("|","-",$_POST['list_of_samples']).'.pdf';

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





?>