Your IP : 216.73.216.40


Current Path : /var/www/html/mmishra/iws8/html/imaterial/
Upload File :
Current File : /var/www/html/mmishra/iws8/html/imaterial/PrintWOItemSlip.php

<?php

include('includes/session.inc');

if (isset($_GET['WO'])) {
	$WO = filter_number_format($_GET['WO']);
} elseif (isset($_POST['WO'])){
	$WO = filter_number_format($_POST['WO']);
} else {
	$WO = '';
}

if (isset($_GET['StockId'])) {
	$StockId = $_GET['StockId'];
} elseif (isset($_POST['StockId'])) {
	$StockId = $_POST['StockId'];
}

if (isset($_GET['Location'])) {
	$Location = $_GET['Location'];
} elseif (isset($_POST['Location'])) {
	$Location = $_POST['Location'];
}


if (isset($WO) AND isset($StockId) AND $WO!=''){

	$sql = "SELECT woitems.qtyreqd,
					woitems.qtyrecd,
					stockmaster.description,
					stockmaster.decimalplaces,
					stockmaster.units
			FROM woitems, stockmaster
			WHERE stockmaster.stockid = woitems.stockid 
				AND woitems.wo = '" . $WO . "' 
				AND woitems.stockid = '" . $StockId . "' ";

	$ErrMsg = _('The SQL to find the details of the item to produce failed');
	$resultItems = DB_query($sql,$ErrMsg);
	
	if (DB_num_rows($resultItems) != 0){
		include('includes/PDFStarter.php');

		$pdf->addInfo('Title',_('WO Production Slip'));
		$pdf->addInfo('Subject',_('WO Production Slip'));
		
		while ($myItem = DB_fetch_array($resultItems)) {
			// print the info of the parent product
			$FontSize=10;
			$PageNumber=1;
			$line_height=12;
			$Xpos = $Left_Margin+1;
			$fill = FALSE;

			$QtyPending = $myItem['qtyreqd'] - $myItem['qtyrecd'];

			PrintHeader($pdf,$YPos,$PageNumber,$Page_Height,$Top_Margin,$Left_Margin,
						$Page_Width,$Right_Margin,$WO,$StockId,$myItem['description'],$QtyPending,$myItem['units'],$myItem['decimalplaces'],$ReportDate);

			$PartCounter = 0;

			$sqlBOM = "SELECT bom.parent,
						bom.component,
						bom.quantity AS bomqty,
						stockmaster.decimalplaces,
						stockmaster.units,
						stockmaster.description,
						stockmaster.shrinkfactor,
						locstock.quantity AS qoh
					FROM bom, stockmaster, locstock
					WHERE bom.component = stockmaster.stockid
						AND bom.component = locstock.stockid
						AND locstock.loccode = '". $Location ."'
						AND bom.parent = '" . $StockId . "'
                        AND bom.effectiveafter <= '" . date('Y-m-d') . "'
                        AND bom.effectiveto > '" . date('Y-m-d') . "'";
					 
			$ErrMsg = _('The bill of material could not be retrieved because');
			$BOMResult = DB_query ($sqlBOM,$ErrMsg);
			while ($myComponent = DB_fetch_array($BOMResult)) {

				$ComponentNeeded = $myComponent['bomqty'] * $QtyPending;
				$PrevisionShrinkage = $ComponentNeeded * ($myComponent['shrinkfactor'] / 100);

				$Xpos = $Left_Margin+1;

				$pdf->addTextWrap($Xpos,$YPos,150,$FontSize, $myComponent['component'], 'left');
				$pdf->addTextWrap(150,$YPos,50,$FontSize,locale_number_format($myComponent['bomqty'],$myComponent['decimalplaces']), 'right');
				$pdf->addTextWrap(200,$YPos,30,$FontSize,$myComponent['units'], 'left');
				$pdf->addTextWrap(230,$YPos,50,$FontSize,locale_number_format($ComponentNeeded,$myComponent['decimalplaces']), 'right');
				$pdf->addTextWrap(280,$YPos,30,$FontSize,$myComponent['units'], 'left');
				$pdf->addTextWrap(310,$YPos,50,$FontSize,locale_number_format($PrevisionShrinkage,$myComponent['decimalplaces']), 'right');
				$pdf->addTextWrap(360,$YPos,30,$FontSize,$myComponent['units'], 'left');

				$YPos -= $line_height;

				if ($YPos < $Bottom_Margin + $line_height){
				   PrintHeader($pdf,$YPos,$PageNumber,$Page_Height,$Top_Margin,$Left_Margin,$Page_Width,
							   $Right_Margin,$WO,$Stockid,$myItem['description'],$QtyPending,$myItem['units'],$myItem['decimalplaces'],$ReportDate);
				}
			}
		}

		// Production Notes
		$pdf->addTextWrap($Xpos,$YPos-50,200,$FontSize,_('Incidences / Production Notes').':', 'left');
		$YPos -=(8*$line_height);

		PrintFooterSlip($pdf,_('Components Ready By'), _('Item Produced By'), _('Quality Control By'), $YPos,$FontSize,false);

		if ($YPos < $Bottom_Margin + $line_height){
		   PrintHeader($pdf,$YPos,$PageNumber,$Page_Height,$Top_Margin,$Left_Margin,$Page_Width,
					   $Right_Margin,$WO,$Stockid,$myItem['description'],$QtyPending,$myItem['units'],$myItem['decimalplaces'],$ReportDate);
		}

		$pdf->OutputD('WO-' . $WO . '-' . $StockId . '-' . Date('Y-m-d') . '.pdf');
		$pdf->__destruct();
	}else{
		$Title = _('WO Item production Slip');
		include('includes/header.inc');
		prnMsg(_('There were no items with ready to produce'),'info');
		prnMsg($sql);
		echo '<br /><a href="' . $RootPath . '/index.php">' . _('Back to the menu') . '</a>';
		include('includes/footer.inc');
		exit;
	
	}
} 


