AufPosDelete2()

Auftragsposition löschen

AufPosDelete2() löscht eine existierende Auftragsposition. Wenn für Angebote die Organisation in Zehnerschritten aktiv ist, wird die komplette Auftragspositionsgruppe gelöscht.

Parameter	Beschreibung
oDM:O	Datenmodul
nOrderNo:N	Auftragsnummer
nOrderPositionNo:N	Positionsnummer
lProductionOrderSyncronisation:L	Produktionsauftragssynchronisation aktiviert; default = True
lResetTableStates:L	Verwendete Tabellen nach dem Aufruf der Funktion auf ursprünglichen Stand zurück setzen; default = false

Rückgabewert

Keiner - Wenn die Position nicht gelöscht werden kann, wird eine Exception ausgelöst.

Beispiel

CODE

| oDataModule, nOrderNumber, nOrderPositionNumber, bProductionOrderSyncronisation |

nOrderNumber                   := 100197,
nOrderPositionNumber           := 1,
bProductionOrderSyncronisation := True,
oDataModule                    := CreateObject('TBeDbGet', 'DEL_POS_DM'),
startseq
   oDataModule.CbTransaction_Begin(),
   startseq
      startseq
      // Auftragsposition löschen
      AufPosDelete2(oDataModule, nOrderNumber, nOrderPositionNumber,
                    bProductionOrderSyncronisation),
      onerror
         MessageDlg('Fehler beim Löschen der Auftragsposition <' + Str(nOrderNumber) +
                     ' ' + Str(nOrderPositionNumber) + '>' + CrLf + CrLf +
                     GetErrorText()),
      stopseq,

      oDataModule.CbTransaction_Commit(),
   always
      oDataModule.CbTransaction_TryRollback(),
   stopseq,
always
   DestroyObject(oDataModule),
stopseq,

Weitere Verknüpfungen

AufPosDelete()