diff --git a/LSL2/STPROC/OBJ_WO_MAT.txt b/LSL2/STPROC/OBJ_WO_MAT.txt
index b6a6942..f5d8d54 100644
--- a/LSL2/STPROC/OBJ_WO_MAT.txt
+++ b/LSL2/STPROC/OBJ_WO_MAT.txt
@@ -1860,7 +1860,6 @@ ChangeFlag:
 			IF WMOutKey NE '' THEN
 			
 				WMOParms = 'WM_OUT':@RM:WMOutKey
-*				WMORec   = obj_Tables('ReadRec',WMOParms)
 				WMORec   = Database_Services('ReadDataRow', 'WM_OUT', WMOutKey)
 				IF Get_Status(errCode) THEN
 					obj_Tables('UnlockRec',WMOParms)					;* Unlock WM_Out record
@@ -1868,9 +1867,6 @@ ChangeFlag:
 				END
 			
 				WMORec<WM_OUT_MAKEUP_BOX$> = Value
-					
-*				WMOParms = FieldStore(WMOParms,@RM,4,0,WMORec)				;* Put record in 4th field of WMORec
-*				obj_Tables('WriteRec',WMOParms)								;* Writes and unlocks WM_OUT Record
 				Database_Services('WriteDataRow', 'WM_OUT', WMOutKey, WMORec, True$, False$, True$)
 				
 			END