I don't have CR handy, but it would work like this:
whileprintingrecords;
numbervar counter;
numbervar x :=1;
numbervar array AllNumbers [100];
for Counter := {table.field} to {table.field}+99 do(
AllNumbers[x] := Counter;
x := x+1
);
join(Allnumbers,chr(13))
If you have an old version of CR (8.5 or below), you'll need to split this out to less than 254 chars per formula, but the same theory applies.
-k