LBuch()
LBuch() – Lagerbuchung
Funktion zur Lagerbuchung.
Je nach Buchungsart muss unter anderem
- Der entsprechende Dab020-Eintrag "von Hand" erstellt werden.
- Wird eine übergebene Kommissions- oder Platz-Nr. u.U. nicht berücksichtig
- Wie bei allen BE-Lagerbuchungsfunktionen muss sichergestellt sein, dass bei
Übergabe einer Platz-Nr. im Kommiss.Array, die für die Lager-Nr. gültig und verfügbar ist. - Wird eine Größenklasse angegeben, muss diese mit der Lagerort-Größenklasse übereinstimmen.
- Wird eine Reservierungs-ID angegeben, muss ein entsprechend reservierter Lagerort existieren.
Ist ein Lagerort bereits für eine abweichende ID reserviert, wird eine Exception ausgelöst. - Sollte der Buchungsdialog oder alternativ die Kommissions- und Platz-Vorgabe über
das "vor Lagerbuchung"-Ereignis erfolgen
Hinweis
Die Funktion LUmlag() ermöglicht mit einfachen Mitteln vollständige Ein-/Aus- und Umlagerungen per Codeblock.
Im Gegensatz zu LBuch() schreibt LUmlag() die Lagerkartei (DAB020) selbständig fort.
| Parameter | Beschreibung |
|---|---|
oAdsConnect:O | AdsConnection für äußere Transaktion (erforderlich, z.B. Dab010.AdsConnection) |
cArtnr:C | Artikel-Nr. |
cLager:C | Lager-Nr. |
nMenge:N | Menge (+/-) |
dDatum:D | Buchungsdatum |
cBuArt:C | Buchungsart |
cBelegnr:C | Belegnr |
uKommiss:U | Kommission (leer erlaubt) |
nPersnr:N | Kd./Lief.Nr. (Null erlaubt) |
cText:C | Buchungs-Text (leer erlaubt) |
cLagort:C | Vorgabe-Lagerort (nur bei Abgang) |
oDab010:O | Dab010 |
lNoCardPrint:L | Keinen Lagerschein drucken; default = false |
lQuietMode:L | Keinen Buchungsdialog anzeigen; default = false |
lRaiseError:L | Im Fehlerfall Laufzeitfehler auslösen; default = false |
lShowDlgOnErr:L | Bei ungültiger Platzvorgabe (u.ä.) Buchungsdialog anzeigen; default = false |
oDab055:O | Tabellenobjekt DAB055; default = Standard Dab055 |
oDab610:O | Tabellenobjekt DAB610; default = Standard Dab610 |
oDab720:O | Tabellenobjekt DAB720; default = Standard Dab720 |
oDab020:O | Tabellenobjekt DAB020; default = Standard Dab020 |
oDab710:O | Tabellenobjekt DAB710; default = Standard Dab710 |
oDab730:O | Tabellenobjekt DAB730; default = Standard Dab730 |
oDab050:O | Tabellenobjekt DAB050; default = Standard Dab050 |
oDab255:O | Tabellenobjekt DAB255; default = Standard Dab255 |
oDab250:O | Tabellenobjekt DAB250; default = Standard Dab250 |
cProgID:C | Freie Zeichenfolge zur Übergabe an BE-Events; default = Leerstring |
nGroeKlasse:N | Größenklasse; default = 0 |
nReservID:N | Reservierungs-ID; default = 0 |
nEntnSchNr:N | Entn.Schein-Nr.; default |
Rückgabewert
Logisch / Boolean - Lager-Buchungs-Fenster
Beispiel
| oDab010:DB := 'waDAB010, DAB011' |
LBuch(oDab010.AdsConnection,
"01-0015", "00", 10, mbdatum,
"E",
"", "", 0, "", "", oDab010, false, true, false, true)