C
chudx
Unregistered / Unconfirmed
GUEST, unregistred user!
有一个表名为：JBZL 其中一个编号字段名为BH 有数据如下 1,16,3,5,4,7,10,11,12,13
现在想在查出在BH字段中所有的没有使用的空号，如上面查出空号为2,6,8,9,14,15。
用一存储过程实现。但是存储过程写出来时，发现SQL中好像没有数组类型，不知怎么才
能把查出的这一组数据返回给Delphi，请各们大侠帮助一下，或有什么其它的办法，最
好是在SQL中完成，不要把数据转给Delphi在处理。
我写的存储过程
Create Procedure p_Query_EmptyNumber as
Declare @I int
Declare @KK int
Select @ I = 0
Declare Cur_store Cursor For
Select BH From JBZL Order By BH For Read Only
Open Cur_Store
Fetch Cur_Store Into @KK
/*取得空号*/
while @@Fetch_Status = 0
begin
Select @I = @I + 1
if @I < @KK
begin
while @I < @KK
begin
Print @I /*怎么把这个地方产生的数据反回到Delphi中呢*/
Select @I = @I + 1
end
end
Fetch Cur_Store Into @KK
end
Close Cur_Store
Deallocate Cur_Store
Go
现在想在查出在BH字段中所有的没有使用的空号，如上面查出空号为2,6,8,9,14,15。
用一存储过程实现。但是存储过程写出来时，发现SQL中好像没有数组类型，不知怎么才
能把查出的这一组数据返回给Delphi，请各们大侠帮助一下，或有什么其它的办法，最
好是在SQL中完成，不要把数据转给Delphi在处理。
我写的存储过程
Create Procedure p_Query_EmptyNumber as
Declare @I int
Declare @KK int
Select @ I = 0
Declare Cur_store Cursor For
Select BH From JBZL Order By BH For Read Only
Open Cur_Store
Fetch Cur_Store Into @KK
/*取得空号*/
while @@Fetch_Status = 0
begin
Select @I = @I + 1
if @I < @KK
begin
while @I < @KK
begin
Print @I /*怎么把这个地方产生的数据反回到Delphi中呢*/
Select @I = @I + 1
end
end
Fetch Cur_Store Into @KK
end
Close Cur_Store
Deallocate Cur_Store
Go