ProdDemPlanNew()
ProdDemPlanNew() – Neue Produktions-Bedarfsplanung
Die Funktion erzeugt einen neuen Produktions-Bedarfsplanungs-Datensatz (Tabelle Dab220).
Parameter | Beschreibung |
|---|---|
oBeDBGet:O | Kontainer-Objekt (TBeDBGet-Objekt) |
Rückgabewert
Keiner
Beispiel
CODE
| oDab220, oDBGet |
oDBGet := CreateObject('TBeDBGet'),
oDab220 := DBGetTable(oDBGet, waDAB220),
startseq,
DBStartTrans(oDBGet.AdsConnection),
startseq,
ProdDemPlanNew(oDBGet),
oDab220:ARTNR := 'TESTARTIKEL',
oDab220:MENGE := 5,
oDab220:TERMIN := DToC(Date()),
ProdDemPlanPost(oDBGet),
DBCommit(oDBGet.AdsConnection),
onerror,
DBRollBack(oDBGet.AdsConnection),
WriteLn('Fehler: ' + GetErrorText()),
stopseq,
always,
DestroyObject(oDBGet),
stopseq,