1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
* Требуется "прочесть" дату с временем из строки в переменную формата "дата/время".
DATA LIST FIXED /a 1-19(A).
BEGIN DATA
2000-10-09 13:41:41
2000-10-09 18:40:04
2000-10-09 19:30:10
2000-10-09 20:07:23
2000-10-09 21:14:51
2000-10-10 13:39:34
2000-10-11 14:01:05
END DATA.
LIST.

COMPUTE mydate=NUMBER(SUBSTR(a,1,10),SDATE10)+NUMBER(SUBSTR(a,12,8),TIME10).
FORMATS mydate(DATETIME28.4).
VARIABLE WIDTH mydate(20).
EXECUTE.