MS UserItemsReplace
This commit is contained in:
@@ -5,8 +5,7 @@
|
||||
If RecordId = 0 Then
|
||||
Exit Sub
|
||||
End If
|
||||
Dim Username As String = USER_USERNAME
|
||||
Dim SQL As String = String.Format("UPDATE TBPMO_RECORD SET IN_WORK = 1, IN_WORK_WHO = '{0}' WHERE GUID = {1}", Username, RecordId)
|
||||
Dim SQL As String = String.Format("UPDATE TBPMO_RECORD SET IN_WORK = 1, IN_WORK_WHO = '{0}' WHERE GUID = {1}", USER_USERNAME, RecordId)
|
||||
If DD_LIB_Standards.clsDatabase.DB_PROXY_INITIALIZED Then
|
||||
ClassDatabase.Execute_non_Query(SQL, True)
|
||||
End If
|
||||
|
||||
Reference in New Issue
Block a user