fixed a bug when deleting all messages

2024-10-24 18:08:15 -07:00
parent d4be43a478
commit 3604a4d8ea
4 changed files with 316 additions and 22 deletions
--- a/LSL2/STPROC/NOTES_SERVICES.txt
+++ b/LSL2/STPROC/NOTES_SERVICES.txt
@ -179,8 +179,13 @@ end service
 Service UpdateNotes(UserID)
 	
 	ErrorMsg = ''
-	IF UserID NE '' then 
-		NPRec = Database_Services('ReadDataRow', 'NOTE_PTRS', UserID)
+	IF UserID NE '' then
+		If RowExists('NOTE_PTRS', UserID) then 
+			NPRec = Database_Services('ReadDataRow', 'NOTE_PTRS', UserID)
+		end else
+			NPRec = ''
+			Database_Services('WriteDataRow', 'NOTE_PTRS', UserID, NPRec, True$, False$, True$)
+		end
 		If Error_Services('NoError') then 
 			IF LEN(NPRec) > 60000 THEN
 				* Dump the oldest note pointers