ILE Cobol: accept aTimestamp from timestamp?

[rebe]

Hallo!

Wie kann man denn in ILE Cobol den aktuellen Timestamp bekommen?

accept aTimestamp from timestamp
geht leider nicht. In Anlehnung an
accept Datum from Date.

Hat jemand eine Idee?

Dankeschön
Reiner Beimdiek

[rmittag]

aus dem Handbuch :

ACCEPT identifier FROM {DATE | DAY | TIME}

DATE
Has the implicit PICTURE 9(6).

The sequence of data elements (from left to right) is:

2 digits for year of century
2 digits for month of year
2 digits for day of month
DAY
Has the implicit PICTURE 9(5).

The sequence of data elements (from left to right) is:

2 digits for year of century
3 digits for day of year
TIME
Has the implicit PICTURE 9(8).

The sequence of data elements (from left to right) is:

2 digits for hour of day
2 digits for minute of hour
2 digits for second of minute
2 digits for hundredths of second

mfg Rolf