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

Hinzufügen des Attributs Obsolete zu ElementStatus und zugehörigen Methoden

Browse Source
This commit is contained in:
Developer 02
2025-05-21 17:05:52 +02:00
parent be9516d852
commit 55ffe40c46
2 changed files with 5 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
EnvelopeGenerator.Common/Entities/ElementStatus.vb
View File

@@ -1,5 +1,6 @@
Imports EnvelopeGenerator.Domain Imports EnvelopeGenerator.Domain
<Obsolete("Tabelle TBSIG_ELEMENT_STATUS entfernt")>
Public Class ElementStatus Public Class ElementStatus
Public Property Id As Integer Public Property Id As Integer

4
EnvelopeGenerator.Common/Models/ElementStatusModel.vb
View File

@@ -1,5 +1,6 @@
Imports System.Data.SqlClient Imports System.Data.SqlClient
<Obsolete("Tabelle TBSIG_ELEMENT_STATUS entfernt")>
Public Class ElementStatusModel Public Class ElementStatusModel
Inherits BaseModel Inherits BaseModel
@@ -7,6 +8,7 @@ Public Class ElementStatusModel
MyBase.New(pState) MyBase.New(pState)
End Sub End Sub
<Obsolete("Tabelle TBSIG_ELEMENT_STATUS entfernt")>
Public Function Insert(pElementStatus As ElementStatus) As Boolean Public Function Insert(pElementStatus As ElementStatus) As Boolean
Try Try
Dim oSql = "INSERT INTO [dbo].[TBSIG_ELEMENT_STATUS] Dim oSql = "INSERT INTO [dbo].[TBSIG_ELEMENT_STATUS]
@@ -41,6 +43,7 @@ Public Class ElementStatusModel
End Try End Try
End Function End Function
<Obsolete("Tabelle TBSIG_ELEMENT_STATUS entfernt")>
Public Function Update(pElementStatus As ElementStatus) As Boolean Public Function Update(pElementStatus As ElementStatus) As Boolean
Try Try
Dim oSql = "UPDATE [dbo].[TBSIG_ELEMENT_STATUS] Dim oSql = "UPDATE [dbo].[TBSIG_ELEMENT_STATUS]
@@ -68,6 +71,7 @@ Public Class ElementStatusModel
End Try End Try
End Function End Function
<Obsolete("Tabelle TBSIG_ELEMENT_STATUS entfernt")>
Private Function GetElementId(pElement As ElementStatus) As Integer Private Function GetElementId(pElement As ElementStatus) As Integer
Try Try
Return Database.GetScalarValue($"SELECT MAX(GUID) FROM TBSIG_ELEMENT_STATUS Return Database.GetScalarValue($"SELECT MAX(GUID) FROM TBSIG_ELEMENT_STATUS