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

MS_10052016

Browse Source
This commit is contained in:
SchreiberM
2016-05-11 12:00:53 +02:00
parent 0b1f56f4d0
commit c06083c714
16 changed files with 2465 additions and 744 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
app/DD-Record-Organiser/frmConstructor_Main.vb
View File

@@ -2284,14 +2284,14 @@ Public Class frmConstructor_Main
Else
' Wenn nicht gespeichert werden soll, den Record wieder löschen
If CtrlCommandUI.IsInsert = True Then
CtrlCommandUI.DeleteRecord(CURRENT_RECORD_ID)
Dim del = "EXEC [dbo].[PRPMO_DELETE_RECORD] " & SELECTED_RECORD_ID
ClassDatabase.Execute_non_Query(del, True)
End If
End If
CtrlCommandUI.IsInsert = False
RECORD_CHANGED = False
End If
CtrlCommandUI.IsInsert = False
RECORD_CHANGED = False
End If
End Sub
Private Function GET_GROUP_OR_SINGLE_RECORD(PARENT_RECORD_ID As Integer, Entityload As Boolean)
'Dim sqlRecord As String = String.Format("SELECT T.RECORD2_ID FROM TBPMO_RECORD_CONNECT T, TBPMO_RECORD T1 WHERE T.RECORD2_ID = T1.GUID AND T.RECORD1_ID = {0} AND T1.ENTITY_ID = (SELECT PARENT_ID FROM TBPMO_FORM WHERE GUID = {1})", LINKED_RECORD, ENTITY_ID)