to easily see the possible bug:

run
#begin
nulldata 100
setobs 1 1910 --time-series
series norm = randgen(N,15000,200)
# end
start interactive R session and type in R console
> gretldata
What I obtained started as follows:
        index norm
1910       1   15
1911       2    1
1912       3   60

!