BH, Kundenkontakte, MD;

This commit is contained in:
2024-09-11 11:58:25 +02:00
parent 3ad1e4dbfc
commit d3174821d3
28 changed files with 1149 additions and 784 deletions

View File

@@ -36,14 +36,14 @@ Public Class usrCntlOfferte
End Sub
Public Sub init(kdNr As Integer, Optional isVerag360 As Boolean = False)
Public Sub init(kdNr As Integer, Optional _isVerag360 As Boolean = False)
Me.kdNr = kdNr
initDGVOfferte()
edit = False
handleEditMode(edit)
KD_ERW = New VERAG_PROG_ALLGEMEIN.cKundenErweitert(kdNr)
cbxAutoFakturierung.Checked = KD_ERW.AutoFakturierung
isVerag360 = isVerag360
isVerag360 = _isVerag360
End Sub
Sub initDGVOfferte()
@@ -187,7 +187,7 @@ Public Class usrCntlOfferte
Private Sub usrCntlOfferte_Load(sender As Object, e As EventArgs) Handles Me.Load
init(kdNr)
init(kdNr, isVerag360)
' sbLeistungAdd.initSearchBox(Me.FindForm, " [Code] ,[LeistungsNr],[LeistungsBez] FROM [Leistungen]", {"LeistungsNr", "LeistungsBez"}, " ", "LeistungsNr", "LeistungsNr", , "FMZOLL", , 400, 200)
cboLeistungenAdd.fillWithSQL("SELECT [LeistungsNr],[LeistungsBez] FROM [Leistungen] ORDER BY LeistungsNr", , "FMZOLL", True)