BDEMaDelete() – Mitarbeiter löschen
Die Funktion löscht einen Mitarbeiter aus dem Personalstamm.
|
Parameter |
Beschreibung |
|---|---|
|
oDM_TMEdit:O |
Datamodul-Objekt (Klasse: "TDM_TMEdit") |
|
nPersNr:N |
Mitarbeiter-Nummer |
Rückgabewert
Keiner
Beispiel
| oDM |
oDM := CreateObject('TDM_TMedit'),
startseq,
DBStartTrans(oDM.ADSConnection),
BDEMaDelete(oDM, 5),
DBCommit(oDM.ADSConnection),
onerror,
DBRollBack(oDM.ADSConnection),
WriteLn('Err:' + ClassName(GetErrorObj()) + ':' + GetErrorText()),
stopseq,
Weitere Verknüpfungen