This commit is contained in:
2025-07-07 14:21:35 +02:00
parent e6fb40254a
commit bb3ea4424e
4 changed files with 183 additions and 159 deletions

View File

@@ -105,12 +105,24 @@ Public Class cZollsysteme_Aktenbeschriftung
Case Else Case Else
Select Case Abfertigungsart Select Case Abfertigungsart
Case 38, 26 'AT Case 38, 26 'AT
' getADFrom_EZOLL Select Case Zollsystem_Land
getDataByBezugsnummer = load_NCTS004_FromDAKOSY(BezugsNr, True, PosNrAngeben) 'Neues NCTS Format! Case "AT"
If Not getDataByBezugsnummer Then 'Falls doch nicht 'eZoll
getDataByBezugsnummer = load_NCTS_FromDAKOSY(BezugsNr, True, PosNrAngeben) getDataByBezugsnummer = load_EZA_FromEZOLL(BezugsNr, True)
isUeT1 = (getDataByBezugsnummer)
Sachbearbeiter = "" ' Bei Ü-T1 soll der SB leer sein, sonst wird dieser evtl. beim Austragen herangezogen... Case Else
getDataByBezugsnummer = load_EZA_FromDAKOSY(BezugsNr, True)
End Select
If getDataByBezugsnummer = "" Then
' getADFrom_EZOLL
getDataByBezugsnummer = load_NCTS004_FromDAKOSY(BezugsNr, True, PosNrAngeben) 'Neues NCTS Format!
If Not getDataByBezugsnummer Then 'Falls doch nicht
getDataByBezugsnummer = load_NCTS_FromDAKOSY(BezugsNr, True, PosNrAngeben)
isUeT1 = (getDataByBezugsnummer)
Sachbearbeiter = "" ' Bei Ü-T1 soll der SB leer sein, sonst wird dieser evtl. beim Austragen herangezogen...
End If
End If End If
Case 1, 2, 3, 28, 39 Case 1, 2, 3, 28, 39
'... and Systeme '... and Systeme

View File

