BDEDelete()

BDEDelete() – Löschen von Betriebsdaten-Buchungen

Hinweis
Diese Codeblockfunktion ist in Verbindung mit Fertigungsaufträgen ab Version 6.5.65 nicht mehr einsetzbar und gibt eine entsprechende Fehlermeldung aus. Für die Funktion stehen im Codeblock entsprechend leistungsfähigere Funktionen / Klassen zur Verfügung, mit denen die unter Version 6.5 neu eingeführten Funktionalitäten im Bereich der BDE / MDE genutzt werden können.
Funktion zum Löschen von BDE-Zeiten. Das Datenmodul muss von der Klasse "TDM_TMEdit" sein. Die Funktion muss in einer Transaktion ausgeführt werden.

Parameter	Beschreibung
oDM_TMEdit:O	Datamodul-Objekt (Klasse: "TDM_TMEdit")
nPersNr:N	Mitarbeiter-Nummer
dStartDatum:D	Start-Datum
cStartZeit:C	Start-Zeit
cAPosNummer:C	Kundenauftragsnr. (DAB050:ANUMMER) oder Prod.Auftr.Pos.Nr. (DAB240:B_POS_LFD); default = Leerstring

Rückgabewert

Keiner - falls eine Buchung nicht durchgeführt werden kann, wird eine Exception ausgelöst.

Beispiel

CODE

| oDM, oDab340 |

oDM     := CreateObject("TDM_TMEdit"),
oDab340 := DBGetTable(oDM, waDAB340),

DBStartTrans(oDM.AdsConnection),

startseq,
   // Auftragsbuchung löschen
   BDEDelete(oDM, 37, SToD("20060505"), "04:00", "102622"),

   // Anwesenheitsbuchung löschen
   BDEDelete(oDM, 37, SToD("20060505"), "04:00"),

   DBCommit(oDM.AdsConnection),
onerror,
   DBRollBack(oDM.AdsConnection),
   WriteLn('Err:' + ClassName(GetErrorObj()) + ':' + GetErrorText()),
stopseq,