Der dreifache Gruppenwechsel in schematischer Darstellung
+---------------------------------------------------------+
¦ GRUPPENWECHSEL FÜR AGA UMSATZSTATISTIK ¦
¦ +-------------------------------------------------------¦
¦ ¦VORLAUF ¦
¦ +-------------------------------------------------------¦
¦ ¦ LESEN AGA ¦
¦ +-------------------------------------------------------¦
¦ ¦ GELESENER SATZ -> ARBEITSBEREICH ¦
¦ +-------------------------------------------------------¦
¦ ¦ SOLANGE NICHT EOF AGA ¦
¦ ¦ +-----------------------------------------------------¦
¦ ¦ ¦ VORLAUF WERK ¦
¦ ¦ +-----------------------------------------------------¦
¦ ¦ ¦ SOLANGE WERK ALT = WERK NEU UND NICHT EOF AGA ¦
¦ ¦ ¦ +---------------------------------------------------¦
¦ ¦ ¦ ¦ VORLAUF LIEFERSTELLE ¦
¦ ¦ ¦ +---------------------------------------------------¦
¦ ¦ ¦ ¦ SOLANGE LIEFER ALT = LIEFER NEU ¦
¦ ¦ ¦ ¦ UND WER-ALT = WERK-NEU ¦
¦ ¦ ¦ ¦ UND NICHT EOF AGA ¦
¦ ¦ ¦ ¦ +-------------------------------------------------¦
¦ ¦ ¦ ¦ ¦ BLATTWECHSEL ¦
¦ ¦ ¦ ¦ +-------------------------------------------------¦
¦ ¦ ¦ ¦ ¦ SEITENKOPF ¦
¦ ¦ ¦ ¦ +-------------------------------------------------¦
¦ ¦ ¦ ¦ ¦ SOLANGE SEITE NICHT VOLL ¦
¦ ¦ ¦ ¦ ¦ UND LIEFER-ALT = LIEFER-NEU ¦
¦ ¦ ¦ ¦ ¦ UND WERK-ALT = WERK-NEU ¦
¦ ¦ ¦ ¦ ¦ UND NICHT EOF AGA ¦
¦ ¦ ¦ ¦ ¦ +-----------------------------------------------¦
¦ ¦ ¦ ¦ ¦ ¦ SATZ ALT -> SATZ NEU ¦
¦ ¦ ¦ ¦ ¦ +-----------------------------------------------¦
¦ ¦ ¦ ¦ ¦ ¦ VORLAUF AL ¦
¦ ¦ ¦ ¦ ¦ +-----------------------------------------------¦
¦ ¦ ¦ ¦ ¦ ¦ SOLANGE ARTIKEL FÜR KUNDE IN AL UND NICHT EOF ¦
¦ ¦ ¦ ¦ ¦ ¦ +---------------------------------------------¦
¦ ¦ ¦ ¦ ¦ ¦ ¦ LESEN AL ¦
¦ ¦ ¦ ¦ ¦ ¦ +---------------------------------------------¦
¦ ¦ ¦ ¦ ¦ ¦ ¦ ZAEHLER = MON-VON ¦
¦ ¦ ¦ ¦ ¦ ¦ +---------------------------------------------¦
¦ ¦ ¦ ¦ ¦ ¦ ¦ SOLANGE ZAEHLER <= MON-BIS ¦
¦ ¦ ¦ ¦ ¦ ¦ ¦ +-------------------------------------------¦
¦ ¦ ¦ ¦ ¦ ¦ ¦ ¦ SUMME-AL = SUMME-AL + WERT(ZAEHLER) ¦
¦ ¦ ¦ ¦ ¦ ¦ ¦ +-------------------------------------------¦
¦ ¦ ¦ ¦ ¦ ¦ ¦ ¦ ZAEHLER = ZAEHLER + 1 ¦
¦ ¦ ¦ ¦ ¦ +-----------------------------------------------¦
¦ ¦ ¦ ¦ ¦ ¦ BERECHNEN AL UND AGA ¦
¦ ¦ ¦ ¦ ¦ +-----------------------------------------------¦
¦ ¦ ¦ ¦ ¦ ¦ DRUCKEN + SUMME LIEFERSTELLE BILDEN ¦
¦ ¦ ¦ ¦ ¦ +-----------------------------------------------¦
¦ ¦ ¦ ¦ ¦ ¦ LESEN AGA ¦
¦ ¦ ¦ ¦ +-------------------------------------------------¦
¦ ¦ ¦ ¦ ¦ ABSCHLUSS SEITE ¦
¦ ¦ ¦ +---------------------------------------------------¦
¦ ¦ ¦ ¦ ABSCHLUSS LIEFERSTELLE ¦
¦ ¦ +-----------------------------------------------------¦
¦ ¦ ¦ ABSCHLUSS WERK ¦
¦ +-------------------------------------------------------¦
¦ ¦ ABSCHLUSS GESAMT ¦
¦ +-------------------------------------------------------¦
¦ ¦ NACHLAUF ¦
+---------------------------------------------------------+
+------------------------------+ +------------------------------------------+
¦ VORLAUF ¦ ¦ VORLAUF LIEFERSTELLE
¦
+------------------------------¦ +------------------------------------------¦
¦ ÖFFNEN AGA,AL,DRUCKER ¦ ¦ LIEFERSTELLE -> DRUCKBEREICH ¦
+------------------------------¦ +------------------------------------------¦
¦ SEITE = 0 ¦ ¦ LIEFERSTELLENSUMMEN = 0 ¦
+------------------------------¦ +------------------------------------------+
¦ ZEILE = MAXWERT (SEITE VOLL) ¦ +------------------------------------------+
+------------------------------¦ ¦ SEITENKOPF ¦
¦ GESAMTSUMME = 0 ¦ +------------------------------------------¦
+------------------------------¦ ¦ SEITENKOPF -> DRUCKBEREICH ¦
¦ SOLANGE UNGUELTIGE PERIODE ¦ +------------------------------------------¦
¦ +----------------------------¦ ¦ SEITENKOPF DRUCKEN ¦
¦ ¦ VON / BIS MONAT EINGEBEN ¦ +------------------------------------------¦
+------------------------------¦ ¦ ZEILE = 1 ¦
¦ PERIODE = MON-BIS - MON-VON ¦ +------------------------------------------+
+------------------------------+ +------------------------------------------+
+------------------------------+ ¦ BERECHNEN AL UND AGA ¦
¦ VORLAUF WERK ¦ +------------------------------------------¦
+------------------------------¦ ¦ GAS-AGA = GAS-BAR[AGA] + GAS-KREDIT[AGA] ¦
¦ WERK -> DRUCKBEREICH ¦ +------------------------------------------¦
+------------------------------¦ ¦ GAS-AGA = GAS / 12 ¦
¦ WERKSUMMEN = 0 ¦ +------------------------------------------¦
+------------------------------+ ¦ MIETE-AGA = MIETE [AGA] / 12 ¦
+------------------------------+ +------------------------------------------¦
¦ BLATTWECHSEL ¦ ¦ GAS-AGA-VER = ( GAS-AGA * 100 ) / ¦
+------------------------------¦ ¦ ( GAS-AGA + MIETE-AGA ) ¦
¦ VORSCHUB AUF NEUE SEITE ¦ +------------------------------------------¦
+------------------------------¦ ¦ UMS-AGA = GAS-BAR[AGA] + GAS-KREDIT[AGA] ¦
¦ SEITE = SEITE + 1 ¦ ¦ + MIETE-JAHR[AGA] ¦
+------------------------------¦ +------------------------------------------¦
¦ ZEILE = 0 ¦ ¦ KUM-UMS-AGA = UMS-AGA * PERIODE / 12 ¦
+------------------------------¦ +------------------------------------------¦
¦ SEITE -> DRUCKBEREICH ¦ ¦ GAS-AGA-VER = 0 ? ¦
+------------------------------+ ¦ JA ¦ NEIN ¦
+------------------------------+ +----------------------+-------------------¦
¦ VORLAUF AL ¦ ¦ GAS-AL = SUMME-AL * ¦ GAS-AL = SUMME-AL ¦
+------------------------------¦ ¦ GAS-AGA-VER /100 ¦ / 2 ¦
¦ AL-SUMME = 0 ¦ +------------------------------------------¦
+------------------------------¦ ¦ MIETE-AL = SUMME-AL - GAS-AL ¦
¦ SATZART = 1 ¦ +------------------------------------------¦
+------------------------------¦ ¦ DIF-GAS = GAS-AL - GAS-AGA ¦
¦ FIRMA = 0 ¦ +------------------------------------------¦
+------------------------------¦ ¦ DIF-MIETE = MIETE-AL - MIETE-AL ¦
¦ AL-KDNR = AL-KDNR[AGA] ¦ +------------------------------------------¦
+------------------------------¦ ¦ DIF-UMS = SUMME-AL - KUM-UMS-AGA ¦
¦ AL-ARTIKEL = SPACE ¦ +------------------------------------------+
+------------------------------¦
¦ START AL KEY = KDNR,ARTNR ¦
+------------------------------+
+------------------------------+
¦ ABSCHLUSS SEITE ¦
+------------------------------¦
¦ KEINE AKTIONEN ¦
+------------------------------+
+------------------------------+ +------------------------------------------+
¦ DRUCKEN ZEILE ¦ ¦ ABSCHLUSS LIEFERSTELLE ¦
+------------------------------¦ +------------------------------------------¦
¦ D-GAS-AL[05] = GAS-AL ¦ ¦ VERGLEICHSFELD LIEFERSTELLE LOESCHEN ¦
+------------------------------¦ +------------------------------------------¦
¦ D-GAS-AGA[06] = GAS-AGA ¦ ¦ BLATTWECHSEL ¦
+------------------------------¦ +------------------------------------------¦
¦ D-DIF-GAS[07] = DIF-GAS ¦ ¦ KOPF LIEFERSTELLENABSCHLUSS DRUCKEN ¦
+------------------------------¦ +------------------------------------------¦
¦ D-MIETE-AL[08] = MIETE-AL ¦ ¦ SEITENKOPF DRUCKEN ¦
+------------------------------¦ +------------------------------------------¦
¦ D-MIETE-AGA[09] = MIETE-AGA ¦ ¦ SUMMENZEILE LIEFERSTELLE DRUCKEN ¦
+------------------------------¦ +------------------------------------------¦
¦ D-DIF-MIETE[10] = DIF-MIETE ¦ ¦ + SUMME LIEFERSTELLE -> SUMME WERK 1) ¦
+------------------------------¦ +------------------------------------------+
¦ D-KUM-UMS-AL[11] = SUMME-AL ¦ +------------------------------------------+
+------------------------------¦ ¦ ABSCHLUSS WERK ¦
¦ D-KUS-AGA[12] = KUM-UMS-AGA ¦ +------------------------------------------¦
+------------------------------¦ ¦ VERGLEICHSFELD WERK LOESCHEN ¦
¦ D-DIF-UMS[13] = DIF-UMS ¦ +------------------------------------------¦
+------------------------------¦ ¦ BLATTWECHSEL ¦
¦ D-UMS-AGA[14] = UMS-AGA ¦ +------------------------------------------¦
+------------------------------¦ ¦ KOPF FUER WERKSABSCHLUSS DRUCKEN ¦
¦ ZEILEN DRUCKEN ¦ +------------------------------------------¦
+------------------------------¦ ¦ SEITENKOPF DRUCKEN ¦
¦ ZEILE = ZEILE + 5 ¦ +------------------------------------------¦
+------------------------------¦ ¦ SUMMENZEILE WERK DRUCKEN ¦
¦ +GAS-AL -> L-GAS-AL ¦ +------------------------------------------¦
+------------------------------¦ ¦ + SUMME WERK -> SUMME GESAMT 1) ¦
¦ +GAS-AGA -> L-GAS-AGA ¦ +------------------------------------------+
+------------------------------¦ +------------------------------------------+
¦ +DIF-GAS -> L-DIF-GAS ¦ ¦ ABSCHLUSS GESAMT ¦
+------------------------------¦ +------------------------------------------¦
¦ +MIETE-AL -> L-MIETE-AL ¦ ¦ BLATTWECHSEL ¦
+------------------------------¦ +------------------------------------------¦
¦ +MIETE-AGA -> L-MIETE-AGA ¦ ¦ KOPF FUER GESAMTABSCHLUSS DRUCKEN ¦
+------------------------------¦ +------------------------------------------¦
¦ +DIF-MIETE -> L-DIF-MIETE ¦ ¦ SEITENKOPF DRUCKEN ¦
+------------------------------¦ +------------------------------------------¦
¦ +KUM-UMS-AL -> L-KUM-UMS-AL ¦ ¦ GESAMTSUMMENZEILE DRUCKEN ¦
+------------------------------¦ +------------------------------------------+
¦ +KUM-UMS-AGA-> L-KUM-UMS-AGA ¦
+------------------------------¦ 1) Vergleiche Addition im Upro DRUCKEN
¦ +DIF-UMS -> L-DIF-UMS ¦
+------------------------------¦
¦ +UMS-AGA -> L-UMS-AGA ¦
+------------------------------+
+------------------------------+
¦ NACHLAUF ¦
+------------------------------¦
¦ SCHLIESSEN DER DATEIEN ¦
+------------------------------+
