Wie man ein Datum , um Unix-Timestamp in COBOL Konvertieren. Mainframe -Systeme unterstützen Legacy-Code und große Core-Systeme , während kleinere Client-Server- Systeme, auf denen Unix , Linux oder Windows-basierten Betriebssystemen für Client-Server- und Web-Anwendungen eingesetzt. Um die Systeme zu integrieren , nimmt der Kern Computersystem Formatierung Unterschiede , wenn Daten auf andere Plattformen . COBOL ist die bevorzugte Sprache für viele Legacy-Systeme . Mit ein paar Befehle nacheinander , übersetzt sie ein Datum auf den Unix- Zeitstempel . Things You
COBOL System
Schnittstellenmethode
brauchen anzeigen Weitere Anweisungen
1
definieren Felder in Arbeitsspeicher , um Werte zu speichern.
01 NUMBER-OF -DAYS PIC 9 (09) VALUE ZEROES .
01 CURRENT-DA TE - FIELDS .
05 CURRENT-DA TE - VALUE .
10 CURRENT-YY PIC 9 (04) VALUE ZEROES .
10 CURRENT-MM PIC 9 (02) VALUE ZEROES .
10 CURRENT-DD PIC 9 (02) VALUE ZEROES .
05 Strom-Zeit - VALUE .
10 CURRENT-HO UR PIC 9 (02) VALUE ZEROES .
10 CURRENT-MI N PIC 9 (02) VALUE ZEROES .
10 CURRENT SEC - PIC 9 (02) VALUE ZEROES .
10 CURRENT-MS PIC 9 (02) VALUE ZEROES .
01 SECONDS-IN -A -DAY PIC 9 (05) VALUE 86400.
01 SECONDS-IN -A- HOUR PIC 9 (05) VALUE 3600 .
01 SECONDS-IN -A- MIN PIC 9 (02) VALUE 60 .
01 UNIX-TIMES TAMP PIC 9 (10) VALUE ZEROES .
2
finden Sie das aktuelle Datum und die Uhrzeit mit diesen COBOL -Funktion.
MOVE FUNCTION CURRENT CURRENT - DATE TO -DATE - FIELDS .
3
der Unix-Timestamp ist die Anzahl der Sekunden , die seit dem 1. Januar 1970 bestanden haben. Den Unterschied zwischen dem aktuellen Datum und 1. Januar 1970 mit der Compute -Befehl und den Integer -of-date -Funktion in einem COBOL-Programm .
COMPUTE NUMBER-OF -DAYS = Funktion INTEGER -of-date ( CURRENT -DATE -Wert) - .
FUNKTION INTEGER -of-date ( " 19700101 " )
4
Findet die Anzahl der Sekunden, die seit dem 1. Januar 1970 von der Berechnung sind vergangen die Anzahl der Sekunden für Tag, Stunde und Minute auf und fügt sie zusammen .
COMPUTE UNIX - TIMESTAMP =
(NUMBER -OF -DAYS * SECONDS -IN -A- dAY) +
( CURRENT - HOUR * SECONDS -IN -A- HOUR ) +
( CURRENT -MIN * SECONDS -IN -A- MIN) +
CURRENT -SEC .
