edv/SDL
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Sicherheitsprüfung bei Offerten

Browse Source
This commit is contained in:
d.breimaier
2024-02-07 10:32:33 +01:00
parent 92ef912f64
commit 341c8a9667
1 changed files with 3 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
SDL/kunden/usrCntlOfferte.vb
View File

@@ -415,9 +415,12 @@ Public Class usrCntlOfferte
Private Sub btnStandardLaden_Click(sender As Object, e As EventArgs) Handles btnStandardLaden.Click Private Sub btnStandardLaden_Click(sender As Object, e As EventArgs) Handles btnStandardLaden.Click
Dim KUNDE As New VERAG_PROG_ALLGEMEIN.cKunde(kdNr) Dim KUNDE As New VERAG_PROG_ALLGEMEIN.cKunde(kdNr)
Dim FIRMA_TMP = VERAG_PROG_ALLGEMEIN.cAllgemein.getFirmaFromFiliale(KUNDE.FilialenNr) Dim FIRMA_TMP = VERAG_PROG_ALLGEMEIN.cAllgemein.getFirmaFromFiliale(KUNDE.FilialenNr)
If Not vbYes = MsgBox("Möchten Sie die Standardofferte für den Kunden " & KUNDE.KundenNr & " laden?" & vbNewLine & "Aktuelle Offerteneinstellungen werden gelöscht.", vbYesNo) Then Exit Sub
edit = True edit = True
handleEditMode(edit) handleEditMode(edit)
@@ -431,7 +434,6 @@ Public Class usrCntlOfferte
currentOffert.LOAD_POSITIONEN() currentOffert.LOAD_POSITIONEN()
If currentOffert.POSITIONEN.Count = 0 Then ' If currentOffert.POSITIONEN.Count = 0 Then '
currentOffert.RESET_STANDARTOFFERTEN_FIRMA(VERAG_PROG_ALLGEMEIN.cAllgemein.USRKURZNAME, FIRMA_TMP) currentOffert.RESET_STANDARTOFFERTEN_FIRMA(VERAG_PROG_ALLGEMEIN.cAllgemein.USRKURZNAME, FIRMA_TMP)
End If End If
dgvOfferteNew.GetOrder() dgvOfferteNew.GetOrder()