Codeblock Onlinehilfe

AufPosEdit2()

Editiermodus für Auftragsposition

Die Funktion versetzt eine existierende Auftragsposition in den Editiermodus. Übergeben wird im Gegensatz zu AufPosEdit() ein Datenmodul. Der Dab055-Datensatz befindet sich anschließend im Editiermodus und kann bearbeitet werden. Es ist erlaubt beliebige Dab055-Feldinhalte zu verändern, sofern diese über die normale Auftragsbearbeitung ebenfalls geändert werden können.


Parameter

Beschreibung

oDM:O

Objekt der Klasse TBeDbGet (Datenmodul)

nAufNummer:N

Auftragsnummer

nAufPos:N

Auftragspositionsnummer

lResetTableStates:L

Verwendete Tabellen nach dem Aufruf der Funktion auf ursprünglichen Stand zurück setzen; default = false

Rückgabewert

Logisch / Boolean - Editiermodus erfolgreich

Beispiel

| oDM, oDAB055 |

// verändert die Bestellmenge auf 5

oDM     := CreateObject('TBeDbGet'),
oDAB055 := DBGetTable(oDM, waDAB055,),

startseq,
   DBStartTrans(oDM.ADSConnection),
   if AufPosEdit2(oDM, 4711, 1) then
      oDAB055:BMENGE := 5,
      if not AufPosPost2(oDM, 4711, 1, false, false) then
         writeln('Position konnte nicht gespeichert werden'),
      endif,
   else
      writeln('Position konnte nicht editiert werden'),
   endif,
   DBCommit(oDM.ADSConnection),
onerror,
   DbCancelAll(oDM),
   DBRollBack(oDM.ADSConnection),
stopseq,

Weitere Verknüpfungen