Änderungen Fiskalübersicht, Norsware-API Verbesserung

SDL/kunden/usrcntlKundeBearbeitenFull.vb

@@ -1511,45 +1511,6 @@ Public Class usrcntlKundeBearbeitenFull
 
         End If
 
-        'Using UserControl1 As usrcntlCreditsafe = New usrcntlCreditsafe()
-        '    Using tmpForm As Form = New Form()
-        '        tmpForm.Width = UserControl1.Width
-        '        tmpForm.Height = UserControl1.Height + 40
-        '        tmpForm.Text = "Creditsafe-Firmensuche"
-        '        tmpForm.StartPosition = tmpForm.StartPosition.CenterParent
-        '        tmpForm.Controls.Add(UserControl1)
-        '        If tmpForm.ShowDialog() = DialogResult.OK Then
-        '            txtKurzname.Text = UserControl1.comp.name & ";" & UserControl1.comp.city
-        '            txtFirmenname1.Text = UserControl1.comp.name
-        '            txtCreditsafe.Text = UserControl1.comp.credissafeId
-        '            txtStrasse.Text = UserControl1.comp.street
-        '            txtOrt.Text = UserControl1.comp.city
-        '            txtPlz.Text = UserControl1.comp.postCode
-        '            txtTel.Text = UserControl1.comp.phoneNo
-
-        '            If UserControl1.comp.country IsNot Nothing Then
-        '                cbxLandKz.changeItem(UserControl1.comp.country.Substring(0, 1))
-        '            End If
-
-
-        '            If UserControl1.comp.vatNo <> "" Then
-        '                cboUSt_UstIdNrLand.changeItem(UserControl1.comp.vatNo.Substring(0, 2))
-
-        '                If UserControl1.comp.country <> "" Then
-        '                    txtUSt_UstIdNr.Text = UserControl1.comp.vatNo.Replace(UserControl1.comp.country, "")
-        '                Else
-        '                    txtUSt_UstIdNr.Text = UserControl1.comp.vatNo
-        '                End If
-        '            End If
-
-
-
-        '        End If
-
-
-        '    End Using
-        'End Using
-
         Cursor = Cursors.Default
 
     End Sub