@@ -326,6 +326,7 @@ Partial Class frmStartOptions
Me.txtGJ_UNISPED = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.txtGJ_UNISPED = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.Button21 = New System.Windows.Forms.Button() Me.Button21 = New System.Windows.Forms.Button()
Me.DataGridViewTextBoxColumn1 = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.DataGridViewTextBoxColumn1 = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.cbxUseUIDFinanzOnline = New System.Windows.Forms.CheckBox()
Me.pnl.SuspendLayout() Me.pnl.SuspendLayout()
CType(Me.PictureBox24, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.PictureBox24, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.PictureBox23, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.PictureBox23, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -376,6 +377,7 @@ Partial Class frmStartOptions
' '
Me.pnl.BackColor = System.Drawing.Color.White Me.pnl.BackColor = System.Drawing.Color.White
Me.pnl.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle Me.pnl.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.pnl.Controls.Add(Me.cbxUseUIDFinanzOnline)
Me.pnl.Controls.Add(Me.txtMRNPrefix) Me.pnl.Controls.Add(Me.txtMRNPrefix)
Me.pnl.Controls.Add(Me.ATCNRinRE) Me.pnl.Controls.Add(Me.ATCNRinRE)
Me.pnl.Controls.Add(Me.PictureBox24) Me.pnl.Controls.Add(Me.PictureBox24)
@@ -515,7 +517,7 @@ Partial Class frmStartOptions
' '
Me.PictureBox23.BackgroundImage = CType(resources.GetObject("PictureBox23.BackgroundImage"), System.Drawing.Image) Me.PictureBox23.BackgroundImage = CType(resources.GetObject("PictureBox23.BackgroundImage"), System.Drawing.Image)
Me.PictureBox23.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom Me.PictureBox23.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
Me.PictureBox23.Location = New System.Drawing.Point(104, 210) Me.PictureBox23.Location = New System.Drawing.Point(104, 234)
Me.PictureBox23.Name = "PictureBox23" Me.PictureBox23.Name = "PictureBox23"
Me.PictureBox23.Size = New System.Drawing.Size(18, 18) Me.PictureBox23.Size = New System.Drawing.Size(18, 18)
Me.PictureBox23.TabIndex = 88 Me.PictureBox23.TabIndex = 88
@@ -525,7 +527,7 @@ Partial Class frmStartOptions
'Label27 'Label27
' '
Me.Label27.AutoSize = True Me.Label27.AutoSize = True
Me.Label27.Location = New System.Drawing.Point(181, 211) Me.Label27.Location = New System.Drawing.Point(181, 235)
Me.Label27.Name = "Label27" Me.Label27.Name = "Label27"
Me.Label27.Size = New System.Drawing.Size(71, 13) Me.Label27.Size = New System.Drawing.Size(71, 13)
Me.Label27.TabIndex = 87 Me.Label27.TabIndex = 87
@@ -546,7 +548,7 @@ Partial Class frmStartOptions
Me.MyTextBox3._Waehrung = False Me.MyTextBox3._Waehrung = False
Me.MyTextBox3._WaehrungZeichen = True Me.MyTextBox3._WaehrungZeichen = True
Me.MyTextBox3.ForeColor = System.Drawing.Color.Red Me.MyTextBox3.ForeColor = System.Drawing.Color.Red
Me.MyTextBox3.Location = New System.Drawing.Point(127, 208) Me.MyTextBox3.Location = New System.Drawing.Point(127, 232)
Me.MyTextBox3.MaxLineLength = -1 Me.MyTextBox3.MaxLineLength = -1
Me.MyTextBox3.MaxLines_Warning = "" Me.MyTextBox3.MaxLines_Warning = ""
Me.MyTextBox3.MaxLines_Warning_Label = Nothing Me.MyTextBox3.MaxLines_Warning_Label = Nothing
@@ -558,7 +560,7 @@ Partial Class frmStartOptions
' '
Me.LinkLabel51.AutoSize = True Me.LinkLabel51.AutoSize = True
Me.LinkLabel51.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) Me.LinkLabel51.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
Me.LinkLabel51.Location = New System.Drawing.Point(17, 211) Me.LinkLabel51.Location = New System.Drawing.Point(17, 235)
Me.LinkLabel51.Name = "LinkLabel51" Me.LinkLabel51.Name = "LinkLabel51"
Me.LinkLabel51.Size = New System.Drawing.Size(88, 13) Me.LinkLabel51.Size = New System.Drawing.Size(88, 13)
Me.LinkLabel51.TabIndex = 85 Me.LinkLabel51.TabIndex = 85
@@ -592,7 +594,7 @@ Partial Class frmStartOptions
' '
Me.LinkLabel48.AutoSize = True Me.LinkLabel48.AutoSize = True
Me.LinkLabel48.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) Me.LinkLabel48.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
Me.LinkLabel48.Location = New System.Drawing.Point(405, 135) Me.LinkLabel48.Location = New System.Drawing.Point(405, 159)
Me.LinkLabel48.Name = "LinkLabel48" Me.LinkLabel48.Name = "LinkLabel48"
Me.LinkLabel48.Size = New System.Drawing.Size(129, 13) Me.LinkLabel48.Size = New System.Drawing.Size(129, 13)
Me.LinkLabel48.TabIndex = 77 Me.LinkLabel48.TabIndex = 77
@@ -604,7 +606,7 @@ Partial Class frmStartOptions
Me.cbxVermerk.AutoSize = True Me.cbxVermerk.AutoSize = True
Me.cbxVermerk.Checked = True Me.cbxVermerk.Checked = True
Me.cbxVermerk.CheckState = System.Windows.Forms.CheckState.Checked Me.cbxVermerk.CheckState = System.Windows.Forms.CheckState.Checked
Me.cbxVermerk.Location = New System.Drawing.Point(151, 178) Me.cbxVermerk.Location = New System.Drawing.Point(151, 202)
Me.cbxVermerk.Name = "cbxVermerk" Me.cbxVermerk.Name = "cbxVermerk"
Me.cbxVermerk.Size = New System.Drawing.Size(100, 17) Me.cbxVermerk.Size = New System.Drawing.Size(100, 17)
Me.cbxVermerk.TabIndex = 76 Me.cbxVermerk.TabIndex = 76
@@ -617,7 +619,7 @@ Partial Class frmStartOptions
Me.cbxDatevTest.Checked = True Me.cbxDatevTest.Checked = True
Me.cbxDatevTest.CheckState = System.Windows.Forms.CheckState.Checked Me.cbxDatevTest.CheckState = System.Windows.Forms.CheckState.Checked
Me.cbxDatevTest.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.cbxDatevTest.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cbxDatevTest.Location = New System.Drawing.Point(15, 368) Me.cbxDatevTest.Location = New System.Drawing.Point(15, 392)
Me.cbxDatevTest.Name = "cbxDatevTest" Me.cbxDatevTest.Name = "cbxDatevTest"
Me.cbxDatevTest.Size = New System.Drawing.Size(79, 17) Me.cbxDatevTest.Size = New System.Drawing.Size(79, 17)
Me.cbxDatevTest.TabIndex = 75 Me.cbxDatevTest.TabIndex = 75
@@ -628,7 +630,7 @@ Partial Class frmStartOptions
' '
Me.cbxDatevOpen.AutoSize = True Me.cbxDatevOpen.AutoSize = True
Me.cbxDatevOpen.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.cbxDatevOpen.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cbxDatevOpen.Location = New System.Drawing.Point(170, 345) Me.cbxDatevOpen.Location = New System.Drawing.Point(170, 369)
Me.cbxDatevOpen.Name = "cbxDatevOpen" Me.cbxDatevOpen.Name = "cbxDatevOpen"
Me.cbxDatevOpen.Size = New System.Drawing.Size(56, 17) Me.cbxDatevOpen.Size = New System.Drawing.Size(56, 17)
Me.cbxDatevOpen.TabIndex = 74 Me.cbxDatevOpen.TabIndex = 74
@@ -640,7 +642,7 @@ Partial Class frmStartOptions
Me.cbxDatevBuchungen.AutoSize = True Me.cbxDatevBuchungen.AutoSize = True
Me.cbxDatevBuchungen.Checked = True Me.cbxDatevBuchungen.Checked = True
Me.cbxDatevBuchungen.CheckState = System.Windows.Forms.CheckState.Checked Me.cbxDatevBuchungen.CheckState = System.Windows.Forms.CheckState.Checked
Me.cbxDatevBuchungen.Location = New System.Drawing.Point(84, 345) Me.cbxDatevBuchungen.Location = New System.Drawing.Point(84, 369)
Me.cbxDatevBuchungen.Name = "cbxDatevBuchungen" Me.cbxDatevBuchungen.Name = "cbxDatevBuchungen"
Me.cbxDatevBuchungen.Size = New System.Drawing.Size(81, 17) Me.cbxDatevBuchungen.Size = New System.Drawing.Size(81, 17)
Me.cbxDatevBuchungen.TabIndex = 73 Me.cbxDatevBuchungen.TabIndex = 73
@@ -652,7 +654,7 @@ Partial Class frmStartOptions
Me.cbxDatevDebitoren.AutoSize = True Me.cbxDatevDebitoren.AutoSize = True
Me.cbxDatevDebitoren.Checked = True Me.cbxDatevDebitoren.Checked = True
Me.cbxDatevDebitoren.CheckState = System.Windows.Forms.CheckState.Checked Me.cbxDatevDebitoren.CheckState = System.Windows.Forms.CheckState.Checked
Me.cbxDatevDebitoren.Location = New System.Drawing.Point(15, 345) Me.cbxDatevDebitoren.Location = New System.Drawing.Point(15, 369)
Me.cbxDatevDebitoren.Name = "cbxDatevDebitoren" Me.cbxDatevDebitoren.Name = "cbxDatevDebitoren"
Me.cbxDatevDebitoren.Size = New System.Drawing.Size(63, 17) Me.cbxDatevDebitoren.Size = New System.Drawing.Size(63, 17)
Me.cbxDatevDebitoren.TabIndex = 72 Me.cbxDatevDebitoren.TabIndex = 72
@@ -664,7 +666,7 @@ Partial Class frmStartOptions
Me.btnDatev.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.btnDatev.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnDatev.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) Me.btnDatev.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
Me.btnDatev.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft Me.btnDatev.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnDatev.Location = New System.Drawing.Point(15, 318) Me.btnDatev.Location = New System.Drawing.Point(15, 342)
Me.btnDatev.Name = "btnDatev" Me.btnDatev.Name = "btnDatev"
Me.btnDatev.Size = New System.Drawing.Size(211, 24) Me.btnDatev.Size = New System.Drawing.Size(211, 24)
Me.btnDatev.TabIndex = 71 Me.btnDatev.TabIndex = 71
@@ -675,7 +677,7 @@ Partial Class frmStartOptions
' '
Me.lblDatev.AutoSize = True Me.lblDatev.AutoSize = True
Me.lblDatev.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.lblDatev.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.lblDatev.Location = New System.Drawing.Point(12, 302) Me.lblDatev.Location = New System.Drawing.Point(12, 326)
Me.lblDatev.Name = "lblDatev" Me.lblDatev.Name = "lblDatev"
Me.lblDatev.Size = New System.Drawing.Size(142, 13) Me.lblDatev.Size = New System.Drawing.Size(142, 13)
Me.lblDatev.TabIndex = 70 Me.lblDatev.TabIndex = 70
@@ -685,7 +687,7 @@ Partial Class frmStartOptions
' '
Me.Label21.AutoSize = True Me.Label21.AutoSize = True
Me.Label21.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!) Me.Label21.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!)
Me.Label21.Location = New System.Drawing.Point(264, 298) Me.Label21.Location = New System.Drawing.Point(264, 322)
Me.Label21.Name = "Label21" Me.Label21.Name = "Label21"
Me.Label21.Size = New System.Drawing.Size(75, 13) Me.Label21.Size = New System.Drawing.Size(75, 13)
Me.Label21.TabIndex = 69 Me.Label21.TabIndex = 69
@@ -708,7 +710,7 @@ Partial Class frmStartOptions
Me.Button14.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.Button14.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button14.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) Me.Button14.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
Me.Button14.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft Me.Button14.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.Button14.Location = New System.Drawing.Point(268, 340) Me.Button14.Location = New System.Drawing.Point(268, 364)
Me.Button14.Name = "Button14" Me.Button14.Name = "Button14"
Me.Button14.Size = New System.Drawing.Size(143, 24) Me.Button14.Size = New System.Drawing.Size(143, 24)
Me.Button14.TabIndex = 67 Me.Button14.TabIndex = 67
@@ -719,7 +721,7 @@ Partial Class frmStartOptions
' '
Me.Label20.AutoSize = True Me.Label20.AutoSize = True
Me.Label20.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label20.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label20.Location = New System.Drawing.Point(265, 324) Me.Label20.Location = New System.Drawing.Point(265, 348)
Me.Label20.Name = "Label20" Me.Label20.Name = "Label20"
Me.Label20.Size = New System.Drawing.Size(146, 13) Me.Label20.Size = New System.Drawing.Size(146, 13)
Me.Label20.TabIndex = 66 Me.Label20.TabIndex = 66
@@ -728,7 +730,7 @@ Partial Class frmStartOptions
'Label19 'Label19
' '
Me.Label19.AutoSize = True Me.Label19.AutoSize = True
Me.Label19.Location = New System.Drawing.Point(205, 155) Me.Label19.Location = New System.Drawing.Point(205, 179)
Me.Label19.Name = "Label19" Me.Label19.Name = "Label19"
Me.Label19.Size = New System.Drawing.Size(67, 13) Me.Label19.Size = New System.Drawing.Size(67, 13)
Me.Label19.TabIndex = 65 Me.Label19.TabIndex = 65
@@ -737,7 +739,7 @@ Partial Class frmStartOptions
'Label18 'Label18
' '
Me.Label18.AutoSize = True Me.Label18.AutoSize = True
Me.Label18.Location = New System.Drawing.Point(206, 135) Me.Label18.Location = New System.Drawing.Point(206, 159)
Me.Label18.Name = "Label18" Me.Label18.Name = "Label18"
Me.Label18.Size = New System.Drawing.Size(27, 13) Me.Label18.Size = New System.Drawing.Size(27, 13)
Me.Label18.TabIndex = 64 Me.Label18.TabIndex = 64
@@ -758,7 +760,7 @@ Partial Class frmStartOptions
Me.MyTextBox2._Waehrung = False Me.MyTextBox2._Waehrung = False
Me.MyTextBox2._WaehrungZeichen = True Me.MyTextBox2._WaehrungZeichen = True
Me.MyTextBox2.ForeColor = System.Drawing.Color.Red Me.MyTextBox2.ForeColor = System.Drawing.Color.Red
Me.MyTextBox2.Location = New System.Drawing.Point(151, 152) Me.MyTextBox2.Location = New System.Drawing.Point(151, 176)
Me.MyTextBox2.MaxLineLength = -1 Me.MyTextBox2.MaxLineLength = -1
Me.MyTextBox2.MaxLines_Warning = "" Me.MyTextBox2.MaxLines_Warning = ""
Me.MyTextBox2.MaxLines_Warning_Label = Nothing Me.MyTextBox2.MaxLines_Warning_Label = Nothing
@@ -770,7 +772,7 @@ Partial Class frmStartOptions
' '
Me.LinkLabel36.AutoSize = True Me.LinkLabel36.AutoSize = True
Me.LinkLabel36.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) Me.LinkLabel36.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
Me.LinkLabel36.Location = New System.Drawing.Point(15, 189) Me.LinkLabel36.Location = New System.Drawing.Point(15, 213)
Me.LinkLabel36.Name = "LinkLabel36" Me.LinkLabel36.Name = "LinkLabel36"
Me.LinkLabel36.Size = New System.Drawing.Size(117, 13) Me.LinkLabel36.Size = New System.Drawing.Size(117, 13)
Me.LinkLabel36.TabIndex = 62 Me.LinkLabel36.TabIndex = 62
@@ -853,7 +855,7 @@ Partial Class frmStartOptions
' '
Me.piceZollAnh.BackgroundImage = CType(resources.GetObject("piceZollAnh.BackgroundImage"), System.Drawing.Image) Me.piceZollAnh.BackgroundImage = CType(resources.GetObject("piceZollAnh.BackgroundImage"), System.Drawing.Image)
Me.piceZollAnh.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom Me.piceZollAnh.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
Me.piceZollAnh.Location = New System.Drawing.Point(500, 190) Me.piceZollAnh.Location = New System.Drawing.Point(500, 214)
Me.piceZollAnh.Name = "piceZollAnh" Me.piceZollAnh.Name = "piceZollAnh"
Me.piceZollAnh.Size = New System.Drawing.Size(18, 18) Me.piceZollAnh.Size = New System.Drawing.Size(18, 18)
Me.piceZollAnh.TabIndex = 56 Me.piceZollAnh.TabIndex = 56
@@ -875,7 +877,7 @@ Partial Class frmStartOptions
Me.txtEZOLLAnhDat._Waehrung = False Me.txtEZOLLAnhDat._Waehrung = False
Me.txtEZOLLAnhDat._WaehrungZeichen = True Me.txtEZOLLAnhDat._WaehrungZeichen = True
Me.txtEZOLLAnhDat.ForeColor = System.Drawing.Color.Black Me.txtEZOLLAnhDat.ForeColor = System.Drawing.Color.Black
Me.txtEZOLLAnhDat.Location = New System.Drawing.Point(408, 190) Me.txtEZOLLAnhDat.Location = New System.Drawing.Point(408, 214)
Me.txtEZOLLAnhDat.MaxLength = 10 Me.txtEZOLLAnhDat.MaxLength = 10
Me.txtEZOLLAnhDat.MaxLineLength = -1 Me.txtEZOLLAnhDat.MaxLineLength = -1
Me.txtEZOLLAnhDat.MaxLines_Warning = "" Me.txtEZOLLAnhDat.MaxLines_Warning = ""
@@ -888,7 +890,7 @@ Partial Class frmStartOptions
' '
Me.lblEZOLLDat.AutoSize = True Me.lblEZOLLDat.AutoSize = True
Me.lblEZOLLDat.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) Me.lblEZOLLDat.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
Me.lblEZOLLDat.Location = New System.Drawing.Point(300, 193) Me.lblEZOLLDat.Location = New System.Drawing.Point(300, 217)
Me.lblEZOLLDat.Name = "lblEZOLLDat" Me.lblEZOLLDat.Name = "lblEZOLLDat"
Me.lblEZOLLDat.Size = New System.Drawing.Size(105, 13) Me.lblEZOLLDat.Size = New System.Drawing.Size(105, 13)
Me.lblEZOLLDat.TabIndex = 54 Me.lblEZOLLDat.TabIndex = 54
@@ -968,7 +970,7 @@ Partial Class frmStartOptions
' '
Me.LinkLabel33.AutoSize = True Me.LinkLabel33.AutoSize = True
Me.LinkLabel33.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) Me.LinkLabel33.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
Me.LinkLabel33.Location = New System.Drawing.Point(15, 170) Me.LinkLabel33.Location = New System.Drawing.Point(15, 194)
Me.LinkLabel33.Name = "LinkLabel33" Me.LinkLabel33.Name = "LinkLabel33"
Me.LinkLabel33.Size = New System.Drawing.Size(107, 13) Me.LinkLabel33.Size = New System.Drawing.Size(107, 13)
Me.LinkLabel33.TabIndex = 47 Me.LinkLabel33.TabIndex = 47
@@ -991,7 +993,7 @@ Partial Class frmStartOptions
' '
Me.LinkLabel32.AutoSize = True Me.LinkLabel32.AutoSize = True
Me.LinkLabel32.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) Me.LinkLabel32.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
Me.LinkLabel32.Location = New System.Drawing.Point(15, 152) Me.LinkLabel32.Location = New System.Drawing.Point(15, 176)
Me.LinkLabel32.Name = "LinkLabel32" Me.LinkLabel32.Name = "LinkLabel32"
Me.LinkLabel32.Size = New System.Drawing.Size(95, 13) Me.LinkLabel32.Size = New System.Drawing.Size(95, 13)
Me.LinkLabel32.TabIndex = 45 Me.LinkLabel32.TabIndex = 45
@@ -1003,7 +1005,7 @@ Partial Class frmStartOptions
Me.Button4.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.Button4.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button4.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) Me.Button4.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
Me.Button4.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft Me.Button4.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.Button4.Location = New System.Drawing.Point(391, 253) Me.Button4.Location = New System.Drawing.Point(391, 277)
Me.Button4.Name = "Button4" Me.Button4.Name = "Button4"
Me.Button4.Size = New System.Drawing.Size(136, 24) Me.Button4.Size = New System.Drawing.Size(136, 24)
Me.Button4.TabIndex = 44 Me.Button4.TabIndex = 44
@@ -1016,7 +1018,7 @@ Partial Class frmStartOptions
Me.CheckBox5.Checked = True Me.CheckBox5.Checked = True
Me.CheckBox5.CheckState = System.Windows.Forms.CheckState.Checked Me.CheckBox5.CheckState = System.Windows.Forms.CheckState.Checked
Me.CheckBox5.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.CheckBox5.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.CheckBox5.Location = New System.Drawing.Point(449, 280) Me.CheckBox5.Location = New System.Drawing.Point(449, 304)
Me.CheckBox5.Name = "CheckBox5" Me.CheckBox5.Name = "CheckBox5"
Me.CheckBox5.Size = New System.Drawing.Size(79, 17) Me.CheckBox5.Size = New System.Drawing.Size(79, 17)
Me.CheckBox5.TabIndex = 43 Me.CheckBox5.TabIndex = 43
@@ -1028,7 +1030,7 @@ Partial Class frmStartOptions
Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button3.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) Me.Button3.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
Me.Button3.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft Me.Button3.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.Button3.Location = New System.Drawing.Point(268, 253) Me.Button3.Location = New System.Drawing.Point(268, 277)
Me.Button3.Name = "Button3" Me.Button3.Name = "Button3"
Me.Button3.Size = New System.Drawing.Size(124, 24) Me.Button3.Size = New System.Drawing.Size(124, 24)
Me.Button3.TabIndex = 40 Me.Button3.TabIndex = 40
@@ -1041,7 +1043,7 @@ Partial Class frmStartOptions
Me.cboBMDUnispedFirma._allowFreiText = False Me.cboBMDUnispedFirma._allowFreiText = False
Me.cboBMDUnispedFirma._value = "" Me.cboBMDUnispedFirma._value = ""
Me.cboBMDUnispedFirma.FormattingEnabled = True Me.cboBMDUnispedFirma.FormattingEnabled = True
Me.cboBMDUnispedFirma.Location = New System.Drawing.Point(268, 276) Me.cboBMDUnispedFirma.Location = New System.Drawing.Point(268, 300)
Me.cboBMDUnispedFirma.Name = "cboBMDUnispedFirma" Me.cboBMDUnispedFirma.Name = "cboBMDUnispedFirma"
Me.cboBMDUnispedFirma.Size = New System.Drawing.Size(124, 21) Me.cboBMDUnispedFirma.Size = New System.Drawing.Size(124, 21)
Me.cboBMDUnispedFirma.TabIndex = 42 Me.cboBMDUnispedFirma.TabIndex = 42
@@ -1050,7 +1052,7 @@ Partial Class frmStartOptions
' '
Me.CheckBox4.AutoSize = True Me.CheckBox4.AutoSize = True
Me.CheckBox4.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.CheckBox4.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.CheckBox4.Location = New System.Drawing.Point(394, 280) Me.CheckBox4.Location = New System.Drawing.Point(394, 304)
Me.CheckBox4.Name = "CheckBox4" Me.CheckBox4.Name = "CheckBox4"
Me.CheckBox4.Size = New System.Drawing.Size(56, 17) Me.CheckBox4.Size = New System.Drawing.Size(56, 17)
Me.CheckBox4.TabIndex = 41 Me.CheckBox4.TabIndex = 41
@@ -1061,7 +1063,7 @@ Partial Class frmStartOptions
' '
Me.Label13.AutoSize = True Me.Label13.AutoSize = True
Me.Label13.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label13.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label13.Location = New System.Drawing.Point(265, 237) Me.Label13.Location = New System.Drawing.Point(265, 261)
Me.Label13.Name = "Label13" Me.Label13.Name = "Label13"
Me.Label13.Size = New System.Drawing.Size(163, 13) Me.Label13.Size = New System.Drawing.Size(163, 13)
Me.Label13.TabIndex = 39 Me.Label13.TabIndex = 39
@@ -1070,7 +1072,7 @@ Partial Class frmStartOptions
'CheckBox3 'CheckBox3
' '
Me.CheckBox3.AutoSize = True Me.CheckBox3.AutoSize = True
Me.CheckBox3.Location = New System.Drawing.Point(302, 173) Me.CheckBox3.Location = New System.Drawing.Point(302, 197)
Me.CheckBox3.Name = "CheckBox3" Me.CheckBox3.Name = "CheckBox3"
Me.CheckBox3.Size = New System.Drawing.Size(103, 17) Me.CheckBox3.Size = New System.Drawing.Size(103, 17)
Me.CheckBox3.TabIndex = 38 Me.CheckBox3.TabIndex = 38
@@ -4031,7 +4033,7 @@ Partial Class frmStartOptions
'CheckBox2 'CheckBox2
' '
Me.CheckBox2.AutoSize = True Me.CheckBox2.AutoSize = True
Me.CheckBox2.Location = New System.Drawing.Point(302, 151) Me.CheckBox2.Location = New System.Drawing.Point(302, 175)
Me.CheckBox2.Name = "CheckBox2" Me.CheckBox2.Name = "CheckBox2"
Me.CheckBox2.Size = New System.Drawing.Size(98, 17) Me.CheckBox2.Size = New System.Drawing.Size(98, 17)
Me.CheckBox2.TabIndex = 13 Me.CheckBox2.TabIndex = 13
@@ -4042,7 +4044,7 @@ Partial Class frmStartOptions
' '
Me.LinkLabel25.AutoSize = True Me.LinkLabel25.AutoSize = True
Me.LinkLabel25.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) Me.LinkLabel25.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
Me.LinkLabel25.Location = New System.Drawing.Point(299, 135) Me.LinkLabel25.Location = New System.Drawing.Point(299, 159)
Me.LinkLabel25.Name = "LinkLabel25" Me.LinkLabel25.Name = "LinkLabel25"
Me.LinkLabel25.Size = New System.Drawing.Size(99, 13) Me.LinkLabel25.Size = New System.Drawing.Size(99, 13)
Me.LinkLabel25.TabIndex = 12 Me.LinkLabel25.TabIndex = 12
@@ -4053,7 +4055,7 @@ Partial Class frmStartOptions
' '
Me.CheckBox1.AutoSize = True Me.CheckBox1.AutoSize = True
Me.CheckBox1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.CheckBox1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.CheckBox1.Location = New System.Drawing.Point(173, 280) Me.CheckBox1.Location = New System.Drawing.Point(173, 304)
Me.CheckBox1.Name = "CheckBox1" Me.CheckBox1.Name = "CheckBox1"
Me.CheckBox1.Size = New System.Drawing.Size(56, 17) Me.CheckBox1.Size = New System.Drawing.Size(56, 17)
Me.CheckBox1.TabIndex = 18 Me.CheckBox1.TabIndex = 18
@@ -4065,7 +4067,7 @@ Partial Class frmStartOptions
Me.cbxBu.AutoSize = True Me.cbxBu.AutoSize = True
Me.cbxBu.Checked = True Me.cbxBu.Checked = True
Me.cbxBu.CheckState = System.Windows.Forms.CheckState.Checked Me.cbxBu.CheckState = System.Windows.Forms.CheckState.Checked
Me.cbxBu.Location = New System.Drawing.Point(87, 280) Me.cbxBu.Location = New System.Drawing.Point(87, 304)
Me.cbxBu.Name = "cbxBu" Me.cbxBu.Name = "cbxBu"
Me.cbxBu.Size = New System.Drawing.Size(81, 17) Me.cbxBu.Size = New System.Drawing.Size(81, 17)
Me.cbxBu.TabIndex = 17 Me.cbxBu.TabIndex = 17
@@ -4077,7 +4079,7 @@ Partial Class frmStartOptions
Me.cbxKd.AutoSize = True Me.cbxKd.AutoSize = True
Me.cbxKd.Checked = True Me.cbxKd.Checked = True
Me.cbxKd.CheckState = System.Windows.Forms.CheckState.Checked Me.cbxKd.CheckState = System.Windows.Forms.CheckState.Checked
Me.cbxKd.Location = New System.Drawing.Point(18, 280) Me.cbxKd.Location = New System.Drawing.Point(18, 304)
Me.cbxKd.Name = "cbxKd" Me.cbxKd.Name = "cbxKd"
Me.cbxKd.Size = New System.Drawing.Size(63, 17) Me.cbxKd.Size = New System.Drawing.Size(63, 17)
Me.cbxKd.TabIndex = 16 Me.cbxKd.TabIndex = 16
@@ -4089,7 +4091,7 @@ Partial Class frmStartOptions
Me.Button9.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.Button9.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button9.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) Me.Button9.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
Me.Button9.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft Me.Button9.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.Button9.Location = New System.Drawing.Point(18, 253) Me.Button9.Location = New System.Drawing.Point(18, 277)
Me.Button9.Name = "Button9" Me.Button9.Name = "Button9"
Me.Button9.Size = New System.Drawing.Size(211, 24) Me.Button9.Size = New System.Drawing.Size(211, 24)
Me.Button9.TabIndex = 15 Me.Button9.TabIndex = 15
@@ -4100,7 +4102,7 @@ Partial Class frmStartOptions
' '
Me.Label3.AutoSize = True Me.Label3.AutoSize = True
Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label3.Location = New System.Drawing.Point(15, 237) Me.Label3.Location = New System.Drawing.Point(15, 261)
Me.Label3.Name = "Label3" Me.Label3.Name = "Label3"
Me.Label3.Size = New System.Drawing.Size(138, 13) Me.Label3.Size = New System.Drawing.Size(138, 13)
Me.Label3.TabIndex = 14 Me.Label3.TabIndex = 14
@@ -4121,7 +4123,7 @@ Partial Class frmStartOptions
Me.MyTextBox1._Waehrung = False Me.MyTextBox1._Waehrung = False
Me.MyTextBox1._WaehrungZeichen = True Me.MyTextBox1._WaehrungZeichen = True
Me.MyTextBox1.ForeColor = System.Drawing.Color.Black Me.MyTextBox1.ForeColor = System.Drawing.Color.Black
Me.MyTextBox1.Location = New System.Drawing.Point(151, 132) Me.MyTextBox1.Location = New System.Drawing.Point(151, 156)
Me.MyTextBox1.MaxLineLength = -1 Me.MyTextBox1.MaxLineLength = -1
Me.MyTextBox1.MaxLines_Warning = "" Me.MyTextBox1.MaxLines_Warning = ""
Me.MyTextBox1.MaxLines_Warning_Label = Nothing Me.MyTextBox1.MaxLines_Warning_Label = Nothing
@@ -4134,7 +4136,7 @@ Partial Class frmStartOptions
' '
Me.PictureBox12.BackgroundImage = CType(resources.GetObject("PictureBox12.BackgroundImage"), System.Drawing.Image) Me.PictureBox12.BackgroundImage = CType(resources.GetObject("PictureBox12.BackgroundImage"), System.Drawing.Image)
Me.PictureBox12.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom Me.PictureBox12.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
Me.PictureBox12.Location = New System.Drawing.Point(127, 130) Me.PictureBox12.Location = New System.Drawing.Point(127, 154)
Me.PictureBox12.Name = "PictureBox12" Me.PictureBox12.Name = "PictureBox12"
Me.PictureBox12.Size = New System.Drawing.Size(18, 18) Me.PictureBox12.Size = New System.Drawing.Size(18, 18)
Me.PictureBox12.TabIndex = 37 Me.PictureBox12.TabIndex = 37
@@ -4145,7 +4147,7 @@ Partial Class frmStartOptions
' '
Me.LinkLabel20.AutoSize = True Me.LinkLabel20.AutoSize = True
Me.LinkLabel20.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) Me.LinkLabel20.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
Me.LinkLabel20.Location = New System.Drawing.Point(15, 135) Me.LinkLabel20.Location = New System.Drawing.Point(15, 159)
Me.LinkLabel20.Name = "LinkLabel20" Me.LinkLabel20.Name = "LinkLabel20"
Me.LinkLabel20.Size = New System.Drawing.Size(106, 13) Me.LinkLabel20.Size = New System.Drawing.Size(106, 13)
Me.LinkLabel20.TabIndex = 10 Me.LinkLabel20.TabIndex = 10
@@ -4313,7 +4315,7 @@ Partial Class frmStartOptions
Me.txtGJ_UNISPED._Waehrung = False Me.txtGJ_UNISPED._Waehrung = False
Me.txtGJ_UNISPED._WaehrungZeichen = True Me.txtGJ_UNISPED._WaehrungZeichen = True
Me.txtGJ_UNISPED.ForeColor = System.Drawing.Color.Black Me.txtGJ_UNISPED.ForeColor = System.Drawing.Color.Black
Me.txtGJ_UNISPED.Location = New System.Drawing.Point(339, 295) Me.txtGJ_UNISPED.Location = New System.Drawing.Point(339, 319)
Me.txtGJ_UNISPED.MaxLength = 4 Me.txtGJ_UNISPED.MaxLength = 4
Me.txtGJ_UNISPED.MaxLineLength = -1 Me.txtGJ_UNISPED.MaxLineLength = -1
Me.txtGJ_UNISPED.MaxLines_Warning = "" Me.txtGJ_UNISPED.MaxLines_Warning = ""
@@ -4341,6 +4343,16 @@ Partial Class frmStartOptions
Me.DataGridViewTextBoxColumn1.MinimumWidth = 8 Me.DataGridViewTextBoxColumn1.MinimumWidth = 8
Me.DataGridViewTextBoxColumn1.Name = "DataGridViewTextBoxColumn1" Me.DataGridViewTextBoxColumn1.Name = "DataGridViewTextBoxColumn1"
' '
'cbxUseUIDFinanzOnline
'
Me.cbxUseUIDFinanzOnline.AutoSize = True
Me.cbxUseUIDFinanzOnline.Location = New System.Drawing.Point(18, 142)
Me.cbxUseUIDFinanzOnline.Name = "cbxUseUIDFinanzOnline"
Me.cbxUseUIDFinanzOnline.Size = New System.Drawing.Size(131, 17)
Me.cbxUseUIDFinanzOnline.TabIndex = 139
Me.cbxUseUIDFinanzOnline.Text = "UID über Finanzonline"
Me.cbxUseUIDFinanzOnline.UseVisualStyleBackColor = True
'
'frmStartOptions 'frmStartOptions
' '
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
@@ -4715,4 +4727,5 @@ Partial Class frmStartOptions
Friend WithEvents cboTCAPI_Files As Button Friend WithEvents cboTCAPI_Files As Button
Friend WithEvents cboTCAPI_Call As Button Friend WithEvents cboTCAPI_Call As Button
Friend WithEvents cboTCAPI_Firma As VERAG_PROG_ALLGEMEIN.MyComboBox Friend WithEvents cboTCAPI_Firma As VERAG_PROG_ALLGEMEIN.MyComboBox
Friend WithEvents cbxUseUIDFinanzOnline As CheckBox
End Class End Class

