AufPosDelete()
AufPosDelete() – Auftragsposition löschen
AufPosDelete() löscht eine existierende Auftragsposition bzw. im Falle eines Angebotes mit 10er-Schritten eine Auftragspositionsgruppe.
Parameter | Beschreibung |
---|---|
nOrderNo:N | Auftragsnummer |
cArtNo:C | Auftragsposition |
oDab000:O | oDab000 |
oDab050:O | oDab050 |
oDab055:O | oDab055 |
oDab010:O | oDab010 |
oCalc000:O | oCalc000 |
oCalc010:O | oCalc010 |
oCalc020:O | oCalc020 |
oCalc035:O | oCalc035 |
oCalc055:O | oCalc055 |
oCalc155:O | oCalc155 |
oCalc160:O | oCalc160 |
oCalc210:O | oCalc210 |
oCalc240:O | oCalc240 |
oCalc255:O | oCalc255 |
oCalc310:O | oCalc310 |
oCalc340:O | oCalc340 |
oCalc410:O | oCalc410 |
oCalc520:O | oCalc520 |
oCalc610:O | oCalc610 |
oCalc710:O | oCalc710 |
oCalc720:O | oCalc720 |
oCalc730:O | oCalc730 |
oMem050:O | TMemCalcTable-Object |
oMem055:O | TMemCalcTable-Object |
lProdSync:L | Produktionsauftragssynchronisation aktiviert; default =True |
oCalc260:O | oCalc260 |
Rückgabewert
Keiner - Kann die Löschung nicht durchgeführt werden, wird eine Exception ausgelöst.
Beispiel
| oDab000:DB := 'waDAB000, 1' , oDab050:DB := 'waDAB050, DAB051', oDab055:DB := 'waDAB055, DAB056',
oDab010:DB := 'waDAB010, DAB011', oCalc010:DB := 'waDAB010, DAB011', oCalc155:DB := 'waDAB155, APNUMMER',
oCalc160:DB := 'waDAB160, ARTNR1', oCalc340:DB := 'waDAB340, DAB341', oCalc062:DB := 'waDAB062, DAB063',
oCalc000:DB := 'waDAB000, 1' , oCalc520:DB := 'waDAB520, DAB521', oCalc020:DB := 'waDAB020, DAB021',
oCalc310:DB := 'waDAB310, DAB311', oCalc040:DB := 'waDAB040, DAB041', oCalc510:DB := 'waDAB510, DAB511',
oCalc710:DB := 'waDAB710, DAB711', oCalc110:DB := 'waDAB110, DAB111', oCalc130:DB := 'waDAB130, DAB131',
oCalc055:DB := 'waDAB055, DAB056', oCalc035:DB := 'waDAB035, DAB036', oCalc210:DB := 'waDAB210, DAB211',
oCalc240:DB := 'waDAB240, DAB241', oCalc255:DB := 'waDAB255, DAB256', oCalc250:DB := 'waDAB250, DAB251',
oCalc410:DB := 'waDAB410, DAB411', oCalc610:DB := 'waDAB610, DAB611', oCalc720:DB := 'waDAB720, DAB721',
oCalc730:DB := 'waDAB730, DAB731', oMem050, oMem055, nNummer, nPos |
DBStartTrans(),
startseq,
oMem050 := CreateObject('TMemCalcTable'),
oMem055 := CreateObject('TMemCalcTable'),
AufPosDelete(1979, 1, oDab000, oDab050, oDab055, oDab010, oCalc000,
oCalc010, oCalc020, oCalc035, oCalc055, oCalc155, oCalc160, oCalc210,
oCalc240, oCalc255, oCalc310, oCalc340, oCalc410, oCalc520, oCalc610,
oCalc710, oCalc720, oCalc730, oMem050, oMem055, true),
DBCommit(),
onerror,
DBRollBack(),
WriteLn(GetErrorText()),
Raise(),
stopseq,