Code: Bestellwesen

*/ Kurzbeispiel für den Zugriff auf diese Struktur
*/ Der Zugriff erfolgt über: My.Bussines.Ordering
*/ 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 loOrdering AS My.Bussines.Ordering
*/ Setzen der Variablen
loOrdering = My.Bussines.Ordering
*/ Jetzt erst die Schleifen durchlaufen... man beachte ALL, dass können ne Menge Sätze sein...
REPLACE ALL Feldname1 WITH loOrdering.Function1(),Feldname2 WITH loOrdering.Function1(), ...
*/ Oder in einer Schleife...
SCAN
	lvValue = loOrdering.Function(Alias.Spalte) + 25
	lvValue = loOrdering.Function2(m.lvValue)
	REPLACE Feldname WITH m.lvValue,...
ENDSCAN
*/ Es sind auch geschachtelte Aufrufe möglich...

Memberliste von Ordering

CheckOrders : Bestellung überprüfen Prüfung verschiedener Parameter im Bestellwesen
OrderCheck. : Bestelldaten prüfen Überprüfen der Bestelldaten
OrderGet... : Bestellvorschlag Bestellauswahl in der Maske D4002. Enthält alle SQL's, die benötigt werden.
Orders..... : Bestellungen berechnen Berechnungen, die mit dem Bestellwesen in PMS32 zusammenhängen
d4x........ : Funktionen Bestellwesen Buchungsfunktionen des Bestellwesens

Liste der Methoden von Ordering

Hilfeinformation

String = My.Bussines.Ordering.D40Get(tcIdk10 AS STRING,tcIde10 AS STRING,tcIpe10 AS STRING)
String = My.Bussines.Ordering.D40Get(tcIdk10,tcIde10,tcIpe10)

String = My.Bussines.Ordering.cMethod

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

Number = My.Bussines.Ordering.nError

WAIT WINDOW My.Bussines.Ordering.nError

Number = My.Bussines.Ordering.nLine

WAIT WINDOW My.Bussines.Ordering.nLine