AppStd/RecordOrganizer
8
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

MS_04.01

Browse Source
This commit is contained in:
SchreiberM
2017-01-04 17:09:26 +01:00
parent 4ab7e368b1 29b3857635
commit 26812ffeb7
128 changed files with 17813 additions and 20419 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
app/DD-Record-Organiser/frmFollowUp.vb
View File

@@ -143,7 +143,7 @@
bool = 0
End If
Dim upd = "UPDATE TBPMO_KONFIGURATION SET FOLLOW_UP_LOG_ERR_ONLY = " & bool & " WHERE GUID = 1"
ClassDatabase.Execute_non_Query(upd, True)
ClassDatabase.Execute_non_Query(upd)
End If
Catch ex As Exception
MsgBox("Fehler bei Update LogErrorsOnly:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
@@ -235,7 +235,7 @@
If row.Item(0) = CBool(True) Then
Dim sql
sql = String.Format("DELETE FROM TBPMO_FOLLUPEMAIL_USER WHERE GUID = {0}", row.Item(5))
If ClassDatabase.Execute_non_Query(sql, True) = False Then
If ClassDatabase.Execute_non_Query(sql) = False Then
MsgBox(String.Format("Error in deleting User {0} from FollowUp", row.Item(1)), MsgBoxStyle.Critical)
End If
End If