TFormTOSinglePos

Klasse zum Anzeigen des Umsatz-Formulars.

Eigenschaften

Eigenschaft	Beschreibung
WinPosID:C	WinPosition-ID die verwendet werden soll Default = die selbe die be benutzt
MainTable:O	Master-Tabelle (z.b. Kundenstamm, Lieferantenstamm) Default = nil
MemHistory:O	Historie-Memory-Tabelle für StatType = 3 Default = nil
StatType:N	Umsatz-Anzeige-Modus 0 = stSinglePosition = Einzelpositionen 1 = stSampleDelivery = Musterlieferungen 2 = stSuppSinglePos = Lieferant Umsatz Einzelpositionen 3 = stSerialHist = Serien-Nr. Historie 4 = stProdSinglePos = Fertigungs-Historie 5 = stDelivLoc = Standortlieferungen 6 = stFilterDefined = eigene Anzeige per Projekt-ID und/oder Filter
ProjectID:N	Umsätze nur für dieses Projekt anzeigen StatType = stFilterDefined
Filter:C	Zusätzlicher individueller ADS-Filter StatType = stFilterDefined
ShowTxt:L	Buchungs-Text anzeigen
TxtHeight:N	Buchungs-Text Höhe
MainPersNo:N	Umsätze nur für diesen Kunden/Lieferanten/usw. anzeigen
AccountType:C	Filterung auf Buchungs-Art

Funktionen

Funktion	Beschreibung
CbInit()	Initialisiert das Formular Diese Funktion muss einmal nachdem alle Einstellungen vorgenommen sind aufgerufen werden
CbRefreshData()	Aktualisiert die Anzeige

Beispiel

|oForm|

oForm := CreateObject('TFormTOSinglePos'),
startseq
   oForm.WinPosID := 'TOSP_TST',
   if JN('Umsatz-Anzeige für Projekt?', true) then
      oForm.ProjectID := 362,                       // nur Einträge für das Projekt 362
      oForm.Filter    := 'DATUM > ''11/11/2012''',  //              nach dem 11.11.2012 anzeigen
   else
      oForm.StatType    := 0,                       // Umsatz für Kunden anzeigen
      oForm.MainPersNo  := 10000001,
      oForm.AccountType := 'A',
   endif,

   oForm.CbInit(),
   ShowModal(oForm),
always
   DestroyObject(oForm),
stopseq,

Weitere Verknüpfungen

TFormSuppBackOrd