Feldhilfe (APSPERPRG)

Sollen Summen in einem nicht vordefinierten Intervall der Software erstellt werden, kann hier der Name einer Verarbeitung definiert werden, deren folgende Unterprogramme definiert werden müssen:

• # Dieses Unterprogramm ermöglicht die Neuberechnung eines Datums (definiert über DAT1)
  # damit es einem Periodenende entspricht.
  # Das Ergebnis lautet DAT2.
  # LIBCLE entspricht der alphanumerischen Bezeichnung der Periode.
  Subprog BORNES(DAT1,DAT2,LIBCLE)
  Value    Date    DAT1
  Variable Date    DAT2
  Variable Char    LIBCLE
• # Dieses Unterprogramm umfasst ein Datum (definiert über DA1), damit es einem Periodenbeginn entspricht.
  Subprog CADRE(DAT1)
  Variable Date DAT1
• # Dieses Unterprogramm sendet in DAT2 das Periodenende definiert über DAT1
  Subprog DATFIN(DAT1,DAT2)
  Value Date DAT1
  Variable Date DAT2
• # Dieses Unterprogramm sendet die Anzahl der Perioden (unterzeichnet), das zwei Daten trennt
  Subprog DECAL(DAT1,DAT2,DECAL)
  Value Date DAT1
  Value Date DAT2
  Variable Integer DECAL
• # Dieses Unterprogramm fügt eine Anzahl an Perioden (unterzeichnet), einem Enddatum hinzu
  Subprog DECAL(DAT1,DAT2,DECAL)
  Value Date DAT1
  Value Date DAT2
  Variable Integer DECAL

Ein Beispiel für solche Unterprogramme kann in der Verarbeitung SUBSTADEC angezeigt werden, die die Unterprogramme definiert, die der Verwaltung nach Dekade entsprechen.