This commit is contained in:
SchreiberM
2016-11-23 10:24:21 +01:00
parent a1d1b2a88e
commit fc9f391307
79 changed files with 7388 additions and 4524 deletions

View File

@@ -98,7 +98,7 @@
Try
Dim column = e.Column.FieldName
Dim id = gvMainView.GetFocusedRowCellValue(gvMainView.Columns("GUID"))
Dim sql = String.Format("UPDATE TBPMO_FORM_CONSTRUCTOR SET {0} = '{1}',CHANGED_WHO = '{2}',LANGUAGE = '{3}' where GUID = {4}", column, e.Value, Environment.UserName, USER_LANGUAGE, id)
Dim sql = String.Format("UPDATE TBPMO_FORM_CONSTRUCTOR SET {0} = '{1}',CHANGED_WHO = '{2}',LANGUAGE = '{3}' where GUID = {4}", column, e.Value, USER_USERNAME, USER_LANGUAGE, id)
If ClassDatabase.Execute_non_Query(sql) = False Then
MsgBox("Update Value not successfull. Check logfile", MsgBoxStyle.Critical)
End If