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

MS_22.10.2015

Browse Source
This commit is contained in:
SchreiberM
2015-10-22 12:50:47 +02:00
parent 1d45aceb73
commit 26d9c50b8b
31 changed files with 3211 additions and 2106 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@@ -4,7 +4,7 @@ Public Class ClassOfficeTemplate
Try
Dim sql_Template As String = "SELECT * FROM VWPMO_TEMPLATE_ENTITY WHERE TEMPLATE_ID = " & Template_ID
Dim DT_TEMPLATE As System.Data.DataTable = ClassDatabase.Return_Datatable(sql_Template)
Dim sql_patterns As String = "select * from TBPMO_TEMPLATE_ENTITY_PATTERN where TEMPL_ENT_ID = (SELECT GUID FROM TBPMO_TEMPLATE_ENTITY WHERE ENTITY_ID = " & CURRENT_FORM_ID & " AND TEMPLATE_ID = " & Template_ID & ")"
Dim sql_patterns As String = "select * from TBPMO_TEMPLATE_PATTERN where TEMPL_ENT_ID = (SELECT GUID FROM TBPMO_TEMPLATE_ENTITY WHERE ENTITY_ID = " & CURRENT_FORM_ID & " AND TEMPLATE_ID = " & Template_ID & ")"
Dim DT_PATTERNS As System.Data.DataTable = ClassDatabase.Return_Datatable(sql_patterns)
If IsNothing(DT_PATTERNS) Then