Fiskalkunden - Untervollmachten

2023-06-16 10:30:51 +02:00
parent 60c14ac5a3
commit 874898b753
5 changed files with 359 additions and 121 deletions
--- a/SDL/kunden/usrcntlFiskaluebersicht.Designer.vb
+++ b/SDL/kunden/usrcntlFiskaluebersicht.Designer.vb
@@ -39,6 +39,8 @@ Partial Class usrcntlFiskaluebersicht
        Me.btnPDFReport = New System.Windows.Forms.Button()
        Me.dgvFiskaluebersicht = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
        Me.MyPanel2 = New VERAG_PROG_ALLGEMEIN.MyPanel(Me.components)
+        Me.cbxUntervm = New System.Windows.Forms.CheckBox()
+        Me.txtUVM = New VERAG_PROG_ALLGEMEIN.MyTextBox()
        Me.picOKSt = New System.Windows.Forms.PictureBox()
        Me.Button3 = New System.Windows.Forms.Button()
        Me.txtSteuerberater = New VERAG_PROG_ALLGEMEIN.MyTextBox()
@@ -284,6 +286,8 @@ Partial Class usrcntlFiskaluebersicht
        Me.MyPanel2.AutoScrollMinSize = New System.Drawing.Size(0, 10)
        Me.MyPanel2.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink
        Me.MyPanel2.BackColor = System.Drawing.Color.White
+        Me.MyPanel2.Controls.Add(Me.cbxUntervm)
+        Me.MyPanel2.Controls.Add(Me.txtUVM)
        Me.MyPanel2.Controls.Add(Me.picOKSt)
        Me.MyPanel2.Controls.Add(Me.Button3)
        Me.MyPanel2.Controls.Add(Me.txtSteuerberater)
@@ -339,6 +343,43 @@ Partial Class usrcntlFiskaluebersicht
        Me.MyPanel2.Size = New System.Drawing.Size(721, 657)
        Me.MyPanel2.TabIndex = 110
        '
+        'cbxUntervm
+        '
+        Me.cbxUntervm.AutoSize = True
+        Me.cbxUntervm.Enabled = False
+        Me.cbxUntervm.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.cbxUntervm.Location = New System.Drawing.Point(421, 71)
+        Me.cbxUntervm.Name = "cbxUntervm"
+        Me.cbxUntervm.Size = New System.Drawing.Size(160, 17)
+        Me.cbxUntervm.TabIndex = 182
+        Me.cbxUntervm.Text = "aktuelle Untervollmacht"
+        Me.cbxUntervm.UseVisualStyleBackColor = True
+        '
+        'txtUVM
+        '
+        Me.txtUVM._DateTimeOnly = False
+        Me.txtUVM._numbersOnly = False
+        Me.txtUVM._numbersOnlyKommastellen = ""
+        Me.txtUVM._numbersOnlyTrennzeichen = False
+        Me.txtUVM._Prozent = False
+        Me.txtUVM._ShortDateNew = False
+        Me.txtUVM._ShortDateOnly = True
+        Me.txtUVM._TimeOnly = False
+        Me.txtUVM._TimeOnly_Seconds = False
+        Me.txtUVM._value = ""
+        Me.txtUVM._Waehrung = False
+        Me.txtUVM._WaehrungZeichen = False
+        Me.txtUVM.ForeColor = System.Drawing.Color.Black
+        Me.txtUVM.Location = New System.Drawing.Point(587, 69)
+        Me.txtUVM.MaxLength = 10
+        Me.txtUVM.MaxLineLength = -1
+        Me.txtUVM.MaxLines_Warning = ""
+        Me.txtUVM.MaxLines_Warning_Label = Nothing
+        Me.txtUVM.Name = "txtUVM"
+        Me.txtUVM.ReadOnly = True
+        Me.txtUVM.Size = New System.Drawing.Size(68, 20)
+        Me.txtUVM.TabIndex = 183
+        '
        'picOKSt
        '
        Me.picOKSt.BackgroundImage = Global.SDL.My.Resources.Resources.ok
@@ -400,18 +441,18 @@ Partial Class usrcntlFiskaluebersicht
        '
        Me.cbxVMOriginal.AutoSize = True
        Me.cbxVMOriginal.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.cbxVMOriginal.Location = New System.Drawing.Point(417, 72)
+        Me.cbxVMOriginal.Location = New System.Drawing.Point(421, 91)
        Me.cbxVMOriginal.Name = "cbxVMOriginal"
-        Me.cbxVMOriginal.Size = New System.Drawing.Size(215, 17)
+        Me.cbxVMOriginal.Size = New System.Drawing.Size(237, 17)
        Me.cbxVMOriginal.TabIndex = 177