function PrintHeader(&$pdf,&$YPos,&$PageNumber,$Page_Height,$Top_Margin,$Left_Margin,
					 $Page_Width,$Right_Margin,$WO,$StockId,$Description,$Qty,$UOM,$DecimalPlaces, $ReportDate) {

	if ($PageNumber>1){
		$pdf->newPage();
	}
	$line_height=12;
	$FontSize=10;
	$YPos= $Page_Height-$Top_Margin;

	$pdf->addTextWrap($Left_Margin,$YPos,300,$FontSize,$_SESSION['CompanyRecord']['coyname']);
	$pdf->addTextWrap(190,$YPos,100,$FontSize,$ReportDate);
	$pdf->addTextWrap($Page_Width-$Right_Margin-150,$YPos,160,$FontSize,_('Printed') . ': ' .
		 Date($_SESSION['DefaultDateFormat']) . '   ' . _('Page') . ' ' . $PageNumber,'left');
	$YPos -=$line_height;

	$pdf->addTextWrap($Left_Margin,$YPos,150,$FontSize,_('Work Order Item Production Slip'));
	$YPos -=(2*$line_height);

	$pdf->addTextWrap($Left_Margin,$YPos,150,$FontSize,_('WO'). ': ' . $WO);
	$YPos -= $line_height;

	$pdf->addTextWrap($Left_Margin,$YPos,500,$FontSize,_('Item Code'). ': ' . $StockId . ' --> ' . $Description);
	$YPos -= $line_height;
	
	$pdf->addTextWrap($Left_Margin,$YPos,150,$FontSize,_('Quantity'). ': ' . locale_number_format($Qty,$DecimalPlaces) . ' ' . $UOM);
	$YPos -=(2*$line_height);

	if(file_exists($_SESSION['part_pics_dir'] . '/' .$StockId.'.jpg') ) {
		$pdf->Image($_SESSION['part_pics_dir'] . '/'.$StockId.'.jpg',135,$Page_Height-$Top_Margin-$YPos+10,200,200);
		$YPos -=(16*$line_height);
	}/*end checked file exist*/
	
	
	/*set up the headings */
	$Xpos = $Left_Margin+1;

	$pdf->addTextWrap($Xpos,$YPos,150,$FontSize,_('Component Code'), 'left');
	$pdf->addTextWrap(150,$YPos,50,$FontSize,_('Qty BOM'), 'right');
	$pdf->addTextWrap(200,$YPos,30,$FontSize,'', 'left');
	$pdf->addTextWrap(230,$YPos,50,$FontSize,_('Qty Needed'), 'right');
	$pdf->addTextWrap(280,$YPos,30,$FontSize,'', 'left');
	$pdf->addTextWrap(310,$YPos,50,$FontSize,_('Shrinkage'), 'right');
	$pdf->addTextWrap(360,$YPos,30,$FontSize,'', 'left');

	$FontSize=10;
	$YPos -= $line_height;

	$PageNumber++;
} 