View File

@@ -212,102 +212,6 @@
+z1oZ9B6syqzaGEdYX5mdmYqt4qgQDVINcVjocfByBORr63brCulbaW10NVQHYibiNsHbQ+6L24q7oAu +z1oZ9B6syqzaGEdYX5mdmYqt4qgQDVINcVjocfByBORr63brCulbaW10NVQHYibiNsHbQ+6L24q7oAu
RxPAxs8mJG4iDmp1USehIAMuLi4GeXl5NlNTU347OzsRe3t7UWRsZ2cnbG5uzicrK8vKxcVFXOmCD0hK RxPAxs8mJG4iDmp1USehIAMuLi4GeXl5NlNTU347OzsRe3t7UWRsZ2cnbG5uzicrK8vKxcVFXOmCD0hK
SjJ6enoK1NXVqU6aNMlg2rRpxsh48uTJus3NzYqurq68EhISJGd6ADkzAttxL7feAAAAAElFTkSuQmCC SjJ6enoK1NXVqU6aNMlg2rRpxsh48uTJus3NzYqurq68EhISJGd6ADkzAttxL7feAAAAAElFTkSuQmCC
</value>
</data>
<data name="PictureBox12.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABGdJREFUSEtj
YKAyYOFk4Za0knSzzrXOd8x2jJeUlGRgZ2dHV0YFwMjAKKInomlUYJRl32e/wn+Z/0Gf2T4L9eP1rQRV
BQWZ2JnQdVAGBNQEFI2KjHLCj4Qfjz0f+zX+Uvz/iKMR9z2XeU7USdNxENYVFmZkYWRE10c2sGqyKgg/
FH4s7mLcPxAGWQhjR5+Pnm5Wa+bAxs/Ggq6PbODQ77Aw5mzMO5BF6DjuYtzDoB1BU5ynO9uh6yMZcIpy
Sin5KsX5rva9gMWiP3EX4354LPDYb9VkVWpSZmKIrp8kwMrDyifnLBcUtCPoYfSp6G9oln2PPh39InRf
6EXVYNUYLjEuCXT9JAMFT4UI5+nO22POxPyMuxD3F83CK/4b/CdoJ2hb8CnwiTIyM5Iff8yczNxSVlJu
Nm02i8P2h72EJRKwRRfifsScibnts9Kn0yjfyIZfkZ+bhZOFGd0MkgC7ALuIXppeDXq8xZ6L/Rl+MPyR
2xy3iXpperai+qLUyfG4LIw8GvnGY57HVnFDcTk2bjZ0beQBHikeeWV/5QTvpd4nI49FfoRZFnM+5rdd
j91KEV0REzY+Ng5GZgJ5nJmDmZtPgU9dwUPBUsZeRoNLgosNXRO7ILsIOKFMdd4adTzqE7Lv/Pf6b9JM
1wxB0YALgFIQrxyvmlacVrHfer/prnNccxW9FWXZBdhZGZCKQEENQUOzKrMpaKnxR9zFuOeWMyy9JDwl
WJHNxQk4xTilVAJVkkP2hjyLPhP9NvJE5C7PJZ7J4ibikqw8rPDkjMPCazEXYorkveWVWHiISPnMHMxc
qsGqKe7z3Q+Cy75LcSBDXkQcjdjuMMEhStJKUo6JlYmVlZdVQD9Lv8F3je9FeKq8EHvZf5N/j26Grg6P
LA8PutlYgYKbQqjzVOdtyK6GuvxD7IXYlea15v5ixmISXBJcsm5z3PZC5X7FXYx7Grg9cKpZlZkzuxA7
GxMrE4FUAgXIpTuahWDxmPMx011mudiiWQhyzBKzSjMvQQ1BXnQz8QJpG2lPZX/lKMs6y464i3H34y/F
g+syJIsfhh8KPw6yLPxQ+GuQWOSRyNc27Tbd0rbSZizcZJQibHxsvBImEsamFaaVrjNdNwXvDH6A7mMY
BlnqNtttj5yrXDAosaGbRTKQdZYNsOu2WxZ9MvpD3IW43/GX4hHl5MW4n75rfI/pZ+kXsouwC6HrJQuw
cLPwKngqeLvPc18adTLqRfyl+F9IFt73We0zQTdd14BdkIotI25JbgkZBxkHtVC1JLc5brtjz8f+jL0Q
+z1oZ9B6syqzaGEdYX5mdmYqt4qgQDVINcVjocfByBORr63brCulbaW10NVQHYibiNsHbQ+6L24q7oAu
RxPAxs8mJG4iDmp1USehIAMuLi4GeXl5NlNTU347OzsRe3t7UWRsZ2cnbG5uzicrK8vKxcVFXOmCD0hK
SjJ6enoK1NXVqU6aNMlg2rRpxsh48uTJus3NzYqurq68EhISJGd6ADkzAttxL7feAAAAAElFTkSuQmCC
</value>
</data>
<data name="PictureBox11.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABGdJREFUSEtj
YKAyYOFk4Za0knSzzrXOd8x2jJeUlGRgZ2dHV0YFwMjAKKInomlUYJRl32e/wn+Z/0Gf2T4L9eP1rQRV
BQWZ2JnQdVAGBNQEFI2KjHLCj4Qfjz0f+zX+Uvz/iKMR9z2XeU7USdNxENYVFmZkYWRE10c2sGqyKgg/
FH4s7mLcPxAGWQhjR5+Pnm5Wa+bAxs/Ggq6PbODQ77Aw5mzMO5BF6DjuYtzDoB1BU5ynO9uh6yMZcIpy
Sin5KsX5rva9gMWiP3EX4354LPDYb9VkVWpSZmKIrp8kwMrDyifnLBcUtCPoYfSp6G9oln2PPh39InRf
6EXVYNUYLjEuCXT9JAMFT4UI5+nO22POxPyMuxD3F83CK/4b/CdoJ2hb8CnwiTIyM5Iff8yczNxSVlJu
Nm02i8P2h72EJRKwRRfifsScibnts9Kn0yjfyIZfkZ+bhZOFGd0MkgC7ALuIXppeDXq8xZ6L/Rl+MPyR
2xy3iXpperai+qLUyfG4LIw8GvnGY57HVnFDcTk2bjZ0beQBHikeeWV/5QTvpd4nI49FfoRZFnM+5rdd
j91KEV0REzY+Ng5GZgJ5nJmDmZtPgU9dwUPBUsZeRoNLgosNXRO7ILsIOKFMdd4adTzqE7Lv/Pf6b9JM
1wxB0YALgFIQrxyvmlacVrHfer/prnNccxW9FWXZBdhZGZCKQEENQUOzKrMpaKnxR9zFuOeWMyy9JDwl
WJHNxQk4xTilVAJVkkP2hjyLPhP9NvJE5C7PJZ7J4ibikqw8rPDkjMPCazEXYorkveWVWHiISPnMHMxc
qsGqKe7z3Q+Cy75LcSBDXkQcjdjuMMEhStJKUo6JlYmVlZdVQD9Lv8F3je9FeKq8EHvZf5N/j26Grg6P
LA8PutlYgYKbQqjzVOdtyK6GuvxD7IXYlea15v5ixmISXBJcsm5z3PZC5X7FXYx7Grg9cKpZlZkzuxA7
GxMrE4FUAgXIpTuahWDxmPMx011mudiiWQhyzBKzSjMvQQ1BXnQz8QJpG2lPZX/lKMs6y464i3H34y/F
g+syJIsfhh8KPw6yLPxQ+GuQWOSRyNc27Tbd0rbSZizcZJQibHxsvBImEsamFaaVrjNdNwXvDH6A7mMY
BlnqNtttj5yrXDAosaGbRTKQdZYNsOu2WxZ9MvpD3IW43/GX4hHl5MW4n75rfI/pZ+kXsouwC6HrJQuw
cLPwKngqeLvPc18adTLqRfyl+F9IFt73We0zQTdd14BdkIotI25JbgkZBxkHtVC1JLc5brtjz8f+jL0Q
+z1oZ9B6syqzaGEdYX5mdmYqt4qgQDVINcVjocfByBORr63brCulbaW10NVQHYibiNsHbQ+6L24q7oAu
RxPAxs8mJG4iDmp1USehIAMuLi4GeXl5NlNTU347OzsRe3t7UWRsZ2cnbG5uzicrK8vKxcVFXOmCD0hK
SjJ6enoK1NXVqU6aNMlg2rRpxsh48uTJus3NzYqurq68EhISJGd6ADkzAttxL7feAAAAAElFTkSuQmCC
</value>
</data>
<data name="PictureBox10.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABGdJREFUSEtj
YKAyYOFk4Za0knSzzrXOd8x2jJeUlGRgZ2dHV0YFwMjAKKInomlUYJRl32e/wn+Z/0Gf2T4L9eP1rQRV
BQWZ2JnQdVAGBNQEFI2KjHLCj4Qfjz0f+zX+Uvz/iKMR9z2XeU7USdNxENYVFmZkYWRE10c2sGqyKgg/
FH4s7mLcPxAGWQhjR5+Pnm5Wa+bAxs/Ggq6PbODQ77Aw5mzMO5BF6DjuYtzDoB1BU5ynO9uh6yMZcIpy
Sin5KsX5rva9gMWiP3EX4354LPDYb9VkVWpSZmKIrp8kwMrDyifnLBcUtCPoYfSp6G9oln2PPh39InRf
6EXVYNUYLjEuCXT9JAMFT4UI5+nO22POxPyMuxD3F83CK/4b/CdoJ2hb8CnwiTIyM5Iff8yczNxSVlJu
Nm02i8P2h72EJRKwRRfifsScibnts9Kn0yjfyIZfkZ+bhZOFGd0MkgC7ALuIXppeDXq8xZ6L/Rl+MPyR
2xy3iXpperai+qLUyfG4LIw8GvnGY57HVnFDcTk2bjZ0beQBHikeeWV/5QTvpd4nI49FfoRZFnM+5rdd
j91KEV0REzY+Ng5GZgJ5nJmDmZtPgU9dwUPBUsZeRoNLgosNXRO7ILsIOKFMdd4adTzqE7Lv/Pf6b9JM
1wxB0YALgFIQrxyvmlacVrHfer/prnNccxW9FWXZBdhZGZCKQEENQUOzKrMpaKnxR9zFuOeWMyy9JDwl
WJHNxQk4xTilVAJVkkP2hjyLPhP9NvJE5C7PJZ7J4ibikqw8rPDkjMPCazEXYorkveWVWHiISPnMHMxc
qsGqKe7z3Q+Cy75LcSBDXkQcjdjuMMEhStJKUo6JlYmVlZdVQD9Lv8F3je9FeKq8EHvZf5N/j26Grg6P
LA8PutlYgYKbQqjzVOdtyK6GuvxD7IXYlea15v5ixmISXBJcsm5z3PZC5X7FXYx7Grg9cKpZlZkzuxA7
GxMrE4FUAgXIpTuahWDxmPMx011mudiiWQhyzBKzSjMvQQ1BXnQz8QJpG2lPZX/lKMs6y464i3H34y/F
g+syJIsfhh8KPw6yLPxQ+GuQWOSRyNc27Tbd0rbSZizcZJQibHxsvBImEsamFaaVrjNdNwXvDH6A7mMY
BlnqNtttj5yrXDAosaGbRTKQdZYNsOu2WxZ9MvpD3IW43/GX4hHl5MW4n75rfI/pZ+kXsouwC6HrJQuw
cLPwKngqeLvPc18adTLqRfyl+F9IFt73We0zQTdd14BdkIotI25JbgkZBxkHtVC1JLc5brtjz8f+jL0Q
+z1oZ9B6syqzaGEdYX5mdmYqt4qgQDVINcVjocfByBORr63brCulbaW10NVQHYibiNsHbQ+6L24q7oAu
RxPAxs8mJG4iDmp1USehIAMuLi4GeXl5NlNTU347OzsRe3t7UWRsZ2cnbG5uzicrK8vKxcVFXOmCD0hK
SjJ6enoK1NXVqU6aNMlg2rRpxsh48uTJus3NzYqurq68EhISJGd6ADkzAttxL7feAAAAAElFTkSuQmCC
</value>
</data>
<data name="PictureBox9.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABGdJREFUSEtj
YKAyYOFk4Za0knSzzrXOd8x2jJeUlGRgZ2dHV0YFwMjAKKInomlUYJRl32e/wn+Z/0Gf2T4L9eP1rQRV
BQWZ2JnQdVAGBNQEFI2KjHLCj4Qfjz0f+zX+Uvz/iKMR9z2XeU7USdNxENYVFmZkYWRE10c2sGqyKgg/
FH4s7mLcPxAGWQhjR5+Pnm5Wa+bAxs/Ggq6PbODQ77Aw5mzMO5BF6DjuYtzDoB1BU5ynO9uh6yMZcIpy
Sin5KsX5rva9gMWiP3EX4354LPDYb9VkVWpSZmKIrp8kwMrDyifnLBcUtCPoYfSp6G9oln2PPh39InRf
6EXVYNUYLjEuCXT9JAMFT4UI5+nO22POxPyMuxD3F83CK/4b/CdoJ2hb8CnwiTIyM5Iff8yczNxSVlJu
Nm02i8P2h72EJRKwRRfifsScibnts9Kn0yjfyIZfkZ+bhZOFGd0MkgC7ALuIXppeDXq8xZ6L/Rl+MPyR
2xy3iXpperai+qLUyfG4LIw8GvnGY57HVnFDcTk2bjZ0beQBHikeeWV/5QTvpd4nI49FfoRZFnM+5rdd
j91KEV0REzY+Ng5GZgJ5nJmDmZtPgU9dwUPBUsZeRoNLgosNXRO7ILsIOKFMdd4adTzqE7Lv/Pf6b9JM
1wxB0YALgFIQrxyvmlacVrHfer/prnNccxW9FWXZBdhZGZCKQEENQUOzKrMpaKnxR9zFuOeWMyy9JDwl
WJHNxQk4xTilVAJVkkP2hjyLPhP9NvJE5C7PJZ7J4ibikqw8rPDkjMPCazEXYorkveWVWHiISPnMHMxc
qsGqKe7z3Q+Cy75LcSBDXkQcjdjuMMEhStJKUo6JlYmVlZdVQD9Lv8F3je9FeKq8EHvZf5N/j26Grg6P
LA8PutlYgYKbQqjzVOdtyK6GuvxD7IXYlea15v5ixmISXBJcsm5z3PZC5X7FXYx7Grg9cKpZlZkzuxA7
GxMrE4FUAgXIpTuahWDxmPMx011mudiiWQhyzBKzSjMvQQ1BXnQz8QJpG2lPZX/lKMs6y464i3H34y/F
g+syJIsfhh8KPw6yLPxQ+GuQWOSRyNc27Tbd0rbSZizcZJQibHxsvBImEsamFaaVrjNdNwXvDH6A7mMY
BlnqNtttj5yrXDAosaGbRTKQdZYNsOu2WxZ9MvpD3IW43/GX4hHl5MW4n75rfI/pZ+kXsouwC6HrJQuw
cLPwKngqeLvPc18adTLqRfyl+F9IFt73We0zQTdd14BdkIotI25JbgkZBxkHtVC1JLc5brtjz8f+jL0Q
+z1oZ9B6syqzaGEdYX5mdmYqt4qgQDVINcVjocfByBORr63brCulbaW10NVQHYibiNsHbQ+6L24q7oAu
RxPAxs8mJG4iDmp1USehIAMuLi4GeXl5NlNTU347OzsRe3t7UWRsZ2cnbG5uzicrK8vKxcVFXOmCD0hK
SjJ6enoK1NXVqU6aNMlg2rRpxsh48uTJus3NzYqurq68EhISJGd6ADkzAttxL7feAAAAAElFTkSuQmCC
</value> </value>
</data> </data>
<data name="PictureBox26.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> <data name="PictureBox26.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
@@ -721,9 +625,6 @@
<metadata name="clmnMRN.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089"> <metadata name="clmnMRN.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value> <value>True</value>
</metadata> </metadata>
<metadata name="clmnMRN.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value>
</metadata>
<data name="PictureBox18.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> <data name="PictureBox18.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value> <value>
iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABGdJREFUSEtj iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABGdJREFUSEtj
@@ -818,6 +719,102 @@
+z1oZ9B6syqzaGEdYX5mdmYqt4qgQDVINcVjocfByBORr63brCulbaW10NVQHYibiNsHbQ+6L24q7oAu +z1oZ9B6syqzaGEdYX5mdmYqt4qgQDVINcVjocfByBORr63brCulbaW10NVQHYibiNsHbQ+6L24q7oAu
RxPAxs8mJG4iDmp1USehIAMuLi4GeXl5NlNTU347OzsRe3t7UWRsZ2cnbG5uzicrK8vKxcVFXOmCD0hK RxPAxs8mJG4iDmp1USehIAMuLi4GeXl5NlNTU347OzsRe3t7UWRsZ2cnbG5uzicrK8vKxcVFXOmCD0hK
SjJ6enoK1NXVqU6aNMlg2rRpxsh48uTJus3NzYqurq68EhISJGd6ADkzAttxL7feAAAAAElFTkSuQmCC SjJ6enoK1NXVqU6aNMlg2rRpxsh48uTJus3NzYqurq68EhISJGd6ADkzAttxL7feAAAAAElFTkSuQmCC
</value>
</data>
<data name="PictureBox12.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABGdJREFUSEtj
YKAyYOFk4Za0knSzzrXOd8x2jJeUlGRgZ2dHV0YFwMjAKKInomlUYJRl32e/wn+Z/0Gf2T4L9eP1rQRV
BQWZ2JnQdVAGBNQEFI2KjHLCj4Qfjz0f+zX+Uvz/iKMR9z2XeU7USdNxENYVFmZkYWRE10c2sGqyKgg/
FH4s7mLcPxAGWQhjR5+Pnm5Wa+bAxs/Ggq6PbODQ77Aw5mzMO5BF6DjuYtzDoB1BU5ynO9uh6yMZcIpy
Sin5KsX5rva9gMWiP3EX4354LPDYb9VkVWpSZmKIrp8kwMrDyifnLBcUtCPoYfSp6G9oln2PPh39InRf
6EXVYNUYLjEuCXT9JAMFT4UI5+nO22POxPyMuxD3F83CK/4b/CdoJ2hb8CnwiTIyM5Iff8yczNxSVlJu
Nm02i8P2h72EJRKwRRfifsScibnts9Kn0yjfyIZfkZ+bhZOFGd0MkgC7ALuIXppeDXq8xZ6L/Rl+MPyR
2xy3iXpperai+qLUyfG4LIw8GvnGY57HVnFDcTk2bjZ0beQBHikeeWV/5QTvpd4nI49FfoRZFnM+5rdd
j91KEV0REzY+Ng5GZgJ5nJmDmZtPgU9dwUPBUsZeRoNLgosNXRO7ILsIOKFMdd4adTzqE7Lv/Pf6b9JM
1wxB0YALgFIQrxyvmlacVrHfer/prnNccxW9FWXZBdhZGZCKQEENQUOzKrMpaKnxR9zFuOeWMyy9JDwl
WJHNxQk4xTilVAJVkkP2hjyLPhP9NvJE5C7PJZ7J4ibikqw8rPDkjMPCazEXYorkveWVWHiISPnMHMxc
qsGqKe7z3Q+Cy75LcSBDXkQcjdjuMMEhStJKUo6JlYmVlZdVQD9Lv8F3je9FeKq8EHvZf5N/j26Grg6P
LA8PutlYgYKbQqjzVOdtyK6GuvxD7IXYlea15v5ixmISXBJcsm5z3PZC5X7FXYx7Grg9cKpZlZkzuxA7
GxMrE4FUAgXIpTuahWDxmPMx011mudiiWQhyzBKzSjMvQQ1BXnQz8QJpG2lPZX/lKMs6y464i3H34y/F
g+syJIsfhh8KPw6yLPxQ+GuQWOSRyNc27Tbd0rbSZizcZJQibHxsvBImEsamFaaVrjNdNwXvDH6A7mMY
BlnqNtttj5yrXDAosaGbRTKQdZYNsOu2WxZ9MvpD3IW43/GX4hHl5MW4n75rfI/pZ+kXsouwC6HrJQuw
cLPwKngqeLvPc18adTLqRfyl+F9IFt73We0zQTdd14BdkIotI25JbgkZBxkHtVC1JLc5brtjz8f+jL0Q
+z1oZ9B6syqzaGEdYX5mdmYqt4qgQDVINcVjocfByBORr63brCulbaW10NVQHYibiNsHbQ+6L24q7oAu
RxPAxs8mJG4iDmp1USehIAMuLi4GeXl5NlNTU347OzsRe3t7UWRsZ2cnbG5uzicrK8vKxcVFXOmCD0hK
SjJ6enoK1NXVqU6aNMlg2rRpxsh48uTJus3NzYqurq68EhISJGd6ADkzAttxL7feAAAAAElFTkSuQmCC
</value>
</data>
<data name="PictureBox11.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABGdJREFUSEtj
YKAyYOFk4Za0knSzzrXOd8x2jJeUlGRgZ2dHV0YFwMjAKKInomlUYJRl32e/wn+Z/0Gf2T4L9eP1rQRV
BQWZ2JnQdVAGBNQEFI2KjHLCj4Qfjz0f+zX+Uvz/iKMR9z2XeU7USdNxENYVFmZkYWRE10c2sGqyKgg/
FH4s7mLcPxAGWQhjR5+Pnm5Wa+bAxs/Ggq6PbODQ77Aw5mzMO5BF6DjuYtzDoB1BU5ynO9uh6yMZcIpy
Sin5KsX5rva9gMWiP3EX4354LPDYb9VkVWpSZmKIrp8kwMrDyifnLBcUtCPoYfSp6G9oln2PPh39InRf
6EXVYNUYLjEuCXT9JAMFT4UI5+nO22POxPyMuxD3F83CK/4b/CdoJ2hb8CnwiTIyM5Iff8yczNxSVlJu
Nm02i8P2h72EJRKwRRfifsScibnts9Kn0yjfyIZfkZ+bhZOFGd0MkgC7ALuIXppeDXq8xZ6L/Rl+MPyR
2xy3iXpperai+qLUyfG4LIw8GvnGY57HVnFDcTk2bjZ0beQBHikeeWV/5QTvpd4nI49FfoRZFnM+5rdd
j91KEV0REzY+Ng5GZgJ5nJmDmZtPgU9dwUPBUsZeRoNLgosNXRO7ILsIOKFMdd4adTzqE7Lv/Pf6b9JM
1wxB0YALgFIQrxyvmlacVrHfer/prnNccxW9FWXZBdhZGZCKQEENQUOzKrMpaKnxR9zFuOeWMyy9JDwl
WJHNxQk4xTilVAJVkkP2hjyLPhP9NvJE5C7PJZ7J4ibikqw8rPDkjMPCazEXYorkveWVWHiISPnMHMxc
qsGqKe7z3Q+Cy75LcSBDXkQcjdjuMMEhStJKUo6JlYmVlZdVQD9Lv8F3je9FeKq8EHvZf5N/j26Grg6P
LA8PutlYgYKbQqjzVOdtyK6GuvxD7IXYlea15v5ixmISXBJcsm5z3PZC5X7FXYx7Grg9cKpZlZkzuxA7
GxMrE4FUAgXIpTuahWDxmPMx011mudiiWQhyzBKzSjMvQQ1BXnQz8QJpG2lPZX/lKMs6y464i3H34y/F
g+syJIsfhh8KPw6yLPxQ+GuQWOSRyNc27Tbd0rbSZizcZJQibHxsvBImEsamFaaVrjNdNwXvDH6A7mMY
BlnqNtttj5yrXDAosaGbRTKQdZYNsOu2WxZ9MvpD3IW43/GX4hHl5MW4n75rfI/pZ+kXsouwC6HrJQuw
cLPwKngqeLvPc18adTLqRfyl+F9IFt73We0zQTdd14BdkIotI25JbgkZBxkHtVC1JLc5brtjz8f+jL0Q
+z1oZ9B6syqzaGEdYX5mdmYqt4qgQDVINcVjocfByBORr63brCulbaW10NVQHYibiNsHbQ+6L24q7oAu
RxPAxs8mJG4iDmp1USehIAMuLi4GeXl5NlNTU347OzsRe3t7UWRsZ2cnbG5uzicrK8vKxcVFXOmCD0hK
SjJ6enoK1NXVqU6aNMlg2rRpxsh48uTJus3NzYqurq68EhISJGd6ADkzAttxL7feAAAAAElFTkSuQmCC
</value>
</data>
<data name="PictureBox10.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABGdJREFUSEtj
YKAyYOFk4Za0knSzzrXOd8x2jJeUlGRgZ2dHV0YFwMjAKKInomlUYJRl32e/wn+Z/0Gf2T4L9eP1rQRV
BQWZ2JnQdVAGBNQEFI2KjHLCj4Qfjz0f+zX+Uvz/iKMR9z2XeU7USdNxENYVFmZkYWRE10c2sGqyKgg/
FH4s7mLcPxAGWQhjR5+Pnm5Wa+bAxs/Ggq6PbODQ77Aw5mzMO5BF6DjuYtzDoB1BU5ynO9uh6yMZcIpy
Sin5KsX5rva9gMWiP3EX4354LPDYb9VkVWpSZmKIrp8kwMrDyifnLBcUtCPoYfSp6G9oln2PPh39InRf
6EXVYNUYLjEuCXT9JAMFT4UI5+nO22POxPyMuxD3F83CK/4b/CdoJ2hb8CnwiTIyM5Iff8yczNxSVlJu
Nm02i8P2h72EJRKwRRfifsScibnts9Kn0yjfyIZfkZ+bhZOFGd0MkgC7ALuIXppeDXq8xZ6L/Rl+MPyR
2xy3iXpperai+qLUyfG4LIw8GvnGY57HVnFDcTk2bjZ0beQBHikeeWV/5QTvpd4nI49FfoRZFnM+5rdd
j91KEV0REzY+Ng5GZgJ5nJmDmZtPgU9dwUPBUsZeRoNLgosNXRO7ILsIOKFMdd4adTzqE7Lv/Pf6b9JM
1wxB0YALgFIQrxyvmlacVrHfer/prnNccxW9FWXZBdhZGZCKQEENQUOzKrMpaKnxR9zFuOeWMyy9JDwl
WJHNxQk4xTilVAJVkkP2hjyLPhP9NvJE5C7PJZ7J4ibikqw8rPDkjMPCazEXYorkveWVWHiISPnMHMxc
qsGqKe7z3Q+Cy75LcSBDXkQcjdjuMMEhStJKUo6JlYmVlZdVQD9Lv8F3je9FeKq8EHvZf5N/j26Grg6P
LA8PutlYgYKbQqjzVOdtyK6GuvxD7IXYlea15v5ixmISXBJcsm5z3PZC5X7FXYx7Grg9cKpZlZkzuxA7
GxMrE4FUAgXIpTuahWDxmPMx011mudiiWQhyzBKzSjMvQQ1BXnQz8QJpG2lPZX/lKMs6y464i3H34y/F
g+syJIsfhh8KPw6yLPxQ+GuQWOSRyNc27Tbd0rbSZizcZJQibHxsvBImEsamFaaVrjNdNwXvDH6A7mMY
BlnqNtttj5yrXDAosaGbRTKQdZYNsOu2WxZ9MvpD3IW43/GX4hHl5MW4n75rfI/pZ+kXsouwC6HrJQuw
cLPwKngqeLvPc18adTLqRfyl+F9IFt73We0zQTdd14BdkIotI25JbgkZBxkHtVC1JLc5brtjz8f+jL0Q
+z1oZ9B6syqzaGEdYX5mdmYqt4qgQDVINcVjocfByBORr63brCulbaW10NVQHYibiNsHbQ+6L24q7oAu
RxPAxs8mJG4iDmp1USehIAMuLi4GeXl5NlNTU347OzsRe3t7UWRsZ2cnbG5uzicrK8vKxcVFXOmCD0hK
SjJ6enoK1NXVqU6aNMlg2rRpxsh48uTJus3NzYqurq68EhISJGd6ADkzAttxL7feAAAAAElFTkSuQmCC
</value>
</data>
<data name="PictureBox9.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABGdJREFUSEtj
YKAyYOFk4Za0knSzzrXOd8x2jJeUlGRgZ2dHV0YFwMjAKKInomlUYJRl32e/wn+Z/0Gf2T4L9eP1rQRV
BQWZ2JnQdVAGBNQEFI2KjHLCj4Qfjz0f+zX+Uvz/iKMR9z2XeU7USdNxENYVFmZkYWRE10c2sGqyKgg/
FH4s7mLcPxAGWQhjR5+Pnm5Wa+bAxs/Ggq6PbODQ77Aw5mzMO5BF6DjuYtzDoB1BU5ynO9uh6yMZcIpy
Sin5KsX5rva9gMWiP3EX4354LPDYb9VkVWpSZmKIrp8kwMrDyifnLBcUtCPoYfSp6G9oln2PPh39InRf
6EXVYNUYLjEuCXT9JAMFT4UI5+nO22POxPyMuxD3F83CK/4b/CdoJ2hb8CnwiTIyM5Iff8yczNxSVlJu
Nm02i8P2h72EJRKwRRfifsScibnts9Kn0yjfyIZfkZ+bhZOFGd0MkgC7ALuIXppeDXq8xZ6L/Rl+MPyR
2xy3iXpperai+qLUyfG4LIw8GvnGY57HVnFDcTk2bjZ0beQBHikeeWV/5QTvpd4nI49FfoRZFnM+5rdd
j91KEV0REzY+Ng5GZgJ5nJmDmZtPgU9dwUPBUsZeRoNLgosNXRO7ILsIOKFMdd4adTzqE7Lv/Pf6b9JM
1wxB0YALgFIQrxyvmlacVrHfer/prnNccxW9FWXZBdhZGZCKQEENQUOzKrMpaKnxR9zFuOeWMyy9JDwl
WJHNxQk4xTilVAJVkkP2hjyLPhP9NvJE5C7PJZ7J4ibikqw8rPDkjMPCazEXYorkveWVWHiISPnMHMxc
qsGqKe7z3Q+Cy75LcSBDXkQcjdjuMMEhStJKUo6JlYmVlZdVQD9Lv8F3je9FeKq8EHvZf5N/j26Grg6P
LA8PutlYgYKbQqjzVOdtyK6GuvxD7IXYlea15v5ixmISXBJcsm5z3PZC5X7FXYx7Grg9cKpZlZkzuxA7
GxMrE4FUAgXIpTuahWDxmPMx011mudiiWQhyzBKzSjMvQQ1BXnQz8QJpG2lPZX/lKMs6y464i3H34y/F
g+syJIsfhh8KPw6yLPxQ+GuQWOSRyNc27Tbd0rbSZizcZJQibHxsvBImEsamFaaVrjNdNwXvDH6A7mMY
BlnqNtttj5yrXDAosaGbRTKQdZYNsOu2WxZ9MvpD3IW43/GX4hHl5MW4n75rfI/pZ+kXsouwC6HrJQuw
cLPwKngqeLvPc18adTLqRfyl+F9IFt73We0zQTdd14BdkIotI25JbgkZBxkHtVC1JLc5brtjz8f+jL0Q
+z1oZ9B6syqzaGEdYX5mdmYqt4qgQDVINcVjocfByBORr63brCulbaW10NVQHYibiNsHbQ+6L24q7oAu
RxPAxs8mJG4iDmp1USehIAMuLi4GeXl5NlNTU347OzsRe3t7UWRsZ2cnbG5uzicrK8vKxcVFXOmCD0hK
SjJ6enoK1NXVqU6aNMlg2rRpxsh48uTJus3NzYqurq68EhISJGd6ADkzAttxL7feAAAAAElFTkSuQmCC
</value> </value>
</data> </data>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> <data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">

