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
| 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,