MS_04.01
This commit is contained in:
@@ -3,7 +3,7 @@
|
||||
Public Shared Function LoadForm(guid) As DataTable
|
||||
Try
|
||||
Dim SQL As String = "SELECT NAME, LEVEL FROM TBPMO_FORM WHERE GUID = " & guid
|
||||
Dim DT As DataTable = ClassDatabase.Return_Datatable(SQL)
|
||||
Dim DT As DataTable = ClassDatabase.Return_Datatable(SQL, True)
|
||||
|
||||
If DT.Rows.Count = 1 Then
|
||||
Return DT
|
||||
@@ -19,7 +19,7 @@
|
||||
Public Shared Function LoadFormView(guid) As DataTable
|
||||
Try
|
||||
Dim SQL As String = "SELECT FORM_TITLE FROM TBPMO_FORM_VIEW WHERE FORM_ID = " & guid
|
||||
Dim DT As DataTable = ClassDatabase.Return_Datatable(SQL)
|
||||
Dim DT As DataTable = ClassDatabase.Return_Datatable(SQL, True)
|
||||
|
||||
If DT.Rows.Count = 1 Then
|
||||
Return DT
|
||||
|
||||
Reference in New Issue
Block a user