Formularmanager Vollmachten Feld ausgeblendet

This commit is contained in:
2023-05-23 09:00:15 +02:00
parent 8ab2f060ec
commit ead13402bd
5 changed files with 13 additions and 4 deletions

View File

@@ -145,6 +145,7 @@ Partial Class usrcntlVollmacht_GB_IE
Me.Label7.Size = New System.Drawing.Size(239, 13)
Me.Label7.TabIndex = 26
Me.Label7.Text = "aufgeschobene VAT Meldung und Zahlung (UK):"
Me.Label7.Visible = False
'
'btn
'
@@ -467,13 +468,14 @@ Partial Class usrcntlVollmacht_GB_IE
'cbxPostponed
'
Me.cbxPostponed._allowedValuesFreiText = Nothing
Me.cbxPostponed._allowFreiText = False
Me.cbxPostponed._allowFreiText = True
Me.cbxPostponed._value = ""
Me.cbxPostponed.FormattingEnabled = True
Me.cbxPostponed.Location = New System.Drawing.Point(915, 160)
Me.cbxPostponed.Name = "cbxPostponed"
Me.cbxPostponed.Size = New System.Drawing.Size(48, 21)
Me.cbxPostponed.TabIndex = 31
Me.cbxPostponed.Visible = False
'
'usrcntlVollmacht_GB_IE
'

View File

@@ -90,6 +90,9 @@
cboSprache.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Englisch", "EN"))
cbxPostponed.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("JA", "JA"))
cbxPostponed.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("NEIN", "NEIN"))
cbxPostponed.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("", ""))
cbxPostponed.changeItem("")
If KdNR > 0 Then initKdNR(KdNR)
End Sub

View File

@@ -415,13 +415,14 @@ Partial Class usrcntlVollmacht_GB_indirekt
'cbxPostponed
'
Me.cbxPostponed._allowedValuesFreiText = Nothing
Me.cbxPostponed._allowFreiText = False
Me.cbxPostponed._allowFreiText = True
Me.cbxPostponed._value = ""
Me.cbxPostponed.FormattingEnabled = True
Me.cbxPostponed.Location = New System.Drawing.Point(915, 158)
Me.cbxPostponed.Name = "cbxPostponed"
Me.cbxPostponed.Size = New System.Drawing.Size(48, 21)
Me.cbxPostponed.TabIndex = 36
Me.cbxPostponed.Visible = False
'
'Label7
'
@@ -431,6 +432,7 @@ Partial Class usrcntlVollmacht_GB_indirekt
Me.Label7.Size = New System.Drawing.Size(239, 13)
Me.Label7.TabIndex = 35
Me.Label7.Text = "aufgeschobene VAT Meldung und Zahlung (UK):"
Me.Label7.Visible = False
'
'txtZahlungsaufschung
'

View File

@@ -90,6 +90,8 @@
cboSprache.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Englisch", "EN"))
cbxPostponed.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("JA", "JA"))
cbxPostponed.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("NEIN", "NEIN"))
cbxPostponed.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("", ""))
cbxPostponed.changeItem("")
If KdNR > 0 Then initKdNR(KdNR)
End Sub

View File

@@ -3412,7 +3412,7 @@ Public Class FormularManagerNEU
If usrCntl.cbxPostponed._value = "JA" Then
listTowrite.Add(New VERAG_PROG_ALLGEMEIN.cPDFWriteValues("x", 70, 118.5 + add, 3, 6, "bold", 10, , itextsharp.text.Element.ALIGN_LEFT))
Else
ElseIf usrCntl.cbxPostponed._value = "NEIN" Then
listTowrite.Add(New VERAG_PROG_ALLGEMEIN.cPDFWriteValues("x", 86, 118.5 + add, 3, 6, "bold", 10, , itextsharp.text.Element.ALIGN_LEFT))
End If
@@ -3467,7 +3467,7 @@ Public Class FormularManagerNEU
If usrCntl.cbxPostponed._value = "JA" Then
listTowrite.Add(New VERAG_PROG_ALLGEMEIN.cPDFWriteValues("x", 70, 118.5 + add, 3, 6, "bold", 10, , itextsharp.text.Element.ALIGN_LEFT))
Else
ElseIf usrCntl.cbxPostponed._value = "NEIN" Then
listTowrite.Add(New VERAG_PROG_ALLGEMEIN.cPDFWriteValues("x", 86, 118.5 + add, 3, 6, "bold", 10, , itextsharp.text.Element.ALIGN_LEFT))
End If