Menu
▾
▴
[Weberp-cvs] SF.net SVN: web-erp:[3832] trunk
|
From: <tim...@us...> - 2010-09-29 16:21:33
|
Revision: 3832
http://web-erp.svn.sourceforge.net/web-erp/?rev=3832&view=rev
Author: tim_schofield
Date: 2010-09-29 16:21:25 +0000 (Wed, 29 Sep 2010)
Log Message:
-----------
SQL quoting corrections and layout changes and improvements
Modified Paths:
--------------
trunk/WorkOrderReceive.php
trunk/doc/Change.log.html
Modified: trunk/WorkOrderReceive.php
===================================================================
--- trunk/WorkOrderReceive.php 2010-09-29 10:56:03 UTC (rev 3831)
+++ trunk/WorkOrderReceive.php 2010-09-29 16:21:25 UTC (rev 3832)
@@ -11,41 +11,44 @@
echo '<a href="'. $rootpath . '/SelectWorkOrder.php?' . SID . '">' . _('Back to Work Orders'). '</a><br>';
echo '<a href="'. $rootpath . '/WorkOrderCosting.php?' . SID . '&WO=' . $_REQUEST['WO'] . '">' . _('Back to Costing'). '</a><br>';
+echo '<p class="page_title_text"><img src="'.$rootpath.'/css/'.$theme.'/images/group_add.png" title="' .
+ _('Search') . '" alt="">' . ' ' . $title.'</p';
+
echo '<form action="' . $_SERVER['PHP_SELF'] . '?' . SID . '" method=post>';
if (!isset($_REQUEST['WO']) OR !isset($_REQUEST['StockID'])) {
- /* This page can only be called with a purchase order number for invoicing*/
- echo '<div class="centre"><a href="' . $rootpath . '/SelectWorkOrder.php?' . SID . '">'.
- _('Select a work order to receive').'</a></div>';
- prnMsg(_('This page can only be opened if a work order has been selected. Please select a work order to receive first'),'info');
- include ('includes/footer.inc');
- exit;
+ /* This page can only be called with a purchase order number for invoicing*/
+ echo '<div class="centre"><a href="' . $rootpath . '/SelectWorkOrder.php?' . SID . '">'.
+ _('Select a work order to receive').'</a></div>';
+ prnMsg(_('This page can only be opened if a work order has been selected. Please select a work order to receive first'),'info');
+ include ('includes/footer.inc');
+ exit;
} else {
- echo '<input type="hidden" name="WO" value=' .$_REQUEST['WO'] . '>';
- $_POST['WO']=$_REQUEST['WO'];
- echo '<input type="hidden" name="StockID" value=' .$_REQUEST['StockID'] . '>';
- $_POST['StockID']=$_REQUEST['StockID'];
+ echo '<input type="hidden" name="WO" value=' .$_REQUEST['WO'] . '>';
+ $_POST['WO']=$_REQUEST['WO'];
+ echo '<input type="hidden" name="StockID" value=' .$_REQUEST['StockID'] . '>';
+ $_POST['StockID']=$_REQUEST['StockID'];
}
if (isset($_POST['Process'])){ //user hit the process the work order receipts entered.
- $InputError = false; //ie assume no problems for a start - ever the optimist
- $ErrMsg = _('Could not retrieve the details of the selected work order item');
- $WOResult = DB_query("SELECT workorders.loccode,
- locations.locationname,
- workorders.requiredby,
- workorders.startdate,
- workorders.closed,
- stockmaster.description,
- stockmaster.controlled,
- stockmaster.serialised,
- stockmaster.decimalplaces,
- stockmaster.units,
- woitems.qtyreqd,
- woitems.qtyrecd,
- woitems.stdcost,
- stockcategory.wipact,
- stockcategory.stockact
+ $InputError = false; //ie assume no problems for a start - ever the optimist
+ $ErrMsg = _('Could not retrieve the details of the selected work order item');
+ $WOResult = DB_query("SELECT workorders.loccode,
+ locations.locationname,
+ workorders.requiredby,
+ workorders.startdate,
+ workorders.closed,
+ stockmaster.description,
+ stockmaster.controlled,
+ stockmaster.serialised,
+ stockmaster.decimalplaces,
+ stockmaster.units,
+ woitems.qtyreqd,
+ woitems.qtyrecd,
+ woitems.stdcost,
+ stockcategory.wipact,
+ stockcategory.stockact
FROM workorders INNER JOIN locations
ON workorders.loccode=locations.loccode
INNER JOIN woitems
@@ -55,409 +58,414 @@
INNER JOIN stockcategory
ON stockmaster.categoryid=stockcategory.categoryid
WHERE woitems.stockid='" . $_POST['StockID'] . "'
- AND workorders.wo=".$_POST['WO'],
+ AND workorders.wo='".$_POST['WO'] . "'",
$db,
$ErrMsg);
- if (DB_num_rows($WOResult)==0){
- prnMsg(_('The selected work order item cannot be retrieved from the database'),'info');
- include('includes/footer.inc');
- exit;
- }
- $WORow = DB_fetch_array($WOResult);
+ if (DB_num_rows($WOResult)==0){
+ prnMsg(_('The selected work order item cannot be retrieved from the database'),'info');
+ include('includes/footer.inc');
+ exit;
+ }
+ $WORow = DB_fetch_array($WOResult);
- $QuantityReceived = 0;
+ $QuantityReceived = 0;
- if($WORow['controlled']==1){ //controlled
- if ($WORow['serialised']==1){ //serialised
- for ($i=0;$i<$_POST['CountOfInputs'];$i++){
- if ($_SESSION['DefineControlledOnWOEntry']==1){
+ if($WORow['controlled']==1){ //controlled
+ if ($WORow['serialised']==1){ //serialised
+ for ($i=0;$i<$_POST['CountOfInputs'];$i++){
+ if ($_SESSION['DefineControlledOnWOEntry']==1){
if (isset($_POST['CheckItem' . $i])){
$QuantityReceived ++;
- }
+ }
} else { //not predefined serial numbers
if (strlen($_POST['SerialNo' . $i])>0){
$QuantityReceived ++;
}
}
- }
- } else { //controlled but not serialised - just lot/batch control
- for ($i=0;$i<15;$i++){
- if (strlen($_POST['BatchRef' . $i])>0){
- $QuantityReceived += $_POST['Qty' .$i];
- }
- }
- } //end of lot/batch control
- } else { //not controlled - an easy one!
+ }
+ } else { //controlled but not serialised - just lot/batch control
+ for ($i=0;$i<15;$i++){
+ if (strlen($_POST['BatchRef' . $i])>0){
+ $QuantityReceived += $_POST['Qty' .$i];
+ }
+ }
+ } //end of lot/batch control
+ } else { //not controlled - an easy one!
if (!is_numeric($_POST['Qty'])){
$InputError=true;
prnMsg(_('The quantity entered is not numeric - a number is expected'),'error');
} else {
- $QuantityReceived = $_POST['Qty'];
+ $QuantityReceived = $_POST['Qty'];
}
- }
+ }
- if ($QuantityReceived + $WORow['qtyrecd'] > $WORow['qtyreqd'] *(1+$_SESSION['OverReceiveProportion'])){
- prnMsg(_('The quantity received is greater than the quantity required even after allowing for the configured allowable over-receive proportion. If this is correct then the work order must be modified first.'),'error');
- $InputError=true;
- }
+ if ($QuantityReceived + $WORow['qtyrecd'] > $WORow['qtyreqd'] *(1+$_SESSION['OverReceiveProportion'])){
+ prnMsg(_('The quantity received is greater than the quantity required even after allowing for the configured allowable over-receive proportion. If this is correct then the work order must be modified first.'),'error');
+ $InputError=true;
+ }
- if ($WORow['serialised']==1){
- /* serialised items form has a possible $_POST['CountOfInputs'] fields for entry of serial numbers - 12 rows x 5 per row
+ if ($WORow['serialised']==1){
+ /* serialised items form has a possible $_POST['CountOfInputs'] fields for entry of serial numbers - 12 rows x 5 per row
* if serial numbers are defined at the time of work order entry $_SESSION['DefineControlledOnWOEntry']==1 then possibly more
* need to inspect $_POST['CountOfInputs']
*/
- for($i=0;$i<$_POST['CountOfInputs'];$i++){
- //need to test if the serialised item exists first already
- if (trim($_POST['SerialNo' .$i]) != "" AND ($_SESSION['DefineControlledOnWOEntry']==0
+ for($i=0;$i<$_POST['CountOfInputs'];$i++){
+ //need to test if the serialised item exists first already
+ if (trim($_POST['SerialNo' .$i]) != "" AND ($_SESSION['DefineControlledOnWOEntry']==0
OR ($_SESSION['DefineControlledOnWOEntry']==1 AND $_POST['CheckedItem'.$i]==true))){
- $SQL = "SELECT COUNT(*) FROM stockserialitems
- WHERE stockid='" . $_POST['StockID'] . "'
- AND loccode = '" . $_POST['IntoLocation'] . "'
- AND serialno = '" . $_POST['SerialNo' .$i] . "'";
- $ErrMsg = _('CRITICAL ERROR') . '! ' . _('NOTE DOWN THIS ERROR AND SEEK ASSISTANCE') . ': ' . _('Could not check if a serial number for the stock item already exists because');
- $DbgMsg = _('The following SQL to test for an already existing serialised stock item was used');
- $Result = DB_query($SQL, $db, $ErrMsg, $DbgMsg, true);
- $AlreadyExistsRow = DB_fetch_row($Result);
+ $SQL = "SELECT COUNT(*) FROM stockserialitems
+ WHERE stockid='" . $_POST['StockID'] . "'
+ AND loccode = '" . $_POST['IntoLocation'] . "'
+ AND serialno = '" . $_POST['SerialNo' .$i] . "'";
+ $ErrMsg = _('CRITICAL ERROR') . '! ' . _('NOTE DOWN THIS ERROR AND SEEK ASSISTANCE') . ': ' . _('Could not check if a serial number for the stock item already exists because');
+ $DbgMsg = _('The following SQL to test for an already existing serialised stock item was used');
+ $Result = DB_query($SQL, $db, $ErrMsg, $DbgMsg, true);
+ $AlreadyExistsRow = DB_fetch_row($Result);
- if ($AlreadyExistsRow[0]>0){
- prnMsg(_('The serial number entered already exists. Duplicate serial numbers are prohibited. The duplicate item is:') . ' ' . $_POST['SerialNo'.$i] ,'error');
- $InputError = true;
- }
- }
- } //end loop throught the 60 fields for serial number entry
- }//end check on pre-existing serial numbered items
+ if ($AlreadyExistsRow[0]>0){
+ prnMsg(_('The serial number entered already exists. Duplicate serial numbers are prohibited. The duplicate item is:') . ' ' . $_POST['SerialNo'.$i] ,'error');
+ $InputError = true;
+ }
+ }
+ } //end loop throught the 60 fields for serial number entry
+ }//end check on pre-existing serial numbered items
- if ($_SESSION['ProhibitNegativeStock']==1){
- /*Now look for autoissue components that would go negative */
- $SQL = "SELECT worequirements.stockid,
- stockmaster.description,
- locstock.quantity-(" . $QuantityReceived . "*worequirements.qtypu) AS qtyleft
- FROM worequirements
- INNER JOIN stockmaster
- ON worequirements.stockid=stockmaster.stockid
- INNER JOIN locstock
- ON worequirements.stockid=locstock.stockid
- WHERE worequirements.wo=" . $_POST['WO'] . "
- AND worequirements.parentstockid='" .$_POST['StockID'] . "'
- AND locstock.loccode='" . $WORow['loccode'] . "'
- AND stockmaster.mbflag <>'D'
- AND worequirements.autoissue=1";
+ if ($_SESSION['ProhibitNegativeStock']==1){
+ /*Now look for autoissue components that would go negative */
+ $SQL = "SELECT worequirements.stockid,
+ stockmaster.description,
+ locstock.quantity-(" . $QuantityReceived . "*worequirements.qtypu) AS qtyleft
+ FROM worequirements
+ INNER JOIN stockmaster
+ ON worequirements.stockid=stockmaster.stockid
+ INNER JOIN locstock
+ ON worequirements.stockid=locstock.stockid
+ WHERE worequirements.wo='" . $_POST['WO'] . "'
+ AND worequirements.parentstockid='" .$_POST['StockID'] . "'
+ AND locstock.loccode='" . $WORow['loccode'] . "'
+ AND stockmaster.mbflag <>'D'
+ AND worequirements.autoissue=1";
- $ErrMsg = _('Could not retrieve the component quantity left at the location once the component items are issued to the work order (for the purposes of checking that stock will not go negative) because');
- $Result = DB_query($SQL,$db,$ErrMsg);
- while ($NegRow = DB_fetch_array($Result)){
- if ($NegRow['qtyleft']<0){
- prnMsg(_('Receiving the selected quantity against this work order would result in negative stock for a component. The system parameters are set to prohibit negative stocks from occurring. This manufacturing receipt cannot be created until the stock on hand is corrected.'),'error',_('Component') . ' - ' .$NegRow['component'] . ' ' . $NegRow['description'] . ' - ' . _('Negative Stock Prohibited'));
- $InputError = true;
- } // end if negative would result
- } //loop around the autoissue requirements for the work order
- }
+ $ErrMsg = _('Could not retrieve the component quantity left at the location once the component items are issued to the work order (for the purposes of checking that stock will not go negative) because');
+ $Result = DB_query($SQL,$db,$ErrMsg);
+ while ($NegRow = DB_fetch_array($Result)){
+ if ($NegRow['qtyleft']<0){
+ prnMsg(_('Receiving the selected quantity against this work order would result in negative stock for a component. The system parameters are set to prohibit negative stocks from occurring. This manufacturing receipt cannot be created until the stock on hand is corrected.'),'error',_('Component') . ' - ' .$NegRow['component'] . ' ' . $NegRow['description'] . ' - ' . _('Negative Stock Prohibited'));
+ $InputError = true;
+ } // end if negative would result
+ } //loop around the autoissue requirements for the work order
+ }
- if ($InputError==false){
+ if ($InputError==false){
/************************ BEGIN SQL TRANSACTIONS ************************/
- $Result = DB_Txn_Begin($db);
- /*Now Get the next WOReceipt transaction type 26 - function in SQL_CommonFunctions*/
- $WOReceiptNo = GetNextTransNo(26, $db);
+ $Result = DB_Txn_Begin($db);
+ /*Now Get the next WOReceipt transaction type 26 - function in SQL_CommonFunctions*/
+ $WOReceiptNo = GetNextTransNo(26, $db);
- $PeriodNo = GetPeriod(Date($_SESSION['DefaultDateFormat']), $db);
- $SQLReceivedDate = FormatDateForSQL($_POST['ReceivedDate']);
- $StockGLCode = GetStockGLCode($_POST['StockID'],$db);
+ $PeriodNo = GetPeriod(Date($_SESSION['DefaultDateFormat']), $db);
- //Recalculate the standard for the item if there were no items previously received against the work order
- if ($WORow['qtyrecd']==0){
- $CostResult = DB_query("SELECT SUM((materialcost+labourcost+overheadcost)*bom.quantity) AS cost
- FROM stockmaster INNER JOIN bom
- ON stockmaster.stockid=bom.component
- WHERE bom.parent='" . $_POST['StockID'] . "'
- AND bom.loccode='" . $WORow['loccode'] . "'",
- $db);
- $CostRow = DB_fetch_row($CostResult);
- if (is_null($CostRow[0]) OR $CostRow[0]==0){
- $Cost =0;
- } else {
- $Cost = $CostRow[0];
- }
- //Need to refresh the worequirments with the bom components now incase they changed
- $DelWORequirements = DB_query("DELETE FROM worequirements
- WHERE wo=" . $_POST['WO'] . "
- AND parentstockid='" . $_POST['StockID'] . "'",
- $db);
+ if (!isset($_POST['ReceivedDate'])){
+ $_POST['ReceivedDate'] = Date($_SESSION['DefaultDateFormat']);
+ }
+ $SQLReceivedDate = FormatDateForSQL($_POST['ReceivedDate']);
+ $StockGLCode = GetStockGLCode($_POST['StockID'],$db);
+
+ //Recalculate the standard for the item if there were no items previously received against the work order
+ if ($WORow['qtyrecd']==0){
+ $CostResult = DB_query("SELECT SUM((materialcost+labourcost+overheadcost)*bom.quantity) AS cost
+ FROM stockmaster INNER JOIN bom
+ ON stockmaster.stockid=bom.component
+ WHERE bom.parent='" . $_POST['StockID'] . "'
+ AND bom.loccode='" . $WORow['loccode'] . "'",
+ $db);
+ $CostRow = DB_fetch_row($CostResult);
+ if (is_null($CostRow[0]) OR $CostRow[0]==0){
+ $Cost =0;
+ } else {
+ $Cost = $CostRow[0];
+ }
+ //Need to refresh the worequirments with the bom components now incase they changed
+ $DelWORequirements = DB_query("DELETE FROM worequirements
+ WHERE wo='" . $_POST['WO'] . "'
+ AND parentstockid='" . $_POST['StockID'] . "'",
+ $db);
+
//Recursively insert real component requirements
WoRealRequirements($db, $_POST['WO'], $WORow['loccode'], $_POST['StockID']);
- //Need to check this against the current standard cost and do a cost update if necessary
- $sql = "SELECT materialcost+labourcost+overheadcost AS cost,
- sum(quantity) AS totalqoh,
+ //Need to check this against the current standard cost and do a cost update if necessary
+ $sql = "SELECT materialcost+labourcost+overheadcost AS cost,
+ sum(quantity) AS totalqoh,
labourcost,
- overheadcost
- FROM stockmaster INNER JOIN locstock
- ON stockmaster.stockid=locstock.stockid
- WHERE stockmaster.stockid='" . $_POST['StockID'] . "'
- GROUP BY
- materialcost,
- labourcost,
- overheadcost";
- $ItemResult = DB_query($sql,$db);
- $ItemCostRow = DB_fetch_array($ItemResult);
+ overheadcost
+ FROM stockmaster INNER JOIN locstock
+ ON stockmaster.stockid=locstock.stockid
+ WHERE stockmaster.stockid='" . $_POST['StockID'] . "'
+ GROUP BY
+ materialcost,
+ labourcost,
+ overheadcost";
+ $ItemResult = DB_query($sql,$db);
+ $ItemCostRow = DB_fetch_array($ItemResult);
- if (($Cost + $ItemCostRow['labourcost'] + $ItemCostRow['overheadcost']) != $ItemCostRow['cost']){ //the cost roll-up cost <> standard cost
+ if (($Cost + $ItemCostRow['labourcost'] + $ItemCostRow['overheadcost']) != $ItemCostRow['cost']){ //the cost roll-up cost <> standard cost
- if ($_SESSION['CompanyRecord']['gllink_stock']==1 AND $ItemCostRow['totalqoh']!=0){
+ if ($_SESSION['CompanyRecord']['gllink_stock']==1 AND $ItemCostRow['totalqoh']!=0){
- $CostUpdateNo = GetNextTransNo(35, $db);
- $PeriodNo = GetPeriod(Date($_SESSION['DefaultDateFormat']), $db);
+ $CostUpdateNo = GetNextTransNo(35, $db);
+ $PeriodNo = GetPeriod(Date($_SESSION['DefaultDateFormat']), $db);
- $ValueOfChange = $ItemCostRow['totalqoh'] * (($Cost + $ItemCostRow['labourcost'] + $ItemCostRow['overheadcost']) - $ItemCostRow['cost']);
+ $ValueOfChange = $ItemCostRow['totalqoh'] * (($Cost + $ItemCostRow['labourcost'] + $ItemCostRow['overheadcost']) - $ItemCostRow['cost']);
- $SQL = "INSERT INTO gltrans (type,
- typeno,
- trandate,
- periodno,
- account,
- narrative,
- amount)
- VALUES (35,
- " . $CostUpdateNo . ",
- '" . Date('Y-m-d') . "',
- " . $PeriodNo . ",
- " . $StockGLCode['adjglact'] . ",
- '" . _('Cost roll on release of WO') . ': ' . $_POST['WO'] . ' - ' . $_POST['StockID'] . ' ' . _('cost was') . ' ' . $ItemCostRow['cost'] . ' ' . _('changed to') . ' ' . $Cost . ' x ' . _('Quantity on hand of') . ' ' . $ItemCostRow['totalqoh'] . "',
- " . (-$ValueOfChange) . ")";
+ $SQL = "INSERT INTO gltrans (type,
+ typeno,
+ trandate,
+ periodno,
+ account,
+ narrative,
+ amount)
+ VALUES (35,
+ '" . $CostUpdateNo . "',
+ '" . Date('Y-m-d') . "',
+ '" . $PeriodNo . "',
+ '" . $StockGLCode['adjglact'] . "',
+ '" . _('Cost roll on release of WO') . ': ' . $_POST['WO'] . ' - ' . $_POST['StockID'] . ' ' . _('cost was') . ' ' . $ItemCostRow['cost'] . ' ' . _('changed to') . ' ' . $Cost . ' x ' . _('Quantity on hand of') . ' ' . $ItemCostRow['totalqoh'] . "',
+ '" . (-$ValueOfChange) . "')";
- $ErrMsg = _('CRITICAL ERROR') . '! ' . _('NOTE DOWN THIS ERROR AND SEEK ASSISTANCE') . ': ' . _('The GL credit for the stock cost adjustment posting could not be inserted because');
- $DbgMsg = _('The following SQL to insert the GLTrans record was used');
- $Result = DB_query($SQL,$db,$ErrMsg,$DbgMsg,true);
+ $ErrMsg = _('CRITICAL ERROR') . '! ' . _('NOTE DOWN THIS ERROR AND SEEK ASSISTANCE') . ': ' . _('The GL credit for the stock cost adjustment posting could not be inserted because');
+ $DbgMsg = _('The following SQL to insert the GLTrans record was used');
+ $Result = DB_query($SQL,$db,$ErrMsg,$DbgMsg,true);
- $SQL = "INSERT INTO gltrans (type,
- typeno,
- trandate,
- periodno,
- account,
- narrative,
- amount)
- VALUES (35,
- " . $CostUpdateNo . ",
- '" . Date('Y-m-d') . "',
- " . $PeriodNo . ",
- " . $StockGLCode['stockact'] . ",
- '" . _('Cost roll on release of WO') . ': ' . $_POST['WO'] . ' - ' . $_POST['StockID'] . ' ' . _('cost was') . ' ' . $ItemCostRow['cost'] . ' ' . _('changed to') . ' ' . $Cost . ' x ' . _('Quantity on hand of') . ' ' . $ItemCostRow['totalqoh'] . "',
- " . $ValueOfChange . ")";
+ $SQL = "INSERT INTO gltrans (type,
+ typeno,
+ trandate,
+ periodno,
+ account,
+ narrative,
+ amount)
+ VALUES (35,
+ '" . $CostUpdateNo . "',
+ '" . Date('Y-m-d') . "',
+ '" . $PeriodNo . "',
+ '" . $StockGLCode['stockact'] . "',
+ '" . _('Cost roll on release of WO') . ': ' . $_POST['WO'] . ' - ' . $_POST['StockID'] . ' ' . _('cost was') . ' ' . $ItemCostRow['cost'] . ' ' . _('changed to') . ' ' . $Cost . ' x ' . _('Quantity on hand of') . ' ' . $ItemCostRow['totalqoh'] . "',
+ '" . $ValueOfChange . "')";
- $ErrMsg = _('CRITICAL ERROR') . '! ' . _('NOTE DOWN THIS ERROR AND SEEK ASSISTANCE') . ': ' . _('The GL debit for stock cost adjustment posting could not be inserted because');
- $DbgMsg = _('The following SQL to insert the GLTrans record was used');
- $Result = DB_query($SQL,$db,$ErrMsg,$DbgMsg,true);
- }
+ $ErrMsg = _('CRITICAL ERROR') . '! ' . _('NOTE DOWN THIS ERROR AND SEEK ASSISTANCE') . ': ' . _('The GL debit for stock cost adjustment posting could not be inserted because');
+ $DbgMsg = _('The following SQL to insert the GLTrans record was used');
+ $Result = DB_query($SQL,$db,$ErrMsg,$DbgMsg,true);
+ }
- $SQL = "UPDATE stockmaster SET
- materialcost=" . $Cost . ",
- labourcost=" . $ItemCostRow['labourcost'] . ",
- overheadcost=" . $ItemCostRow['overheadcost'] . ",
- lastcost=" . $ItemCostRow['cost'] . "
- WHERE stockid='" . $_POST['StockID'] . "'";
+ $SQL = "UPDATE stockmaster SET
+ materialcost='" . $Cost . "',
+ labourcost='" . $ItemCostRow['labourcost'] . "',
+ overheadcost='" . $ItemCostRow['overheadcost'] . "',
+ lastcost='" . $ItemCostRow['cost'] . "'
+ WHERE stockid='" . $_POST['StockID'] . "'";
- $ErrMsg = _('The cost details for the stock item could not be updated because');
- $DbgMsg = _('The SQL that failed was');
- $Result = DB_query($SQL,$db,$ErrMsg,$DbgMsg,true);
- } //cost as rolled up now <> current standard cost so do adjustments
- } //qty recd previously was 0 so need to check costs and do adjustments as required
+ $ErrMsg = _('The cost details for the stock item could not be updated because');
+ $DbgMsg = _('The SQL that failed was');
+ $Result = DB_query($SQL,$db,$ErrMsg,$DbgMsg,true);
+ } //cost as rolled up now <> current standard cost so do adjustments
+ } //qty recd previously was 0 so need to check costs and do adjustments as required
- //Do the issues for autoissue components in the worequirements table
- $AutoIssueCompsResult = DB_query("SELECT worequirements.stockid,
- qtypu,
- materialcost+labourcost+overheadcost AS cost,
- stockcategory.stockact,
- stockcategory.stocktype
- FROM worequirements
- INNER JOIN stockmaster
- ON worequirements.stockid=stockmaster.stockid
- INNER JOIN stockcategory
- ON stockmaster.categoryid=stockcategory.categoryid
- WHERE wo=" . $_POST['WO'] . "
- AND parentstockid='" .$_POST['StockID'] . "'
- AND autoissue=1",
- $db);
+ //Do the issues for autoissue components in the worequirements table
+ $AutoIssueCompsResult = DB_query("SELECT worequirements.stockid,
+ qtypu,
+ materialcost+labourcost+overheadcost AS cost,
+ stockcategory.stockact,
+ stockcategory.stocktype
+ FROM worequirements
+ INNER JOIN stockmaster
+ ON worequirements.stockid=stockmaster.stockid
+ INNER JOIN stockcategory
+ ON stockmaster.categoryid=stockcategory.categoryid
+ WHERE wo='" . $_POST['WO'] . "'
+ AND parentstockid='" .$_POST['StockID'] . "'
+ AND autoissue=1",
+ $db);
- $WOIssueNo = GetNextTransNo(28,$db);
- while ($AutoIssueCompRow = DB_fetch_array($AutoIssueCompsResult)){
+ $WOIssueNo = GetNextTransNo(28,$db);
+ while ($AutoIssueCompRow = DB_fetch_array($AutoIssueCompsResult)){
- //Note that only none-controlled items can be auto-issuers so don't worry about serial nos and batches of controlled ones
- /*Cost variances calculated overall on close of the work orders so NO need to check if cost of component has been updated subsequent to the release of the WO
- */
- if ($AutoIssueCompRow['stocktype']!='L'){
- //Need to get the previous locstock quantity for the component at the location where the WO manuafactured
- $CompQOHResult = DB_query("SELECT locstock.quantity
- FROM locstock
- WHERE locstock.stockid='" . $AutoIssueCompRow['stockid'] . "'
- AND loccode= '" . $WORow['loccode'] . "'",
- $db);
- if (DB_num_rows($CompQOHResult)==1){
- $LocQtyRow = DB_fetch_row($CompQOHResult);
- $NewQtyOnHand = $LocQtyRow[0] - ($AutoIssueCompRow['qtypu'] * $QuantityReceived);
- } else {
- /*There must actually be some error this should never happen */
- $NewQtyOnHand = 0;
- }
+ //Note that only none-controlled items can be auto-issuers so don't worry about serial nos and batches of controlled ones
+ /*Cost variances calculated overall on close of the work orders so NO need to check if cost of component has been updated subsequent to the release of the WO
+ */
+ if ($AutoIssueCompRow['stocktype']!='L'){
+ //Need to get the previous locstock quantity for the component at the location where the WO manuafactured
+ $CompQOHResult = DB_query("SELECT locstock.quantity
+ FROM locstock
+ WHERE locstock.stockid='" . $AutoIssueCompRow['stockid'] . "'
+ AND loccode= '" . $WORow['loccode'] . "'",
+ $db);
+ if (DB_num_rows($CompQOHResult)==1){
+ $LocQtyRow = DB_fetch_row($CompQOHResult);
+ $NewQtyOnHand = $LocQtyRow[0] - ($AutoIssueCompRow['qtypu'] * $QuantityReceived);
+ } else {
+ /*There must actually be some error this should never happen */
+ $NewQtyOnHand = 0;
+ }
- $SQL = "UPDATE locstock
- SET quantity = quantity - " . ($AutoIssueCompRow['qtypu'] * $QuantityReceived). "
- WHERE locstock.stockid = '" . $AutoIssueCompRow['stockid'] . "'
- AND loccode = '" . $WORow['loccode'] . "'";
+ $SQL = "UPDATE locstock
+ SET quantity = quantity - " . ($AutoIssueCompRow['qtypu'] * $QuantityReceived). "
+ WHERE locstock.stockid = '" . $AutoIssueCompRow['stockid'] . "'
+ AND loccode = '" . $WORow['loccode'] . "'";
- $ErrMsg = _('CRITICAL ERROR') . '! ' . _('NOTE DOWN THIS ERROR AND SEEK ASSISTANCE') . ': ' . _('The location stock record could not be updated by the issue of stock to the work order from an auto issue component because');
- $DbgMsg = _('The following SQL to update the location stock record was used');
- $Result = DB_query($SQL, $db, $ErrMsg, $DbgMsg, true);
- } else {
- $NewQtyOnHand =0;
- }
- $SQL = "INSERT INTO stockmoves (stockid,
- type,
- transno,
- loccode,
- trandate,
- prd,
- reference,
- price,
- qty,
- standardcost,
- newqoh)
- VALUES ('" . $AutoIssueCompRow['stockid'] . "',
- 28,
- " . $WOIssueNo . ",
- '" . $WORow['loccode'] . "',
- '" . Date('Y-m-d') . "',
- " . $PeriodNo . ",
- '" . $_POST['WO'] . "',
- " . $AutoIssueCompRow['cost'] . ",
- " . -($AutoIssueCompRow['qtypu'] * $QuantityReceived) . ",
- " . $AutoIssueCompRow['cost'] . ",
- " . $NewQtyOnHand . ")";
+ $ErrMsg = _('CRITICAL ERROR') . '! ' . _('NOTE DOWN THIS ERROR AND SEEK ASSISTANCE') . ': ' . _('The location stock record could not be updated by the issue of stock to the work order from an auto issue component because');
+ $DbgMsg = _('The following SQL to update the location stock record was used');
+ $Result = DB_query($SQL, $db, $ErrMsg, $DbgMsg, true);
+ } else {
+ $NewQtyOnHand =0;
+ }
+ $SQL = "INSERT INTO stockmoves (stockid,
+ type,
+ transno,
+ loccode,
+ trandate,
+ prd,
+ reference,
+ price,
+ qty,
+ standardcost,
+ newqoh)
+ VALUES ('" . $AutoIssueCompRow['stockid'] . "',
+ 28,
+ '" . $WOIssueNo . "',
+ '" . $WORow['loccode'] . "',
+ '" . Date('Y-m-d') . "',
+ '" . $PeriodNo . "',
+ '" . $_POST['WO'] . "',
+ '" . $AutoIssueCompRow['cost'] . "',
+ '" . -($AutoIssueCompRow['qtypu'] * $QuantityReceived) . "',
+ '" . $AutoIssueCompRow['cost'] . "',
+ '" . $NewQtyOnHand . "')";
- $ErrMsg = _('CRITICAL ERROR') . '! ' . _('NOTE DOWN THIS ERROR AND SEEK ASSISTANCE') . ': ' . _('stock movement record could not be inserted for an auto-issue component because');
- $DbgMsg = _('The following SQL to insert the stock movement records was used');
- $Result = DB_query($SQL, $db, $ErrMsg, $DbgMsg, true);
+ $ErrMsg = _('CRITICAL ERROR') . '! ' . _('NOTE DOWN THIS ERROR AND SEEK ASSISTANCE') . ': ' . _('stock movement record could not be inserted for an auto-issue component because');
+ $DbgMsg = _('The following SQL to insert the stock movement records was used');
+ $Result = DB_query($SQL, $db, $ErrMsg, $DbgMsg, true);
- //Update the workorder record with the cost issued to the work order
- $SQL = "UPDATE workorders SET
- costissued = costissued+" . ($AutoIssueCompRow['qtypu'] * $QuantityReceived * $AutoIssueCompRow['cost']) ."
- WHERE wo=" . $_POST['WO'];
- $ErrMsg = _('CRITICAL ERROR') . '! ' . _('NOTE DOWN THIS ERROR AND SEEK ASSISTANCE') . ': ' . _('Could not be update the work order cost for an auto-issue component because');
- $DbgMsg = _('The following SQL to update the work order cost was used');
- $Result = DB_query($SQL, $db, $ErrMsg, $DbgMsg, true);
+ //Update the workorder record with the cost issued to the work order
+ $SQL = "UPDATE workorders SET
+ costissued = costissued+" . ($AutoIssueCompRow['qtypu'] * $QuantityReceived * $AutoIssueCompRow['cost']) ."
+ WHERE wo='" . $_POST['WO'] . "'";
+ $ErrMsg = _('CRITICAL ERROR') . '! ' . _('NOTE DOWN THIS ERROR AND SEEK ASSISTANCE') . ': ' . _('Could not be update the work order cost for an auto-issue component because');
+ $DbgMsg = _('The following SQL to update the work order cost was used');
+ $Result = DB_query($SQL, $db, $ErrMsg, $DbgMsg, true);
- if ($_SESSION['CompanyRecord']['gllink_stock']==1 AND ($AutoIssueCompRow['qtypu'] * $QuantityReceived * $AutoIssueCompRow['cost'])!=0){
- //if GL linked then do the GL entries to DR wip and CR stock
+ if ($_SESSION['CompanyRecord']['gllink_stock']==1 AND ($AutoIssueCompRow['qtypu'] * $QuantityReceived * $AutoIssueCompRow['cost'])!=0){
+ //if GL linked then do the GL entries to DR wip and CR stock
- $SQL = "INSERT INTO gltrans (type,
- typeno,
- trandate,
- periodno,
- account,
- narrative,
- amount)
- VALUES (28,
- " . $WOIssueNo . ",
- '" . Date('Y-m-d') . "',
- " . $PeriodNo . ",
- " . $StockGLCode['wipact'] . ",
- '" . $_POST['WO'] . ' - ' . $_POST['StockID'] . ' ' . _('Component') . ': ' . $AutoIssueCompRow['stockid'] . ' - ' . $QuantityReceived . ' x ' . $AutoIssueCompRow['qtypu'] . ' @ ' . number_format($AutoIssueCompRow['cost'],2) . "',
- " . ($AutoIssueCompRow['qtypu'] * $QuantityReceived * $AutoIssueCompRow['cost']) . ")";
+ $SQL = "INSERT INTO gltrans (type,
+ typeno,
+ trandate,
+ periodno,
+ account,
+ narrative,
+ amount)
+ VALUES (28,
+ '" . $WOIssueNo . "',
+ '" . Date('Y-m-d') . "',
+ '" . $PeriodNo . "',
+ '" . $StockGLCode['wipact'] . "',
+ '" . $_POST['WO'] . ' - ' . $_POST['StockID'] . ' ' . _('Component') . ': ' . $AutoIssueCompRow['stockid'] . ' - ' . $QuantityReceived . ' x ' . $AutoIssueCompRow['qtypu'] . ' @ ' . number_format($AutoIssueCompRow['cost'],2) . "',
+ '" . ($AutoIssueCompRow['qtypu'] * $QuantityReceived * $AutoIssueCompRow['cost']) . "')";
- $ErrMsg = _('CRITICAL ERROR') . '! ' . _('NOTE DOWN THIS ERROR AND SEEK ASSISTANCE') . ': ' . _('The WIP side of the work order issue GL posting could not be inserted because');
- $DbgMsg = _('The following SQL to insert the WO issue GLTrans record was used');
- $Result = DB_query($SQL,$db, $ErrMsg, $DbgMsg, true);
+ $ErrMsg = _('CRITICAL ERROR') . '! ' . _('NOTE DOWN THIS ERROR AND SEEK ASSISTANCE') . ': ' . _('The WIP side of the work order issue GL posting could not be inserted because');
+ $DbgMsg = _('The following SQL to insert the WO issue GLTrans record was used');
+ $Result = DB_query($SQL,$db, $ErrMsg, $DbgMsg, true);
- $SQL = "INSERT INTO gltrans (type,
- typeno,
- trandate,
- periodno,
- account,
- narrative,
- amount)
- VALUES (28,
- " . $WOIssueNo . ",
- '" . Date('Y-m-d') . "',
- " . $PeriodNo . ",
- " . $AutoIssueCompRow['stockact'] . ",
- '" . $_POST['WO'] . ' - ' . $_POST['StockID'] . ' -> ' . $AutoIssueCompRow['stockid'] . ' - ' . $QuantityReceived . ' x ' . $AutoIssueCompRow['qtypu'] . ' @ ' . number_format($AutoIssueCompRow['cost'],2) . "',
- " . -($AutoIssueCompRow['qtypu'] * $QuantityReceived * $AutoIssueCompRow['cost']) . ")";
+ $SQL = "INSERT INTO gltrans (type,
+ typeno,
+ trandate,
+ periodno,
+ account,
+ narrative,
+ amount)
+ VALUES (28,
+ '" . $WOIssueNo . "',
+ '" . Date('Y-m-d') . "',
+ '" . $PeriodNo . "',
+ '" . $AutoIssueCompRow['stockact'] . "',
+ '" . $_POST['WO'] . ' - ' . $_POST['StockID'] . ' -> ' . $AutoIssueCompRow['stockid'] . ' - ' . $QuantityReceived . ' x ' . $AutoIssueCompRow['qtypu'] . ' @ ' . number_format($AutoIssueCompRow['cost'],2) . "',
+ '" . -($AutoIssueCompRow['qtypu'] * $QuantityReceived * $AutoIssueCompRow['cost']) . "')";
- $ErrMsg = _('CRITICAL ERROR') . '! ' . _('NOTE DOWN THIS ERROR AND SEEK ASSISTANCE') . ': ' . _('The stock side of the work order issue GL posting could not be inserted because');
- $DbgMsg = _('The following SQL to insert the WO issue GLTrans record was used');
- $Result = DB_query($SQL,$db, $ErrMsg, $DbgMsg, true);
- }//end GL-stock linked
+ $ErrMsg = _('CRITICAL ERROR') . '! ' . _('NOTE DOWN THIS ERROR AND SEEK ASSISTANCE') . ': ' . _('The stock side of the work order issue GL posting could not be inserted because');
+ $DbgMsg = _('The following SQL to insert the WO issue GLTrans record was used');
+ $Result = DB_query($SQL,$db, $ErrMsg, $DbgMsg, true);
+ }//end GL-stock linked
- } //end of auto-issue loop for all components set to auto-issue
+ } //end of auto-issue loop for all components set to auto-issue
- /* Need to get the current location quantity will need it later for the stock movement */
- $SQL = "SELECT locstock.quantity
+ /* Need to get the current location quantity will need it later for the stock movement */
+ $SQL = "SELECT locstock.quantity
FROM locstock
WHERE locstock.stockid='" . $_POST['StockID'] . "'
AND loccode= '" . $_POST['IntoLocation'] . "'";
- $Result = DB_query($SQL, $db);
- 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;
- }
+ $Result = DB_query($SQL, $db);
+ 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;
+ }
- $SQL = "UPDATE locstock
- SET quantity = locstock.quantity + " . $QuantityReceived . "
- WHERE locstock.stockid = '" . $_POST['StockID'] . "'
- AND loccode = '" . $_POST['IntoLocation'] . "'";
+ $SQL = "UPDATE locstock
+ SET quantity = locstock.quantity + " . $QuantityReceived . "
+ WHERE locstock.stockid = '" . $_POST['StockID'] . "'
+ AND loccode = '" . $_POST['IntoLocation'] . "'";
- $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, $db, $ErrMsg, $DbgMsg, true);
+ $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, $db, $ErrMsg, $DbgMsg, true);
- $WOReceiptNo = GetNextTransNo(26,$db);
- /*Insert stock movements - with unit cost */
+ $WOReceiptNo = GetNextTransNo(26,$db);
+ /*Insert stock movements - with unit cost */
- $SQL = "INSERT INTO stockmoves (stockid,
- type,
- transno,
- loccode,
- trandate,
- price,
- prd,
- reference,
- qty,
- standardcost,
- newqoh)
- VALUES ('" . $_POST['StockID'] . "',
- 26,
- " . $WOReceiptNo . ",
- '" . $_POST['IntoLocation'] . "',
- '" . Date('Y-m-d') . "',
- " . $WORow['stdcost'] . ",
- " . $PeriodNo . ",
- '" . $_POST['WO'] . "',
- " . $QuantityReceived . ",
- " . $WORow['stdcost'] . ",
- " . ($QtyOnHandPrior + $QuantityReceived) . ")";
+ $SQL = "INSERT INTO stockmoves (stockid,
+ type,
+ transno,
+ loccode,
+ trandate,
+ price,
+ prd,
+ reference,
+ qty,
+ standardcost,
+ newqoh)
+ VALUES ('" . $_POST['StockID'] . "',
+ 26,
+ '" . $WOReceiptNo . "',
+ '" . $_POST['IntoLocation'] . "',
+ '" . Date('Y-m-d') . "',
+ '" . $WORow['stdcost'] . "',
+ '" . $PeriodNo . "',
+ '" . $_POST['WO'] . "',
+ '" . $QuantityReceived . "',
+ '" . $WORow['stdcost'] . "',
+ '" . ($QtyOnHandPrior + $QuantityReceived) . "')";
- $ErrMsg = _('CRITICAL ERROR') . '! ' . _('NOTE DOWN THIS ERROR AND SEEK ASSISTANCE') . ': ' . _('stock movement records could not be inserted when processing the work order receipt because');
- $DbgMsg = _('The following SQL to insert the stock movement records was used');
- $Result = DB_query($SQL, $db, $ErrMsg, $DbgMsg, true);
+ $ErrMsg = _('CRITICAL ERROR') . '! ' . _('NOTE DOWN THIS ERROR AND SEEK ASSISTANCE') . ': ' . _('stock movement records could not be inserted when processing the work order receipt because');
+ $DbgMsg = _('The following SQL to insert the stock movement records was used');
+ $Result = DB_query($SQL, $db, $ErrMsg, $DbgMsg, true);
- /*Get the ID of the StockMove... */
- $StkMoveNo = DB_Last_Insert_ID($db,'stockmoves','stkmoveno');
- /* Do the Controlled Item INSERTS HERE */
+ /*Get the ID of the StockMove... */
+ $StkMoveNo = DB_Last_Insert_ID($db,'stockmoves','stkmoveno');
+ /* Do the Controlled Item INSERTS HERE */
- if ($WORow['controlled'] ==1){
- //the form is different for serialised items and just batch/lot controlled items
- if ($WORow['serialised']==1){
- //serialised items form has a possible 60 fields for entry of serial numbers - 12 rows x 5 per row
- for($i=0;$i<$_POST['CountOfInputs'];$i++){
- /* We need to add the StockSerialItem record and
- The StockSerialMoves as well */
+ if ($WORow['controlled'] ==1){
+ //the form is different for serialised items and just batch/lot controlled items
+ if ($WORow['serialised']==1){
+ //serialised items form has a possible 60 fields for entry of serial numbers - 12 rows x 5 per row
+ for($i=0;$i<$_POST['CountOfInputs'];$i++){
+ /* We need to add the StockSerialItem record and
+ The StockSerialMoves as well */
if (trim($_POST['SerialNo' .$i]) != ""){
if ($_SESSION['DefineControlledOnWOEntry']==0 OR
($_SESSION['DefineControlledOnWOEntry']==1 AND $_POST['CheckItem'.$i]==true)){
@@ -491,7 +499,7 @@
stockid,
serialno,
moveqty)
- VALUES (" . $StkMoveNo . ",
+ VALUES ('" . $StkMoveNo . "',
'" . $_POST['StockID'] . "',
'" . DB_escape_string($_POST['SerialNo' .$i]) . "',
1)";
@@ -502,7 +510,7 @@
if ($_SESSION['DefineControlledOnWOEntry']==1){
//need to delete the item from woserialnos
$SQL = "DELETE FROM woserialnos
- WHERE wo=" . $_POST['WO'] . "
+ WHERE wo='" . $_POST['WO'] . "'
AND stockid='" . $_POST['StockID'] ."'
AND serialno='" . DB_escape_string($_POST['SerialNo'.$i]) . "'";
$ErrMsg = _('CRITICAL ERROR') . '! ' . _('NOTE DOWN THIS ERROR AND SEEK ASSISTANCE') . ': ' . _('The predefined serial number record could not be deleted because');
@@ -511,64 +519,64 @@
}
}//end prefined controlled items or not
} //non blank SerialNo
- } //end for all of the potential serialised fields received
- } else { //the item is just batch/lot controlled not serialised
- /*the form for entry of batch controlled items is only 15 possible fields */
- for($i=0;$i<$_POST['CountOfItems'];$i++){
- /* We need to add the StockSerialItem record and
- The StockSerialMoves as well */
- //need to test if the batch/lot exists first already
- if (trim($_POST['BatchRef' .$i]) != ""){
- $LastRef = trim($_POST['BatchRef' .$i]);
- $SQL = "SELECT COUNT(*) FROM stockserialitems
- WHERE stockid='" . $_POST['StockID'] . "'
- AND loccode = '" . $_POST['IntoLocation'] . "'
- AND serialno = '" . $_POST['BatchRef' .$i] . "'";
- $ErrMsg = _('CRITICAL ERROR') . '! ' . _('NOTE DOWN THIS ERROR AND SEEK ASSISTANCE') . ': ' . _('Could not check if a serial number for the stock item already exists because');
- $DbgMsg = _('The following SQL to test for an already existing serialised stock item was used');
- $Result = DB_query($SQL, $db, $ErrMsg, $DbgMsg, true);
- $AlreadyExistsRow = DB_fetch_row($Result);
+ } //end for all of the potential serialised fields received
+ } else { //the item is just batch/lot controlled not serialised
+ /*the form for entry of batch controlled items is only 15 possible fields */
+ for($i=0;$i<$_POST['CountOfItems'];$i++){
+ /* We need to add the StockSerialItem record and
+ The StockSerialMoves as well */
+ //need to test if the batch/lot exists first already
+ if (trim($_POST['BatchRef' .$i]) != ""){
+ $LastRef = trim($_POST['BatchRef' .$i]);
+ $SQL = "SELECT COUNT(*) FROM stockserialitems
+ WHERE stockid='" . $_POST['StockID'] . "'
+ AND loccode = '" . $_POST['IntoLocation'] . "'
+ AND serialno = '" . $_POST['BatchRef' .$i] . "'";
+ $ErrMsg = _('CRITICAL ERROR') . '! ' . _('NOTE DOWN THIS ERROR AND SEEK ASSISTANCE') . ': ' . _('Could not check if a serial number for the stock item already exists because');
+ $DbgMsg = _('The following SQL to test for an already existing serialised stock item was used');
+ $Result = DB_query($SQL, $db, $ErrMsg, $DbgMsg, true);
+ $AlreadyExistsRow = DB_fetch_row($Result);
if (isset($_POST['QualityText'.$i])){
$QualityText = $_POST['QualityText'.$i];
} else {
$QualityText ='';
}
- if ($AlreadyExistsRow[0]>0){
- $SQL = 'UPDATE stockserialitems SET quantity = quantity + ' . $_POST['Qty' . $i] . ",
+ if ($AlreadyExistsRow[0]>0){
+ $SQL = 'UPDATE stockserialitems SET quantity = quantity + ' . $_POST['Qty' . $i] . ",
qualitytext = '" . DB_escape_string($QualityText) . "'
- WHERE stockid='" . $_POST['StockID'] . "'
- AND loccode = '" . $_POST['IntoLocation'] . "'
- AND serialno = '" . $POST['BatchRef' .$i] . "'";
- } else {
- $SQL = "INSERT INTO stockserialitems (stockid,
- loccode,
- serialno,
- quantity,
+ WHERE stockid='" . $_POST['StockID'] . "'
+ AND loccode = '" . $_POST['IntoLocation'] . "'
+ AND serialno = '" . $POST['BatchRef' .$i] . "'";
+ } else {
+ $SQL = "INSERT INTO stockserialitems (stockid,
+ loccode,
+ serialno,
+ quantity,
qualitytext)
- VALUES ('" . $_POST['StockID'] . "',
- '" . $_POST['IntoLocation'] . "',
- '" . DB_escape_string($_POST['BatchRef' . $i]) . "',
- " . $_POST['Qty'.$i] . ",
+ VALUES ('" . $_POST['StockID'] . "',
+ '" . $_POST['IntoLocation'] . "',
+ '" . DB_escape_string($_POST['BatchRef' . $i]) . "',
+ '" . $_POST['Qty'.$i] . "',
'" . DB_escape_string($_POST['QualityText']) . "')";
- }
- $ErrMsg = _('CRITICAL ERROR') . '! ' . _('NOTE DOWN THIS ERROR AND SEEK ASSISTANCE') . ': ' . _('The serial stock item record could not be inserted because');
- $DbgMsg = _('The following SQL to insert the serial stock item records was used');
- $Result = DB_query($SQL, $db, $ErrMsg, $DbgMsg, true);
+ }
+ $ErrMsg = _('CRITICAL ERROR') . '! ' . _('NOTE DOWN THIS ERROR AND SEEK ASSISTANCE') . ': ' . _('The serial stock item record could not be inserted because');
+ $DbgMsg = _('The following SQL to insert the serial stock item records was used');
+ $Result = DB_query($SQL, $db, $ErrMsg, $DbgMsg, true);
- /** end of handle stockserialitems records */
+ /** end of handle stockserialitems records */
- /** now insert the serial stock movement **/
- $SQL = "INSERT INTO stockserialmoves (stockmoveno,
- stockid,
- serialno,
- moveqty)
- VALUES (" . $StkMoveNo . ",
- '" . $_POST['StockID'] . "',
- '" . DB_escape_string($_POST['BatchRef'.$i]) . "',
- " . $_POST['Qty'.$i] . ")";
- $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, $db, $ErrMsg, $DbgMsg, true);
+ /** now insert the serial stock movement **/
+ $SQL = "INSERT INTO stockserialmoves (stockmoveno,
+ stockid,
+ serialno,
+ moveqty)
+ VALUES ('" . $StkMoveNo . "',
+ '" . $_POST['StockID'] . "',
+ '" . DB_escape_string($_POST['BatchRef'.$i]) . "',
+ '" . $_POST['Qty'.$i] . "')";
+ $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, $db, $ErrMsg, $DbgMsg, true);
if ($_SESSION['DefineControlledOnWOEntry']==1){
//check how many of the batch/bundle/lot has been received
@@ -583,7 +591,7 @@
if ($BatchTotQtyRow[0] >= $_POST['QtyReqd'.$i]){
//need to delete the item from woserialnos
$SQL = "DELETE FROM woserialnos
- WHERE wo=" . $_POST['WO'] . "
+ WHERE wo='" . $_POST['WO'] . "'
AND stockid='" . $_POST['StockID'] ."'
AND serialno='" . DB_escape_string($_POST['BatchRef'.$i]) . "'";
$ErrMsg = _('CRITICAL ERROR') . '! ' . _('NOTE DOWN THIS ERROR AND SEEK ASSISTANCE') . ': ' . _('The predefined batch/lot/bundle record could not be deleted because');
@@ -591,92 +599,94 @@
$Result = DB_query($SQL, $db, $ErrMsg, $DbgMsg, true);
}
}
- }//non blank BundleRef
- } //end for all of the potential batch/lot fields received
- } //end of the batch controlled stuff
- } //end if the woitem received here is a controlled item
+ }//non blank BundleRef
+ } //end for all of the potential batch/lot fields received
+ } //end of the batch controlled stuff
+ } //end if the woitem received here is a controlled item
- /* If GLLink_Stock then insert GLTrans to debit the GL Code and credit GRN Suspense account at standard cost*/
- if ($_SESSION['CompanyRecord']['gllink_stock']==1 AND ($WORow['stdcost']*$QuantityReceived)!=0){
- /*GL integration with stock is activated so need the GL journals to make it so */
+ /* If GLLink_Stock then insert GLTrans to debit the GL Code and credit GRN Suspense account at standard cost*/
+ if ($_SESSION['CompanyRecord']['gllink_stock']==1 AND ($WORow['stdcost']*$QuantityReceived)!=0){
+ /*GL integration with stock is activated so need the GL journals to make it so */
- /*first the debit the finished stock of the item received from the WO
- the appropriate account was already retrieved into the $StockGLCode variable as the Processing code is kicked off
- it is retrieved from the stock category record of the item by a function in SQL_CommonFunctions.inc*/
+ /*first the debit the finished stock of the item received from the WO
+ the appropriate account was already retrieved into the $StockGLCode variable as the Processing code is kicked off
+ it is retrieved from the stock category record of the item by a function in SQL_CommonFunctions.inc*/
- $SQL = "INSERT INTO gltrans (type,
- typeno,
- trandate,
- periodno,
- account,
- narrative,
- amount)
- VALUES (26,
- " . $WOReceiptNo . ",
- '" . Date('Y-m-d') . "',
- " . $PeriodNo . ",
- " . $StockGLCode['stockact'] . ",
- '" . $_POST['WO'] . " " . $_POST['StockID'] . " - " . $WORow['description'] . ' x ' . $QuantityReceived . " @ " . number_format($WORow['stdcost'],2) . "',
- " . ($WORow['stdcost'] * $QuantityReceived) . ")";
+ $SQL = "INSERT INTO gltrans (type,
+ typeno,
+ trandate,
+ periodno,
+ account,
+ narrative,
+ amount)
+ VALUES (26,
+ '" . $WOReceiptNo . "',
+ '" . Date('Y-m-d') . "',
+ '" . $PeriodNo . "',
+ '" . $StockGLCode['stockact'] . "',
+ '" . $_POST['WO'] . " " . $_POST['StockID'] . " - " . $WORow['description'] . ' x ' . $QuantityReceived . " @ " . number_format($WORow['stdcost'],2) . "',
+ '" . ($WORow['stdcost'] * $QuantityReceived) . "')";
- $ErrMsg = _('CRITICAL ERROR') . '! ' . _('NOTE DOWN THIS ERROR AND SEEK ASSISTANCE') . ': ' . _('The receipt of work order finished stock GL posting could not be inserted because');
- $DbgMsg = _('The following SQL to insert the work order receipt of finished items GLTrans record was used');
- $Result = DB_query($SQL,$db,$ErrMsg, $DbgMsg, true);
+ $ErrMsg = _('CRITICAL ERROR') . '! ' . _('NOTE DOWN THIS ERROR AND SEEK ASSISTANCE') . ': ' . _('The receipt of work order finished stock GL posting could not be inserted because');
+ $DbgMsg = _('The following SQL to insert the work order receipt of finished items GLTrans record was used');
+ $Result = DB_query($SQL,$db,$ErrMsg, $DbgMsg, true);
- /*now the credit WIP entry*/
- $SQL = "INSERT INTO gltrans (type,
- typeno,
- trandate,
- periodno,
- account,
- narrative,
- amount)
- VALUES (26,
- " . $WOReceiptNo . ",
- '" . Date('Y-m-d') . "',
- " . $PeriodNo . ",
- " . $StockGLCode['wipact'] . ",
- '" . $_POST['WO'] . " " . $_POST['StockID'] . " - " . $WORow['description'] . ' x ' . $QuantityReceived . " @ " . number_format($WORow['stdcost'],2) . "',
- " . -($WORow['stdcost'] * $QuantityReceived) . ")";
+ /*now the credit WIP entry*/
+ $SQL = "INSERT INTO gltrans (type,
+ typeno,
+ trandate,
+ periodno,
+ account,
+ narrative,
+ amount)
+ VALUES (26,
+ '" . $WOReceiptNo . "',
+ '" . Date('Y-m-d') . "',
+ '" . $PeriodNo . "',
+ '" . $StockGLCode['wipact'] . "',
+ '" . $_POST['WO'] . " " . $_POST['StockID'] . " - " . $WORow['description'] . ' x ' . $QuantityReceived . " @ " . number_format($WORow['stdcost'],2) . "',
+ '" . -($WORow['stdcost'] *...
[truncated message content] |
