Skip to main content
Skip table of contents

BDEEdit()

BDEEdit() – Ändern 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 Editieren von BDE-Zeiten. Das Datenmodul muss von der Klasse "TDM_TMEdit" sein. Die Funktion muss in einer Transaktion ausgeführt werden.

ParameterBeschreibung

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 = leer

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,
   // Anwesenheitsbuchung ändern
   BDEEdit(oDM, 37, SToD("20060505"), "02:45"),
   oDab340:S_ZEIT := "02:45",
   oDab340:E_ZEIT := "03:25",
   BDEPost( oDM ),

   // Auftragsbuchung ändern
   BDEEdit(oDM, 37, SToD("20060505"), "02:45", "102622  001"),
   oDab340:S_ZEIT := "02:40",
   oDab340:E_ZEIT := "03:25",
   BDEPost(oDM),

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

Please note, these errors can depend on your browser setup.

If this problem persists, please contact our support.