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)