Fixed typo in NCR_SERVICES preventing RDS scans from processing correctly. Fixed a vnav in NCR_ACTIONS under the delete action.
This commit is contained in:
@ -711,6 +711,7 @@ return
|
||||
|
||||
DELETE_RECORD:
|
||||
|
||||
NCRNo = Name
|
||||
WorkOrderNo = {WO_NO}
|
||||
CassNo = {WO_MAT_CASS_NO}
|
||||
WoMatKey = WorkOrderNo : '*' : CassNo
|
||||
@ -736,7 +737,6 @@ DELETE_RECORD:
|
||||
|
||||
SAPBatchNo = Xlate('WO_MAT', WOMatKey, 'SAP_BATCH_NO', 'X')
|
||||
If SAPBatchNo NE '' then
|
||||
NCRNo = Name
|
||||
TransQty = Sum(obj_NCR('RejQty',NCRNo:@RM:Record))
|
||||
TransQty = TransQty * '-1'
|
||||
|
||||
|
||||
@ -135,7 +135,7 @@ Service ProcessScanData(ScanData, ScanType = SCAN_TYPES, FirstCassID, OperatorID
|
||||
ValidcassID = RowExists('WM_IN', CassetteID) or RowExists('WM_OUT', CassetteID)
|
||||
Case RDSCass
|
||||
RDSRow = Database_Services('ReadDataRow', 'RDS', CassetteID)
|
||||
ValidCass = RowExists('RDS', CassetteID)
|
||||
ValidcassID = RowExists('RDS', CassetteID)
|
||||
End Case
|
||||
|
||||
If ( (Seq1 EQ 'SEQ1') or (Seq1 EQ 'SEQ2') ) then
|
||||
@ -559,3 +559,4 @@ Service ConvertRecordToJson(NCRId)
|
||||
|
||||
end service
|
||||
|
||||
|
||||
|
||||
Reference in New Issue
Block a user