ILE Cobol: accept aTimestamp from timestamp?

[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