Konvertierungsroutine GJAHR 

Verwendung

Die Konvertierungsroutine GJAHR wird bei der Eingabe von Geschäftsjahren verwendet, um eine abgekürzte zweistellige Eingabe zu ermöglichen. Das interne Format des Geschäftsjahrs ist vierstellig.

Funktionsumfang

Bei der Konvertierung vom externen in das interne Format wird geprüft, ob die Eingabe in Feld INPUT rein numerisch ist, also nur aus Ziffern, möglicherweise mit Leerzeichen davor und/oder dahinter, besteht.

...

       1.      Wird eine zweistellige Zifferfolge eingegeben, dann wird die Ziffernfolge in die dritte und vierte Stelle des Ausgabefeldes OUTPUT gestellt, und dieses wird links mit 19 oder 20 nach folgender Regel aufgefüllt:

¡        Zweistellige Ziffernfolge < 50, dann von links auffüllen mit 20.

¡        Zweistellige Ziffernfolge >= 50, dann von links auffüllen mit 19.

       2.      Eine nicht-zweistellige Zeichenfolge wird von links nach rechts in das Ausgabefeld übertragen. Dabei werden Leerzeichen weggelassen.

Beispiel

Konvertierung von externem in internes Format:

...

       1.      '12' ® '2012'

       2.      '51' ® '1951'

       3.      '1997' ® '1997'

       4.      '991# ® '991#