Level

Version 3

Level

Die Funktion Level gibt die aktuelle Umbruch- bzw. Kopfteilebene beim Ausdruck zurück.

Sie gibt die Zahl der Ebenen während der Ereignisse On Header und On Printing Break zurück.

• Ist Level gleich 0, druckt 4th Dimension gerade die Gesamtsumme.

• Ist Level gleich 1, druckt 4th Dimension gerade die Zwischensumme der Stufe 1, d.h. einen Umbruch auf dem ersten Sortierkriterium, usw..

Dieses Beispiel dient als Vorlage für eine Formularmethode. Es zeigt die Ereignisse, die eintreten können, wenn ein Bericht mit Summen ein Formular als Ausgabeformular verwendet. Level wird beim Drucken eines Kopfteils oder Umbruchs aufgerufen:

      ` Methode eines Formulars, das als Ausgabeformular für einen Summenbericht dient
   $vpFormTable:=Current form table
   Case of
         ` ...
      : (Form event=On Header)
            ` Ein Kopfteilbereich soll gerade ausgedruckt werden.
         Case of
            : (Before selection($vpFormTable->))
               ` Code für ersten Umbruch im Kopfteil
            : (Level = 1)
               ` Code für Umbruchebene 1 im Kopfteil
            : (Level = 2)
               ` Code für Umbruchebene 2 im Kopfteil
               ` ...
         End case
      : (Form event=On Printing Details)
            ` Ein Datensatz soll gerade ausgedruckt werden.
            ` Code für jeden Datensatz
      : (Form event=On Printing Break)
            ` Ein Umbruchbereich soll gerade ausgedruckt werden.
         Case of
            : (Level = 0)
               ` Code für Umbruchebene 0
            : (Level = 1)
               ` Code für Umbruchebene 1
               ` ...
         End case
      : (Form event=On Printing Footer)
         If(End selection($vpFormTable->))
            ` Code für letzten Fußteil
         Else
            ` Code für einen Fußteil
         End if      
   End case

ACCUMULATE, BREAK LEVEL, Form event, PRINT SELECTION.