This commit is contained in:
2025-02-24 15:10:01 +01:00
parent 0debf6f694
commit e175b4ac2d
5 changed files with 534 additions and 299 deletions

View File

@@ -23,6 +23,19 @@ Partial Class usrctlProcedures
<System.Diagnostics.DebuggerStepThrough()>
Private Sub InitializeComponent()
Me.TabControl1 = New System.Windows.Forms.TabControl()
Me.TabPage3 = New System.Windows.Forms.TabPage()
Me.TextBox15 = New System.Windows.Forms.TextBox()
Me.Button37 = New System.Windows.Forms.Button()
Me.Button41 = New System.Windows.Forms.Button()
Me.Button42 = New System.Windows.Forms.Button()
Me.Button39 = New System.Windows.Forms.Button()
Me.Button40 = New System.Windows.Forms.Button()
Me.TextBox14 = New System.Windows.Forms.TextBox()
Me.Button38 = New System.Windows.Forms.Button()
Me.TextBox13 = New System.Windows.Forms.TextBox()
Me.Button36 = New System.Windows.Forms.Button()
Me.Button35 = New System.Windows.Forms.Button()
Me.Button34 = New System.Windows.Forms.Button()
Me.TabPage1 = New System.Windows.Forms.TabPage()
Me.Button17 = New System.Windows.Forms.Button()
Me.Button16 = New System.Windows.Forms.Button()
@@ -70,8 +83,6 @@ Partial Class usrctlProcedures
Me.Label5 = New System.Windows.Forms.Label()
Me.cbxTESTSYSTEMATLAS = New System.Windows.Forms.CheckBox()
Me.CheckBox1 = New System.Windows.Forms.CheckBox()
Me.DataGridViewTextBoxColumn1 = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.DataGridViewTextBoxColumn2 = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.CheckBox2 = New System.Windows.Forms.CheckBox()
Me.Label6 = New System.Windows.Forms.Label()
Me.Button20 = New System.Windows.Forms.Button()
@@ -113,9 +124,11 @@ Partial Class usrctlProcedures
Me.Button32 = New System.Windows.Forms.Button()
Me.lblStatus = New System.Windows.Forms.Label()
Me.Button33 = New System.Windows.Forms.Button()
Me.Button34 = New System.Windows.Forms.Button()
Me.Button35 = New System.Windows.Forms.Button()
Me.DataGridViewTextBoxColumn1 = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.DataGridViewTextBoxColumn2 = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.CheckBox6 = New System.Windows.Forms.CheckBox()
Me.TabControl1.SuspendLayout()
Me.TabPage3.SuspendLayout()
Me.TabPage1.SuspendLayout()
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.GroupBox1.SuspendLayout()
@@ -125,14 +138,142 @@ Partial Class usrctlProcedures
'
'TabControl1
'
Me.TabControl1.Controls.Add(Me.TabPage3)
Me.TabControl1.Controls.Add(Me.TabPage1)
Me.TabControl1.Controls.Add(Me.TabPage2)
Me.TabControl1.Location = New System.Drawing.Point(7, 407)
Me.TabControl1.Name = "TabControl1"
Me.TabControl1.SelectedIndex = 0
Me.TabControl1.Size = New System.Drawing.Size(609, 187)
Me.TabControl1.Size = New System.Drawing.Size(609, 314)
Me.TabControl1.TabIndex = 2
Me.TabControl1.Visible = False
'
'TabPage3
'
Me.TabPage3.Controls.Add(Me.CheckBox6)
Me.TabPage3.Controls.Add(Me.TextBox15)
Me.TabPage3.Controls.Add(Me.Button37)
Me.TabPage3.Controls.Add(Me.Button41)
Me.TabPage3.Controls.Add(Me.Button42)
Me.TabPage3.Controls.Add(Me.Button39)
Me.TabPage3.Controls.Add(Me.Button40)
Me.TabPage3.Controls.Add(Me.TextBox14)
Me.TabPage3.Controls.Add(Me.Button38)
Me.TabPage3.Controls.Add(Me.TextBox13)
Me.TabPage3.Controls.Add(Me.Button36)
Me.TabPage3.Controls.Add(Me.Button35)
Me.TabPage3.Controls.Add(Me.Button34)
Me.TabPage3.Location = New System.Drawing.Point(4, 22)
Me.TabPage3.Name = "TabPage3"
Me.TabPage3.Padding = New System.Windows.Forms.Padding(3)
Me.TabPage3.Size = New System.Drawing.Size(601, 288)
Me.TabPage3.TabIndex = 2
Me.TabPage3.Text = "TabPage3"
Me.TabPage3.UseVisualStyleBackColor = True
'
'TextBox15
'
Me.TextBox15.Location = New System.Drawing.Point(185, 55)
Me.TextBox15.Name = "TextBox15"
Me.TextBox15.Size = New System.Drawing.Size(145, 20)
Me.TextBox15.TabIndex = 77
Me.TextBox15.Text = "MRN"
'
'Button37
'
Me.Button37.Location = New System.Drawing.Point(185, 6)
Me.Button37.Name = "Button37"
Me.Button37.Size = New System.Drawing.Size(145, 49)
Me.Button37.TabIndex = 76
Me.Button37.Text = "HMRC Amand ENS"
Me.Button37.UseVisualStyleBackColor = True
'
'Button41
'
Me.Button41.Location = New System.Drawing.Point(185, 90)
Me.Button41.Name = "Button41"
Me.Button41.Size = New System.Drawing.Size(93, 49)
Me.Button41.TabIndex = 74
Me.Button41.Text = "HMRC get Outcome"
Me.Button41.UseVisualStyleBackColor = True
'
'Button42
'
Me.Button42.Location = New System.Drawing.Point(278, 90)
Me.Button42.Name = "Button42"
Me.Button42.Size = New System.Drawing.Size(52, 49)
Me.Button42.TabIndex = 75
Me.Button42.Text = "Ackn"
Me.Button42.UseVisualStyleBackColor = True
'
'Button39
'
Me.Button39.Location = New System.Drawing.Point(185, 176)
Me.Button39.Name = "Button39"
Me.Button39.Size = New System.Drawing.Size(93, 49)
Me.Button39.TabIndex = 72
Me.Button39.Text = "HMRC get Notify"
Me.Button39.UseVisualStyleBackColor = True
'
'Button40
'
Me.Button40.Location = New System.Drawing.Point(278, 176)
Me.Button40.Name = "Button40"
Me.Button40.Size = New System.Drawing.Size(52, 49)
Me.Button40.TabIndex = 73
Me.Button40.Text = "Ackn"
Me.Button40.UseVisualStyleBackColor = True
'
'TextBox14
'
Me.TextBox14.Location = New System.Drawing.Point(185, 225)
Me.TextBox14.Name = "TextBox14"
Me.TextBox14.Size = New System.Drawing.Size(145, 20)
Me.TextBox14.TabIndex = 70
Me.TextBox14.Text = "notificationID"
'
'Button38
'
Me.Button38.Location = New System.Drawing.Point(18, 90)
Me.Button38.Name = "Button38"
Me.Button38.Size = New System.Drawing.Size(145, 49)
Me.Button38.TabIndex = 69
Me.Button38.Text = "HMRC ENS Outcome List"
Me.Button38.UseVisualStyleBackColor = True
'
'TextBox13
'
Me.TextBox13.Location = New System.Drawing.Point(185, 140)
Me.TextBox13.Name = "TextBox13"
Me.TextBox13.Size = New System.Drawing.Size(145, 20)
Me.TextBox13.TabIndex = 65
Me.TextBox13.Text = "correlationId"
'
'Button36
'
Me.Button36.Location = New System.Drawing.Point(18, 177)
Me.Button36.Name = "Button36"
Me.Button36.Size = New System.Drawing.Size(145, 49)
Me.Button36.TabIndex = 67
Me.Button36.Text = "HMRC Ens Notif List"
Me.Button36.UseVisualStyleBackColor = True
'
'Button35
'
Me.Button35.Location = New System.Drawing.Point(536, 177)
Me.Button35.Name = "Button35"
Me.Button35.Size = New System.Drawing.Size(62, 111)
Me.Button35.TabIndex = 66
Me.Button35.Text = "HMRC Hello World"
Me.Button35.UseVisualStyleBackColor = True
'
'Button34
'
Me.Button34.Location = New System.Drawing.Point(18, 6)
Me.Button34.Name = "Button34"
Me.Button34.Size = New System.Drawing.Size(145, 49)
Me.Button34.TabIndex = 65
Me.Button34.Text = "HMRC Neue ENS"
Me.Button34.UseVisualStyleBackColor = True
'
'TabPage1
'
@@ -155,7 +296,7 @@ Partial Class usrctlProcedures
Me.TabPage1.Location = New System.Drawing.Point(4, 22)
Me.TabPage1.Name = "TabPage1"
Me.TabPage1.Padding = New System.Windows.Forms.Padding(3)
Me.TabPage1.Size = New System.Drawing.Size(601, 161)
Me.TabPage1.Size = New System.Drawing.Size(601, 288)
Me.TabPage1.TabIndex = 0
Me.TabPage1.Text = "Administrative Funktionen"
Me.TabPage1.UseVisualStyleBackColor = True
@@ -392,7 +533,7 @@ Partial Class usrctlProcedures
Me.TabPage2.Location = New System.Drawing.Point(4, 22)
Me.TabPage2.Name = "TabPage2"
Me.TabPage2.Padding = New System.Windows.Forms.Padding(3)
Me.TabPage2.Size = New System.Drawing.Size(601, 161)
Me.TabPage2.Size = New System.Drawing.Size(601, 288)
Me.TabPage2.TabIndex = 1
Me.TabPage2.Text = "TEST"
Me.TabPage2.UseVisualStyleBackColor = True
@@ -581,16 +722,6 @@ Partial Class usrctlProcedures
Me.CheckBox1.Text = "TESTSYSTEM"
Me.CheckBox1.UseVisualStyleBackColor = True
'
'DataGridViewTextBoxColumn1
'
Me.DataGridViewTextBoxColumn1.HeaderText = "dat"
Me.DataGridViewTextBoxColumn1.Name = "DataGridViewTextBoxColumn1"
'
'DataGridViewTextBoxColumn2
'
Me.DataGridViewTextBoxColumn2.HeaderText = "anz"
Me.DataGridViewTextBoxColumn2.Name = "DataGridViewTextBoxColumn2"
'
'CheckBox2
'
Me.CheckBox2.AutoSize = True
@@ -965,30 +1096,30 @@ Partial Class usrctlProcedures
Me.Button33.Text = "DAKOSY CSV Importieren"
Me.Button33.UseVisualStyleBackColor = True
'
'Button34
'DataGridViewTextBoxColumn1
'
Me.Button34.Location = New System.Drawing.Point(694, 3)
Me.Button34.Name = "Button34"
Me.Button34.Size = New System.Drawing.Size(145, 49)
Me.Button34.TabIndex = 65
Me.Button34.Text = "HMRC"
Me.Button34.UseVisualStyleBackColor = True
Me.DataGridViewTextBoxColumn1.HeaderText = "dat"
Me.DataGridViewTextBoxColumn1.Name = "DataGridViewTextBoxColumn1"
'
'Button35
'DataGridViewTextBoxColumn2
'
Me.Button35.Location = New System.Drawing.Point(550, 3)
Me.Button35.Name = "Button35"
Me.Button35.Size = New System.Drawing.Size(145, 49)
Me.Button35.TabIndex = 66
Me.Button35.Text = "HMRC"
Me.Button35.UseVisualStyleBackColor = True
Me.DataGridViewTextBoxColumn2.HeaderText = "anz"
Me.DataGridViewTextBoxColumn2.Name = "DataGridViewTextBoxColumn2"
'
'CheckBox6
'
Me.CheckBox6.AutoSize = True
Me.CheckBox6.Location = New System.Drawing.Point(18, 55)
Me.CheckBox6.Name = "CheckBox6"
Me.CheckBox6.Size = New System.Drawing.Size(90, 17)
Me.CheckBox6.TabIndex = 65
Me.CheckBox6.Text = "ForceRefresh"
Me.CheckBox6.UseVisualStyleBackColor = True
'
'usrctlProcedures
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.Controls.Add(Me.Button35)
Me.Controls.Add(Me.Button34)
Me.Controls.Add(Me.Button33)
Me.Controls.Add(Me.lblStatus)
Me.Controls.Add(Me.Button32)
@@ -1043,6 +1174,8 @@ Partial Class usrctlProcedures
Me.Name = "usrctlProcedures"
Me.Size = New System.Drawing.Size(931, 724)
Me.TabControl1.ResumeLayout(False)
Me.TabPage3.ResumeLayout(False)
Me.TabPage3.PerformLayout()
Me.TabPage1.ResumeLayout(False)
Me.TabPage1.PerformLayout()
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
@@ -1148,4 +1281,16 @@ Partial Class usrctlProcedures
Friend WithEvents Button33 As Button
Friend WithEvents Button34 As Button
Friend WithEvents Button35 As Button
Friend WithEvents Button36 As Button
Friend WithEvents TabPage3 As TabPage
Friend WithEvents TextBox13 As TextBox
Friend WithEvents TextBox14 As TextBox
Friend WithEvents Button38 As Button
Friend WithEvents Button41 As Button
Friend WithEvents Button42 As Button
Friend WithEvents Button39 As Button
Friend WithEvents Button40 As Button
Friend WithEvents TextBox15 As TextBox
Friend WithEvents Button37 As Button
Friend WithEvents CheckBox6 As CheckBox
End Class