diff --git a/LSL2/STPROC/SCHEDULE_SERVICES.txt b/LSL2/STPROC/SCHEDULE_SERVICES.txt
index 62f826e..6dc9280 100644
--- a/LSL2/STPROC/SCHEDULE_SERVICES.txt
+++ b/LSL2/STPROC/SCHEDULE_SERVICES.txt
@@ -1211,7 +1211,7 @@ Service AdjustScheduleEvents(ReactNo)
 					end
 					
 				Next EventIndex
-				
+
 				LogData    = ''
 				LogData<1> = OConv(Datetime(), 'DT2/^H')
 				LogData<2> = '4'
@@ -1287,8 +1287,10 @@ Service AdjustScheduleEvents(ReactNo)
 						EventRec<SCHED_DET_NG.EVENT_TOTAL_WFRS$>  = EventWfrs
 						Database_Services('WriteDataRow', 'SCHED_DET_NG', EventKey, EventRec, True$, False$, True$)
 						
-						// Check each cassette in the event to see if it is now processed or unprocessed (i.e., unload un-signed)
-						Schedule_Services('UpdateEventCassLists', EventKey)
+						If Not(EventRec<SCHED_DET_NG.EVENT_COMP$>) then 	
+							// Check each cassette in the event to see if it is now processed or unprocessed (i.e., unload un-signed)
+							Schedule_Services('UpdateEventCassLists', EventKey)
+						end
 						
 						EventRec        = Schedule_Services('GetScheduleDetail', EventKey)
 						UnprocessedCass = EventRec<SCHED_DET_NG.UNPROCESSED_CASS$>
@@ -3721,7 +3723,7 @@ end service
 
 
 Service AdjustWorkOrderScheduleQty(WONo, ModifyQty)
-    
+
     ErrorMsg = ''
     Begin Case
         Case (WONo EQ '')