EXEC TAA [REFRESH] TIMESTAMP END-EXEC 

Diese Anweisung stellt in das Feld TC-TIMESTAMP die aktuelle Zeit ein (Datum und Uhrzeit, bis in Millisekunden-Genauigkeit).

Der TAA-Timestamp wird von der TAA-Infrastruktur immer so gesetzt, dass jeder TimeStamp bezogen auf eine Workstation eindeutig ist; eine Workstation-übergreifende Eindeutigkeit kann nicht gewährleistet werden.

Der TAA-TimeStamp wird immer auf die Millisekunde genau angegeben. Der Mikrosekundenbereich wird nur genutzt, wenn innerhalb einer Millisekunde mehr als ein neuer Timestamp verlangt wird; dieser Teil gibt nicht tatsächlich die genaue Mikrosekunde an, in der der Timestamp gesetzt wurde, sondern stellt nur die Eindeutigkeit sicher.

Das Feld TC-TIMESTAMP wird von der TAA-Infrastruktur im Bausteinrahmen bereitgestellt.

01 TC-TIMESTAMP.
    05 TC-TIMESTAMP-DATE.
     06 TC-TIMESTAMP-YEAR PIC 9(4).
     06 FILLER PIC X.
     06 TC-TIMESTAMP-MONTH PIC 99.
     06 FILLER PIC X.
     06 TC-TIMESTAMP-DAY PIC 99.
    05 FILLER PIC X.
    05 TC-TIMESTAMP-TIME.
     06 TC-TIMESTAMP-HOUR PIC 99.
     06 FILLER PIC X.
     06 TC-TIMESTAMP-MINUTE PIC 99.
     06 FILLER PIC X.
     06 TC-TIMESTAMP-SECOND PIC 99.
    05 FILLER PIC X.
    05 TC-TIMESTAMP-REST.
     06 TC-TIMESTAMP-MILLISECOND PIC 999.
     06 TC-TIMESTAMP-MICROSECOND PIC 999.

Die darin gespeicherte Zeitangabe ist so formatiert:

     JJJJ-MM-TT-SS.mm.ss.mmmxxx

z.B. 1997-03-06-10.33.04.111000

Um den Timestamp aufzubewahren, kopieren Sie ihn in ein einfaches Feld im Format X(26).

Der Timestamp, der mit einem Laufzeitzustand aufbewahrt wird, hat dasselbe Format.