View File

@@ -318,7 +318,8 @@ Public Class frmStartOptions
Dim f As New frmInfo(PARAM) Dim f As New frmInfo(PARAM)
f.Show() f.Show()
VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = False VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = False
getUID_Pruefung(MyTextBox1.Text) Dim finanzonline = True
getUID_Pruefung(MyTextBox1.Text, finanzonline)
closeMe() closeMe()
Case "WOELFL_USTVAntraege" Case "WOELFL_USTVAntraege"
Dim f As New frmInfo(PARAM) Dim f As New frmInfo(PARAM)
@@ -2582,6 +2583,7 @@ Public Class frmStartOptions
ElseIf betreff.ToString.Contains("ABD - Ausfuhrbegleitdokument (DE), ") Then ElseIf betreff.ToString.Contains("ABD - Ausfuhrbegleitdokument (DE), ") Then
betreff = betreff.replace("WG: ", "") betreff = betreff.replace("WG: ", "")
betreff = betreff.replace("FW: ", "") betreff = betreff.replace("FW: ", "")
betreff = betreff.replace("*00*", "")
betreff = betreff.replace("ABD - Ausfuhrbegleitdokument (DE), ", "") betreff = betreff.replace("ABD - Ausfuhrbegleitdokument (DE), ", "")
If betreff.ToString.Contains(",") Then If betreff.ToString.Contains(",") Then
Dim sp = betreff.ToString.Split(",") Dim sp = betreff.ToString.Split(",")
@@ -3079,11 +3081,11 @@ Public Class frmStartOptions
End Function End Function
Function getUID_Pruefung(maxAnz As Integer) As Boolean Function getUID_Pruefung(maxAnz As Integer, Optional finanzOnline As Boolean = True) As Boolean
getUID_Pruefung(maxAnz, "VERAG", "UID Prüfung VERAG", "as@verag.ag;ih@verag.ag;kb@verag.ag", "al@verag.ag",,, True) getUID_Pruefung(maxAnz, "VERAG", "UID Prüfung VERAG", "as@verag.ag;ih@verag.ag;kb@verag.ag", "al@verag.ag",,, True, finanzOnline)
getUID_Pruefung(maxAnz, "IMEX", "UID Prüfung IMEX", "Viktoria.Leirich@imex-group.at;as@verag.ag;kb@verag.ag", "al@verag.ag",,, True) getUID_Pruefung(maxAnz, "IMEX", "UID Prüfung IMEX", "Viktoria.Leirich@imex-group.at;as@verag.ag;kb@verag.ag", "al@verag.ag",,, True, finanzOnline)
getUID_Pruefung(maxAnz, "AMBAR", "UID Prüfung AMBAR", "as@verag.ag", "al@verag.ag",,, True) getUID_Pruefung(maxAnz, "AMBAR", "UID Prüfung AMBAR", "as@verag.ag", "al@verag.ag",,, True, finanzOnline)
getUID_Pruefung(maxAnz, "UNISPED", "UID Prüfung UNISPED", "al@verag.ag", "al@verag.ag",,, True) getUID_Pruefung(maxAnz, "UNISPED", "UID Prüfung UNISPED", "al@verag.ag", "al@verag.ag",,, True, finanzOnline)
'getUID_Pruefung(maxAnz, "VERAG", "UID Prüfung VERAG", "mm@verag.ag;la@verag.ag", "al@verag.ag") 'getUID_Pruefung(maxAnz, "VERAG", "UID Prüfung VERAG", "mm@verag.ag;la@verag.ag", "al@verag.ag")
End Function End Function
@@ -3222,12 +3224,12 @@ Public Class frmStartOptions
Private Function ValidateServerCertificate(sender As Object, certificate As X509Certificate, chain As X509Chain, sslPolicyErrors As SslPolicyErrors) As Boolean Private Function ValidateServerCertificate(sender As Object, certificate As X509Certificate, chain As X509Chain, sslPolicyErrors As SslPolicyErrors) As Boolean
Return True Return True
End Function End Function
Function getUID_Pruefung(maxAnz As Integer, Mail_FIMRA As String, Mail_betreff As String, Mail_To As String, Optional Mail_CC As String = "", Optional Mail_BCC As String = "", Optional TageZurueck As String = "", Optional setKundenvermerk As Boolean = False) As Boolean Function getUID_Pruefung(maxAnz As Integer, Mail_FIMRA As String, Mail_betreff As String, Mail_To As String, Optional Mail_CC As String = "", Optional Mail_BCC As String = "", Optional TageZurueck As String = "", Optional setKundenvermerk As Boolean = False, Optional finanzOnline As Boolean = True) As Boolean
Dim firmatmp = VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA Dim firmatmp = VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA
Try Try
VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = Mail_FIMRA VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = Mail_FIMRA
Dim dateBack = If(TageZurueck <> "", CDate(Now.AddDays(TageZurueck * -1)), Nothing) Dim dateBack = If(TageZurueck <> "", CDate(Now.AddDays(TageZurueck * -1)), Nothing)
Dim dt = VERAG_PROG_ALLGEMEIN.cUIDPruefung.doUIDPruefungALL(dateBack, True, False, maxAnz, False) Dim dt = VERAG_PROG_ALLGEMEIN.cUIDPruefung.doUIDPruefungALL(dateBack, True, False, maxAnz, False, finanzOnline)
If dt IsNot Nothing AndAlso dt.Rows.Count > 0 Then If dt IsNot Nothing AndAlso dt.Rows.Count > 0 Then
Dim PDF = VERAG_PROG_ALLGEMEIN.cProgramFunctions.genExcelFromDT_NEW(dt,,,,, False) Dim PDF = VERAG_PROG_ALLGEMEIN.cProgramFunctions.genExcelFromDT_NEW(dt,,,,, False)
If PDF <> "" Then If PDF <> "" Then
@@ -3684,7 +3686,7 @@ Public Class frmStartOptions
Private Sub LinkLabel20_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LinkLabel20.LinkClicked Private Sub LinkLabel20_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LinkLabel20.LinkClicked
VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = False VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = False
Dim bool = getUID_Pruefung(MyTextBox1.Text, "VERAG", "UID Prüfung VERAG", "as@verag.ag;kb@verag.ag", "al@verag.ag;d.breimaier@verag.ag",, MyTextBox2._value, cbxVermerk.Checked) Dim bool = getUID_Pruefung(MyTextBox1.Text, "VERAG", "UID Prüfung VERAG", "as@verag.ag;kb@verag.ag", "al@verag.ag;d.breimaier@verag.ag",, MyTextBox2._value, cbxVermerk.Checked, cbxUseUIDFinanzOnline.Checked)
'bool = getUID_Pruefung(MyTextBox1.Text, "VERAG", "UID Prüfung VERAG", "d.breimaier@verag.ag",,, MyTextBox2._value, cbxVermerk.Checked) 'bool = getUID_Pruefung(MyTextBox1.Text, "VERAG", "UID Prüfung VERAG", "d.breimaier@verag.ag",,, MyTextBox2._value, cbxVermerk.Checked)
'Dim bool = getUID_PruefungVERAG(MyTextBox1.Text) 'Dim bool = getUID_PruefungVERAG(MyTextBox1.Text)
showPic(bool, PictureBox12) showPic(bool, PictureBox12)
@@ -4168,12 +4170,12 @@ Public Class frmStartOptions
Private Sub LinkLabel32_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LinkLabel32.LinkClicked Private Sub LinkLabel32_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LinkLabel32.LinkClicked
VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = False VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = False
' Dim bool = getUID_PruefungIMEX(MyTextBox1.Text) ' Dim bool = getUID_PruefungIMEX(MyTextBox1.Text)
Dim bool = getUID_Pruefung(MyTextBox1.Text, "IMEX", "UID Prüfung IMEX", "Viktoria.Leirich@imex-group.at;as@verag.ag;kb@verag.ag", "al@verag.ag;d.breimaier@verag.ag",, MyTextBox2._value, cbxVermerk.Checked) Dim bool = getUID_Pruefung(MyTextBox1.Text, "IMEX", "UID Prüfung IMEX", "Viktoria.Leirich@imex-group.at;as@verag.ag;kb@verag.ag", "al@verag.ag;d.breimaier@verag.ag",, MyTextBox2._value, cbxVermerk.Checked, cbxUseUIDFinanzOnline.Checked)
showPic(bool, PictureBox12) showPic(bool, PictureBox12)
End Sub End Sub
Private Sub LinkLabel33_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LinkLabel33.LinkClicked Private Sub LinkLabel33_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LinkLabel33.LinkClicked
VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = False VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = False
Dim bool = getUID_Pruefung(MyTextBox1.Text, "AMBAR", "UID Prüfung AMBAR", "io@ambarlog.de", , "al@verag.ag;as@verag.ag", MyTextBox2._value, cbxVermerk.Checked) Dim bool = getUID_Pruefung(MyTextBox1.Text, "AMBAR", "UID Prüfung AMBAR", "io@ambarlog.de", , "al@verag.ag;as@verag.ag", MyTextBox2._value, cbxVermerk.Checked, cbxUseUIDFinanzOnline.Checked)
showPic(bool, PictureBox12) showPic(bool, PictureBox12)
End Sub End Sub
@@ -4324,7 +4326,7 @@ Public Class frmStartOptions
Private Sub LinkLabel36_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LinkLabel36.LinkClicked Private Sub LinkLabel36_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LinkLabel36.LinkClicked
VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = False VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = False
Dim bool = getUID_Pruefung(MyTextBox1.Text, "UNISPED", "UID Prüfung UNISPED", "al@verag.ag", "al@verag.ag",, MyTextBox2._value, cbxVermerk.Checked) Dim bool = getUID_Pruefung(MyTextBox1.Text, "UNISPED", "UID Prüfung UNISPED", "al@verag.ag", "al@verag.ag",, MyTextBox2._value, cbxVermerk.Checked, cbxUseUIDFinanzOnline.Checked)
showPic(bool, PictureBox12) showPic(bool, PictureBox12)
End Sub End Sub