pre cutover push

LSL2/STPROC/SQL_WRITE.txt

@@ -49,16 +49,13 @@ Loop
     If SRP_COM('', 'ERROR') then
         ErrorMessage = 'Query failed to execute'
     end else
-*        RecordExists = SRP_Com(RecordSetResult, "CALL", "GetString", adClipString, 1, @VM, @FM)[1, \0D\]
-*         RecordExists = (SRP_Com(RecordSetResult, 'CALL', 'GetString', 2, -1, @FM, @RM) GT 0)
-		
         RecordExists = SRP_Com(RecordSetResult, "CALL", "GetString", 2, 1, @FM, @RM)[1, @RM]
     end   
 Until ( (ErrorMessage EQ '') or (Attempts GT AttemptsBeforeFailure) )
 Repeat
 SRP_Com(RecordSetResult, "RELEASE")
 Script = ""
-If RecordExists EQ "1" then
+If RecordExists then
     
     Operation = "Update"
     GoSub Do_Update
@@ -258,3 +255,4 @@ Do_Insert:
 	
 return
 
+