KundPreisCalcAll()
KundPreisCalcAll() – Kunden-Preis Konditionen
Die Funktion berechnet die Kunden-Preis-Konditionen eines Artikels für einen Kunden in Eigenwährung.
Parameter | Beschreibung |
|---|---|
nCustNo:N | Kunden-Nr. |
cArtNo:C | Artikel-Nr. |
nQuant:N | Menge (in Lager-Einheiten) |
oMem055:O | Tabellenobjekt der Memtable mit Struktur der DAB055; default = nil |
oDab010:O | Tabellenobjekt DAB010; default = Standard Dab010 |
oDab000:O | Tabellenobjekt DAB000; default = Standard Dab000 |
oDab040:O | Tabellenobjekt DAB040; default = Standard Dab040; |
oDab310:O | Tabellenobjekt DAB310; default = Standard Dab310 |
oDab510:O | Tabellenobjekt DAB510; default = Standard Dab510 |
oDab050:O | Tabellenobjekt DAB040; default = Standard Dab050; |
nPreisNr:N | Zu verwendende Preis-Nr.; default = -1 (Übernahme vom Kunden) |
oDab160:O | Tabellenobjekt DAB160; default = Standard Dab160 |
cProgID:C | Individuelle Prog-ID (wird an aufgerufene Events weitergegeben) |
lTriggerOnCalcOrdPosValEvent:L | Trigger von Codeblock-Event "bei Berechnung des Auftr.Pos.Werts" einschalten. default = true |
Rückgabewert
Array- \{ \[ 1\]Währung, \[ 2\]Brutto-Preis, \[ 3\]PE, \[ 4\]\{ PosRab1, PosRab2, PosRab3 \}, \[ 5\]\{ GesRab1, GesRab2 \}, \[ 6\]Nettopreis, \[ 7\]Menge(false)/Wert(true), \[ 8\]Rabatt(false)/Netto(true), \[ 9\]\{ \{ Staffel-Menge1/Wert1, Staffel-Rabatt%1/Netto1 \}, \{ Staffel-Menge2/Wert1, Staffel-Rabatt%2/Netto2 \}, \{...\} \}, \[10\]Kalkulierter-Netto-Preis, \[11\]Dab040-Datensatz-Nr. \[12\]\{ \{ Zusatzkosten-Text1, Zusatzkosten-Typ1, Zusatzkosten1 \}, \{ Zusatzkosten-Text2, Zusatzkosten-Typ2, Zusatzkosten2 \}, \{ Zusatzkosten-Text3, Zusatzkosten-Typ3, Zusatzkosten3 \} \} \}
Beispiel
// Beispiel im Positionsbrowser der Auftragsbearbeitung
| nCustNo:N := 220, cArtNo:C := '', nQuant:N := 0, aResult |
nCustNo := DAB055:KDNR,
cArtNo := DAB055:ARTNR,
nQuant := DAB055:BMENGE,
aResult := KundPreisCalcAll(nCustNo, cArtNo, nQuant),
aResult[6] // Netto-Preis -> entspricht KundPreisCalc()