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
* Define dummy data file for illustration purposes.
NEW file.
INPUT PROGRAM.
LOOP id=1 TO 500.
LEAVE id.
LOOP id2=1 TO 10.
	COMPUTE draw=UNIFORM(1).
	END CASE.
END LOOP.
END LOOP.
END FILE.
END INPUT PROGRAM.
EXECUTE.

******************************************.
 * simple type (generate 50 cases).

* Define dummy data file for illustration purposes.
NEW file.
INPUT PROGRAM.
LOOP id=1 TO 50.
	COMPUTE draw=UNIFORM(1).
	END CASE.
END LOOP.
END FILE.
END INPUT PROGRAM.
EXECUTE.