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

MS_09.11.2015

Browse Source
This commit is contained in:
SchreiberM
2015-11-09 15:51:25 +01:00
parent 861e6b82e0
commit 42e4df1a5e
3 changed files with 68 additions and 58 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
app/DD-Record-Organiser/frmConstructorDesigner.vb
View File

@@ -446,7 +446,7 @@ Public Class frmConstructorDesigner
Try
Dim i = listBoxControls.SelectedValue
If Not IsNothing(i) Then
Dim insert = "INSERT INTO TBPMO_FORM_CONSTR_QUICK_DISPLAY (CONSTRUCT_ID, CONTROL_ID,ADDED_WHO) VALUES (" & SELECTED_CONSTRUCTOR_DETAIL_ID & ", " & i & ",'" & Environment.UserName & "')"
Dim insert = "INSERT INTO TBPMO_FORM_CONSTR_QUICK_DISPLAY (CONSTRUCT_ID, CONTROL_ID,PICTURE,ADDED_WHO) VALUES (" & SELECTED_CONSTRUCTOR_DETAIL_ID & ", " & i & ",1,'" & Environment.UserName & "')"
If ClassDatabase.Execute_non_Query(insert, True) Then
Load_QuickDisplay()
lblQuickViewAdded.Visible = True