MS 2.7.4.01Indexierung Vektorfelder automatische Idnexe

Global_Indexer/ClassInit.vb

@@ -131,6 +131,8 @@ Public Class ClassInit
                     WM_DB_SERVER = oROW.Item("CAT_STRING")
                 End If
             Next
+            VIEWER_LICENSE = DATABASE_ECM.GetScalarValue($"SELECT LICENSE FROM TBDD_3RD_PARTY_MODULES WHERE 
+                    NAME = 'GDPICTURE_FILEFLOW' AND ACTIVE = 1")
             oSql = "SELECT * FROM TBDD_BASECONFIG"
             DT = DATABASE_ECM.GetDatatable(oSql)
             If DT.Rows.Count = 1 Then