diff --git a/LSL2/STPROC/LOT_SERVICES.txt b/LSL2/STPROC/LOT_SERVICES.txt
index 39c459a..a5df1d6 100644
--- a/LSL2/STPROC/LOT_SERVICES.txt
+++ b/LSL2/STPROC/LOT_SERVICES.txt
@@ -715,6 +715,7 @@ Service CreateLotEvent(LotId, LotType=LOT_TYPES, EventDatetime, EventType=EVENT_
                 end
             Case LotType EQ 'RDS'
                 If EventType NE '' AND OperatorId NE '' then
+                	If RowExists('LOT', LotId) EQ False$ then Lot_Services('CreateNewLot', 'RDS', '', '', '', '', '', OperatorId, '', LotId)
                     If RowExists('LOT', LotId) then
                         ValidId    = False$
                         NewEventId = ''
@@ -985,6 +986,3 @@ Service UnholdLot(LotId)
     
 end service
 
-
-
-