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

MS

Browse Source
This commit is contained in:
Digital Data - Marlon Schreiber
2018-11-07 15:11:52 +01:00
parent 844a423f7d
commit 24f052f5b5
88 changed files with 2833 additions and 159059 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
app/ResultHandler_Konfig/App.config
View File

@@ -8,7 +8,8 @@
<!-- For more information on Entity Framework configuration, visit http://go.microsoft.com/fwlink/?LinkID=237468 -->
</configSections>
<connectionStrings>
<add name="ResultHandler_Konfig.My.MySettings.SQLSERVER_CS" connectionString="Data Source=172.24.12.41\tests;Initial Catalog=DD_ECM_RENOLIT;Persist Security Info=True;User ID=sa;Password=dd" providerName="System.Data.SqlClient" />
<add name="ResultHandler_Konfig.My.MySettings.SQLSERVER_CS" connectionString="Data Source=172.24.12.41\tests;Initial Catalog=DD_ECM_RENOLIT;Persist Security Info=True;User ID=sa;Password=dd"
providerName="System.Data.SqlClient" />
</connectionStrings>
<startup>
<supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.6.1" />
@@ -18,6 +19,9 @@
<setting name="BNSAPI_HOST" serializeAs="String">
<value />
</setting>
<setting name="EmailTestReceipiant" serializeAs="String">
<value />
</setting>
</ResultHandler_Konfig.My.MySettings>
</userSettings>
<system.data>

10
app/ResultHandler_Konfig/My Project/Resources.Designer.vb generated
View File

