1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
*Примеры чтения данны[ через DATA LIST, BEGIN DATA - END DATA.

data list free / product sales .
begin data
1 23  1 45  1 23  1 44  2 34  2 67  3 45  3 78  4 56  4 56
end data .


DATA LIST LIST /index(F8) var1(F8) var2(F8) var3(F8).
BEGIN DATA
2 1 1 9 
1 2 2 4 
5 3 6 9 
4 4 7 2 
3 4 8 3
END DATA.
LIST.

**********************.
DATA LIST LIST /id(F8) date1(ADATE) test(F8).
BEGIN DATA
1 10/1/99 1
1 11/2/99 2
1 12/12/99 2
2 1/1/99 1
2 2/1/99 3
3 3/1/99 1
END DATA.
LIST.