-        Me.cbxVMOriginal.Text = "Vollmacht im Original vorhanden?"
+        Me.cbxVMOriginal.Text = "Vollmacht(en) im Original vorhanden?"
        Me.cbxVMOriginal.UseVisualStyleBackColor = True
        '
        'lblBon
        '
        Me.lblBon.AutoSize = True
        Me.lblBon.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.lblBon.Location = New System.Drawing.Point(538, 28)
+        Me.lblBon.Location = New System.Drawing.Point(542, 28)
        Me.lblBon.Name = "lblBon"
        Me.lblBon.Size = New System.Drawing.Size(11, 13)
        Me.lblBon.TabIndex = 139
@@ -535,7 +576,7 @@ Partial Class usrcntlFiskaluebersicht
        '
        Me.lblAnmerkungen.AutoSize = True
        Me.lblAnmerkungen.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.lblAnmerkungen.Location = New System.Drawing.Point(294, 464)
+        Me.lblAnmerkungen.Location = New System.Drawing.Point(283, 464)
        Me.lblAnmerkungen.Name = "lblAnmerkungen"
        Me.lblAnmerkungen.Size = New System.Drawing.Size(120, 20)
        Me.lblAnmerkungen.TabIndex = 166
@@ -632,12 +673,12 @@ Partial Class usrcntlFiskaluebersicht
        Me.txtKredit._Waehrung = True
        Me.txtKredit._WaehrungZeichen = True
        Me.txtKredit.ForeColor = System.Drawing.Color.Black
-        Me.txtKredit.Location = New System.Drawing.Point(144, 165)
+        Me.txtKredit.Location = New System.Drawing.Point(155, 165)
        Me.txtKredit.MaxLineLength = -1
        Me.txtKredit.MaxLines_Warning = ""
        Me.txtKredit.MaxLines_Warning_Label = Nothing
        Me.txtKredit.Name = "txtKredit"
-        Me.txtKredit.Size = New System.Drawing.Size(97, 20)
+        Me.txtKredit.Size = New System.Drawing.Size(86, 20)
        Me.txtKredit.TabIndex = 160
        '
        'txtAnzMA
@@ -655,12 +696,12 @@ Partial Class usrcntlFiskaluebersicht
        Me.txtAnzMA._Waehrung = False
        Me.txtAnzMA._WaehrungZeichen = False
        Me.txtAnzMA.ForeColor = System.Drawing.Color.Black
-        Me.txtAnzMA.Location = New System.Drawing.Point(144, 139)
+        Me.txtAnzMA.Location = New System.Drawing.Point(155, 139)
        Me.txtAnzMA.MaxLineLength = -1
        Me.txtAnzMA.MaxLines_Warning = ""
        Me.txtAnzMA.MaxLines_Warning_Label = Nothing
        Me.txtAnzMA.Name = "txtAnzMA"
-        Me.txtAnzMA.Size = New System.Drawing.Size(97, 20)
+        Me.txtAnzMA.Size = New System.Drawing.Size(86, 20)
        Me.txtAnzMA.TabIndex = 159
        '
        'Label9
@@ -688,12 +729,12 @@ Partial Class usrcntlFiskaluebersicht
        Me.txtWaren._Waehrung = False
        Me.txtWaren._WaehrungZeichen = True
        Me.txtWaren.ForeColor = System.Drawing.Color.Black
-        Me.txtWaren.Location = New System.Drawing.Point(143, 214)
+        Me.txtWaren.Location = New System.Drawing.Point(155, 214)
        Me.txtWaren.MaxLineLength = -1
        Me.txtWaren.MaxLines_Warning = ""
        Me.txtWaren.MaxLines_Warning_Label = Nothing
        Me.txtWaren.Name = "txtWaren"
-        Me.txtWaren.Size = New System.Drawing.Size(512, 20)
+        Me.txtWaren.Size = New System.Drawing.Size(500, 20)
        Me.txtWaren.TabIndex = 157
        '
        'Label8
@@ -721,13 +762,13 @@ Partial Class usrcntlFiskaluebersicht
        Me.txtGruendungsjahr._Waehrung = False
        Me.txtGruendungsjahr._WaehrungZeichen = False
        Me.txtGruendungsjahr.ForeColor = System.Drawing.Color.Black
-        Me.txtGruendungsjahr.Location = New System.Drawing.Point(144, 113)
+        Me.txtGruendungsjahr.Location = New System.Drawing.Point(155, 113)
        Me.txtGruendungsjahr.MaxLength = 10
        Me.txtGruendungsjahr.MaxLineLength = -1
        Me.txtGruendungsjahr.MaxLines_Warning = ""
        Me.txtGruendungsjahr.MaxLines_Warning_Label = Nothing
        Me.txtGruendungsjahr.Name = "txtGruendungsjahr"
