2.7.9 an WISAG ausgegeben

This commit is contained in:
Developer01
2026-02-05 16:58:19 +01:00
parent 05c4ee9f41
commit 034ca839ba
18 changed files with 851 additions and 408 deletions

View File

@@ -232,9 +232,12 @@ Public Class ClassParamRefresh
Dim oParam = oMode.Replace("TF.InheritanceCalcReset=", "")
Try
If CBool(oParam) = True Then
LOGGER.Info("InheritanceMsgAmount wird auf 0 zurückgesetzt")
LOGGER.Info("Inheritance_Counts werden auf 0 zurückgesetzt bzw gelöscht")
Dim oDELETESQL = "DELETE FROM TBDD_USER_KEY_VALUE_PAIR
WHERE FK_USER_ID = " & USER_ID & " And [FK_MODULE_ID] = '" & USER_MODULE_ID & "' AND KEY_NAME LIKE 'INHERITANCE_CONFIRM_%'"
DatabaseECM.ExecuteNonQuery(oDELETESQL)
CONFIG.Config.UserInheritance_ConfirmationByColumn = Nothing
UserInheritance_ConfirmationByColumn = Nothing
CONFIG.Save()
End If
Catch ex As Exception