This commit is contained in:
SchreiberM
2017-03-28 08:50:20 +02:00
parent 3eac89a9a3
commit 266af3f0aa
8 changed files with 17 additions and 17 deletions

View File

@@ -441,7 +441,7 @@ Module ModuleHelperMethods
Public Function Get_Grid_Sql(ConstructorId As Integer, FormId As Integer, ConstructorDetailID As Integer, ByRef GRID_TYPE As frmConstructor_Main.GridType, UserGuid As Integer, QUICK_VIEW_SQL As String,
IS_SINGLE_RECORD As Boolean, FORM_TYPE As Integer, ByRef VIEW_ID As Integer, ByRef GridControlMain As GridControl, ByRef grvwGrid As GridView, Optional ByRef IS_GEOData As Boolean = False)
Try
Dim ViewName As String = "TBENTITY_TABLE" & FormId.ToString
Dim ViewName As String = "TBPMO_ENTITY_TABLE" & FormId.ToString
CURRENT_VIEWNAME = ViewName
Dim EntitySQL As String
@@ -457,7 +457,7 @@ Module ModuleHelperMethods
EntitySQL = QUICK_VIEW_SQL
If EntitySQL = String.Empty Then
EntitySQL = "SELECT T.* FROM TBENTITY_TABLE" & FormId.ToString & " T"
EntitySQL = "SELECT T.* FROM TBPMO_ENTITY_TABLE" & FormId.ToString & " T"
If IS_SINGLE_RECORD = True Or FORM_TYPE = 5 Then
Else