diff --git a/LSL2/STPROC/NCR_SERVICES.txt b/LSL2/STPROC/NCR_SERVICES.txt
index 6b92678..6f7f57f 100644
--- a/LSL2/STPROC/NCR_SERVICES.txt
+++ b/LSL2/STPROC/NCR_SERVICES.txt
@@ -84,7 +84,7 @@ Options SCAN_TYPES        = 'CASSETTE_1', 'CASSETTE_2', 'WM_IN_1', 'WM_IN_2'
 // Returns the current stage of a lot. Replaces CURR_STAGE calculated column.
 //----------------------------------------------------------------------------------------------------------------------
 Service ProcessScanData(ScanData, ScanType = SCAN_TYPES, FirstCassID, OperatorID)
-    
+
     If (ScanData NE '') then
     	Convert @Lower.Case to @Upper.Case in ScanData
         // Code 3of9 encodes the asterisk and underscore characters. These need to be decoded.
@@ -108,6 +108,7 @@ Service ProcessScanData(ScanData, ScanType = SCAN_TYPES, FirstCassID, OperatorID
                         CassetteID = ScanData
                         Swap 'FDI' with '' in CassetteID
                         Swap '^FS' with '' in CassetteID
+                        Swap 'I'   with '' in CassetteID
                         Convert '.' to '*' in CassetteID
                         WMIRow  = Database_Services('ReadDataRow', 'WM_IN', CassetteID)
                         If Error_Services('NoError') then
@@ -136,6 +137,7 @@ Service ProcessScanData(ScanData, ScanType = SCAN_TYPES, FirstCassID, OperatorID
                         CassetteID = ScanData
                         Swap 'FDI' with '' in CassetteID
                         Swap '^FS' with '' in CassetteID
+                        Swap 'I'   with '' in CassetteID
                         Convert '.' to '*' in CassetteID
                         WMIRow  = Database_Services('ReadDataRow', 'WM_IN', CassetteID)
                         If Error_Services('NoError') then
@@ -416,6 +418,7 @@ end service
 
 
 Service SendToSPC(NCRNo, RDSList, ReactorType, PSNo, DeptResp, LossCode, LossDesc, LossStage, LossBy, ACCode, ACDesc)
+	
     Headers = 'Logging DTM' : @FM : 'Machine' : @FM : 'Level' : @FM : 'Log'
     ColumnWidths = 20 : @FM : 12 : @FM : 7 : @FM : 500
     Machine         = Environment_Services('GetServer')
@@ -585,4 +588,3 @@ Service SendToSPC(NCRNo, RDSList, ReactorType, PSNo, DeptResp, LossCode, LossDes
     
 end service
 
-