-        Me.txtGruendungsjahr.Size = New System.Drawing.Size(97, 20)
+        Me.txtGruendungsjahr.Size = New System.Drawing.Size(86, 20)
        Me.txtGruendungsjahr.TabIndex = 155
        '
        'Label7
@@ -755,12 +796,12 @@ Partial Class usrcntlFiskaluebersicht
        Me.txtGeschaeftszweck._Waehrung = False
        Me.txtGeschaeftszweck._WaehrungZeichen = True
        Me.txtGeschaeftszweck.ForeColor = System.Drawing.Color.Black
-        Me.txtGeschaeftszweck.Location = New System.Drawing.Point(143, 191)
+        Me.txtGeschaeftszweck.Location = New System.Drawing.Point(155, 191)
        Me.txtGeschaeftszweck.MaxLineLength = -1
        Me.txtGeschaeftszweck.MaxLines_Warning = ""
        Me.txtGeschaeftszweck.MaxLines_Warning_Label = Nothing
        Me.txtGeschaeftszweck.Name = "txtGeschaeftszweck"
-        Me.txtGeschaeftszweck.Size = New System.Drawing.Size(512, 20)
+        Me.txtGeschaeftszweck.Size = New System.Drawing.Size(500, 20)
        Me.txtGeschaeftszweck.TabIndex = 153
        '
        'Label5
@@ -808,9 +849,9 @@ Partial Class usrcntlFiskaluebersicht
        '
        'rtbAnmerkung
        '
-        Me.rtbAnmerkung.Location = New System.Drawing.Point(298, 487)
+        Me.rtbAnmerkung.Location = New System.Drawing.Point(287, 487)
        Me.rtbAnmerkung.Name = "rtbAnmerkung"
-        Me.rtbAnmerkung.Size = New System.Drawing.Size(403, 99)
+        Me.rtbAnmerkung.Size = New System.Drawing.Size(414, 107)
        Me.rtbAnmerkung.TabIndex = 130
        Me.rtbAnmerkung.Text = ""
        '
@@ -866,7 +907,7 @@ Partial Class usrcntlFiskaluebersicht
        Me.cbxVollmacht.AutoSize = True
        Me.cbxVollmacht.Enabled = False
        Me.cbxVollmacht.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.cbxVollmacht.Location = New System.Drawing.Point(417, 49)
+        Me.cbxVollmacht.Location = New System.Drawing.Point(421, 49)
        Me.cbxVollmacht.Name = "cbxVollmacht"
        Me.cbxVollmacht.Size = New System.Drawing.Size(130, 17)
        Me.cbxVollmacht.TabIndex = 103
@@ -913,7 +954,7 @@ Partial Class usrcntlFiskaluebersicht
        Me.cbxBonitaet.AutoSize = True
        Me.cbxBonitaet.Enabled = False
        Me.cbxBonitaet.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.cbxBonitaet.Location = New System.Drawing.Point(417, 26)
+        Me.cbxBonitaet.Location = New System.Drawing.Point(421, 26)
        Me.cbxBonitaet.Name = "cbxBonitaet"
        Me.cbxBonitaet.Size = New System.Drawing.Size(115, 17)
        Me.cbxBonitaet.TabIndex = 101
@@ -1025,13 +1066,13 @@ Partial Class usrcntlFiskaluebersicht
        Me.dgvUnterlagen.AllowUserToResizeRows = False
        Me.dgvUnterlagen.BackgroundColor = System.Drawing.Color.White
        Me.dgvUnterlagen.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
-        Me.dgvUnterlagen.Location = New System.Drawing.Point(13, 487)
+        Me.dgvUnterlagen.Location = New System.Drawing.Point(8, 487)
        Me.dgvUnterlagen.MultiSelect = False
        Me.dgvUnterlagen.Name = "dgvUnterlagen"
        Me.dgvUnterlagen.ReadOnly = True
        Me.dgvUnterlagen.RowHeadersVisible = False
        Me.dgvUnterlagen.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
-        Me.dgvUnterlagen.Size = New System.Drawing.Size(248, 107)
+        Me.dgvUnterlagen.Size = New System.Drawing.Size(268, 107)
        Me.dgvUnterlagen.TabIndex = 115
        '
        'cbxUID
@@ -1173,4 +1214,6 @@ Partial Class usrcntlFiskaluebersicht
    Friend WithEvents cbxVMOriginal As CheckBox
    Friend WithEvents picOKSt As PictureBox
    Friend WithEvents Button3 As Button
+    Friend WithEvents cbxUntervm As CheckBox
+    Friend WithEvents txtUVM As VERAG_PROG_ALLGEMEIN.MyTextBox
 End Class