Neue Auftragsposition
Die Funktion übernimmt die gleiche Aufgabe wie AufPosNeu(). Übergeben wird im Gegensatz zu AufPosNeu() ein Datenmodul.
|
Parameter |
Beschreibung |
|---|---|
|
oDM:O |
Kontainer/Datenmodul-Objekt |
|
nAufNummer:N |
Auftragsnummer |
|
cArtNr:C |
Artikelnummer |
|
lKeepInsertMode:L |
Datensatz nach Neuanlage im Insert-Modus lassen; default = false
|
|
lModifyVarSL:L |
Dialog zum Verändern von Sets/Varianten anzeigen; default = false |
|
lAppendVarSL:L |
Auftragsstückliste bei Neuanlage füllen; default = false |
|
lQuiet:L |
Funktionseigene Exceptionmeldungen unterdrücken; default = True |
|
nAufPosNr:N |
zu vergebene Auftragspositions-Nummer; default = -1
|
|
lResetTableStates:L |
Verwendete Tabellen nach dem Aufruf der Funktion auf ursprünglichen Stand zurück setzen; default = false |
|
lUseStandardPost:L |
Ab 7.4.2.20 / 7.5.1.4: Bei lKeepInsertMode = false: Definiert, wie die Auftragsposition gespeichert und gepostet wird:
|
Rückgabewert
Numerisch - Neue Positions Nr.
Beispiel
| oDM, oDAB055, nPosNr |
//neue AufPos mit Bestellmenge = 5
oDM := CreateObject('TBeDbGet'),
oDAB055 := DBGetTable(oDM, waDAB055,),
startseq,
DBStartTrans(oDM.ADSConnection),
nPosNr := AufPosNeu2(oDM, 4711, '4711', true, false, false),
if nPosNr > 0 then
oDAB055:BMENGE := 5,
AufPosPost2(oDM, 4711, nPosNr, false, false),
endif,
DBCommit(oDM.ADSConnection),
onerror,
writeln(getErrorText(getErrorObj())),
DbCancelAll(oDM),
DBRollBack(oDM.ADSConnection),
stopseq,
Weitere Verknüpfungen