BestPosNew() – Neuer Bestellrückstand
Die Funktion erzeugt einen neuen Bestellrückstand.
|
Parameter |
Beschreibung |
|---|---|
|
oDM:O |
Datenmodul |
|
nLiefNr:N |
Lieferantennummer |
|
nBestNr:N |
Bestellnummer |
|
cArtNr:C |
Artikelnummer |
|
lKeepInsert:L |
Nach dem Erstellen im Bearbeitungsmodus bleiben; default = false |
|
lQuiet:L |
keine Meldungen anzeigen; default = false |
Rückgabewert
Numerisch - RecID des erstellten Bestellrückstands
Beispiel
| oDM, aKommiss, oDAB035, nID |
oDM := CreateObject('TBeDBget'),
oDAB035 := DBGetTable(oDM, waDAB035,),
startseq,
DBStartTrans(oDM.ADSConnection),
nID := BestPosNew(oDM, 1, 10010, 'TESTARTIKEL1', true),
oDAB035:MENGE := 10,
BestPosPost(oDM, nID),
DBCommit(oDM.ADSConnection),
onerror,
DBRollBack(oDM.ADSConnection),
Meld(GetErrorText()),
stopseq,