AufResNeu()
Auftragspositions-Reservierung erstellen
Eine Reservierung für eine Auftragsposition wird erstellt.
Parameter | Beschreibung |
|---|---|
oDM:O | Datenmodul |
nAufNummer:N | Auftragsnummer |
nAufPosNr:N | Auftragspositionsnummer |
Rückgabewert
Numerisch - Reservierungs-ID
Beispiel
CODE
| oDM, oDAB260, nResId |
oDM := CreateObject('TBeDBGet'),
oDAB260 := DBGetTable(oDM, waDAB260,),
startseq,
DBStartTrans(oDM.ADSConnection),
nResId := AufResNeu(oDM, 4711, 99),
oDAB260:MENGE := 5,
AufResPost(oDM, 4711, 99, nResId),
DBCommit(oDM.ADSConnection),
onerror,
DBCancelAll(oDM),
DBRollBack(oDM.ADSConnection),
MessageDlg(GetErrorText()),
stopseq,