MS

GUIs.ZooFlow/Administration/ClassDetailForm.vb

@@ -92,6 +92,11 @@ Public Class ClassDetailForm
             .[Module] = MODULE_USERS,
             .Entity = PAGE_USERS_USER_GROUP_RELATIONS,
             .IsRelationPage = True
+        }},
+        {PAGE_IDB_COMMON_SQL, New DetailSettings With {
+            .GridTitle = "IDB Common SQLs",
+            .[Module] = MODULE_USERS,
+            .Entity = PAGE_IDB_COMMON_SQL
         }}
     }
 
@@ -142,8 +147,9 @@ Public Class ClassDetailForm
                     oForm = New frmAdmin_User(PrimaryKey) With {.IsInsert = IsInsert}
 
                 Case PAGE_USERS_USER_GROUP_RELATIONS
-                    oForm = New frmAdmin_UserGroupRelations(PrimaryKey) With {.isinsert = IsInsert}
-
+                    oForm = New frmAdmin_UserGroupRelations(PrimaryKey) With {.IsInsert = IsInsert}
+                Case PAGE_IDB_COMMON_SQL
+                    oForm = New frmIDBCommonSQL
             End Select
 
             ' If the selected form was valid, open it