1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
* Отметить наблюдения с первой или последней датой в пределах одного и того же индентификатора.
* Автор: Ray.
DATA LIST FIXED /id 1-1 (F) date1 3-12(ADATE)  date2 14-23(ADATE).
BEGIN DATA.
1 01-01-2000 01-04-2000
1 10-04-2001 11-01-2001
1 05-05-2000 05-25-2001
2 02-07-2000 12-06-2000
2 03-05-2000 03-15-2000
2 02-28-2000 02-28-2000
END DATA.

FORMATS date1 date2 (ADATE12).
* Допустим, хотим найти первую (наиболее раннюю) дату в переменной date1.
SORT CASES BY id date1.
MATCH FILES FILE=* /BY=id /FIRST=first.

* Допустим, хотим найти последнюю (наиболее свежую) дату в переменной date2.
SORT CASES BY id date2.
MATCH FILES FILE=* /BY=id /LAST=last.
EXECUTE.