@@ -140,6 +140,16 @@ Namespace My.Resources
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property refresh_16xMD() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("refresh_16xMD", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
'''</summary>

7
app/ResultHandler_Konfig/My Project/Resources.resx
View File

@@ -130,6 +130,9 @@
<data name="book_open" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\book_open.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="folder_Open_16xMD" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\folder_Open_16xMD.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="flag_green" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\flag_green.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
@@ -142,7 +145,7 @@
<data name="arrow_switch" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\arrow_switch.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="folder_Open_16xMD" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\folder_Open_16xMD.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="refresh_16xMD" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\refresh_16xMD.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
</root>

12
app/ResultHandler_Konfig/My Project/Settings.Designer.vb generated
View File

@@ -76,6 +76,18 @@ Namespace My
Me("BNSAPI_HOST") = value
End Set
End Property
<Global.System.Configuration.UserScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("")> _
Public Property EmailTestReceipiant() As String
Get
Return CType(Me("EmailTestReceipiant"),String)
End Get
Set
Me("EmailTestReceipiant") = value
End Set
End Property
End Class
End Namespace

3
app/ResultHandler_Konfig/My Project/Settings.settings
View File

@@ -13,5 +13,8 @@
<Setting Name="BNSAPI_HOST" Type="System.String" Scope="User">
<Value Profile="(Default)" />
</Setting>
<Setting Name="EmailTestReceipiant" Type="System.String" Scope="User">
<Value Profile="(Default)" />
</Setting>
</Settings>
</SettingsFile>

187
app/ResultHandler_Konfig/MyDataset.Designer.vb generated
View File

@@ -1111,13 +1111,13 @@ Partial Public Class MyDataset
Me.columnAktiv.DefaultValue = CType(true,Boolean)
Me.columnObjekttyp.AllowDBNull = false
Me.columnObjekttyp.MaxLength = 100
Me.columnWindreamSuche.AllowDBNull = false
Me.columnWindreamSuche.MaxLength = 500
Me.columnDay.AllowDBNull = false
Me.columnDay.MaxLength = 100
Me.columnRun.AllowDBNull = false
Me.columnRun.DefaultValue = CType("",String)
Me.columnRun.MaxLength = 100
Me.columnLetzter_Durchlauf.AllowDBNull = false
Me.columnLetzter_Durchlauf.DefaultValue = CType(TBWMRH_PROFILDataTable.columnLetzter_Durchlauf_defaultValue,Date)
Me.columnRunning.AllowDBNull = false
Me.columnRunning.DefaultValue = CType(false,Boolean)
@@ -2336,6 +2336,8 @@ Partial Public Class MyDataset
Private columnSSL_AUTH As Global.System.Data.DataColumn
Private columnAUTH_TYPE As Global.System.Data.DataColumn
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Sub New()
@@ -2475,6 +2477,14 @@ Partial Public Class MyDataset
End Get
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public ReadOnly Property AUTH_TYPEColumn() As Global.System.Data.DataColumn
Get
Return Me.columnAUTH_TYPE
End Get
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0"), _
Global.System.ComponentModel.Browsable(false)> _
@@ -2512,9 +2522,9 @@ Partial Public Class MyDataset
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Overloads Function AddTBDD_EMAIL_ACCOUNTRow(ByVal NAME As String, ByVal EMAIL_FROM As String, ByVal EMAIL_SMTP As String, ByVal EMAIL_USER As String, ByVal EMAIL_PW As String, ByVal PORT As Integer, ByVal ACTIVE As Boolean, ByVal ADDED_WHO As String, ByVal ADDED_WHEN As Date, ByVal CHANGED_WHO As String, ByVal CHANGED_WHEN As Date, ByVal SSL_AUTH As Boolean) As TBDD_EMAIL_ACCOUNTRow
Public Overloads Function AddTBDD_EMAIL_ACCOUNTRow(ByVal NAME As String, ByVal EMAIL_FROM As String, ByVal EMAIL_SMTP As String, ByVal EMAIL_USER As String, ByVal EMAIL_PW As String, ByVal PORT As Integer, ByVal ACTIVE As Boolean, ByVal ADDED_WHO As String, ByVal ADDED_WHEN As Date, ByVal CHANGED_WHO As String, ByVal CHANGED_WHEN As Date, ByVal SSL_AUTH As Boolean, ByVal AUTH_TYPE As String) As TBDD_EMAIL_ACCOUNTRow
Dim rowTBDD_EMAIL_ACCOUNTRow As TBDD_EMAIL_ACCOUNTRow = CType(Me.NewRow,TBDD_EMAIL_ACCOUNTRow)
Dim columnValuesArray() As Object = New Object() {Nothing, NAME, EMAIL_FROM, EMAIL_SMTP, EMAIL_USER, EMAIL_PW, PORT, ACTIVE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, SSL_AUTH}
Dim columnValuesArray() As Object = New Object() {Nothing, NAME, EMAIL_FROM, EMAIL_SMTP, EMAIL_USER, EMAIL_PW, PORT, ACTIVE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, SSL_AUTH, AUTH_TYPE}
rowTBDD_EMAIL_ACCOUNTRow.ItemArray = columnValuesArray
Me.Rows.Add(rowTBDD_EMAIL_ACCOUNTRow)
Return rowTBDD_EMAIL_ACCOUNTRow
@@ -2556,6 +2566,7 @@ Partial Public Class MyDataset
Me.columnCHANGED_WHO = MyBase.Columns("CHANGED_WHO")
Me.columnCHANGED_WHEN = MyBase.Columns("CHANGED_WHEN")
Me.columnSSL_AUTH = MyBase.Columns("SSL_AUTH")
Me.columnAUTH_TYPE = MyBase.Columns("AUTH_TYPE")
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@@ -2587,6 +2598,8 @@ Partial Public Class MyDataset
MyBase.Columns.Add(Me.columnCHANGED_WHEN)
Me.columnSSL_AUTH = New Global.System.Data.DataColumn("SSL_AUTH", GetType(Boolean), Nothing, Global.System.Data.MappingType.Element)
MyBase.Columns.Add(Me.columnSSL_AUTH)
Me.columnAUTH_TYPE = New Global.System.Data.DataColumn("AUTH_TYPE", GetType(String), Nothing, Global.System.Data.MappingType.Element)
MyBase.Columns.Add(Me.columnAUTH_TYPE)
Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnGUID}, true))
Me.columnGUID.AutoIncrement = true
Me.columnGUID.AutoIncrementSeed = 1
@@ -2614,6 +2627,8 @@ Partial Public Class MyDataset
Me.columnCHANGED_WHO.MaxLength = 50
Me.columnSSL_AUTH.AllowDBNull = false
Me.columnSSL_AUTH.DefaultValue = CType(false,Boolean)
Me.columnAUTH_TYPE.AllowDBNull = false
Me.columnAUTH_TYPE.MaxLength = 20
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@@ -2957,7 +2972,11 @@ Partial Public Class MyDataset
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Property WindreamSuche() As String
Get
Return CType(Me(Me.tableTBWMRH_PROFIL.WindreamSucheColumn),String)
Try
Return CType(Me(Me.tableTBWMRH_PROFIL.WindreamSucheColumn),String)
Catch e As Global.System.InvalidCastException
Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte WindreamSuche in Tabelle TBWMRH_PROFIL ist DBNull.", e)
End Try
End Get
Set
Me(Me.tableTBWMRH_PROFIL.WindreamSucheColumn) = value
@@ -2990,11 +3009,7 @@ Partial Public Class MyDataset
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Property Letzter_Durchlauf() As Date
Get
Try
Return CType(Me(Me.tableTBWMRH_PROFIL.Letzter_DurchlaufColumn),Date)
Catch e As Global.System.InvalidCastException
Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte Letzter_Durchlauf in Tabelle TBWMRH_PROFIL ist DBNull.", e)
End Try
Return CType(Me(Me.tableTBWMRH_PROFIL.Letzter_DurchlaufColumn),Date)
End Get
Set
Me(Me.tableTBWMRH_PROFIL.Letzter_DurchlaufColumn) = value
@@ -3097,14 +3112,14 @@ Partial Public Class MyDataset
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Function IsLetzter_DurchlaufNull() As Boolean
Return Me.IsNull(Me.tableTBWMRH_PROFIL.Letzter_DurchlaufColumn)
Public Function IsWindreamSucheNull() As Boolean
Return Me.IsNull(Me.tableTBWMRH_PROFIL.WindreamSucheColumn)
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Sub SetLetzter_DurchlaufNull()
Me(Me.tableTBWMRH_PROFIL.Letzter_DurchlaufColumn) = Global.System.Convert.DBNull
Public Sub SetWindreamSucheNull()
Me(Me.tableTBWMRH_PROFIL.WindreamSucheColumn) = Global.System.Convert.DBNull
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@@ -4184,6 +4199,17 @@ Partial Public Class MyDataset
End Set
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Property AUTH_TYPE() As String
Get
Return CType(Me(Me.tableTBDD_EMAIL_ACCOUNT.AUTH_TYPEColumn),String)
End Get
Set
Me(Me.tableTBDD_EMAIL_ACCOUNT.AUTH_TYPEColumn) = value
End Set
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Function IsNAMENull() As Boolean
@@ -4893,7 +4919,7 @@ Namespace MyDatasetTableAdapters
Me._commandCollection(0).Connection = Me.Connection
Me._commandCollection(0).CommandText = "SELECT GUID, Profilname, Aktiv, Objekttyp, WindreamSuche, Day, Run, Letzte"& _
"r_Durchlauf, Running, Reihenfolge, ERSTELLTWER, ERSTELLTWANN, GEAENDERTWER, GEAE"& _
"NDERTWANN"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBWMRH_PROFIL"
"NDERTWANN"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBWMRH_PROFIL"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"ORDER BY Reihenfolge"
Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand()
Me._commandCollection(1).Connection = Me.Connection
@@ -5278,41 +5304,39 @@ Namespace MyDatasetTableAdapters
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand()
Me._adapter.InsertCommand.Connection = Me.Connection
Me._adapter.InsertCommand.CommandText = "INSERT INTO [TBWMRH_PROFIL_FILE_JOB] ([PROFIL_ID], [TYP], [STRING1], [STRING2], ["& _
"STRING3], [STRING4], [BOOL1], [BOOL2], [BOOL3], [BOOL4], [AKTIV], [REIHENFOLGE],"& _
" [ERSTELLTWER], [ERSTELLTWANN], [GEAENDERTWER], [GEAENDERTWANN]) VALUES (@PROFIL"& _
"_ID, @TYP, @STRING1, @STRING2, @STRING3, @STRING4, @BOOL1, @BOOL2, @BOOL3, @BOOL"& _
"4, @AKTIV, @REIHENFOLGE, @ERSTELLTWER, @ERSTELLTWANN, @GEAENDERTWER, @GEAENDERTW"& _
"ANN);"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, PROFIL_ID, TYP, STRING1, STRING2, STRING3, STRING4, BOOL1, B"& _
"OOL2, BOOL3, BOOL4, AKTIV, REIHENFOLGE, ERSTELLTWER, ERSTELLTWANN, GEAENDERTWER,"& _
" GEAENDERTWANN FROM TBWMRH_PROFIL_FILE_JOB WHERE (GUID = SCOPE_IDENTITY())"
Me._adapter.InsertCommand.CommandText = "INSERT INTO TBWMRH_PROFIL_FILE_JOB"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" (PROFIL_ID, TYP, STR"& _
"ING1, STRING2, STRING3, STRING4, BOOL1, BOOL2, BOOL3, BOOL4, AKTIV, REIHENFOLGE,"& _
" ERSTELLTWER, GEAENDERTWER)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VALUES (@PROFIL_ID,@TYP,@STRING1,@STRING2,@S"& _
"TRING3,@STRING4,@BOOL1,@BOOL2,@BOOL3,@BOOL4,@AKTIV,@REIHENFOLGE,@ERSTELLTWER,@GE"& _
"AENDERTWER); "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, PROFIL_ID, TYP, STRING1, STRING2, STRING3, STRING4, "& _
"BOOL1, BOOL2, BOOL3, BOOL4, AKTIV, REIHENFOLGE, ERSTELLTWER, ERSTELLTWANN, GEAEN"& _
"DERTWER, GEAENDERTWANN FROM TBWMRH_PROFIL_FILE_JOB WHERE (GUID = SCOPE_IDENTITY("& _
"))"
Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PROFIL_ID", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PROFIL_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@TYP", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "TYP", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@STRING1", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "STRING1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@STRING2", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "STRING2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@STRING3", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "STRING3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@STRING4", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "STRING4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@BOOL1", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "BOOL1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@BOOL2", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "BOOL2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@BOOL3", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "BOOL3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@BOOL4", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "BOOL4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AKTIV", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AKTIV", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@REIHENFOLGE", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "REIHENFOLGE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ERSTELLTWER", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ERSTELLTWER", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ERSTELLTWANN", Global.System.Data.SqlDbType.DateTime, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ERSTELLTWANN", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@GEAENDERTWER", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "GEAENDERTWER", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@GEAENDERTWANN", Global.System.Data.SqlDbType.DateTime, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "GEAENDERTWANN", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PROFIL_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "PROFIL_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@TYP", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "TYP", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@STRING1", Global.System.Data.SqlDbType.VarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "STRING1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@STRING2", Global.System.Data.SqlDbType.VarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "STRING2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@STRING3", Global.System.Data.SqlDbType.VarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "STRING3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@STRING4", Global.System.Data.SqlDbType.VarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "STRING4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@BOOL1", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "BOOL1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@BOOL2", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "BOOL2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@BOOL3", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "BOOL3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@BOOL4", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "BOOL4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AKTIV", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "AKTIV", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@REIHENFOLGE", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "REIHENFOLGE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ERSTELLTWER", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "ERSTELLTWER", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@GEAENDERTWER", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "GEAENDERTWER", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand = New Global.System.Data.SqlClient.SqlCommand()
Me._adapter.UpdateCommand.Connection = Me.Connection
Me._adapter.UpdateCommand.CommandText = "UPDATE TBWMRH_PROFIL_FILE_JOB"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SET TYP = @TYP, STRING1 = @ST"& _
"RING1, STRING2 = @STRING2, STRING3 = @STRING3, STRING4 = @STRING4, BOOL1 = @BOOL"& _
"1, BOOL2 = @BOOL2, BOOL3 = @BOOL3, BOOL4 = @BOOL4, AKTIV = @AKTIV, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
" REIHENFOLGE = @REIHENFOLGE, GEAENDERTWER = @GEAENDERTWER"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE "& _
" (GUID = @Original_GUID); "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, PROFIL_ID, TYP, STRING1, STRING2, S"& _
"TRING3, STRING4, BOOL1, BOOL2, BOOL3, BOOL4, AKTIV, REIHENFOLGE, ERSTELLTWER, ER"& _
"STELLTWANN, GEAENDERTWER, GEAENDERTWANN FROM TBWMRH_PROFIL_FILE_JOB WHERE (GUID "& _
"= @GUID)"
" (GUID = @Original_GUID); "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, PROFIL_ID, TYP, STRING1, STRING2, "& _
"STRING3, STRING4, BOOL1, BOOL2, BOOL3, BOOL4, AKTIV, REIHENFOLGE, ERSTELLTWER, E"& _
"RSTELLTWANN, GEAENDERTWER, GEAENDERTWANN FROM TBWMRH_PROFIL_FILE_JOB WHERE (GUID"& _
" = @GUID)"
Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@TYP", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "TYP", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@STRING1", Global.System.Data.SqlDbType.VarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "STRING1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
@@ -5346,7 +5370,7 @@ Namespace MyDatasetTableAdapters
Me._commandCollection(0).CommandText = "SELECT GUID, PROFIL_ID, TYP, STRING1, STRING2, STRING3, STRING4, BOOL1, BO"& _
"OL2, BOOL3, BOOL4, AKTIV, REIHENFOLGE, ERSTELLTWER, ERSTELLTWANN, GEAENDERTWER, "& _
"GEAENDERTWANN"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBWMRH_PROFIL_FILE_JOB"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (PROFIL_ID ="& _
" @PID)"
" @PID)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"ORDER BY REIHENFOLGE"
Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
Me._commandCollection(0).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "PROFIL_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand()
@@ -5435,23 +5459,7 @@ Namespace MyDatasetTableAdapters
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0"), _
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)> _
Public Overloads Overridable Function Insert( _
ByVal PROFIL_ID As Integer, _
ByVal TYP As String, _
ByVal STRING1 As String, _
ByVal STRING2 As String, _
ByVal STRING3 As String, _
ByVal STRING4 As String, _
ByVal BOOL1 As Boolean, _
ByVal BOOL2 As Boolean, _
ByVal BOOL3 As Boolean, _
ByVal BOOL4 As Boolean, _
ByVal AKTIV As Boolean, _
ByVal REIHENFOLGE As Integer, _
ByVal ERSTELLTWER As String, _
ByVal ERSTELLTWANN As Global.System.Nullable(Of Date), _
ByVal GEAENDERTWER As String, _
ByVal GEAENDERTWANN As Global.System.Nullable(Of Date)) As Integer
Public Overloads Overridable Function Insert(ByVal PROFIL_ID As Integer, ByVal TYP As String, ByVal STRING1 As String, ByVal STRING2 As String, ByVal STRING3 As String, ByVal STRING4 As String, ByVal BOOL1 As Boolean, ByVal BOOL2 As Boolean, ByVal BOOL3 As Boolean, ByVal BOOL4 As Boolean, ByVal AKTIV As Boolean, ByVal REIHENFOLGE As Integer, ByVal ERSTELLTWER As String, ByVal GEAENDERTWER As String) As Integer
Me.Adapter.InsertCommand.Parameters(0).Value = CType(PROFIL_ID,Integer)
If (TYP Is Nothing) Then
Throw New Global.System.ArgumentNullException("TYP")
@@ -5489,20 +5497,10 @@ Namespace MyDatasetTableAdapters
Else
Me.Adapter.InsertCommand.Parameters(12).Value = CType(ERSTELLTWER,String)
End If
If (ERSTELLTWANN.HasValue = true) Then
Me.Adapter.InsertCommand.Parameters(13).Value = CType(ERSTELLTWANN.Value,Date)
Else
Me.Adapter.InsertCommand.Parameters(13).Value = Global.System.DBNull.Value
End If
If (GEAENDERTWER Is Nothing) Then
Me.Adapter.InsertCommand.Parameters(14).Value = Global.System.DBNull.Value
Me.Adapter.InsertCommand.Parameters(13).Value = Global.System.DBNull.Value
Else
Me.Adapter.InsertCommand.Parameters(14).Value = CType(GEAENDERTWER,String)
End If
If (GEAENDERTWANN.HasValue = true) Then
Me.Adapter.InsertCommand.Parameters(15).Value = CType(GEAENDERTWANN.Value,Date)
Else
Me.Adapter.InsertCommand.Parameters(15).Value = Global.System.DBNull.Value
Me.Adapter.InsertCommand.Parameters(13).Value = CType(GEAENDERTWER,String)
End If
Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
@@ -5825,7 +5823,7 @@ Namespace MyDatasetTableAdapters
Me._commandCollection(0).CommandText = "SELECT GUID, PROFIL_ID, JOB_TYP, STRING1, STRING2, STRING3, STRING4, BOOL1"& _
", BOOL2, BOOL3, BOOL4, AKTIV, REIHENFOLGE, ERSTELLTWER, ERSTELLTWANN, GEAENDERTW"& _
"ER, GEAENDERTWANN, STRING5, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" STRING6"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM "& _
"TBWMRH_PROFIL_JOB"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (PROFIL_ID = @PID)"
"TBWMRH_PROFIL_JOB"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (PROFIL_ID = @PID)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"ORDER BY REIHENFOLGE"
Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
Me._commandCollection(0).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "PROFIL_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand()
@@ -6287,6 +6285,7 @@ Namespace MyDatasetTableAdapters
tableMapping.ColumnMappings.Add("CHANGED_WHO", "CHANGED_WHO")
tableMapping.ColumnMappings.Add("CHANGED_WHEN", "CHANGED_WHEN")
tableMapping.ColumnMappings.Add("SSL_AUTH", "SSL_AUTH")
tableMapping.ColumnMappings.Add("AUTH_TYPE", "AUTH_TYPE")
Me._adapter.TableMappings.Add(tableMapping)
Me._adapter.DeleteCommand = New Global.System.Data.SqlClient.SqlCommand()
Me._adapter.DeleteCommand.Connection = Me.Connection
@@ -6296,11 +6295,11 @@ Namespace MyDatasetTableAdapters
Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand()
Me._adapter.InsertCommand.Connection = Me.Connection
Me._adapter.InsertCommand.CommandText = "INSERT INTO TBDD_EMAIL_ACCOUNT"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" (NAME, EMAIL_FROM, EMAIL"& _
"_SMTP, EMAIL_USER, EMAIL_PW, PORT, ACTIVE, ADDED_WHO, SSL_AUTH)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VALUES ("& _
"@NAME,@EMAIL_FROM,@EMAIL_SMTP,@EMAIL_USER,@EMAIL_PW,@PORT,@ACTIVE,@ADDED_WHO,@SS"& _
"L_AUTH); "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, NAME, EMAIL_FROM, EMAIL_SMTP, EMAIL_USER, EMAIL_PW, POR"& _
"T, ACTIVE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBDD_EMAIL_ACCO"& _
"UNT WHERE (GUID = SCOPE_IDENTITY())"
"_SMTP, EMAIL_USER, EMAIL_PW, PORT, ACTIVE, ADDED_WHO, SSL_AUTH, AUTH_TYPE)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VALU"& _
"ES (@NAME,@EMAIL_FROM,@EMAIL_SMTP,@EMAIL_USER,@EMAIL_PW,@PORT,@ACTIVE,@AD"& _
"DED_WHO,@SSL_AUTH,@AUTH_TYPE); "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, NAME, EMAIL_FROM, EMAIL_SMTP, EM"& _
"AIL_USER, EMAIL_PW, PORT, ACTIVE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WH"& _
"EN FROM TBDD_EMAIL_ACCOUNT WHERE (GUID = SCOPE_IDENTITY())"
Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NAME", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "NAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@EMAIL_FROM", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "EMAIL_FROM", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
@@ -6311,15 +6310,16 @@ Namespace MyDatasetTableAdapters
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ACTIVE", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "ACTIVE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ADDED_WHO", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "ADDED_WHO", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SSL_AUTH", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "SSL_AUTH", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AUTH_TYPE", Global.System.Data.SqlDbType.VarChar, 20, Global.System.Data.ParameterDirection.Input, 0, 0, "AUTH_TYPE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand = New Global.System.Data.SqlClient.SqlCommand()
Me._adapter.UpdateCommand.Connection = Me.Connection
Me._adapter.UpdateCommand.CommandText = "UPDATE TBDD_EMAIL_ACCOUNT"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SET NAME = @NAME, EMAIL_FROM = @E"& _
"MAIL_FROM, EMAIL_SMTP = @EMAIL_SMTP, EMAIL_USER = @EMAIL_USER, EMAIL_PW = @EMAIL"& _
"_PW, PORT = @PORT, ACTIVE = @ACTIVE, CHANGED_WHO = @CHANGED_WHO, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
" SSL_AUTH = @SSL_AUTH"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (GUID = @Original_GUID); "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELEC"& _
"T GUID, NAME, EMAIL_FROM, EMAIL_SMTP, EMAIL_USER, EMAIL_PW, PORT, ACTIVE, ADDED_"& _
"WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBDD_EMAIL_ACCOUNT WHERE (GUID ="& _
" @GUID)"
" SSL_AUTH = @SSL_AUTH, AUTH_TYPE = @AUTH_TYPE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (GUID = @"& _
"Original_GUID); "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, NAME, EMAIL_FROM, EMAIL_SMTP, EMAIL_USER, EMAIL"& _
"_PW, PORT, ACTIVE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBDD_EM"& _
"AIL_ACCOUNT WHERE (GUID = @GUID)"
Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NAME", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "NAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@EMAIL_FROM", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "EMAIL_FROM", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
@@ -6330,6 +6330,7 @@ Namespace MyDatasetTableAdapters
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ACTIVE", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "ACTIVE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CHANGED_WHO", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "CHANGED_WHO", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SSL_AUTH", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "SSL_AUTH", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AUTH_TYPE", Global.System.Data.SqlDbType.VarChar, 20, Global.System.Data.ParameterDirection.Input, 0, 0, "AUTH_TYPE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
End Sub
@@ -6348,8 +6349,8 @@ Namespace MyDatasetTableAdapters
Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand()
Me._commandCollection(0).Connection = Me.Connection
Me._commandCollection(0).CommandText = "SELECT GUID, NAME, EMAIL_FROM, EMAIL_SMTP, EMAIL_USER, EMAIL_PW, PORT, ACT"& _
"IVE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, SSL_AUTH"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM "& _
" TBDD_EMAIL_ACCOUNT"
"IVE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, SSL_AUTH, AUTH_TYPE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM"& _
" TBDD_EMAIL_ACCOUNT"
Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
End Sub
@@ -6430,7 +6431,7 @@ Namespace MyDatasetTableAdapters
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0"), _
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)> _
Public Overloads Overridable Function Insert(ByVal NAME As String, ByVal EMAIL_FROM As String, ByVal EMAIL_SMTP As String, ByVal EMAIL_USER As String, ByVal EMAIL_PW As String, ByVal PORT As Integer, ByVal ACTIVE As Boolean, ByVal ADDED_WHO As String, ByVal SSL_AUTH As Boolean) As Integer
Public Overloads Overridable Function Insert(ByVal NAME As String, ByVal EMAIL_FROM As String, ByVal EMAIL_SMTP As String, ByVal EMAIL_USER As String, ByVal EMAIL_PW As String, ByVal PORT As Integer, ByVal ACTIVE As Boolean, ByVal ADDED_WHO As String, ByVal SSL_AUTH As Boolean, ByVal AUTH_TYPE As String) As Integer
If (NAME Is Nothing) Then
Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
Else
@@ -6464,6 +6465,11 @@ Namespace MyDatasetTableAdapters
Me.Adapter.InsertCommand.Parameters(7).Value = CType(ADDED_WHO,String)
End If
Me.Adapter.InsertCommand.Parameters(8).Value = CType(SSL_AUTH,Boolean)
If (AUTH_TYPE Is Nothing) Then
Throw New Global.System.ArgumentNullException("AUTH_TYPE")
Else
Me.Adapter.InsertCommand.Parameters(9).Value = CType(AUTH_TYPE,String)
End If
Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
<> Global.System.Data.ConnectionState.Open) Then
@@ -6483,7 +6489,7 @@ Namespace MyDatasetTableAdapters
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0"), _
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _
Public Overloads Overridable Function Update(ByVal NAME As String, ByVal EMAIL_FROM As String, ByVal EMAIL_SMTP As String, ByVal EMAIL_USER As String, ByVal EMAIL_PW As String, ByVal PORT As Integer, ByVal ACTIVE As Boolean, ByVal CHANGED_WHO As String, ByVal SSL_AUTH As Boolean, ByVal Original_GUID As Integer, ByVal GUID As Integer) As Integer
Public Overloads Overridable Function Update(ByVal NAME As String, ByVal EMAIL_FROM As String, ByVal EMAIL_SMTP As String, ByVal EMAIL_USER As String, ByVal EMAIL_PW As String, ByVal PORT As Integer, ByVal ACTIVE As Boolean, ByVal CHANGED_WHO As String, ByVal SSL_AUTH As Boolean, ByVal AUTH_TYPE As String, ByVal Original_GUID As Integer, ByVal GUID As Integer) As Integer
If (NAME Is Nothing) Then
Me.Adapter.UpdateCommand.Parameters(0).Value = Global.System.DBNull.Value
Else
@@ -6517,8 +6523,13 @@ Namespace MyDatasetTableAdapters
Me.Adapter.UpdateCommand.Parameters(7).Value = CType(CHANGED_WHO,String)
End If
Me.Adapter.UpdateCommand.Parameters(8).Value = CType(SSL_AUTH,Boolean)
Me.Adapter.UpdateCommand.Parameters(9).Value = CType(Original_GUID,Integer)
Me.Adapter.UpdateCommand.Parameters(10).Value = CType(GUID,Integer)
If (AUTH_TYPE Is Nothing) Then
Throw New Global.System.ArgumentNullException("AUTH_TYPE")
Else
Me.Adapter.UpdateCommand.Parameters(9).Value = CType(AUTH_TYPE,String)
End If
Me.Adapter.UpdateCommand.Parameters(10).Value = CType(Original_GUID,Integer)
Me.Adapter.UpdateCommand.Parameters(11).Value = CType(GUID,Integer)
Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.UpdateCommand.Connection.State
If ((Me.Adapter.UpdateCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
<> Global.System.Data.ConnectionState.Open) Then

38
app/ResultHandler_Konfig/MyDataset.xsc
View File

@@ -6,6 +6,39 @@
</autogenerated>-->
<DataSetUISetting Version="1.00" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
<TableUISettings>
<TableUISetting Name="TBWMRH_PROFIL">
<ColumnUISettings>
<ColumnUISetting Name="Reihenfolge">
<ControlSettings>
<ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form">
<BindableControlInfo Name="NumericUpDown" Type="System.Windows.Forms.NumericUpDown" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
</ControlSetting>
</ControlSettings>
</ColumnUISetting>
</ColumnUISettings>
</TableUISetting>
<TableUISetting Name="TBWMRH_PROFIL_FILE_JOB">
<ColumnUISettings>
<ColumnUISetting Name="REIHENFOLGE">
<ControlSettings>
<ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form">
<BindableControlInfo Name="NumericUpDown" Type="System.Windows.Forms.NumericUpDown" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
</ControlSetting>
</ControlSettings>
</ColumnUISetting>
</ColumnUISettings>
</TableUISetting>
<TableUISetting Name="TBWMRH_PROFIL_JOB">
<ColumnUISettings>
<ColumnUISetting Name="REIHENFOLGE">
<ControlSettings>
<ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form">
<BindableControlInfo Name="NumericUpDown" Type="System.Windows.Forms.NumericUpDown" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
</ControlSetting>
</ControlSettings>
</ColumnUISetting>
</ColumnUISettings>
</TableUISetting>
<TableUISetting Name="TBDD_EMAIL_ACCOUNT">
<ColumnUISettings>
<ColumnUISetting Name="ADDED_WHEN">
@@ -18,6 +51,11 @@
<BindableControlInfo Name="TextBox" Type="System.Windows.Forms.TextBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
</ControlSetting></ControlSettings>
</ColumnUISetting>
<ColumnUISetting Name="AUTH_TYPE">
<ControlSettings><ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
<BindableControlInfo Name="ComboBox" Type="System.Windows.Forms.ComboBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
</ControlSetting></ControlSettings>
</ColumnUISetting>
</ColumnUISettings>
</TableUISetting>
</TableUISettings>

191
app/ResultHandler_Konfig/MyDataset.xsd
View File

@@ -55,61 +55,62 @@ WHERE (GUID = 1)</CommandText>
<MainSource>
<DbSource ConnectionRef="SQLSERVER_CS (MySettings)" DbObjectName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL" DbObjectType="Table" FillMethodModifier="Public" FillMethodName="Fill" GenerateMethods="Both" GenerateShortCommands="true" GeneratorGetMethodName="GetData" GeneratorSourceName="Fill" GetMethodModifier="Public" GetMethodName="GetData" QueryType="Rowset" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetData" UserSourceName="Fill">
<DeleteCommand>
<DbCommand CommandType="Text" ModifiedByUser="true">
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>DELETE FROM TBWMRH_PROFIL
WHERE (GUID = @Original_GUID)</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="Original_GUID" ColumnName="GUID" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="Original_GUID" ColumnName="GUID" DataSourceName="" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
</Parameters>
</DbCommand>
</DeleteCommand>
<InsertCommand>
<DbCommand CommandType="Text" ModifiedByUser="true">
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>INSERT INTO TBWMRH_PROFIL
(Profilname, Aktiv, Objekttyp, WindreamSuche, Day, Run, Letzter_Durchlauf, Running, Reihenfolge, ERSTELLTWER)
VALUES (@Profilname,@Aktiv,@Objekttyp,@WindreamSuche,@Day,@Run,@Letzter_Durchlauf,@Running,@Reihenfolge,@ERSTELLTWER);
SELECT GUID, Profilname, Aktiv, Objekttyp, WindreamSuche, Day, Run, Letzter_Durchlauf, Running, Reihenfolge, ERSTELLTWER, ERSTELLTWANN, GEAENDERTWER, GEAENDERTWANN FROM TBWMRH_PROFIL WHERE (GUID = SCOPE_IDENTITY())</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="Profilname" ColumnName="Profilname" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@Profilname" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="Profilname" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="Aktiv" ColumnName="Aktiv" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@Aktiv" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="Aktiv" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="Objekttyp" ColumnName="Objekttyp" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@Objekttyp" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="Objekttyp" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="WindreamSuche" ColumnName="WindreamSuche" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@WindreamSuche" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="WindreamSuche" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="Day" ColumnName="Day" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@Day" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="Day" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="Run" ColumnName="Run" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@Run" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="Run" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="Letzter_Durchlauf" ColumnName="Letzter_Durchlauf" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL" DataTypeServer="datetime" DbType="DateTime" Direction="Input" ParameterName="@Letzter_Durchlauf" Precision="0" ProviderType="DateTime" Scale="0" Size="8" SourceColumn="Letzter_Durchlauf" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="Running" ColumnName="Running" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@Running" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="Running" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="Reihenfolge" ColumnName="Reihenfolge" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@Reihenfolge" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="Reihenfolge" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="ERSTELLTWER" ColumnName="ERSTELLTWER" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@ERSTELLTWER" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="ERSTELLTWER" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="Profilname" ColumnName="Profilname" DataSourceName="" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@Profilname" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="Profilname" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="Aktiv" ColumnName="Aktiv" DataSourceName="" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@Aktiv" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="Aktiv" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="Objekttyp" ColumnName="Objekttyp" DataSourceName="" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@Objekttyp" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="Objekttyp" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="WindreamSuche" ColumnName="WindreamSuche" DataSourceName="" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@WindreamSuche" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="WindreamSuche" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="Day" ColumnName="Day" DataSourceName="" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@Day" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="Day" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="Run" ColumnName="Run" DataSourceName="" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@Run" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="Run" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="Letzter_Durchlauf" ColumnName="Letzter_Durchlauf" DataSourceName="" DataTypeServer="datetime" DbType="DateTime" Direction="Input" ParameterName="@Letzter_Durchlauf" Precision="0" ProviderType="DateTime" Scale="0" Size="8" SourceColumn="Letzter_Durchlauf" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="Running" ColumnName="Running" DataSourceName="" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@Running" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="Running" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="Reihenfolge" ColumnName="Reihenfolge" DataSourceName="" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@Reihenfolge" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="Reihenfolge" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="ERSTELLTWER" ColumnName="ERSTELLTWER" DataSourceName="" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@ERSTELLTWER" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="ERSTELLTWER" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters>
</DbCommand>
</InsertCommand>
<SelectCommand>
<DbCommand CommandType="Text" ModifiedByUser="true">
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>SELECT GUID, Profilname, Aktiv, Objekttyp, WindreamSuche, Day, Run, Letzter_Durchlauf, Running, Reihenfolge, ERSTELLTWER, ERSTELLTWANN, GEAENDERTWER, GEAENDERTWANN
FROM TBWMRH_PROFIL</CommandText>
FROM TBWMRH_PROFIL
ORDER BY Reihenfolge</CommandText>
<Parameters />
</DbCommand>
</SelectCommand>
<UpdateCommand>
<DbCommand CommandType="Text" ModifiedByUser="true">
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>UPDATE TBWMRH_PROFIL
SET Profilname = @Profilname, Aktiv = @Aktiv, Objekttyp = @Objekttyp, WindreamSuche = @WindreamSuche, Day = @Day, Run = @Run, Letzter_Durchlauf = @Letzter_Durchlauf, Running = @Running, Reihenfolge = @Reihenfolge,
GEAENDERTWER = @GEAENDERTWER
WHERE (GUID = @Original_GUID);
SELECT GUID, Profilname, Aktiv, Objekttyp, WindreamSuche, Day, Run, Letzter_Durchlauf, Running, Reihenfolge, ERSTELLTWER, ERSTELLTWANN, GEAENDERTWER, GEAENDERTWANN FROM TBWMRH_PROFIL WHERE (GUID = @GUID)</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="Profilname" ColumnName="Profilname" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@Profilname" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="Profilname" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="Aktiv" ColumnName="Aktiv" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@Aktiv" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="Aktiv" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="Objekttyp" ColumnName="Objekttyp" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@Objekttyp" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="Objekttyp" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="WindreamSuche" ColumnName="WindreamSuche" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@WindreamSuche" Precision="0" ProviderType="VarChar" Scale="0" Size="500" SourceColumn="WindreamSuche" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="Day" ColumnName="Day" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@Day" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="Day" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="Run" ColumnName="Run" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@Run" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="Run" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="Letzter_Durchlauf" ColumnName="Letzter_Durchlauf" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL" DataTypeServer="datetime" DbType="DateTime" Direction="Input" ParameterName="@Letzter_Durchlauf" Precision="0" ProviderType="DateTime" Scale="0" Size="8" SourceColumn="Letzter_Durchlauf" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="Running" ColumnName="Running" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@Running" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="Running" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="Reihenfolge" ColumnName="Reihenfolge" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@Reihenfolge" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="Reihenfolge" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="GEAENDERTWER" ColumnName="GEAENDERTWER" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@GEAENDERTWER" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="GEAENDERTWER" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="Original_GUID" ColumnName="GUID" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="GUID" ColumnName="GUID" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="Profilname" ColumnName="Profilname" DataSourceName="" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@Profilname" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="Profilname" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="Aktiv" ColumnName="Aktiv" DataSourceName="" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@Aktiv" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="Aktiv" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="Objekttyp" ColumnName="Objekttyp" DataSourceName="" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@Objekttyp" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="Objekttyp" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="WindreamSuche" ColumnName="WindreamSuche" DataSourceName="" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@WindreamSuche" Precision="0" ProviderType="VarChar" Scale="0" Size="500" SourceColumn="WindreamSuche" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="Day" ColumnName="Day" DataSourceName="" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@Day" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="Day" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="Run" ColumnName="Run" DataSourceName="" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@Run" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="Run" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="Letzter_Durchlauf" ColumnName="Letzter_Durchlauf" DataSourceName="" DataTypeServer="datetime" DbType="DateTime" Direction="Input" ParameterName="@Letzter_Durchlauf" Precision="0" ProviderType="DateTime" Scale="0" Size="8" SourceColumn="Letzter_Durchlauf" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="Running" ColumnName="Running" DataSourceName="" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@Running" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="Running" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="Reihenfolge" ColumnName="Reihenfolge" DataSourceName="" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@Reihenfolge" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="Reihenfolge" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="GEAENDERTWER" ColumnName="GEAENDERTWER" DataSourceName="" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@GEAENDERTWER" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="GEAENDERTWER" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="Original_GUID" ColumnName="GUID" DataSourceName="" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="GUID" ColumnName="GUID" DataSourceName="" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
</Parameters>
</DbCommand>
</UpdateCommand>
@@ -159,25 +160,25 @@ WHERE (GUID = @Original_GUID)</CommandText>
</DeleteCommand>
<InsertCommand>
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>INSERT INTO [TBWMRH_PROFIL_FILE_JOB] ([PROFIL_ID], [TYP], [STRING1], [STRING2], [STRING3], [STRING4], [BOOL1], [BOOL2], [BOOL3], [BOOL4], [AKTIV], [REIHENFOLGE], [ERSTELLTWER], [ERSTELLTWANN], [GEAENDERTWER], [GEAENDERTWANN]) VALUES (@PROFIL_ID, @TYP, @STRING1, @STRING2, @STRING3, @STRING4, @BOOL1, @BOOL2, @BOOL3, @BOOL4, @AKTIV, @REIHENFOLGE, @ERSTELLTWER, @ERSTELLTWANN, @GEAENDERTWER, @GEAENDERTWANN);
<CommandText>INSERT INTO TBWMRH_PROFIL_FILE_JOB
(PROFIL_ID, TYP, STRING1, STRING2, STRING3, STRING4, BOOL1, BOOL2, BOOL3, BOOL4, AKTIV, REIHENFOLGE, ERSTELLTWER, GEAENDERTWER)
VALUES (@PROFIL_ID,@TYP,@STRING1,@STRING2,@STRING3,@STRING4,@BOOL1,@BOOL2,@BOOL3,@BOOL4,@AKTIV,@REIHENFOLGE,@ERSTELLTWER,@GEAENDERTWER);
SELECT GUID, PROFIL_ID, TYP, STRING1, STRING2, STRING3, STRING4, BOOL1, BOOL2, BOOL3, BOOL4, AKTIV, REIHENFOLGE, ERSTELLTWER, ERSTELLTWANN, GEAENDERTWER, GEAENDERTWANN FROM TBWMRH_PROFIL_FILE_JOB WHERE (GUID = SCOPE_IDENTITY())</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@PROFIL_ID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="PROFIL_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@TYP" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="TYP" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@STRING1" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="STRING1" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@STRING2" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="STRING2" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@STRING3" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="STRING3" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@STRING4" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="STRING4" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@BOOL1" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="BOOL1" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@BOOL2" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="BOOL2" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@BOOL3" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="BOOL3" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@BOOL4" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="BOOL4" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@AKTIV" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="AKTIV" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@REIHENFOLGE" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="REIHENFOLGE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@ERSTELLTWER" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="ERSTELLTWER" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@ERSTELLTWANN" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="ERSTELLTWANN" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@GEAENDERTWER" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="GEAENDERTWER" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@GEAENDERTWANN" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="GEAENDERTWANN" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="PROFIL_ID" ColumnName="PROFIL_ID" DataSourceName="" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@PROFIL_ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="PROFIL_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="TYP" ColumnName="TYP" DataSourceName="" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@TYP" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="TYP" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="STRING1" ColumnName="STRING1" DataSourceName="" DataTypeServer="varchar(MAX)" DbType="AnsiString" Direction="Input" ParameterName="@STRING1" Precision="0" ProviderType="VarChar" Scale="0" Size="2147483647" SourceColumn="STRING1" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="STRING2" ColumnName="STRING2" DataSourceName="" DataTypeServer="varchar(MAX)" DbType="AnsiString" Direction="Input" ParameterName="@STRING2" Precision="0" ProviderType="VarChar" Scale="0" Size="2147483647" SourceColumn="STRING2" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="STRING3" ColumnName="STRING3" DataSourceName="" DataTypeServer="varchar(MAX)" DbType="AnsiString" Direction="Input" ParameterName="@STRING3" Precision="0" ProviderType="VarChar" Scale="0" Size="2147483647" SourceColumn="STRING3" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="STRING4" ColumnName="STRING4" DataSourceName="" DataTypeServer="varchar(MAX)" DbType="AnsiString" Direction="Input" ParameterName="@STRING4" Precision="0" ProviderType="VarChar" Scale="0" Size="2147483647" SourceColumn="STRING4" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="BOOL1" ColumnName="BOOL1" DataSourceName="" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@BOOL1" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="BOOL1" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="BOOL2" ColumnName="BOOL2" DataSourceName="" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@BOOL2" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="BOOL2" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="BOOL3" ColumnName="BOOL3" DataSourceName="" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@BOOL3" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="BOOL3" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="BOOL4" ColumnName="BOOL4" DataSourceName="" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@BOOL4" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="BOOL4" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="AKTIV" ColumnName="AKTIV" DataSourceName="" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@AKTIV" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="AKTIV" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="REIHENFOLGE" ColumnName="REIHENFOLGE" DataSourceName="" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@REIHENFOLGE" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="REIHENFOLGE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="ERSTELLTWER" ColumnName="ERSTELLTWER" DataSourceName="" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@ERSTELLTWER" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="ERSTELLTWER" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="GEAENDERTWER" ColumnName="GEAENDERTWER" DataSourceName="" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@GEAENDERTWER" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="GEAENDERTWER" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters>
</DbCommand>
</InsertCommand>
@@ -185,7 +186,8 @@ SELECT GUID, PROFIL_ID, TYP, STRING1, STRING2, STRING3, STRING4, BOOL1, BOOL2, B
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>SELECT GUID, PROFIL_ID, TYP, STRING1, STRING2, STRING3, STRING4, BOOL1, BOOL2, BOOL3, BOOL4, AKTIV, REIHENFOLGE, ERSTELLTWER, ERSTELLTWANN, GEAENDERTWER, GEAENDERTWANN
FROM TBWMRH_PROFIL_FILE_JOB
WHERE (PROFIL_ID = @PID)</CommandText>
WHERE (PROFIL_ID = @PID)
ORDER BY REIHENFOLGE</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="PID" ColumnName="PROFIL_ID" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL_FILE_JOB" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@PID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="PROFIL_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters>
@@ -196,7 +198,7 @@ WHERE (PROFIL_ID = @PID)</CommandText>
<CommandText>UPDATE TBWMRH_PROFIL_FILE_JOB
SET TYP = @TYP, STRING1 = @STRING1, STRING2 = @STRING2, STRING3 = @STRING3, STRING4 = @STRING4, BOOL1 = @BOOL1, BOOL2 = @BOOL2, BOOL3 = @BOOL3, BOOL4 = @BOOL4, AKTIV = @AKTIV,
REIHENFOLGE = @REIHENFOLGE, GEAENDERTWER = @GEAENDERTWER
WHERE (GUID = @Original_GUID);
WHERE (GUID = @Original_GUID);
SELECT GUID, PROFIL_ID, TYP, STRING1, STRING2, STRING3, STRING4, BOOL1, BOOL2, BOOL3, BOOL4, AKTIV, REIHENFOLGE, ERSTELLTWER, ERSTELLTWANN, GEAENDERTWER, GEAENDERTWANN FROM TBWMRH_PROFIL_FILE_JOB WHERE (GUID = @GUID)</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="TYP" ColumnName="TYP" DataSourceName="" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@TYP" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="TYP" SourceColumnNullMapping="false" SourceVersion="Current" />
@@ -264,27 +266,27 @@ WHERE (GUID = @Original_GUID)</CommandText>
</DbCommand>
</DeleteCommand>
<InsertCommand>
<DbCommand CommandType="Text" ModifiedByUser="true">
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>INSERT INTO TBWMRH_PROFIL_JOB
(PROFIL_ID, JOB_TYP, STRING1, STRING2, STRING3, STRING4, BOOL1, BOOL2, BOOL3, BOOL4, AKTIV, REIHENFOLGE, ERSTELLTWER, STRING5, STRING6)
VALUES (@PROFIL_ID,@JOB_TYP,@STRING1,@STRING2,@STRING3,@STRING4,@BOOL1,@BOOL2,@BOOL3,@BOOL4,@AKTIV,@REIHENFOLGE,@ERSTELLTWER,@STRING5,@STRING6);
SELECT GUID, PROFIL_ID, JOB_TYP, STRING1, STRING2, STRING3, STRING4, BOOL1, BOOL2, BOOL3, BOOL4, AKTIV, REIHENFOLGE, ERSTELLTWER, ERSTELLTWANN, GEAENDERTWER, GEAENDERTWANN FROM TBWMRH_PROFIL_JOB WHERE (GUID = SCOPE_IDENTITY())</CommandText>
<Parameters>
<Parameter AllowDbNull="true" AutogeneratedName="PROFIL_ID" ColumnName="PROFIL_ID" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL_JOB" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@PROFIL_ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="PROFIL_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="JOB_TYP" ColumnName="JOB_TYP" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL_JOB" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@JOB_TYP" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="JOB_TYP" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="STRING1" ColumnName="STRING1" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL_JOB" DataTypeServer="varchar(MAX)" DbType="AnsiString" Direction="Input" ParameterName="@STRING1" Precision="0" ProviderType="VarChar" Scale="0" Size="2147483647" SourceColumn="STRING1" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="STRING2" ColumnName="STRING2" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL_JOB" DataTypeServer="varchar(MAX)" DbType="AnsiString" Direction="Input" ParameterName="@STRING2" Precision="0" ProviderType="VarChar" Scale="0" Size="2147483647" SourceColumn="STRING2" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="STRING3" ColumnName="STRING3" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL_JOB" DataTypeServer="varchar(MAX)" DbType="AnsiString" Direction="Input" ParameterName="@STRING3" Precision="0" ProviderType="VarChar" Scale="0" Size="2147483647" SourceColumn="STRING3" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="STRING4" ColumnName="STRING4" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL_JOB" DataTypeServer="varchar(MAX)" DbType="AnsiString" Direction="Input" ParameterName="@STRING4" Precision="0" ProviderType="VarChar" Scale="0" Size="2147483647" SourceColumn="STRING4" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="BOOL1" ColumnName="BOOL1" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL_JOB" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@BOOL1" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="BOOL1" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="BOOL2" ColumnName="BOOL2" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL_JOB" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@BOOL2" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="BOOL2" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="BOOL3" ColumnName="BOOL3" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL_JOB" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@BOOL3" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="BOOL3" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="BOOL4" ColumnName="BOOL4" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL_JOB" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@BOOL4" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="BOOL4" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="AKTIV" ColumnName="AKTIV" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL_JOB" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@AKTIV" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="AKTIV" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="REIHENFOLGE" ColumnName="REIHENFOLGE" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL_JOB" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@REIHENFOLGE" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="REIHENFOLGE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="ERSTELLTWER" ColumnName="ERSTELLTWER" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL_JOB" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@ERSTELLTWER" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="ERSTELLTWER" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="STRING5" ColumnName="STRING5" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL_JOB" DataTypeServer="varchar(MAX)" DbType="AnsiString" Direction="Input" ParameterName="@STRING5" Precision="0" ProviderType="VarChar" Scale="0" Size="2147483647" SourceColumn="STRING5" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="STRING6" ColumnName="STRING6" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL_JOB" DataTypeServer="varchar(MAX)" DbType="AnsiString" Direction="Input" ParameterName="@STRING6" Precision="0" ProviderType="VarChar" Scale="0" Size="2147483647" SourceColumn="STRING6" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="PROFIL_ID" ColumnName="PROFIL_ID" DataSourceName="" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@PROFIL_ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="PROFIL_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="JOB_TYP" ColumnName="JOB_TYP" DataSourceName="" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@JOB_TYP" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="JOB_TYP" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="STRING1" ColumnName="STRING1" DataSourceName="" DataTypeServer="varchar(MAX)" DbType="AnsiString" Direction="Input" ParameterName="@STRING1" Precision="0" ProviderType="VarChar" Scale="0" Size="2147483647" SourceColumn="STRING1" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="STRING2" ColumnName="STRING2" DataSourceName="" DataTypeServer="varchar(MAX)" DbType="AnsiString" Direction="Input" ParameterName="@STRING2" Precision="0" ProviderType="VarChar" Scale="0" Size="2147483647" SourceColumn="STRING2" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="STRING3" ColumnName="STRING3" DataSourceName="" DataTypeServer="varchar(MAX)" DbType="AnsiString" Direction="Input" ParameterName="@STRING3" Precision="0" ProviderType="VarChar" Scale="0" Size="2147483647" SourceColumn="STRING3" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="STRING4" ColumnName="STRING4" DataSourceName="" DataTypeServer="varchar(MAX)" DbType="AnsiString" Direction="Input" ParameterName="@STRING4" Precision="0" ProviderType="VarChar" Scale="0" Size="2147483647" SourceColumn="STRING4" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="BOOL1" ColumnName="BOOL1" DataSourceName="" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@BOOL1" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="BOOL1" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="BOOL2" ColumnName="BOOL2" DataSourceName="" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@BOOL2" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="BOOL2" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="BOOL3" ColumnName="BOOL3" DataSourceName="" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@BOOL3" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="BOOL3" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="BOOL4" ColumnName="BOOL4" DataSourceName="" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@BOOL4" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="BOOL4" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="AKTIV" ColumnName="AKTIV" DataSourceName="" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@AKTIV" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="AKTIV" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="REIHENFOLGE" ColumnName="REIHENFOLGE" DataSourceName="" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@REIHENFOLGE" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="REIHENFOLGE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="ERSTELLTWER" ColumnName="ERSTELLTWER" DataSourceName="" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@ERSTELLTWER" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="ERSTELLTWER" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="STRING5" ColumnName="STRING5" DataSourceName="" DataTypeServer="varchar(MAX)" DbType="AnsiString" Direction="Input" ParameterName="@STRING5" Precision="0" ProviderType="VarChar" Scale="0" Size="2147483647" SourceColumn="STRING5" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="STRING6" ColumnName="STRING6" DataSourceName="" DataTypeServer="varchar(MAX)" DbType="AnsiString" Direction="Input" ParameterName="@STRING6" Precision="0" ProviderType="VarChar" Scale="0" Size="2147483647" SourceColumn="STRING6" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters>
</DbCommand>
</InsertCommand>
@@ -293,37 +295,38 @@ SELECT GUID, PROFIL_ID, JOB_TYP, STRING1, STRING2, STRING3, STRING4, BOOL1, BOOL
<CommandText>SELECT GUID, PROFIL_ID, JOB_TYP, STRING1, STRING2, STRING3, STRING4, BOOL1, BOOL2, BOOL3, BOOL4, AKTIV, REIHENFOLGE, ERSTELLTWER, ERSTELLTWANN, GEAENDERTWER, GEAENDERTWANN, STRING5,
STRING6
FROM TBWMRH_PROFIL_JOB
WHERE (PROFIL_ID = @PID)</CommandText>
WHERE (PROFIL_ID = @PID)
ORDER BY REIHENFOLGE</CommandText>
<Parameters>
<Parameter AllowDbNull="true" AutogeneratedName="PID" ColumnName="PROFIL_ID" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL_JOB" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@PID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="PROFIL_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters>
</DbCommand>
</SelectCommand>
<UpdateCommand>
<DbCommand CommandType="Text" ModifiedByUser="true">
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>UPDATE TBWMRH_PROFIL_JOB
SET PROFIL_ID = @PROFIL_ID, JOB_TYP = @JOB_TYP, STRING1 = @STRING1, STRING2 = @STRING2, STRING3 = @STRING3, STRING4 = @STRING4, BOOL1 = @BOOL1, BOOL2 = @BOOL2, BOOL3 = @BOOL3,
BOOL4 = @BOOL4, AKTIV = @AKTIV, REIHENFOLGE = @REIHENFOLGE, GEAENDERTWER = @GEAENDERTWER, STRING5 = @STRING5, STRING6 = @STRING6
WHERE (GUID = @Original_GUID);
SELECT GUID, PROFIL_ID, JOB_TYP, STRING1, STRING2, STRING3, STRING4, BOOL1, BOOL2, BOOL3, BOOL4, AKTIV, REIHENFOLGE, ERSTELLTWER, ERSTELLTWANN, GEAENDERTWER, GEAENDERTWANN FROM TBWMRH_PROFIL_JOB WHERE (GUID = @GUID)</CommandText>
<Parameters>
<Parameter AllowDbNull="true" AutogeneratedName="PROFIL_ID" ColumnName="PROFIL_ID" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL_JOB" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@PROFIL_ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="PROFIL_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="JOB_TYP" ColumnName="JOB_TYP" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL_JOB" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@JOB_TYP" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="JOB_TYP" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="STRING1" ColumnName="STRING1" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL_JOB" DataTypeServer="varchar(MAX)" DbType="AnsiString" Direction="Input" ParameterName="@STRING1" Precision="0" ProviderType="VarChar" Scale="0" Size="2147483647" SourceColumn="STRING1" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="STRING2" ColumnName="STRING2" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL_JOB" DataTypeServer="varchar(MAX)" DbType="AnsiString" Direction="Input" ParameterName="@STRING2" Precision="0" ProviderType="VarChar" Scale="0" Size="2147483647" SourceColumn="STRING2" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="STRING3" ColumnName="STRING3" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL_JOB" DataTypeServer="varchar(MAX)" DbType="AnsiString" Direction="Input" ParameterName="@STRING3" Precision="0" ProviderType="VarChar" Scale="0" Size="2147483647" SourceColumn="STRING3" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="STRING4" ColumnName="STRING4" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL_JOB" DataTypeServer="varchar(MAX)" DbType="AnsiString" Direction="Input" ParameterName="@STRING4" Precision="0" ProviderType="VarChar" Scale="0" Size="2147483647" SourceColumn="STRING4" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="BOOL1" ColumnName="BOOL1" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL_JOB" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@BOOL1" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="BOOL1" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="BOOL2" ColumnName="BOOL2" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL_JOB" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@BOOL2" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="BOOL2" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="BOOL3" ColumnName="BOOL3" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL_JOB" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@BOOL3" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="BOOL3" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="BOOL4" ColumnName="BOOL4" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL_JOB" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@BOOL4" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="BOOL4" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="AKTIV" ColumnName="AKTIV" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL_JOB" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@AKTIV" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="AKTIV" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="REIHENFOLGE" ColumnName="REIHENFOLGE" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL_JOB" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@REIHENFOLGE" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="REIHENFOLGE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="GEAENDERTWER" ColumnName="GEAENDERTWER" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL_JOB" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@GEAENDERTWER" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="GEAENDERTWER" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="STRING5" ColumnName="STRING5" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL_JOB" DataTypeServer="varchar(MAX)" DbType="AnsiString" Direction="Input" ParameterName="@STRING5" Precision="0" ProviderType="VarChar" Scale="0" Size="2147483647" SourceColumn="STRING5" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="STRING6" ColumnName="STRING6" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL_JOB" DataTypeServer="varchar(MAX)" DbType="AnsiString" Direction="Input" ParameterName="@STRING6" Precision="0" ProviderType="VarChar" Scale="0" Size="2147483647" SourceColumn="STRING6" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="Original_GUID" ColumnName="GUID" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL_JOB" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="GUID" ColumnName="GUID" DataSourceName="DD_ECM_RENOLIT.dbo.TBWMRH_PROFIL_JOB" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="PROFIL_ID" ColumnName="PROFIL_ID" DataSourceName="" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@PROFIL_ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="PROFIL_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="JOB_TYP" ColumnName="JOB_TYP" DataSourceName="" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@JOB_TYP" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="JOB_TYP" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="STRING1" ColumnName="STRING1" DataSourceName="" DataTypeServer="varchar(MAX)" DbType="AnsiString" Direction="Input" ParameterName="@STRING1" Precision="0" ProviderType="VarChar" Scale="0" Size="2147483647" SourceColumn="STRING1" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="STRING2" ColumnName="STRING2" DataSourceName="" DataTypeServer="varchar(MAX)" DbType="AnsiString" Direction="Input" ParameterName="@STRING2" Precision="0" ProviderType="VarChar" Scale="0" Size="2147483647" SourceColumn="STRING2" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="STRING3" ColumnName="STRING3" DataSourceName="" DataTypeServer="varchar(MAX)" DbType="AnsiString" Direction="Input" ParameterName="@STRING3" Precision="0" ProviderType="VarChar" Scale="0" Size="2147483647" SourceColumn="STRING3" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="STRING4" ColumnName="STRING4" DataSourceName="" DataTypeServer="varchar(MAX)" DbType="AnsiString" Direction="Input" ParameterName="@STRING4" Precision="0" ProviderType="VarChar" Scale="0" Size="2147483647" SourceColumn="STRING4" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="BOOL1" ColumnName="BOOL1" DataSourceName="" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@BOOL1" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="BOOL1" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="BOOL2" ColumnName="BOOL2" DataSourceName="" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@BOOL2" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="BOOL2" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="BOOL3" ColumnName="BOOL3" DataSourceName="" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@BOOL3" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="BOOL3" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="BOOL4" ColumnName="BOOL4" DataSourceName="" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@BOOL4" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="BOOL4" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="AKTIV" ColumnName="AKTIV" DataSourceName="" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@AKTIV" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="AKTIV" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="REIHENFOLGE" ColumnName="REIHENFOLGE" DataSourceName="" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@REIHENFOLGE" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="REIHENFOLGE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="GEAENDERTWER" ColumnName="GEAENDERTWER" DataSourceName="" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@GEAENDERTWER" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="GEAENDERTWER" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="STRING5" ColumnName="STRING5" DataSourceName="" DataTypeServer="varchar(MAX)" DbType="AnsiString" Direction="Input" ParameterName="@STRING5" Precision="0" ProviderType="VarChar" Scale="0" Size="2147483647" SourceColumn="STRING5" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="STRING6" ColumnName="STRING6" DataSourceName="" DataTypeServer="varchar(MAX)" DbType="AnsiString" Direction="Input" ParameterName="@STRING6" Precision="0" ProviderType="VarChar" Scale="0" Size="2147483647" SourceColumn="STRING6" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="Original_GUID" ColumnName="GUID" DataSourceName="" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="GUID" ColumnName="GUID" DataSourceName="" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
</Parameters>
</DbCommand>
</UpdateCommand>
@@ -379,8 +382,8 @@ WHERE (GUID = @Original_GUID)</CommandText>
<InsertCommand>
<DbCommand CommandType="Text" ModifiedByUser="true">
<CommandText>INSERT INTO TBDD_EMAIL_ACCOUNT
(NAME, EMAIL_FROM, EMAIL_SMTP, EMAIL_USER, EMAIL_PW, PORT, ACTIVE, ADDED_WHO, SSL_AUTH)
VALUES (@NAME,@EMAIL_FROM,@EMAIL_SMTP,@EMAIL_USER,@EMAIL_PW,@PORT,@ACTIVE,@ADDED_WHO,@SSL_AUTH);
(NAME, EMAIL_FROM, EMAIL_SMTP, EMAIL_USER, EMAIL_PW, PORT, ACTIVE, ADDED_WHO, SSL_AUTH, AUTH_TYPE)
VALUES (@NAME,@EMAIL_FROM,@EMAIL_SMTP,@EMAIL_USER,@EMAIL_PW,@PORT,@ACTIVE,@ADDED_WHO,@SSL_AUTH,@AUTH_TYPE);
SELECT GUID, NAME, EMAIL_FROM, EMAIL_SMTP, EMAIL_USER, EMAIL_PW, PORT, ACTIVE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBDD_EMAIL_ACCOUNT WHERE (GUID = SCOPE_IDENTITY())</CommandText>
<Parameters>
<Parameter AllowDbNull="true" AutogeneratedName="NAME" ColumnName="NAME" DataSourceName="DD_ECM_RENOLIT.dbo.TBDD_EMAIL_ACCOUNT" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
@@ -392,12 +395,13 @@ SELECT GUID, NAME, EMAIL_FROM, EMAIL_SMTP, EMAIL_USER, EMAIL_PW, PORT, ACTIVE, A
<Parameter AllowDbNull="false" AutogeneratedName="ACTIVE" ColumnName="ACTIVE" DataSourceName="DD_ECM_RENOLIT.dbo.TBDD_EMAIL_ACCOUNT" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@ACTIVE" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="ACTIVE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="ADDED_WHO" ColumnName="ADDED_WHO" DataSourceName="DD_ECM_RENOLIT.dbo.TBDD_EMAIL_ACCOUNT" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@ADDED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="SSL_AUTH" ColumnName="SSL_AUTH" DataSourceName="DD_ECM_RENOLIT.dbo.TBDD_EMAIL_ACCOUNT" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@SSL_AUTH" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="SSL_AUTH" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="AUTH_TYPE" ColumnName="AUTH_TYPE" DataSourceName="DD_ECM_RENOLIT.dbo.TBDD_EMAIL_ACCOUNT" DataTypeServer="varchar(20)" DbType="AnsiString" Direction="Input" ParameterName="@AUTH_TYPE" Precision="0" ProviderType="VarChar" Scale="0" Size="20" SourceColumn="AUTH_TYPE" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters>
</DbCommand>
</InsertCommand>
<SelectCommand>
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>SELECT GUID, NAME, EMAIL_FROM, EMAIL_SMTP, EMAIL_USER, EMAIL_PW, PORT, ACTIVE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, SSL_AUTH
<CommandText>SELECT GUID, NAME, EMAIL_FROM, EMAIL_SMTP, EMAIL_USER, EMAIL_PW, PORT, ACTIVE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, SSL_AUTH, AUTH_TYPE
FROM TBDD_EMAIL_ACCOUNT</CommandText>
<Parameters />
</DbCommand>
@@ -406,8 +410,8 @@ FROM TBDD_EMAIL_ACCOUNT</CommandText>
<DbCommand CommandType="Text" ModifiedByUser="true">
<CommandText>UPDATE TBDD_EMAIL_ACCOUNT
SET NAME = @NAME, EMAIL_FROM = @EMAIL_FROM, EMAIL_SMTP = @EMAIL_SMTP, EMAIL_USER = @EMAIL_USER, EMAIL_PW = @EMAIL_PW, PORT = @PORT, ACTIVE = @ACTIVE, CHANGED_WHO = @CHANGED_WHO,
SSL_AUTH = @SSL_AUTH
WHERE (GUID = @Original_GUID);
SSL_AUTH = @SSL_AUTH, AUTH_TYPE = @AUTH_TYPE
WHERE (GUID = @Original_GUID);
SELECT GUID, NAME, EMAIL_FROM, EMAIL_SMTP, EMAIL_USER, EMAIL_PW, PORT, ACTIVE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBDD_EMAIL_ACCOUNT WHERE (GUID = @GUID)</CommandText>
<Parameters>
<Parameter AllowDbNull="true" AutogeneratedName="NAME" ColumnName="NAME" DataSourceName="DD_ECM_RENOLIT.dbo.TBDD_EMAIL_ACCOUNT" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
@@ -419,6 +423,7 @@ SELECT GUID, NAME, EMAIL_FROM, EMAIL_SMTP, EMAIL_USER, EMAIL_PW, PORT, ACTIVE, A
<Parameter AllowDbNull="false" AutogeneratedName="ACTIVE" ColumnName="ACTIVE" DataSourceName="DD_ECM_RENOLIT.dbo.TBDD_EMAIL_ACCOUNT" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@ACTIVE" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="ACTIVE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="CHANGED_WHO" ColumnName="CHANGED_WHO" DataSourceName="DD_ECM_RENOLIT.dbo.TBDD_EMAIL_ACCOUNT" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@CHANGED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="SSL_AUTH" ColumnName="SSL_AUTH" DataSourceName="DD_ECM_RENOLIT.dbo.TBDD_EMAIL_ACCOUNT" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@SSL_AUTH" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="SSL_AUTH" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="AUTH_TYPE" ColumnName="AUTH_TYPE" DataSourceName="DD_ECM_RENOLIT.dbo.TBDD_EMAIL_ACCOUNT" DataTypeServer="varchar(20)" DbType="AnsiString" Direction="Input" ParameterName="@AUTH_TYPE" Precision="0" ProviderType="VarChar" Scale="0" Size="20" SourceColumn="AUTH_TYPE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="Original_GUID" ColumnName="GUID" DataSourceName="DD_ECM_RENOLIT.dbo.TBDD_EMAIL_ACCOUNT" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="GUID" ColumnName="GUID" DataSourceName="DD_ECM_RENOLIT.dbo.TBDD_EMAIL_ACCOUNT" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
</Parameters>
@@ -440,6 +445,7 @@ SELECT GUID, NAME, EMAIL_FROM, EMAIL_SMTP, EMAIL_USER, EMAIL_PW, PORT, ACTIVE, A
<Mapping SourceColumn="CHANGED_WHO" DataSetColumn="CHANGED_WHO" />
<Mapping SourceColumn="CHANGED_WHEN" DataSetColumn="CHANGED_WHEN" />
<Mapping SourceColumn="SSL_AUTH" DataSetColumn="SSL_AUTH" />
<Mapping SourceColumn="AUTH_TYPE" DataSetColumn="AUTH_TYPE" />
</Mappings>
<Sources />
</TableAdapter>
@@ -509,7 +515,7 @@ SELECT GUID, NAME, EMAIL_FROM, EMAIL_SMTP, EMAIL_USER, EMAIL_PW, PORT, ACTIVE, A
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="WindreamSuche" msprop:Generator_ColumnVarNameInTable="columnWindreamSuche" msprop:Generator_ColumnPropNameInRow="WindreamSuche" msprop:Generator_ColumnPropNameInTable="WindreamSucheColumn" msprop:Generator_UserColumnName="WindreamSuche">
<xs:element name="WindreamSuche" msprop:Generator_ColumnVarNameInTable="columnWindreamSuche" msprop:Generator_ColumnPropNameInRow="WindreamSuche" msprop:Generator_ColumnPropNameInTable="WindreamSucheColumn" msprop:Generator_UserColumnName="WindreamSuche" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="500" />
@@ -530,7 +536,7 @@ SELECT GUID, NAME, EMAIL_FROM, EMAIL_SMTP, EMAIL_USER, EMAIL_PW, PORT, ACTIVE, A
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="Letzter_Durchlauf" msprop:Generator_ColumnVarNameInTable="columnLetzter_Durchlauf" msprop:Generator_ColumnPropNameInRow="Letzter_Durchlauf" msprop:Generator_ColumnPropNameInTable="Letzter_DurchlaufColumn" msprop:Generator_UserColumnName="Letzter_Durchlauf" type="xs:dateTime" default="1900-01-01T00:00:00+01:00" minOccurs="0" />
<xs:element name="Letzter_Durchlauf" msprop:Generator_ColumnVarNameInTable="columnLetzter_Durchlauf" msprop:Generator_ColumnPropNameInRow="Letzter_Durchlauf" msprop:Generator_ColumnPropNameInTable="Letzter_DurchlaufColumn" msprop:Generator_UserColumnName="Letzter_Durchlauf" type="xs:dateTime" default="1900-01-01T00:00:00+01:00" />
<xs:element name="Running" msprop:Generator_ColumnVarNameInTable="columnRunning" msprop:Generator_ColumnPropNameInRow="Running" msprop:Generator_ColumnPropNameInTable="RunningColumn" msprop:Generator_UserColumnName="Running" type="xs:boolean" default="false" />
<xs:element name="Reihenfolge" msprop:Generator_ColumnVarNameInTable="columnReihenfolge" msprop:Generator_ColumnPropNameInRow="Reihenfolge" msprop:Generator_ColumnPropNameInTable="ReihenfolgeColumn" msprop:Generator_UserColumnName="Reihenfolge" type="xs:int" default="1" />
<xs:element name="ERSTELLTWER" msprop:Generator_ColumnVarNameInTable="columnERSTELLTWER" msprop:Generator_ColumnPropNameInRow="ERSTELLTWER" msprop:Generator_ColumnPropNameInTable="ERSTELLTWERColumn" msprop:Generator_UserColumnName="ERSTELLTWER" minOccurs="0">
@@ -754,6 +760,13 @@ SELECT GUID, NAME, EMAIL_FROM, EMAIL_SMTP, EMAIL_USER, EMAIL_PW, PORT, ACTIVE, A
</xs:element>
<xs:element name="CHANGED_WHEN" msprop:Generator_ColumnVarNameInTable="columnCHANGED_WHEN" msprop:Generator_ColumnPropNameInRow="CHANGED_WHEN" msprop:Generator_ColumnPropNameInTable="CHANGED_WHENColumn" msprop:Generator_UserColumnName="CHANGED_WHEN" type="xs:dateTime" minOccurs="0" />
<xs:element name="SSL_AUTH" msprop:Generator_ColumnVarNameInTable="columnSSL_AUTH" msprop:Generator_ColumnPropNameInRow="SSL_AUTH" msprop:Generator_ColumnPropNameInTable="SSL_AUTHColumn" msprop:Generator_UserColumnName="SSL_AUTH" type="xs:boolean" default="false" />
<xs:element name="AUTH_TYPE" msprop:Generator_ColumnVarNameInTable="columnAUTH_TYPE" msprop:Generator_ColumnPropNameInRow="AUTH_TYPE" msprop:Generator_ColumnPropNameInTable="AUTH_TYPEColumn" msprop:Generator_UserColumnName="AUTH_TYPE">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="20" />
</xs:restriction>
</xs:simpleType>
</xs:element>
</xs:sequence>
</xs:complexType>
</xs:element>

2
app/ResultHandler_Konfig/MyDataset.xss
View File

@@ -4,7 +4,7 @@
Changes to this file may cause incorrect behavior and will be lost if
the code is regenerated.
</autogenerated>-->
<DiagramLayout xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" ex:showrelationlabel="False" ViewPortX="324" ViewPortY="44" xmlns:ex="urn:schemas-microsoft-com:xml-msdatasource-layout-extended" xmlns="urn:schemas-microsoft-com:xml-msdatasource-layout">
<DiagramLayout xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" ex:showrelationlabel="False" ViewPortX="-10" ViewPortY="44" xmlns:ex="urn:schemas-microsoft-com:xml-msdatasource-layout-extended" xmlns="urn:schemas-microsoft-com:xml-msdatasource-layout">
<Shapes>
<Shape ID="DesignTable:TBWMRH_KONFIGURATION" ZOrder="7" X="55" Y="54" Height="248" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="197" />
<Shape ID="DesignTable:TBWMRH_PROFIL" ZOrder="6" X="422" Y="54" Height="324" Width="254" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />

BIN
app/ResultHandler_Konfig/Resources/refresh_16xMD.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 376 B

19
app/ResultHandler_Konfig/ResultHandler_Konfig.vbproj
View File

@@ -54,9 +54,6 @@
<ApplicationIcon>ico638.ico</ApplicationIcon>
</PropertyGroup>
<ItemGroup>
<Reference Include="DD_WMResulthandler">
<HintPath>..\ClassWMResulthandler\bin\Debug\DD_WMResulthandler.dll</HintPath>
</Reference>
<Reference Include="DevExpress.Data.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
<Reference Include="DevExpress.Printing.v15.2.Core, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
<Reference Include="DevExpress.Sparkline.v15.2.Core, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
@@ -65,6 +62,9 @@
<Reference Include="DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
<Reference Include="DevExpress.XtraLayout.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
<Reference Include="DevExpress.XtraPrinting.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
<Reference Include="DigitalData.Modules.Logging">
<HintPath>..\..\..\DDMonorepo\Modules.Logging\bin\Debug\DigitalData.Modules.Logging.dll</HintPath>
</Reference>
<Reference Include="EntityFramework, Version=6.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089, processorArchitecture=MSIL">
<HintPath>..\packages\EntityFramework.6.2.0\lib\net45\EntityFramework.dll</HintPath>
</Reference>
@@ -88,18 +88,12 @@
<EmbedInteropTypes>True</EmbedInteropTypes>
</Reference>
<Reference Include="Microsoft.CSharp" />
<Reference Include="Modules.Logging">
<HintPath>..\..\..\DDMonorepo\Modules.Logging\bin\Debug\Modules.Logging.dll</HintPath>
</Reference>
<Reference Include="Newtonsoft.Json, Version=10.0.0.0, Culture=neutral, PublicKeyToken=30ad4fe6b2a6aeed, processorArchitecture=MSIL">
<HintPath>..\packages\Newtonsoft.Json.10.0.3\lib\net45\Newtonsoft.Json.dll</HintPath>
</Reference>
<Reference Include="NLog, Version=4.0.0.0, Culture=neutral, PublicKeyToken=5120e14c03d0593c, processorArchitecture=MSIL">
<HintPath>..\packages\NLog.4.5.8\lib\net45\NLog.dll</HintPath>
</Reference>
<Reference Include="Oracle.ManagedDataAccess">
<HintPath>P:\Visual Studio Projekte\Bibliotheken\Oracle.ManagedDataAccess.dll</HintPath>
</Reference>
<Reference Include="System" />
<Reference Include="System.ComponentModel.DataAnnotations" />
<Reference Include="System.Configuration" />
@@ -215,6 +209,7 @@
<ItemGroup>
<Content Include="bin\Debug\x64\SQLite.Interop.dll" />
<Content Include="ico638.ico" />
<None Include="Resources\refresh_16xMD.png" />
<None Include="Resources\folder_Open_16xMD.png" />
<None Include="Resources\book_open.png" />
<None Include="Resources\key_go.png" />
@@ -223,6 +218,12 @@
<ItemGroup>
<WCFMetadata Include="Connected Services\" />
</ItemGroup>
<ItemGroup>
<ProjectReference Include="..\ClassWMResulthandler\DD_WMResulthandler.vbproj">
<Project>{b3190aec-8dc4-4822-9609-54df5b976262}</Project>
<Name>DD_WMResulthandler</Name>
</ProjectReference>
</ItemGroup>
<Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
<!-- To modify your build process, add your task inside one of the targets below and uncomment it.
Other similar extension points exist, see Microsoft.Common.targets.

1330
app/ResultHandler_Konfig/frmMain.Designer.vb generated
View File

File diff suppressed because it is too large Load Diff

8
app/ResultHandler_Konfig/frmMain.resx
View File

@@ -243,6 +243,9 @@
<metadata name="PDF_XCHANGE_LOCATIONLabel.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="AUTH_TYPELabel.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="StatusStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>1296, 56</value>
</metadata>
@@ -257,7 +260,7 @@
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAAAI
DAAAAk1TRnQBSQFMAgEBAwEAAVABAgFQAQIBEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
DAAAAk1TRnQBSQFMAgEBAwEAAUABAwFAAQMBEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
AwABQAMAARADAAEBAQABCAYAAQQYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
@@ -552,6 +555,9 @@
<metadata name="TBDD_EMAIL_ACCOUNTBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 134</value>
</metadata>
<metadata name="ContextMenuStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>679, 134</value>
</metadata>
<metadata name="BindingNavigator1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>1108, 95</value>
</metadata>

285
app/ResultHandler_Konfig/frmMain.vb
View File

@@ -1,9 +1,17 @@
Imports System.ServiceProcess
Imports Modules.Logging
Imports DigitalData.Modules.Logging
Imports DD_WMResulthandler
Imports System.Net.Mail
Imports System.Net
Public Class frmMain
Private Shared _Logger As NLog.Logger = NLog.LogManager.GetCurrentClassLogger
Private _windream As DD_WMResulthandler.clsWindream_allgemein
Dim MyLoggerConfig As Logger
Private _windream As clsWindream_allgemein
Private _database As clsDatabase
Private _profil As clsProfil
Private _email As clsEmail
Dim MyLogger As LogConfig
Dim Logger As Logger
Dim switchRecord As Boolean = True
Private Sub TBPROFILBindingNavigatorSaveItem_Click(sender As Object, e As EventArgs) Handles TBPROFILBindingNavigatorSaveItem.Click
Save_Profil()
End Sub
@@ -22,13 +30,15 @@ Public Class frmMain
' DB_Path()
' End If
'End If
MyLogger = New LogConfig(LogConfig.PathType.AppData, Nothing, "Log")
Logger = MyLogger.GetLogger()
Load_Constring()
MyLoggerConfig = New Logger(Logger.PathType.AppData)
_Logger.Info("Konfig started: " & Now.ToString)
_database = New clsDatabase(MyLogger, My.Settings.SQLSERVER_CS)
_email = New clsEmail(MyLogger)
Logger.Info("Konfig started: " & Now.ToString)
Try
' Windream instanziieren
_windream = New DD_WMResulthandler.clsWindream_allgemein()
_windream = New clsWindream_allgemein(MyLogger)
'Windream initialisieren (Connection, Session, ... aufbauen)
_windream.Init()
Catch ex As Exception
@@ -100,6 +110,7 @@ Public Class frmMain
End If
Catch ex As Exception
MsgBox(ex.Message, MsgBoxStyle.Exclamation, "Fehler inCheckIfRunning")
Return False
End Try
End Function
Sub Load_Constring()
@@ -116,18 +127,21 @@ Public Class frmMain
Try
'TODO: Diese Codezeile lädt Daten in die Tabelle "MyDataset.TBWMRH_TBKONFIGURATION". Sie können sie bei Bedarf verschieben oder entfernen.
Me.TBWMRH_KONFIGURATIONTableAdapter.Fill(Me.MyDataset.TBWMRH_KONFIGURATION)
DD_WMResulthandler.clsCURRENT.LOG_ERRORS_ONLY = MyDataset.TBWMRH_KONFIGURATION.Rows(0).Item("LOG_ERRORS_ONLY")
DD_WMResulthandler.clsCURRENT.WDLAUFWERK = MyDataset.TBWMRH_KONFIGURATION.Rows(0).Item("WD_LAUFWERK")
clsCURRENT.LOG_ERRORS_ONLY = MyDataset.TBWMRH_KONFIGURATION.Rows(0).Item("LOG_ERRORS_ONLY")
clsCURRENT.WDLAUFWERK = MyDataset.TBWMRH_KONFIGURATION.Rows(0).Item("WD_LAUFWERK")
Catch ex As Exception
MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler in Load_Konfiguration:")
End Try
End Sub
Sub Load_Profil()
Try
switchRecord = True
Me.TBWMRH_PROFILTableAdapter.Fill(Me.MyDataset.TBWMRH_PROFIL)
Catch ex As Exception
MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler in Load_Profil:")
End Try
switchRecord = False
End Sub
Private Sub ObjekttypenEintragen()
Me.ObjekttypComboBox.Items.Clear()
@@ -167,6 +181,11 @@ Public Class frmMain
End Sub
Sub statuslabel(visible As Boolean, Text As String)
Me.tsstatus.Visible = visible
If visible = True Then
tsstatus.BackColor = Color.Yellow
Else
tsstatus.BackColor = Color.Transparent
End If
Me.tsstatus.Text = Text
End Sub
Private Sub btnaddSearch_Click(sender As Object, e As EventArgs) Handles btnaddSearch.Click
@@ -220,6 +239,9 @@ Public Class frmMain
End Try
End Sub
Sub Checkbox_Days()
If switchRecord = True Then
Exit Sub
End If
Dim days As String
If CheckBox1.Checked Then
days = "1"
@@ -287,6 +309,15 @@ Public Class frmMain
Private Sub DayTextBox_TextChanged(sender As Object, e As EventArgs) Handles DayTextBox.TextChanged
If DayTextBox.Text <> String.Empty Then
switchRecord = True
CheckBox1.Checked = False
CheckBox2.Checked = False
CheckBox3.Checked = False
CheckBox4.Checked = False
CheckBox5.Checked = False
CheckBox6.Checked = False
CheckBox7.Checked = False
'Markieren der Checkboxen'
If DayTextBox.Text.Substring(0, 1) = 1 Then
CheckBox1.Checked = True
@@ -309,6 +340,7 @@ Public Class frmMain
If DayTextBox.Text.Substring(6, 1) = 1 Then
CheckBox7.Checked = True
End If
switchRecord = False
End If
End Sub
@@ -373,12 +405,14 @@ Public Class frmMain
End Sub
Private Sub GUIDTextBox_TextChanged(sender As Object, e As EventArgs) Handles GUIDTextBox.TextChanged
Load_Jobs()
End Sub
Sub Load_Jobs()
If GUIDTextBox.Text <> String.Empty Then
Load_Jobs(GUIDTextBox.Text)
Load_FILE_JOBS(GUIDTextBox.Text)
End If
End Sub
Private Sub ToolStripButton7_Click(sender As Object, e As EventArgs) Handles ToolStripButton7.Click
Save_PROFIL_JOB()
End Sub
@@ -449,9 +483,9 @@ Public Class frmMain
STRING2TextBox.Visible = False
STRING3TextBox.Visible = False
STRING4TextBox.Visible = False
STRING3TextBox.Size = New Size(400, 22)
STRING3TextBox.Anchor = AnchorStyles.Left Or AnchorStyles.Top
' STRING3TextBox.Size = New Size(400, 22)
STRING3TextBox.Multiline = False
STRING3TextBox1.Visible = False
STRING5TextBox.Visible = False
Select Case JOB_TYPComboBox.Text.ToUpper
@@ -465,11 +499,10 @@ Public Class frmMain
lblString2.Text = "Email-Betreff:"
STRING2TextBox.Visible = True
lblString3.Text = "Email-Body:"
STRING3TextBox.Visible = True
lblString4.Text = "Email-Profil:"
lblString4.Visible = True
STRING3TextBox.Anchor = AnchorStyles.Left Or AnchorStyles.Top Or AnchorStyles.Right Or AnchorStyles.Bottom
STRING3TextBox.Multiline = True
STRING3TextBox.Visible = False
STRING3TextBox1.Visible = True
STRING4TextBox.Visible = True
Case "BNS json Download".ToUpper 'json BNS
@@ -480,6 +513,7 @@ Public Class frmMain
Case "Concat Files to one pdf".ToUpper ' Concat Files to one pdf
lblString1.Text = "Name und Speicherort der zusammengefügten PDF-Datei:"
STRING1TextBox.Visible = True
btnJOB_addSpeicherort.Visible = True
lblString2.Text = "Löschen der exportierten Dateien (Ja/Nein)"
STRING2TextBox.Visible = True
Case "Send concatted file via mail".ToUpper
@@ -488,7 +522,8 @@ Public Class frmMain
lblString2.Text = "Email-Betreff:"
STRING2TextBox.Visible = True
lblString3.Text = "Email-Body:"
STRING3TextBox.Visible = True
STRING3TextBox.Visible = False
STRING3TextBox1.Visible = True
lblString4.Text = "Email-Profil:"
STRING4TextBox.Visible = True
Case "Send to printer".ToUpper
@@ -500,7 +535,8 @@ Public Class frmMain
lblString2.Text = "Email-Betreff:"
STRING2TextBox.Visible = True
lblString3.Text = "Email-Body:"
STRING3TextBox.Visible = True
STRING3TextBox.Visible = False
STRING3TextBox1.Visible = True
lblString4.Text = "Email-Profil:"
STRING4TextBox.Visible = True
lblString5.Text = "Pfad zu WM-Suche:"
@@ -551,6 +587,7 @@ Public Class frmMain
STRING1ComboBox.Visible = True
lblString2FileJobs.Text = "Wert"
lblString2FileJobs.Visible = True
STRING2TextBoxProfil_FileJob.Visible = True
Me.btnaddDatetime.Visible = True
@@ -609,9 +646,9 @@ Public Class frmMain
statuslabel(True, "Grundkonfiguration gespeichert - " & Now)
Load_Grundkonfig()
If LOG_ERRORS_ONLYCheckBox.Checked = False Then
MyLoggerConfig.Debug = True
MyLogger.Debug = True
Else
MyLoggerConfig.Debug = False
MyLogger.Debug = False
End If
End If
Catch ex As Exception
@@ -628,54 +665,69 @@ Public Class frmMain
End If
End Sub
Sub Manual(ID As Integer)
'Try
Dim notcompleted As Boolean = False
_Logger.Info("## Start Durchlauf WindreamResultHandler - " & Now & " ## ")
'windream initialisieren
If DD_WMResulthandler.clsDatatabase.Init(My.Settings.SQLSERVER_CS) = True Then
If _windream.Init() = True Then
_Logger.Info("windream vollumfänglich initialisiert!")
Dim DT As DataTable = DD_WMResulthandler.clsDatatabase.Return_Datatable("SELECT GUID FROM TBWMRH_PROFIL WHERE GUID = " & ID)
If DT.Rows.Count > 0 Then
_Logger.Info("Anzahl der aktiven Profile: " & DT.Rows.Count.ToString)
For Each DR As DataRow In DT.Rows
DD_WMResulthandler.clsCURRENT._PROFIL_ID = CInt(DR.Item("GUID"))
'Und nun das Profil durchlaufen
Dim initresult = DD_WMResulthandler.clsProfil.Init(DD_WMResulthandler.clsCURRENT._PROFIL_ID)
If initresult = True Then
DD_WMResulthandler.clsProfil.Profil_Durchlauf()
ElseIf initresult = False Then
_Logger.Warn("clsProfil konnte nicht initialisiert werden")
notcompleted = True
ElseIf initresult = 0 Then
_Logger.Warn("initresult: 0")
notcompleted = True
ElseIf initresult = 1 Then
_Logger.Warn("initresult: 1")
notcompleted = True
End If
Next
Else
_Logger.Warn("- Keine aktiven Profile vorhanden")
notcompleted = True
Try
Dim notcompleted As Boolean = False
Logger.Info("## Start Durchlauf WindreamResultHandler - " & Now & " ## ")
_profil = New clsProfil(MyLogger, ID)
'windream initialisieren
If _database.Init(My.Settings.SQLSERVER_CS) = True Then
Dim DT As DataTable = _database.Return_Datatable("select * from TBWMRH_KONFIGURATION where GUID = 1")
If DT.Rows.Count = 1 Then
clsCURRENT.DT_TBWMRH_KONFIGURATION = DT
clsCURRENT.WDLAUFWERK = clsCURRENT.DT_TBWMRH_KONFIGURATION.Rows(0).Item("WD_LAUFWERK")
DD_WMResulthandler.clsCURRENT.LOG_ERRORS_ONLY = DT.Rows(0).Item("LOG_ERRORS_ONLY")
MyLogger.Debug = DT.Rows(0).Item("LOG_ERRORS_ONLY")
If DD_WMResulthandler.clsCURRENT.LOG_ERRORS_ONLY = False Then
Logger.Debug("Detaillog is ON!")
End If
DD_WMResulthandler.clsCURRENT.WDLAUFWERK = DT.Rows(0).Item("WD_LAUFWERK")
End If
If _windream.Init() = True Then
Logger.Info("windream vollumfänglich initialisiert!")
DT = _database.Return_Datatable("SELECT GUID FROM TBWMRH_PROFIL WHERE GUID = " & ID)
If DT.Rows.Count > 0 Then
Logger.Info("Anzahl der aktiven Profile: " & DT.Rows.Count.ToString)
For Each DR As DataRow In DT.Rows
clsCURRENT._PROFIL_ID = CInt(DR.Item("GUID"))
'Und nun das Profil durchlaufen
Dim initresult = _profil.Init(clsCURRENT._PROFIL_ID)
If initresult = True Then
_profil.Profil_Durchlauf(True)
ElseIf initresult = False Then
Logger.Warn("clsProfil konnte nicht initialisiert werden")
notcompleted = True
ElseIf initresult = 0 Then
Logger.Warn("initresult: 0")
notcompleted = True
ElseIf initresult = 1 Then
Logger.Warn("initresult: 1")
notcompleted = True
End If
Next
Else
Logger.Warn("- Keine aktiven Profile vorhanden")
notcompleted = True
End If
Else
Logger.Warn("# Achtung: Windream-Init mit Fehlern beendet")
End If
_database.Execute_non_Query("UPDATE TBWMRH_KONFIGURATION SET LAST_TICK = GETDATE() WHERE GUID = 1")
Else
_Logger.Warn("# Achtung: Windream-Init mit Fehlern beendet")
Logger.Warn("- clsDatatabase konnte nicht initialisiert werden!")
notcompleted = True
End If
DD_WMResulthandler.clsDatatabase.Execute_non_Query("UPDATE TBWMRH_KONFIGURATION SET LAST_TICK = GETDATE() WHERE GUID = 1")
Else
_Logger.Warn("- clsDatatabase konnte nicht initialisiert werden!")
notcompleted = True
End If
If notcompleted = True Then
If notcompleted = True Then
MsgBox("Run completed with errors - Check the log!", MsgBoxStyle.Information)
Else
MsgBox("Run completed!", MsgBoxStyle.Information)
End If
End If
MsgBox("Run completed!", MsgBoxStyle.Information)
'Catch ex As Exception
' clsLogger.AddError(ex.Message, "RUN_THREAD")
'End Try
Catch ex As Exception
Logger.Error(ex)
End Try
End Sub
Private Sub TBWMRH_PROFIL_JOBBindingSource_AddingNew_1(sender As Object, e As System.ComponentModel.AddingNewEventArgs) Handles TBWMRH_PROFIL_JOBBindingSource.AddingNew
@@ -690,7 +742,12 @@ Public Class frmMain
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Process.Start(MyLoggerConfig.LogFile)
Try
Process.Start(MyLogger.LogFile)
Catch ex As Exception
MsgBox(ex.Message & vbNewLine & "Logfile: " & MyLogger.LogFile)
End Try
End Sub
Private Sub btnTestCon_Click(sender As Object, e As EventArgs) Handles btnTestCon.Click
@@ -698,12 +755,12 @@ Public Class frmMain
Exit Sub
End If
If STEP_TYPComboBox.Text = "Execute Oracle Command" Then
If DD_WMResulthandler.clsDatatabase.Oracle_CS_Test(STRING1TextBoxFile_Job.Text) = True Then
If _database.Oracle_CS_Test(STRING1TextBoxFile_Job.Text) = True Then
MsgBox("Oracle Connection successfull!", MsgBoxStyle.Information)
Exit Sub
End If
ElseIf STEP_TYPComboBox.Text = "Execute MSSQL Command" Then
If DD_WMResulthandler.clsDatatabase.MSSQL_CS_Test(STRING1TextBoxFile_Job.Text) = True Then
If _database.MSSQL_CS_Test(STRING1TextBoxFile_Job.Text) = True Then
MsgBox("MSSQL Connection successfull!", MsgBoxStyle.Information)
Exit Sub
End If
@@ -733,7 +790,7 @@ Public Class frmMain
End Sub
Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
Process.Start(MyLoggerConfig.LogDirectory)
Process.Start(MyLogger.LogDirectory)
End Sub
Private Sub TBDD_EMAIL_ACCOUNTBindingSource_AddingNew(sender As Object, e As System.ComponentModel.AddingNewEventArgs) Handles TBDD_EMAIL_ACCOUNTBindingSource.AddingNew
@@ -760,16 +817,42 @@ Public Class frmMain
Catch ex As Exception
MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler in Save Email:")
End Try
End Sub
Private Sub Button5_Click(sender As Object, e As EventArgs) Handles Button5.Click
Try
My.Settings.Save()
Dim wrapper As New clsEncryption("!35452didalog=")
Dim PWPlain = wrapper.DecryptData(EMAIL_PWTextBox.Text)
Dim sClient = New SmtpClient(EMAIL_SMTPTextBox.Text)
Dim mymesssage As New MailMessage
sClient.Port = 587
sClient.EnableSsl = True
sClient.Credentials = New NetworkCredential(EMAIL_USERTextBox.Text, PWPlain)
sClient.UseDefaultCredentials = False
mymesssage.Body = "Test"
mymesssage.From = New MailAddress(EMAIL_FROMTextBox.Text)
mymesssage.Subject = "TestSubject"
mymesssage.CC.Add(New MailAddress(txtTestmail.Text))
sClient.Send(mymesssage)
Catch ex As Exception
End Try
End Sub
Private Sub btnsendtestmail_Click(sender As Object, e As EventArgs) Handles btnsendtestmail.Click
If txtTestmail.Text <> String.Empty Then
Dim wrapper As New DD_WMResulthandler.clsEncryption("!35452didalog=")
My.Settings.Save()
Dim wrapper As New clsEncryption("!35452didalog=")
Dim PWPlain = wrapper.DecryptData(EMAIL_PWTextBox.Text)
If DD_WMResulthandler.clsEmail.Email_Send_Independentsoft("Testmail DD Windream-ResultHandler", "This is the body (text will be replaced within profile)", txtTestmail.Text,
EMAIL_FROMTextBox.Text, EMAIL_SMTPTextBox.Text, PORTTextBox.Text, EMAIL_USERTextBox.Text, PWPlain, CheckBoxSSL.CheckState, "") = True Then
If _email.Email_Send_Independentsoft("Testmail DD Windream-ResultHandler", "This is the body (text will be replaced within profile)", txtTestmail.Text,
EMAIL_FROMTextBox.Text, EMAIL_SMTPTextBox.Text, PORTTextBox.Text, EMAIL_USERTextBox.Text, PWPlain, AUTH_TYPEComboBox.Text, "") = True Then
MsgBox("Email was send successfully.", MsgBoxStyle.Information)
Else
MsgBox("Could not send the testmail. Please check the log.", MsgBoxStyle.Exclamation)
@@ -778,7 +861,7 @@ Public Class frmMain
End Sub
Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
Dim wrapper As New DD_WMResulthandler.clsEncryption("!35452didalog=")
Dim wrapper As New clsEncryption("!35452didalog=")
Dim pwencrypted = wrapper.EncryptData(txtnewpasswort.Text)
EMAIL_PWTextBox.Text = pwencrypted
SaveEmail()
@@ -814,7 +897,65 @@ Public Class frmMain
End Try
End Sub
Private Sub LOG_ERRORS_ONLYCheckBox_CheckedChanged(sender As Object, e As EventArgs) Handles LOG_ERRORS_ONLYCheckBox.CheckedChanged
Private Sub TabPage2_Click(sender As Object, e As EventArgs) Handles TabPage2.Click
End Sub
Private Sub ToolStripButton23_Click_1(sender As Object, e As EventArgs) Handles ToolStripButton23.Click
Load_Jobs(GUIDTextBox.Text)
End Sub
Private Sub ToolStripButton24_Click(sender As Object, e As EventArgs) Handles ToolStripButton24.Click
Load_FILE_JOBS(GUIDTextBox.Text)
End Sub
Private Sub NumericUpDown_ValueChanged(sender As Object, e As EventArgs) Handles NumericUpDown.ValueChanged
Select Case cmbTimeTyp.SelectedValue
Case "Intervall"
Me.dtp_Time.Visible = False
Me.NumericUpDown.Visible = True
RunTextBox.Text = "INTV;" & NumericUpDown.Value
Case "Uhrzeit"
Me.dtp_Time.Visible = True
Me.NumericUpDown.Visible = False
RunTextBox.Text = "TIME;" & dtp_Time.Text
End Select
End Sub
Private Sub dtp_Time_ValueChanged(sender As Object, e As EventArgs) Handles dtp_Time.ValueChanged
Select Case cmbTimeTyp.SelectedValue
Case "Uhrzeit"
Me.NumericUpDown.Visible = False
Me.dtp_Time.Visible = True
RunTextBox.Text = "TIME;" & dtp_Time.Text
End Select
End Sub
Private Sub EncryptToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles EncryptToolStripMenuItem.Click
Dim wrapper As New clsEncryption("!35452didalog=")
Dim pwencrypted = wrapper.DecryptData(EMAIL_PWTextBox.Text)
MsgBox("PW is: " & pwencrypted)
End Sub
Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged
Dim Dayofweek As Integer = My.Computer.Clock.LocalTime.DayOfWeek
Dim SUBS As Integer = 0
Dim RUNTODAY As Integer = 0
Select Case Dayofweek
Case 6 'Saturday
Case 5 'Friday
Case 4 'Thursday
Case 3 'Wednesday
Case 2 'Tuesday
Case 1 'Monday
Case 0 'Sunday
End Select
If Dayofweek = 0 Then
SUBS = 6
Else
SUBS = Dayofweek - 1
End If
RUNTODAY = TextBox1.Text.Substring(SUBS, 1)
MsgBox(RUNTODAY)
End Sub
End Class