edv/ADMIN
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Merge branch 'ADMIN' of https://git.it.verag.ag/edv/ADMIN into ADMIN

Browse Source
This commit is contained in:
d.breimaier
2026-04-27 08:32:17 +02:00
parent 131c638a98 79dbfe0c43
commit 1449dcb894
6 changed files with 4173 additions and 75 deletions
Download Patch File Download Diff File Expand all files Collapse all files

34
UID/usrctlProcedures.Designer.vb generated
View File

@@ -111,6 +111,7 @@ Partial Class usrctlProcedures
Me.TabPage9 = New System.Windows.Forms.TabPage()
Me.btnT1Data = New System.Windows.Forms.Button()
Me.TabPage10 = New System.Windows.Forms.TabPage()
Me.cbxCD_Overwrite = New System.Windows.Forms.CheckBox()
Me.btnDHF_UNISPEDtoVERAEZA_File = New System.Windows.Forms.Button()
Me.btnDHFtoVERAEZA_File = New System.Windows.Forms.Button()
Me.btnTCtoVERAEZA_File = New System.Windows.Forms.Button()
@@ -176,7 +177,7 @@ Partial Class usrctlProcedures
Me.Button99 = New System.Windows.Forms.Button()
Me.DataGridViewTextBoxColumn1 = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.DataGridViewTextBoxColumn2 = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.cbxCD_Overwrite = New System.Windows.Forms.CheckBox()
Me.Button55 = New System.Windows.Forms.Button()
Me.tbTRStat.SuspendLayout()
Me.TabPage3.SuspendLayout()
Me.TabPage1.SuspendLayout()
@@ -1079,6 +1080,18 @@ Partial Class usrctlProcedures
Me.TabPage10.Text = "TabPageDY"
Me.TabPage10.UseVisualStyleBackColor = True
'
'cbxCD_Overwrite
'
Me.cbxCD_Overwrite.AutoSize = True
Me.cbxCD_Overwrite.Checked = True
Me.cbxCD_Overwrite.CheckState = System.Windows.Forms.CheckState.Checked
Me.cbxCD_Overwrite.Location = New System.Drawing.Point(517, 16)
Me.cbxCD_Overwrite.Name = "cbxCD_Overwrite"
Me.cbxCD_Overwrite.Size = New System.Drawing.Size(69, 17)
Me.cbxCD_Overwrite.TabIndex = 50
Me.cbxCD_Overwrite.Text = "overwrite"
Me.cbxCD_Overwrite.UseVisualStyleBackColor = True
'
'btnDHF_UNISPEDtoVERAEZA_File
'
Me.btnDHF_UNISPEDtoVERAEZA_File.Location = New System.Drawing.Point(448, 225)
@@ -1666,22 +1679,20 @@ Partial Class usrctlProcedures
Me.DataGridViewTextBoxColumn2.HeaderText = "anz"
Me.DataGridViewTextBoxColumn2.Name = "DataGridViewTextBoxColumn2"
'
'cbxCD_Overwrite
'Button55
'
Me.cbxCD_Overwrite.AutoSize = True
Me.cbxCD_Overwrite.Checked = True
Me.cbxCD_Overwrite.CheckState = System.Windows.Forms.CheckState.Checked
Me.cbxCD_Overwrite.Location = New System.Drawing.Point(517, 16)
Me.cbxCD_Overwrite.Name = "cbxCD_Overwrite"
Me.cbxCD_Overwrite.Size = New System.Drawing.Size(69, 17)
Me.cbxCD_Overwrite.TabIndex = 50
Me.cbxCD_Overwrite.Text = "overwrite"
Me.cbxCD_Overwrite.UseVisualStyleBackColor = True
Me.Button55.Location = New System.Drawing.Point(763, 29)
Me.Button55.Name = "Button55"
Me.Button55.Size = New System.Drawing.Size(145, 49)
Me.Button55.TabIndex = 67
Me.Button55.Text = "TEST T1"
Me.Button55.UseVisualStyleBackColor = True
'
'usrctlProcedures
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.Controls.Add(Me.Button55)
Me.Controls.Add(Me.Button99)
Me.Controls.Add(Me.Button43)
Me.Controls.Add(Me.lblStatus)
@@ -1917,4 +1928,5 @@ Partial Class usrctlProcedures
Friend WithEvents btnDHFtoVERAEZA_File As Button
Friend WithEvents btnTCtoVERAEZA_File As Button
Friend WithEvents cbxCD_Overwrite As CheckBox
Friend WithEvents Button55 As Button
End Class

6
UID/usrctlProcedures.vb
View File

@@ -4732,6 +4732,12 @@ OPTION (MAXRECURSION 1000);", "AVISO") '
Next
End Sub
Private Sub Button55_Click_2(sender As Object, e As EventArgs) Handles Button55.Click
Dim readT1 As New VERAG_PROG_ALLGEMEIN.cATEZ_Read_T1
Dim path As String = "D:\Andreas\TMP\TEST_READ.pdf"
readT1.TEST(path)
End Sub
'Private Sub Button26_Click(sender As Object, e As EventArgs)