MS_KW9
This commit is contained in:
@@ -700,7 +700,7 @@ Public Class ClassControlCommandsUI
|
||||
|
||||
Public Shared Function CreateRecord(FormID)
|
||||
Dim ADDED_WHO As String = Environment.UserName
|
||||
Dim SQL = "INSERT INTO TBPMO_RECORD(ADDED_WHO, FORM_ID) VALUES ('" & ADDED_WHO & "', " & FormID & ")"
|
||||
Dim SQL = "INSERT INTO TBPMO_RECORD(ADDED_WHO, FORM_ID,RECORD_ENTITY_ID) VALUES ('" & ADDED_WHO & "', " & FormID & ",4711)"
|
||||
Return ClassDatabase.Execute_non_Query(SQL, True)
|
||||
End Function
|
||||
|
||||
|
||||
Reference in New Issue
Block a user