Code: Materialwirtschaft

*/ Kurzbeispiel für den Zugriff auf diese Struktur
*/ Der Zugriff erfolgt über: My.Bussines.MaWi
*/ Wird dieses Objekt in einem REPLACE oder einer Schleife SCAN ... ENDSCAN | FOR ... NEXT benötigt
*/ so sollte vor der Schleife die Objektstruktur in eine Variable geholt werden!
*/ Die Ausführungsgeschwindigkeit wird dadurch sehr vergrößert!
*/ Beispiel:
*/ Definieren einer LOKALEN Variablen
LOCAL loMaWi AS My.Bussines.MaWi
*/ Setzen der Variablen
loMaWi = My.Bussines.MaWi
*/ Jetzt erst die Schleifen durchlaufen... man beachte ALL, dass können ne Menge Sätze sein...
REPLACE ALL Feldname1 WITH loMaWi.Function1(),Feldname2 WITH loMaWi.Function1(), ...
*/ Oder in einer Schleife...
SCAN
	lvValue = loMaWi.Function(Alias.Spalte) + 25
	lvValue = loMaWi.Function2(m.lvValue)
	REPLACE Feldname WITH m.lvValue,...
ENDSCAN
*/ Es sind auch geschachtelte Aufrufe möglich...

Memberliste von MaWi

Mawi. : Funktionen der Mawi Buchungsfunktionen der Materialwirtschaft
fI01. : Funktion der I01 Funktionen der Lagerorte I01
fI22. : Funktion der I22/I23 Funktionen der Lagerumbuchung
fi20. : Funktionen der I20 Funktionen der Disposition
fi50. : Funktionen der I50 Funktionen der Inventurbewertung
fik10 : Funktion der K10 Funktionen der Projekte K10

Liste der Methoden von MaWi

Hilfeinformation

Boolean = My.Bussines.MaWi.I21KorrBackground(tcTable AS STRING,tcIdb01Field AS STRING,tcFilter AS STRING)
Boolean = My.Bussines.MaWi.I21KorrBackground(tcTable,tcIdb01Field,tcFilter)

Boolean = My.Bussines.MaWi.I21KorrExt(tcTable AS String,tcIdb01Field AS String,tcFilter AS String)
Boolean = My.Bussines.MaWi.I21KorrExt(tcTable,tcIdb01Field,tcFilter)

Boolean = My.Bussines.MaWi.MenuHitI4x(tcPrgvon AS STRING,tcPrgNach AS STRING)
Boolean = My.Bussines.MaWi.MenuHitI4x(tcPrgvon,tcPrgNach)

Boolean = My.Bussines.MaWi.Res31x(tcWhat AS STRING,tcIp AS STRING,tcIpb01 AS STRING,tcB01Idk10 AS STRING,tcB01Idc66 AS STRING,tnMg AS NUMBER,RcIdk10 AS STRING @,RcIdc66 AS STRING @,RnMgu AS NUMBER @)
Boolean = My.Bussines.MaWi.Res31x(tcWhat,tcIp,tcIpb01,tcB01Idk10,tcB01Idc66,tnMg,@RcIdk10,@RcIdc66,@RnMgu)

R = My.Bussines.MaWi.ResGet

R = My.Bussines.MaWi.ResGetD40

String = My.Bussines.MaWi.cLastError

*/ Vorausgesetzt wird, dass My bekannt ist...
LOCAL lcError AS String
lcError = My.Bussines.MaWi.cLastError

String = My.Bussines.MaWi.cMethod

*/ Abruf...
WAIT WINDOW My.Bussines.MaWi.cMethod

Number = My.Bussines.MaWi.nError

WAIT WINDOW My.Bussines.MaWi.nError

Number = My.Bussines.MaWi.nLine

WAIT WINDOW My.Bussines.MaWi.nLine

Number = My.Bussines.MaWi.nRecords

WAIT WINDOW My.Bussines.MaWi.nRecords

Number = My.Bussines.MaWi.nSeconds

WAIT WINDOW My.Bussines.MaWi.nSeconds

Number = My.Bussines.MaWi.nStatus

WAIT WINDOW My.Bussines.MaWi.nStatus