function PrintFooterSlip($pdf,$Column1, $Column2, $Column3, $YPos,$FontSize,$fill){
		//add column 1
		$pdf->addTextWrap(40,$YPos-50,100,$FontSize,$Column1.':', 'left');
		$pdf->addTextWrap(40,$YPos-70,100,$FontSize,_('Name'), 'left');
		$pdf->addTextWrap(80,$YPos-70,200,$FontSize,':__________________','left',0,$fill);
		$pdf->addTextWrap(40,$YPos-90,100,$FontSize,_('Date'), 'left');
		$pdf->addTextWrap(80,$YPos-90,200,$FontSize,':__________________','left',0,$fill);
		$pdf->addTextWrap(40,$YPos-110,100,$FontSize,_('Hour'), 'left');
		$pdf->addTextWrap(80,$YPos-110,200,$FontSize,':__________________','left',0,$fill);
		$pdf->addTextWrap(40,$YPos-150,100,$FontSize,_('Signature'), 'left');
		$pdf->addTextWrap(80,$YPos-150,200,$FontSize,':__________________','left',0,$fill);

		//add column 2
		$pdf->addTextWrap(220,$YPos-50,100,$FontSize,$Column2.':', 'left');
		$pdf->addTextWrap(220,$YPos-70,100,$FontSize,_('Name'), 'left');
		$pdf->addTextWrap(260,$YPos-70,200,$FontSize,':__________________','left',0,$fill);
		$pdf->addTextWrap(220,$YPos-90,100,$FontSize,_('Date'), 'left');
		$pdf->addTextWrap(260,$YPos-90,200,$FontSize,':__________________','left',0,$fill);
		$pdf->addTextWrap(220,$YPos-110,100,$FontSize,_('Hour'), 'left');
		$pdf->addTextWrap(260,$YPos-110,200,$FontSize,':__________________','left',0,$fill);
		$pdf->addTextWrap(220,$YPos-150,100,$FontSize,_('Signature'), 'left');
		$pdf->addTextWrap(260,$YPos-150,200,$FontSize,':__________________','left',0,$fill);

		//add column 3
		$pdf->addTextWrap(400,$YPos-50,100,$FontSize,$Column3.':', 'left');
		$pdf->addTextWrap(400,$YPos-70,100,$FontSize,_('Name'), 'left');
		$pdf->addTextWrap(440,$YPos-70,200,$FontSize,':__________________','left',0,$fill);
		$pdf->addTextWrap(400,$YPos-90,100,$FontSize,_('Date'), 'left');
		$pdf->addTextWrap(440,$YPos-90,200,$FontSize,':__________________','left',0,$fill);
		$pdf->addTextWrap(400,$YPos-110,100,$FontSize,_('Hour'), 'left');
		$pdf->addTextWrap(440,$YPos-110,200,$FontSize,':__________________','left',0,$fill);
		$pdf->addTextWrap(400,$YPos-150,100,$FontSize,_('Signature'), 'left');
		$pdf->addTextWrap(440,$YPos-150,200,$FontSize,':__________________','left',0,$fill);
}

?>