drop table p

go
CREATE TABLE [dbo].[P] (
	[Num] [int] NULL 
) ON [PRIMARY]
go
set nocount on

declare @Number as int, @Factor as int

set @Number = 1
While @Number <  10000
	Begin
	Declare Factors cursor for
	select num from p  where num <= @number/cast(num as float) and num > 1 order by num asc
	open Factors
	fetch Factors into @Factor
	while @@fetch_Status = 0 
		begin
		if  (@Number % @Factor) = 0
			begin
			break
			end
		fetch Factors into @Factor
		end
	if  (@Number % @Factor) <> 0 or @Factor is null
		insert into p values (@Number)
	close Factors
	deallocate Factors
	set @Number = @Number + 2
	end
go
select * from p

CREATE TABLE [dbo].[P] (
	[Num] [int] NULL 
) ON [PRIMARY]
 CREATE  CLUSTERED  INDEX [MainIdex] ON [dbo].[P]([Num]) ON [PRIMARY]
go
set nocount on

declare @Number as int, @Factor as int
select @Number = isnull(max(num),1) from p
While @Number <  100000
	Begin
	if not exists (	select 'x' from p  where num > 1 and (@Number % num) = 0 )
	insert into p values (@Number)
	set @Number = @Number + 2
	end
go
select * from p

CREATE TABLE [dbo].[P] (
	[Num] [int] NULL 
) ON [PRIMARY]
 CREATE  CLUSTERED  INDEX [MainIdex] ON [dbo].[P]([Num]) ON [PRIMARY]
go
set nocount on

declare @Number as int, @Factor as int
select @Number = isnull(max(num),1) from p
While @Number <  10
	Begin
	if not exists (	select 'x' from p  where num > 1 and (@Number % num) = 0 )
	insert into p values (@Number)
	set @Number = @Number + 2
	end
go
insert into p values (2)
go
select * from p

Throw away your pocket calculators; visit www.calcResult.com

DECLARE
    @UpperLimit integer,
    @SQR_ULimit integer

SET @UpperLimit = 1000
SET @SQR_ULimit = CEILING (SQRT (@UpperLimit))


CREATE TABLE  Digits     (K INTEGER NOT NULL PRIMARY KEY CHECK (K >= 0));
CREATE TABLE  OddNumbers (K INTEGER NOT NULL PRIMARY KEY CHECK (K > 2));
CREATE TABLE  Primes     (K INTEGER NOT NULL PRIMARY KEY CHECK (K > 1));
CREATE TABLE  NotPrimes  (K INTEGER NOT NULL PRIMARY KEY CHECK (K > 1));

INSERT INTO  Digits (K)
SELECT
    0 UNION SELECT 1 UNION SELECT 2 UNION SELECT 3 UNION SELECT 4 UNION SELECT
    5 UNION SELECT 6 UNION SELECT 7 UNION SELECT 8 UNION SELECT 9;


INSERT INTO  OddNumbers (K)
SELECT
    --1000*thousands.K +
    100*hundreds.K + 10*tens.K + units.K + 3    AS K
FROM
    --Digits   thousands,
    Digits hundreds,
    Digits tens,
    Digits units
WHERE
    (units.K + 3) % 2 = 1
AND
    (--1000*thousands.K +
    100*hundreds.K + 10*tens.K + units.K + 3) <= @UpperLimit;


INSERT INTO  NotPrimes (K)
SELECT DISTINCT
    A.K * B.K   AS K
FROM
    OddNumbers      A
    , OddNumbers    B
WHERE
    A.K <= @SQR_ULimit     -- We can only limit one half of the equation using this method.
AND
    (A.K * B.K) <= @UpperLimit;


INSERT INTO  Primes (K) VALUES (2);  -- Special case.
INSERT INTO  Primes SELECT K FROM OddNumbers;

DELETE FROM Primes WHERE  K IN (SELECT K FROM NotPrimes);

SELECT K FROM Primes;  -- ORDER BY K not really needed?

declare @primes table (p int)

declare @allDigits table (i int)
insert into @allDigits (i)
(
select	1
union all
select	2
union all
select	3
union all
select	4
union all
select	5
union all
select	6
union all
select	7
union all
select	8
union all
select	9
union all
select	0
)

declare @digits1379 table (i int)
insert into @digits1379 (i)
(
select	(1-1)
union all
select	(3-1)
union all
select	(7-1)
union all
select	(9-1)
)

declare @seq table (s int, primary key (s))
insert into @seq (s)
select		2
union all
select		5
union all
select		a.i
from		(
			select		1
				+		d0.i
				+		d1.i * 10 
				+		d2.i * 100 
				+		d3.i * 1000
				+		d4.i * 10000
			as i
			from		@digits1379 d0
			cross join	@allDigits d1
			cross join	@allDigits d2
			cross join	@allDigits d3
			cross join	@allDigits d4
			) a

insert into @primes (p)
select		s
from		@seq
where		s not in
			(
			select		p1.s
			from		@seq p1
			cross join	@seq p2
			where		(p1.s % p2.s = 0) -- check for divisibility
				and		(p2.s > 1) -- no point in checking for divisibility by 1
				and		(p2.s <= p1.s / 2) -- only need to check for divisibility up to half the number
			)

select * from @primes
order by p

DECLARE
    @UpperLimit integer,
    @SQR_ULimit integer

SET @UpperLimit = 100000
SET @SQR_ULimit = CEILING (SQRT (@UpperLimit))


DECLARE @Digits     TABLE (K INTEGER NOT NULL PRIMARY KEY CHECK (K >= 0));
DECLARE @OddNumbers TABLE (K INTEGER NOT NULL PRIMARY KEY CHECK (K > 2));
DECLARE @Primes     TABLE (K INTEGER NOT NULL PRIMARY KEY CHECK (K > 1));
DECLARE @NotPrimes  TABLE (K INTEGER NOT NULL PRIMARY KEY CHECK (K > 1));

INSERT INTO  @Digits (K)
SELECT
    0 UNION SELECT 1 UNION SELECT 2 UNION SELECT 3 UNION SELECT 4 UNION SELECT
    5 UNION SELECT 6 UNION SELECT 7 UNION SELECT 8 UNION SELECT 9;


INSERT INTO  @OddNumbers (K)
SELECT
    10000*TenThous.K +
    1000*thousands.K +
    100*hundreds.K + 10*tens.K + units.K + 3    AS K
FROM
    @Digits TenThous,
    @Digits thousands,
    @Digits hundreds,
    @Digits tens,
    @Digits units
WHERE
    (units.K + 3) % 2 = 1
AND
    (10000*TenThous.K +
    1000*thousands.K +
    100*hundreds.K + 10*tens.K + units.K + 3) <= @UpperLimit;


INSERT INTO  @NotPrimes (K)
SELECT DISTINCT
    A.K * B.K   AS K
FROM
    @OddNumbers      A
    , @OddNumbers    B
WHERE
    A.K <= @SQR_ULimit     -- We can only limit one half of the equation using this method.
AND
    (A.K * B.K) <= @UpperLimit;


INSERT INTO  @Primes (K) VALUES (2);  -- Special case.
INSERT INTO  @Primes SELECT K FROM @OddNumbers;

DELETE FROM @Primes WHERE  K IN (SELECT K FROM @NotPrimes);

SELECT K FROM @Primes ORDER BY K;