COBOL ist immer noch eines der reichsten und elegantesten Programmiersprachen auf dem Markt. Abgesehen von der Rechenleistung und massive Datei-Handling -Funktionen, haben Sie die Flexibilität der Zahl Konvertierungen und Berichterstattung. Oft müssen Sie möglicherweise bestimmte Zahlenwerte auf Ausgang Berichte , Dateien oder Bildschirmanzeige Bereichen wie CICS anzuzeigen. Zweifellos werden Sie begegnen numerischen Formate, die nicht angezeigt wird richtig als gespeichert und müssen um weiter zu einem besser lesbaren Format umgewandelt werden. Einer der häufigsten ist die gepackte Dezimalzahlen oder COMP -3 numerisches Feld . Anleitung
1

Identifizieren Sie die Bereich (e) , die Sie in der COBOL-Code zu konvertieren. Zum Beispiel können Sie ein Feld, das ähnlich lautet: " 05 PKD -field- 01 pic s9 ( 5v99 ) Layout -3 . " Dies ist eine signierte , gepackte Dezimalzahlen Feld effizient für Berechnungen verwendet werden , kann aber nicht einfach in einem Display abgelesen werden.
2

Zum "Working - Storage- Abschnitt des Programms und stellen die mittleren Felder finden Sie müssen , um den gewünschten numerischen Übergang wie folgt machen : Erstellen Sie zwei numerische Felder "05 ws- numerischen pic s9 ( 5v99 ) Wert Null " und " 05 ws -display- numerischen pix x (8). "

3

Insert Code in das Programm , um das Eingabefeld direkt in den ersten Vermittler Feld zu bewegen " ws- numerisch. " Dies wird die Layout -3 Nummer in ein numerisches Feld zoned entpacken. im Gegenzug haben den Code jetzt bewegen der erste Vermittler -Feld in der zweiten, ws -display- numerisch. Dieses letzte Feld kann verwendet werden , um die Anzahl entweder auf einer gedruckten Form oder auf einem Computer-Bildschirm angezeigt werden.
4

Kompilieren Sie das Programm mit die gespeicherten Änderungen und stellen Sie sicher , dass keine Fehler in der Kompilierung durch Überprüfung des Zustandes Code.
5

Führen Sie die kompilierte Version und überprüfen Sie die Ergebnisse .