KundPreisCalc2() – Kunden-Preis
Die Funktion berechnet den Kunden-Netto-Preis (inkl. aller Rabatte, Sonderpreise, Staffeln, usw.) für einen Kunden in Eigenwährung.
|
Parameter |
Beschreibung |
|---|---|
|
oDM:O |
Datenmodul-Objekt |
|
nCustNo:N |
Kunden-Nr. |
|
cArtNo:C |
Artikel-Nr. |
|
nQuant:N |
Preis für Menge (in Lager-Einheiten) |
|
nPreisNr:N |
Zu verwendende Preis-Nr.; default = -1 (Übernahme vom Kunden) |
|
cProgID:C |
Individuelle Prog-ID (wird an aufgerufene Events weitergegeben) |
|
dGueltigPer:D |
Datum, zu welchem die Sonder-Kondition gültig ist (leer = Tagesdatum) |
|
lTriggerOnCalcOrdPosValEvent:L |
Trigger von Codeblock-Event "bei Berechnung des Auftr.Pos.Werts" einschalten. default = true |
Rückgabewert
Numerisch - Netto-Preis in EW
Beispiel
| oDM |
oDM := CreateObject('TbeDbGet'),
startseq
writeln(KundPreisCalc2(oDM, 12345678, 'BSP_ART', 1)),
always
DestroyObject(oDM),
stopseq,
Weitere Verknüpfungen