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

neu

Browse Source
This commit is contained in:
Andreas Luxbauer
2020-12-13 21:32:29 +01:00
parent 0be9927381
commit 3bc1c8a309
48 changed files with 19407 additions and 302 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
VERAG_PROG_ALLGEMEIN/Classes/cOfferte.vb
View File

@@ -245,6 +245,8 @@ Public Class cOfferte
P.BGebMinBetrag = r("BGebMinBetrag")
P.Eingegeben_am = Now
'P.Geändert_am = XXXXXXXXX
If r("BerechnungsartPosInkludiert") IsNot DBNull.Value Then P.BerechnungsartPosInkludiert = r("BerechnungsartPosInkludiert")
If r("BerechnungsartNr") IsNot DBNull.Value Then P.BerechnungsartNr = r("BerechnungsartNr") 'Falls hier, dann übernommen, sonst von Leistung
P.Sachbearbeiter = Sachbearbeiter
'P.Preisänderung = XXXXXXXXX
'P.PreisänderungProzent = XXXXXXXXX
@@ -285,6 +287,8 @@ Public Class cOfferte
P.Eingegeben_am = Now
'P.Geändert_am = XXXXXXXXX
P.Sachbearbeiter = Sachbearbeiter
If r("BerechnungsartPosInkludiert") IsNot DBNull.Value Then P.BerechnungsartPosInkludiert = r("BerechnungsartPosInkludiert")
If r("BerechnungsartNr") IsNot DBNull.Value Then P.BerechnungsartNr = r("BerechnungsartNr") 'Falls hier, dann übernommen, sonst von Leistung
'P.Preisänderung = XXXXXXXXX
'P.PreisänderungProzent = XXXXXXXXX
'P.PreisAlt = XXXXXXXXX
@@ -320,6 +324,7 @@ Public Class cOffertPosition
Property Preisänderung As Object = Nothing
Property PreisänderungProzent As Object = Nothing
Property PreisAlt As Object = Nothing
Property BerechnungsartPosInkludiert As Object = Nothing
Dim SQL As New SQL
@@ -346,6 +351,7 @@ Public Class cOffertPosition
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("Preisänderung", Preisänderung))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("PreisänderungProzent", PreisänderungProzent))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("PreisAlt", PreisAlt))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("BerechnungsartPosInkludiert", BerechnungsartPosInkludiert))
Return list
End Function