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

DAtabase integriert

Browse Source
This commit is contained in:
SchreiberM
2023-05-22 16:55:44 +02:00
parent 2db575d944
commit c2deb54f11
114 changed files with 8526 additions and 14722 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
app/DD-Record-Organizer/Classes/ClassLicence.vb
View File

@@ -11,7 +11,7 @@ Public Class ClassLicence
_lizenzManager = New ClassLicenseManager("#DigitalData35452!#", "")
Dim sql As String = String.Format("SELECT LICENSE_PMO FROM TBDD_CLIENT WHERE GUID = {0}", CLIENT_ID)
Dim lic As String = ClassDatabase.Execute_Scalar(sql, False)
Dim lic As String = MYDB_ECM.GetScalarValue(sql)
If lic = "" Then
LICENSE_COUNT = 0
LICENSE_DATE = "1900-01-01"
@@ -56,7 +56,7 @@ Public Class ClassLicence
End If
sql = String.Format("SELECT NAME, VALID_DATE, '' AS State FROM TBDD_LICENSE_ADD_ON WHERE CLIENT_ID = {0} AND MODULE = 'Record-Organizer'", CLIENT_ID)
DT_LICENSE_ADDONS = ClassDatabase.Return_Datatable(sql)
DT_LICENSE_ADDONS = MYDB_ECM.GetDatatable(sql)
For Each license_Row As DataRow In DT_LICENSE_ADDONS.Rows
Dim expired As Boolean = False
LOGGER.Debug("AddOnName: " & license_Row.Item("NAME"))