ustv, etc.
This commit is contained in:
@@ -174,12 +174,17 @@ Public Class ustCntlUSTV_ErstattungPosition
|
||||
|
||||
If IsNumeric(txtUSTBetragEUR.Text) AndAlso IsNumeric(txtUSTBetrag.Text) Then
|
||||
|
||||
txtUmrechnungskurs.Text = txtUSTBetrag.Text / txtUSTBetragEUR.Text
|
||||
If txtUSTBetrag.Text = 0 AndAlso txtUSTBetragEUR.Text = 0 Then
|
||||
txtUmrechnungskurs.Text = 1
|
||||
Else
|
||||
txtUmrechnungskurs.Text = txtUSTBetrag.Text / txtUSTBetragEUR.Text
|
||||
End If
|
||||
|
||||
|
||||
txtChanged = True
|
||||
End If
|
||||
End If
|
||||
|
||||
ElseIf sender Is txtBelegDatum Then
|
||||
ElseIf sender Is txtBelegDatum Then
|
||||
|
||||
If txtBelegDatum.Text <> "" Then
|
||||
txtBelegDatum.Text = txtBelegDatum.Text.Replace("-", ".")
|
||||
|
||||
Reference in New Issue
Block a user