Your IP : 216.73.216.40
<?php
/* $Id: StockTransfers.php 7462 2016-02-20 08:27:29Z tehonu $*/
/* Entry of point to point stock location transfers of a single part. */
include('includes/DefineSerialItems.php');
include('includes/DefineStockTransfers.php');
include('includes/session.inc');
$Title = _('Stock Transfers');// Screen identification.
$ViewTopic = "Inventory";// Filename's id in ManualContents.php's TOC.
$BookMark = "LocationTransfers";// Anchor's id in the manual's html document.
include('includes/header.inc');
include('includes/SQL_CommonFunctions.inc');
if(isset($_GET['New'])) {
unset($_SESSION['Transfer']);
}
if(isset($_GET['From'])) {
$_POST['StockLocationFrom']=$_GET['From'];
$_POST['StockLocationTo']=$_GET['To'];
$_POST['Quantity']=$_GET['Quantity'];
}
if(isset($_POST['CheckCode'])) {
echo '<p class="page_title_text"><img alt="" src="', $RootPath, '/css/', $Theme,
'/images/magnifier.png" title="',// Icon image.
_('Dispatch'), '" /> ',// Icon title.
_('Select Item to Transfer'), '</p>';// Page title.
if(mb_strlen($_POST['StockText'])>0) {
$sql="SELECT stockid,
description
FROM stockmaster
WHERE description " . LIKE . " '%" . $_POST['StockText'] . "%'";
} else {
$sql="SELECT stockid,
description
FROM stockmaster
WHERE stockid " . LIKE . " '%" . $_POST['StockCode']."%'";
}
$ErrMsg=_('The stock information cannot be retrieved because');
$DbgMsg=_('The SQL to get the stock description was');
$result = DB_query($sql,$ErrMsg,$DbgMsg);
echo '<table class="selection">
<tr>
<th class="ascending">' . _('Stock Code') . '</th>
<th class="ascending">' . _('Stock Description') . '</th>
</tr>';
while($myrow = DB_fetch_array($result)) {
echo '<tr>
<td>' . $myrow['stockid'] . '</td>
<td>' . $myrow['description'] . '</td>
<td><a href="' . $RootPath . '/StockTransfers.php?StockID='.$myrow['stockid'].'&Description='.$myrow['description'].'&NewTransfer=Yes&Quantity='. filter_number_format($_POST['Quantity']).'&From='.$_POST['StockLocationFrom'].'&To='.$_POST['StockLocationTo'].'">'
._('Transfer') . '</a></td>
</tr>';
}
echo '</table>';
include('includes/footer.inc');
exit;
}
$NewTransfer = false; /*initialise this first then determine from form inputs */
if(isset($_GET['NewTransfer'])) {
unset($_SESSION['Transfer']);
unset($_SESSION['TransferItem']); /*this is defined in bulk transfers but needs to be unset for individual transfers */
$NewTransfer=$_GET['NewTransfer'];
}
if(isset($_GET['StockID'])) { /*carry the stockid through to the form for additional inputs */
$_POST['StockID'] = trim(mb_strtoupper($_GET['StockID']));
} elseif(isset($_POST['StockID'])) { /* initiate a new transfer only if the StockID is different to the previous entry */
if(isset($_SESSION['Transfer']->TransferItem[0])) {
if($_POST['StockID'] != $_SESSION['Transfer']->TransferItem[0]->StockID) {
unset($_SESSION['Transfer']);
$NewTransfer = true;
}
} else { /* _SESSION['Transfer']->TransferItem[0] is not set so */
$NewTransfer = true;
}
}
if($NewTransfer) {
if(!isset($_POST['StockLocationFrom'])) {
$_POST['StockLocationFrom']='';
}
if(!isset($_POST['StockLocationTo'])) {
$_POST['StockLocationTo']='';
}
$_SESSION['Transfer']= new StockTransfer(0,
$_POST['StockLocationFrom'],
'',
$_POST['StockLocationTo'],
'',
Date($_SESSION['DefaultDateFormat'])
);
$result = DB_query("SELECT description,
units,
mbflag,
materialcost+labourcost+overheadcost as standardcost,
controlled,
serialised,
perishable,
decimalplaces
FROM stockmaster
WHERE stockid='" . trim(mb_strtoupper($_POST['StockID'])) . "'");
if(DB_num_rows($result) == 0) {
prnMsg( _('Unable to locate Stock Code').' '.mb_strtoupper($_POST['StockID']), 'error' );
} elseif(DB_num_rows($result)>0) {
$myrow = DB_fetch_array($result);
$_SESSION['Transfer']->TransferItem[0] = new LineItem( trim(mb_strtoupper($_POST['StockID'])),
$myrow['description'],
filter_number_format($_POST['Quantity']),
$myrow['units'],
$myrow['controlled'],
$myrow['serialised'],
$myrow['perishable'],
$myrow['decimalplaces']);
$_SESSION['Transfer']->TransferItem[0]->StandardCost = $myrow['standardcost'];
if($myrow['mbflag']=='D' OR $myrow['mbflag']=='A' OR $myrow['mbflag']=='K') {
prnMsg(_('The part entered is either or a dummy part or an assembly or a kit-set part') . '. ' . _('These parts are not physical parts and no stock holding is maintained for them') . '. ' . _('Stock Transfers are therefore not possible'),'warn');
echo '.<hr />';
echo '<a href="' . $RootPath . '/StockTransfers.php?NewTransfer=Yes">' . _('Enter another Transfer') . '</a>';
unset($_SESSION['Transfer']);
include('includes/footer.inc');
exit;
}
}
}
if(isset($_POST['Quantity'])
AND isset($_SESSION['Transfer']->TransferItem[0]->Controlled)
AND $_SESSION['Transfer']->TransferItem[0]->Controlled==0) {
$_SESSION['Transfer']->TransferItem[0]->Quantity = filter_number_format($_POST['Quantity']);
}
if(isset($_POST['StockLocationFrom'])
AND $_POST['StockLocationFrom']!= $_SESSION['Transfer']->StockLocationFrom ) {
$_SESSION['Transfer']->StockLocationFrom = $_POST['StockLocationFrom'];
$_SESSION['Transfer']->StockLocationTo = $_POST['StockLocationTo'];
$_SESSION['Transfer']->TransferItem[0]->Quantity=filter_number_format($_POST['Quantity']);
$_SESSION['Transfer']->TransferItem[0]->SerialItems=array();
}
if(isset($_POST['StockLocationTo']) ) {
$_SESSION['Transfer']->StockLocationTo = $_POST['StockLocationTo'];
}
if(isset($_POST['EnterTransfer']) ) {
$result = DB_query("SELECT * FROM stockmaster WHERE stockid='" . $_SESSION['Transfer']->TransferItem[0]->StockID ."'");
$myrow = DB_fetch_row($result);
$InputError = false;
if(DB_num_rows($result)==0) {
echo '<br />';
prnMsg(_('The entered item code does not exist'), 'error');
$InputError = true;
} elseif(!is_numeric($_SESSION['Transfer']->TransferItem[0]->Quantity)) {
echo '<br />';
prnMsg( _('The quantity entered must be numeric'), 'error' );
$InputError = true;
} elseif($_SESSION['Transfer']->TransferItem[0]->Quantity <= 0) {
echo '<br />';
prnMsg( _('The quantity entered must be a positive number greater than zero'), 'error');
$InputError = true;
}
if($_SESSION['Transfer']->StockLocationFrom==$_SESSION['Transfer']->StockLocationTo) {
echo '<br />';
prnMsg( _('The locations to transfer from and to must be different'), 'error');
$InputError = true;
}
if($InputError==False) {
/*All inputs must be sensible so make the stock movement records and update the locations stocks */
$TransferNumber = GetNextTransNo(16,$db);
$PeriodNo = GetPeriod(Date($_SESSION['DefaultDateFormat']), $db);
$SQLTransferDate = FormatDateForSQL(Date($_SESSION['DefaultDateFormat']));
$Result = DB_Txn_Begin();
// Need to get the current location quantity will need it later for the stock movement
$SQL="SELECT locstock.quantity
FROM locstock
WHERE locstock.stockid='" . $_SESSION['Transfer']->TransferItem[0]->StockID . "'
AND loccode= '" . $_SESSION['Transfer']->StockLocationFrom . "'";
$ErrMsg = _('Could not retrieve the QOH at the sending location because');
$DbgMsg = _('The SQL that failed was');
$Result = DB_query($SQL, $ErrMsg, $DbgMsg, true);
if(DB_num_rows($Result)==1) {
$LocQtyRow = DB_fetch_row($Result);
$QtyOnHandPrior = $LocQtyRow[0];
} else {
// There must actually be some error this should never happen
$QtyOnHandPrior = 0;
}
if($_SESSION['ProhibitNegativeStock']==1
AND $QtyOnHandPrior<$_SESSION['Transfer']->TransferItem[0]->Quantity) {
prnMsg( _('There is insufficient stock to make this transfer and webERP is setup to prevent negative stock'), 'warn');
include('includes/footer.inc');
exit;
}
// Insert outgoing inventory GL transaction if any of the locations has a GL account code:
if($_SESSION['Transfer']->StockLocationFromAccount !='' or $_SESSION['Transfer']->StockLocationToAccount !='') {
// Get the account code:
if($_SESSION['Transfer']->StockLocationToAccount !='') {
$AccountCode = $_SESSION['Transfer']->StockLocationToAccount;
} else {
$StockGLCode = GetStockGLCode($_SESSION['Transfer']->TransferItem[0]->StockID, $db);// Get Category's account codes.
$AccountCode = $StockGLCode['stockact'];// Select account code for stock.
}
// Get the item cost:
$SQLstandardcost = "SELECT stockmaster.materialcost + stockmaster.labourcost + stockmaster.overheadcost AS standardcost
FROM stockmaster
WHERE stockmaster.stockid ='" . $_SESSION['Transfer']->TransferItem[0]->StockID . "'";
$ErrMsg = _('The standard cost of the item cannot be retrieved because');
$DbgMsg = _('The SQL that failed was');
$ResultStandardCost = DB_query($SQLstandardcost,$ErrMsg,$DbgMsg);
$myrow = DB_fetch_array($ResultStandardCost);
$StandardCost = $myrow['standardcost'];// QUESTION: Standard cost for: Assembly (value="A") and Manufactured (value="M") items ?
// Insert record:
$SQL = "INSERT INTO gltrans (
periodno,
trandate,
type,
typeno,
account,
narrative,
amount)
VALUES ('" .
$PeriodNo . "','" .
$SQLTransferDate . "',
16,'" .
$TransferNumber . "','" .
$AccountCode . "','" .
$_SESSION['Transfer']->StockLocationFrom.' - '.$_SESSION['Transfer']->TransferItem[0]->StockID.' x '.$_SESSION['Transfer']->TransferItem[0]->Quantity.' @ '. $StandardCost . "','" .
-$_SESSION['Transfer']->TransferItem[0]->Quantity * $StandardCost . "')";
$ErrMsg = _('CRITICAL ERROR') . '! ' . _('NOTE DOWN THIS ERROR AND SEEK ASSISTANCE') . ': ' . _('The outgoing inventory GL transacction record could not be inserted because');
$DbgMsg = _('The following SQL to insert records was used');
$Result = DB_query($SQL, $ErrMsg, $DbgMsg, true);
}
// Insert the stock movement for the stock going out of the from location
$SQL = "INSERT INTO stockmoves(stockid,
type,
transno,
loccode,
trandate,
userid,
prd,
reference,
qty,
newqoh)
VALUES (
'" . $_SESSION['Transfer']->TransferItem[0]->StockID . "',
16,
'" . $TransferNumber . "',
'" . $_SESSION['Transfer']->StockLocationFrom . "',
'" . $SQLTransferDate . "',
'" . $_SESSION['UserID'] . "',
'" . $PeriodNo . "',
'To " . $_SESSION['Transfer']->StockLocationTo ."',
'" . round(-$_SESSION['Transfer']->TransferItem[0]->Quantity,$_SESSION['Transfer']->TransferItem[0]->DecimalPlaces) . "',
'" . ($QtyOnHandPrior - round($_SESSION['Transfer']->TransferItem[0]->Quantity,$_SESSION['Transfer']->TransferItem[0]->DecimalPlaces)) . "'
)";
$ErrMsg = _('CRITICAL ERROR') . '! ' . _('NOTE DOWN THIS ERROR AND SEEK ASSISTANCE') . ': ' . _('The stock movement record cannot be inserted because');
$DbgMsg = _('The following SQL to insert the stock movement record was used');
$Result = DB_query($SQL,$ErrMsg,$DbgMsg,true);
/*Get the ID of the StockMove... */
$StkMoveNo = DB_Last_Insert_ID($db,'stockmoves','stkmoveno');
/*Insert the StockSerialMovements and update the StockSerialItems for controlled items*/
if($_SESSION['Transfer']->TransferItem[0]->Controlled ==1) {
foreach($_SESSION['Transfer']->TransferItem[0]->SerialItems as $Item) {
/*We need to add or update the StockSerialItem record and
The StockSerialMoves as well */
/*First need to check if the serial items already exists or not in the location from */
$SQL = "SELECT COUNT(*)
FROM stockserialitems
WHERE
stockid='" . $_SESSION['Transfer']->TransferItem[0]->StockID . "'
AND loccode='" . $_SESSION['Transfer']->StockLocationFrom . "'
AND serialno='" . $Item->BundleRef . "'";
$ErrMsg = _('The entered item code does not exist');
$Result = DB_query($SQL,$ErrMsg);
$SerialItemExistsRow = DB_fetch_row($Result);
if($SerialItemExistsRow[0]==1) {
$SQL = "UPDATE stockserialitems
SET quantity= quantity - '" . $Item->BundleQty . "',
expirationdate='" . FormatDateForSQL($Item->ExpiryDate) . "'
WHERE stockid='" . $_SESSION['Transfer']->TransferItem[0]->StockID . "'
AND loccode='" . $_SESSION['Transfer']->StockLocationFrom . "'
AND serialno='" . $Item->BundleRef . "'";
$ErrMsg = _('CRITICAL ERROR') . '! ' . _('NOTE DOWN THIS ERROR AND SEEK ASSISTANCE') . ': ' . _('The serial stock item record could not be updated because');
$DbgMsg = _('The following SQL to update the serial stock item record was used');
$Result = DB_query($SQL, $ErrMsg, $DbgMsg, true);
} else {
/*Need to insert a new serial item record */
$SQL = "INSERT INTO stockserialitems (stockid,
loccode,
serialno,
expirationdate,
quantity)
VALUES ('" . $_SESSION['Transfer']->TransferItem[0]->StockID . "',
'" . $_SESSION['Transfer']->StockLocationFrom . "',
'" . $Item->BundleRef . "',
'" . FormatDateForSQL($Item->ExpiryDate) . "',
'" . -$Item->BundleQty . "')";
$ErrMsg = _('CRITICAL ERROR') . '! ' . _('NOTE DOWN THIS ERROR AND SEEK ASSISTANCE') . ': ' . _('The serial stock item record could not be added because');
$DbgMsg = _('The following SQL to insert the serial stock item record was used');
$Result = DB_query($SQL, $ErrMsg, $DbgMsg, true);
}
/* now insert the serial stock movement */
$SQL = "INSERT INTO stockserialmoves (
stockmoveno,
stockid,
serialno,
moveqty)
VALUES (
'" . $StkMoveNo . "',
'" . $_SESSION['Transfer']->TransferItem[0]->StockID . "',
'" . $Item->BundleRef . "',
'" . $Item->BundleQty . "'
)";
$ErrMsg = _('CRITICAL ERROR') . '! ' . _('NOTE DOWN THIS ERROR AND SEEK ASSISTANCE') . ': ' . _('The serial stock movement record could not be inserted because');
$DbgMsg = _('The following SQL to insert the serial stock movement records was used');
$Result = DB_query($SQL, $ErrMsg, $DbgMsg, true);
}/* foreach controlled item in the serialitems array */
} /*end if the transferred item is a controlled item */
// Need to get the current location quantity will need it later for the stock movement
$SQL="SELECT locstock.quantity
FROM locstock
WHERE locstock.stockid='" . $_SESSION['Transfer']->TransferItem[0]->StockID . "'
AND loccode= '" . $_SESSION['Transfer']->StockLocationTo . "'";
$ErrMsg = _('Could not retrieve QOH at the destination because');
$Result = DB_query($SQL, $ErrMsg, $DbgMsg,true);
if(DB_num_rows($Result)==1) {
$LocQtyRow = DB_fetch_row($Result);
$QtyOnHandPrior = $LocQtyRow[0];
} else {
// There must actually be some error this should never happen
$QtyOnHandPrior = 0;
}
// Insert incoming inventory GL transaction if any of the locations has a GL account code:
if($_SESSION['Transfer']->StockLocationFromAccount !='' or $_SESSION['Transfer']->StockLocationToAccount !='') {
// Get the account code:
if($_SESSION['Transfer']->StockLocationToAccount !='') {
$AccountCode = $_SESSION['Transfer']->StockLocationToAccount;
} else {
$StockGLCode = GetStockGLCode($_SESSION['Transfer']->TransferItem[0]->StockID, $db);// Get Category's account codes.
$AccountCode = $StockGLCode['stockact'];// Select account code for stock.
}
// Get the item cost:
$SQLstandardcost = "SELECT stockmaster.materialcost + stockmaster.labourcost + stockmaster.overheadcost AS standardcost
FROM stockmaster
WHERE stockmaster.stockid ='" . $_SESSION['Transfer']->TransferItem[0]->StockID . "'";
$ErrMsg = _('The standard cost of the item cannot be retrieved because');
$DbgMsg = _('The SQL that failed was');
$ResultStandardCost = DB_query($SQLstandardcost,$ErrMsg,$DbgMsg);
$myrow = DB_fetch_array($ResultStandardCost);
$StandardCost = $myrow['standardcost'];// QUESTION: Standard cost for: Assembly (value="A") and Manufactured (value="M") items ?
// Insert record:
$SQL = "INSERT INTO gltrans (
periodno,
trandate,
type,
typeno,
account,
narrative,
amount)
VALUES ('" .
$PeriodNo . "','" .
$SQLTransferDate . "',
16,'" .
$TransferNumber . "','" .
$AccountCode . "','" .
$_SESSION['Transfer']->StockLocationTo.' - '.$_SESSION['Transfer']->TransferItem[0]->StockID.' x '.$_SESSION['Transfer']->TransferItem[0]->Quantity.' @ '. $StandardCost . "','" .
$_SESSION['Transfer']->TransferItem[0]->Quantity * $StandardCost . "')";
$ErrMsg = _('CRITICAL ERROR') . '! ' . _('NOTE DOWN THIS ERROR AND SEEK ASSISTANCE') . ': ' . _('The incoming inventory GL transacction record could not be inserted because');
$DbgMsg = _('The following SQL to insert records was used');
$Result = DB_query($SQL, $ErrMsg, $DbgMsg, true);
}
// Insert the stock movement for the stock coming into the to location
$SQL = "INSERT INTO stockmoves (stockid,
type,
transno,
loccode,
trandate,
userid,
prd,
reference,
qty,
newqoh)
VALUES ('" . $_SESSION['Transfer']->TransferItem[0]->StockID . "',
16,
'" . $TransferNumber . "',
'" . $_SESSION['Transfer']->StockLocationTo . "',
'" . $SQLTransferDate . "',
'" . $_SESSION['UserID'] . "',
'" . $PeriodNo . "',
'" . _('From') . " " . $_SESSION['Transfer']->StockLocationFrom . "',
'" . $_SESSION['Transfer']->TransferItem[0]->Quantity . "',
'" . round($QtyOnHandPrior + $_SESSION['Transfer']->TransferItem[0]->Quantity,$_SESSION['Transfer']->TransferItem[0]->DecimalPlaces) . "')";
$ErrMsg = _('CRITICAL ERROR') . '! ' . _('NOTE DOWN THIS ERROR AND SEEK ASSISTANCE') . ': ' . _('The stock movement record cannot be inserted because');
$DbgMsg = _('The following SQL to insert the stock movement record was used');
$Result = DB_query($SQL,$ErrMsg,$DbgMsg,true);
/*Get the ID of the StockMove... */
$StkMoveNo = DB_Last_Insert_ID($db,'stockmoves','stkmoveno');
/*Insert the StockSerialMovements and update the StockSerialItems for controlled items*/
if($_SESSION['Transfer']->TransferItem[0]->Controlled ==1) {
foreach($_SESSION['Transfer']->TransferItem[0]->SerialItems as $Item) {
/*We need to add or update the StockSerialItem record and
The StockSerialMoves as well */
/*First need to check if the serial items already exists or not in the location from */
$SQL = "SELECT COUNT(*)
FROM stockserialitems
WHERE stockid='" . $_SESSION['Transfer']->TransferItem[0]->StockID . "'
AND loccode='" . $_SESSION['Transfer']->StockLocationTo . "'
AND serialno='" . $Item->BundleRef . "'";
$ErrMsg = _('Could not determine if the serial item exists in the transfer to location');
$Result = DB_query($SQL,$ErrMsg);
$SerialItemExistsRow = DB_fetch_row($Result);
if($SerialItemExistsRow[0]==1) {
$SQL = "UPDATE stockserialitems
SET quantity= quantity + '" . $Item->BundleQty . "',
expirationdate='" . FormatDateForSQL($Item->ExpiryDate) . "'
WHERE stockid='" . $_SESSION['Transfer']->TransferItem[0]->StockID . "'
AND loccode='" . $_SESSION['Transfer']->StockLocationTo . "'
AND serialno='" . $Item->BundleRef . "'";
$ErrMsg = _('CRITICAL ERROR') . '! ' . _('NOTE DOWN THIS ERROR AND SEEK ASSISTANCE') . ': ' . _('The serial stock item record could not be updated because');
$DbgMsg = _('The following SQL to update the serial stock item record was used');
$Result = DB_query($SQL, $ErrMsg, $DbgMsg, true);
} else {
/*Need to insert a new serial item record */
$SQL = "INSERT INTO stockserialitems (stockid,
loccode,
serialno,
expirationdate,
quantity,
qualitytext)
VALUES ('" . $_SESSION['Transfer']->TransferItem[0]->StockID . "',
'" . $_SESSION['Transfer']->StockLocationTo . "',
'" . $Item->BundleRef . "',
'" . FormatDateForSQL($Item->ExpiryDate) . "',
'" . $Item->BundleQty . "',
'')";
$ErrMsg = _('CRITICAL ERROR') . '! ' . _('NOTE DOWN THIS ERROR AND SEEK ASSISTANCE') . ': ' . _('The serial stock item record could not be added because');
$DbgMsg = _('The following SQL to insert the serial stock item record was used:');
$Result = DB_query($SQL, $ErrMsg, $DbgMsg, true);
}
/* now insert the serial stock movement */
$SQL = "INSERT INTO stockserialmoves (stockmoveno,
stockid,
serialno,
moveqty)
VALUES ('" . $StkMoveNo . "',
'" . $_SESSION['Transfer']->TransferItem[0]->StockID . "',
'" . $Item->BundleRef . "',
'" . $Item->BundleQty . "')";
$ErrMsg = _('CRITICAL ERROR') . '! ' . _('NOTE DOWN THIS ERROR AND SEEK ASSISTANCE') . ': ' . _('The serial stock movement record could not be inserted because');
$DbgMsg = _('The following SQL to insert the serial stock movement records was used');
$Result = DB_query($SQL, $ErrMsg, $DbgMsg, true);
}/* foreach controlled item in the serialitems array */
} /*end if the transfer item is a controlled item */
$SQL = "UPDATE locstock SET quantity = quantity - '" . round($_SESSION['Transfer']->TransferItem[0]->Quantity,$_SESSION['Transfer']->TransferItem[0]->DecimalPlaces) . "'
WHERE stockid='" . $_SESSION['Transfer']->TransferItem[0]->StockID . "'
AND loccode='" . $_SESSION['Transfer']->StockLocationFrom . "'";
$ErrMsg = _('CRITICAL ERROR') . '! ' . _('NOTE DOWN THIS ERROR AND SEEK ASSISTANCE') . ': ' . _('The location stock record could not be updated because');
$DbgMsg = _('The following SQL to update the location stock record was used');
$Result = DB_query($SQL,$ErrMsg,$DbgMsg,true);
$SQL = "UPDATE locstock
SET quantity = quantity + '" . round($_SESSION['Transfer']->TransferItem[0]->Quantity,$_SESSION['Transfer']->TransferItem[0]->DecimalPlaces) . "'
WHERE stockid='" . $_SESSION['Transfer']->TransferItem[0]->StockID . "'
AND loccode='" . $_SESSION['Transfer']->StockLocationTo . "'";
$ErrMsg = _('CRITICAL ERROR') . '! ' . _('NOTE DOWN THIS ERROR AND SEEK ASSISTANCE') . ': ' . _('The location stock record could not be updated because');
$DbgMsg = _('The following SQL to update the location stock record was used');
$Result = DB_query($SQL,$ErrMsg, $DbgMsg, true);
$Result = DB_Txn_Commit();
prnMsg(_('An inventory transfer of').' ' . $_SESSION['Transfer']->TransferItem[0]->StockID . ' - ' . $_SESSION['Transfer']->TransferItem[0]->ItemDescription . ' '. _('has been created from').' ' . $_SESSION['Transfer']->StockLocationFrom . ' '. _('to') . ' ' . $_SESSION['Transfer']->StockLocationTo . ' '._('for a quantity of').' ' . $_SESSION['Transfer']->TransferItem[0]->Quantity,'success');
echo '<br /><a href="PDFStockTransfer.php?TransferNo='.$TransferNumber.'">' . _('Print Transfer Note') . '</a>';
unset($_SESSION['Transfer']);
include('includes/footer.inc');
exit;
}
}
echo '<p class="page_title_text">
<img src="'.$RootPath.'/css/'.$Theme.'/images/supplier.png" title="' . _('Dispatch') . '" alt="" />' . ' ' . $Title . '
</p>';
echo '<form action="'. htmlspecialchars($_SERVER['PHP_SELF'],ENT_QUOTES,'UTF-8') . '" method="post">';
echo '<div>';
echo '<input type="hidden" name="FormID" value="' . $_SESSION['FormID'] . '" />';
if(!isset($_GET['Description'])) {
$_GET['Description']='';
}
echo '<table class="selection">
<tr>
<td>' . _('Stock Code'). ':</td>
<td>';
if(!isset($_POST['StockID'])) {
$_POST['StockID'] = '';
}
echo '<input type="text" title="'._('The stock ID should not be blank or contains illegal characters, you can choose left this blank and only keyin')._('Partial Stock Code')._('or')._('Partial Description')._('then push')._('Check Part').'" name="StockID" size="21" value="' . $_POST['StockID'] . '" maxlength="20" /></td></tr>';
echo '<tr><td>' . _('Partial Description'). ':</td>
<td><input type="text" name="StockText" title="'._('You can key in part of stock description or left this and ')._('Partial Stock Code')._('blank and click ')._('Check Part').' '._('to view the whole stock list').'" size="21" value="' . $_GET['Description'] .'" /></td>
<td>' . _('Partial Stock Code'). ':</td><td>';
if(isset($_POST['StockID'])) {
echo '<input type="text" title="'._('You can key in partial of the stock code or just left this blank to click').' '._('Check Part').'" name="StockCode" size="21" value="' . $_POST['StockID'] .'" maxlength="20" />';
} else {
echo '<input type="text" title="'._('You can key in partial of the stock code or just left this blank to click').' '._('Check Part').'" name="StockCode" size="21" value="" maxlength="20" />';
}
echo '</td><td><input type="submit" name="CheckCode" value="'._('Check Part').'" /></td></tr>';
if(isset($_SESSION['Transfer']->TransferItem[0]->ItemDescription)
AND mb_strlen($_SESSION['Transfer']->TransferItem[0]->ItemDescription)>1) {
echo '<tr>
<td colspan="3"><font color="blue" size="3">' . $_SESSION['Transfer']->TransferItem[0]->ItemDescription . ' ('._('In Units of').' ' . $_SESSION['Transfer']->TransferItem[0]->PartUnit . ' )</font></td>
</tr>';
}
echo '<tr>
<td>' . _('From Stock Location').':</td>
<td><select name="StockLocationFrom">';
$sql = "SELECT locations.loccode, locationname FROM locations INNER JOIN locationusers ON locationusers.loccode=locations.loccode AND locationusers.userid='" . $_SESSION['UserID'] . "' AND locationusers.canupd=1";
$resultStkLocs = DB_query($sql);
while($myrow=DB_fetch_array($resultStkLocs)) {
if(isset($_SESSION['Transfer']->StockLocationFrom)) {
if($myrow['loccode'] == $_SESSION['Transfer']->StockLocationFrom) {
echo '<option selected="selected" value="' . $myrow['loccode'] . '">' . $myrow['locationname'] . '</option>';
} else {
echo '<option value="' . $myrow['loccode'] . '">' . $myrow['locationname'] . '</option>';
}
} elseif($myrow['loccode']==$_SESSION['UserStockLocation']) {
echo '<option selected="selected" value="' . $myrow['loccode'] . '">' . $myrow['locationname'] . '</option>';
if(isset($_SESSION['Transfer']))
$_SESSION['Transfer']->StockLocationFrom=$myrow['loccode'];
} else {
echo '<option value="' . $myrow['loccode'] . '">' . $myrow['locationname'] . '</option>';
}
}
echo '</select></td>
</tr>';
echo '<tr>
<td>' . _('To Stock Location').': </td>
<td><select name="StockLocationTo"> ';
DB_data_seek($resultStkLocs,0);
while($myrow=DB_fetch_array($resultStkLocs)) {
if(isset($_SESSION['Transfer']) AND isset($_SESSION['Transfer']->StockLocationTo)) {
if($myrow['loccode'] == $_SESSION['Transfer']->StockLocationTo) {
echo '<option selected="selected" value="' . $myrow['loccode'] . '">' . $myrow['locationname'] . '</option>';
} else {
echo '<option value="' . $myrow['loccode'] . '">' . $myrow['locationname'] . '</option>';
}
} elseif($myrow['loccode']==$_SESSION['UserStockLocation'] AND isset($_SESSION['Transfer'])) {
echo '<option selected="selected" value="' . $myrow['loccode'] . '">' . $myrow['locationname'] . '</option>';
if(isset($_SESSION['Transfer']))
$_SESSION['Transfer']->StockLocationTo=$myrow['loccode'];
} else {
echo '<option value="' . $myrow['loccode'] . '">' . $myrow['locationname'] . '</option>';
}
}
echo '</select></td></tr>';
echo '<tr>
<td>' . _('Transfer Quantity').':</td>';
if(isset($_SESSION['Transfer']->TransferItem[0]->Controlled)
AND $_SESSION['Transfer']->TransferItem[0]->Controlled==1) {
echo '<td class="number"><input type="hidden" name="Quantity" value="' . locale_number_format($_SESSION['Transfer']->TransferItem[0]->Quantity) . '" /><a href="' . $RootPath .'/StockTransferControlled.php?StockLocationFrom='.$_SESSION['Transfer']->StockLocationFrom.'">' . $_SESSION['Transfer']->TransferItem[0]->Quantity . '</a></td></tr>';
} elseif(isset($_SESSION['Transfer']->TransferItem[0]->Controlled)) {
echo '<td><input type="text" class="number" name="Quantity" title="'._('The transfer quantity cannot be zero').'" size="12" maxlength="12" value="' . locale_number_format($_SESSION['Transfer']->TransferItem[0]->Quantity) . '" /></td></tr>';
} else {
echo '<td><input type="text" class="number" title="'._('The transfer quantity cannot be zer0').'" name="Quantity" size="12" maxlength="12" value="0" /></td>
</tr>';
}
echo '</table>
<div class="centre">
<br />
<input type="submit" name="EnterTransfer" value="' . _('Enter Stock Transfer') . '" />
<br />';
if(empty($_SESSION['Transfer']->TransferItem[0]->StockID) and isset($_POST['StockID'])) {
$StockID=$_POST['StockID'];
} elseif(isset($_SESSION['Transfer']->TransferItem[0]->StockID)) {
$StockID=$_SESSION['Transfer']->TransferItem[0]->StockID;
} else {
$StockID='';
}
if(isset($_SESSION['Transfer'])) {
echo '<br />
<a href="'.$RootPath.'/StockStatus.php?StockID=' . $StockID . '">' . _('Show Stock Status') . '</a>';
echo '<br />
<a href="'.$RootPath.'/StockMovements.php?StockID=' . $StockID . '">' . _('Show Movements') . '</a>';
echo '<br />
<a href="'.$RootPath.'/StockUsage.php?StockID=' . $StockID . '&StockLocation=' . $_SESSION['Transfer']->StockLocationFrom . '">' . _('Show Stock Usage') . '</a>';
echo '<br />
<a href="'.$RootPath.'/SelectSalesOrder.php?SelectedStockItem=' . $StockID . '&StockLocation=' . $_SESSION['Transfer']->StockLocationFrom . '">' . _('Search Outstanding Sales Orders') . '</a>';
echo '<br />
<a href="'.$RootPath.'/SelectCompletedOrder.php?SelectedStockItem=' . $StockID . '">' . _('Search Completed Sales Orders') . '</a>';
}
echo '</div>
</div>
</form>';
include('includes/footer.inc');
?>