TBeInventoryBusinessController
TBeInventoryBusinessController
Die Klasse TBeInventoryBusinessController stellt Funktionen und Methoden für die Inventur in der Lagerverwaltung bereit.
Eigenschaften
Eigenschaft | Beschreibung |
---|---|
CbDataModule:O | Daten-Modul, für alle Funktionen und Methoden die Daten verändern / erzeugen muss auf diesem Daten-Modul eine Transaktion gestartet werden |
Funktionen
Funktion | Parameter | Beschreibung |
---|---|---|
CbTakeOverInventory() Aktuelle Inventur-Datei verarbeiten und in Bestandsdaten übernehmen | aInventoryDate:D | Buchungs-Datum der Inventur |
aShowMessages:L | Fehler als Meldungen anzeigen, ansonsten werden die Fehler als Exception ausgelöst (in beas Umgebung immer false) | |
aShowProgressBar:L | Fortschrittsanzeige während der Verarbeitung anzeigen (in beas Umgebung immer false) |
Beispiel
CODE
| m_oInvBC, m_oDM |
//******************************************************************************
// Aktuelle Inventur-Datei mit Datum "heute" verarbeiten
//******************************************************************************
m_oDM := CreateObject('TBeDbGet'),
startseq
m_oInvBC := CreateObject('TBeInventoryBusinessController'), // Kontroller
startseq
m_oInvBC.CbDataModule := m_oDM, // Gleiches Datenmodul für alle Objekte
m_oInvBC.CbTakeOverInventory(today(),
jn("Fehler als Meldungen anzeigen?"),
jn("Fortschrittsanzeige während der Verarbeitung anzeigen?"))
always,
DestroyObject(m_oInvBC),
stopseq,
always
DestroyObject(m_oDM),
stopseq,