Question

sql 知道父节点，查询所有的子节点，运用游标，递归，存储过程

表tmbm

BPROD char(15) 老爸
BMWHS char(2) 厂号
BMBOMM char(2) method
BSEQ decimal(3, 0) 序号
BCHLD char(15) 儿子
BQREQ decimal(15, 6) 用量
BDEFF decimal(8, 0) 开始生效日期
BDDIS decimal(8, 0) 失效日期
BMSCP decimal(5, 4) 报废率
BBUBB decimal(3, 0) bubb

Answer 1

呃，因为我不清楚你的表里，这个BPROD char(15) 老爸 里面记录的值是不是和BMWHS 对应的，所以只能说个大概。
select sys_connect_by_path(username,'>') "Path"
from tmbm
start with id=1
connect by prior id=parentid;

其中，id是你要遍历的起始点，比如你想从 厂号=XX 的这个父节点开始寻找他所有的子节点，这里就换成 start with BMWHS=XX

然后，connect by prior id=parentid，这里id=parentid，简单解释就是寻找其他记录里，parentid和我的id相同的记录，也就是找子节点。
应该是换成你的BMWHS=BPROD（我不知道你的BPROD BCHLD 和哪个属性是对应的，是BMWHS吗？）
如果是的话就是下面这样（username是你要返回的值，假设你还是要返回 BSEQ 序号）

select sys_connect_by_path(BSEQ,'>') "Path"
from tmbm
start with BMWHS=XX

connect by prior BMWHS=BPROD;

追问

我想要输入老爸BPROD后，能够返回儿子BCHLD，序号BSEQ代表的是，加入一个老爸由3个儿子组成，那么三个儿子编号为1,2,3，如果儿子有多层，要返回多层数据。其他的都是tmbm表中的，只要在显示结果的时候，把表中的数据一起显示出来就行。

追答

呃，我想想怎么说，能看看你数据具体是怎样的么？
比如数据是这样的：
BPROD BSEQ BCHLD
null 1 2，3，4
1 2 5
1 3 6
1 4 null
2 5 null
3 6 null
那你是要输入序号1，然后得到所有1的儿子，2,3,4,5,6 对吗？那是不是这个BPROD 和BSEQ 一样记录的都是序号呢？

追问

假如老爸bprod是A，由儿子R1，R2组成，R2又由W1，W2组成，我希望的到下面的结果，我要如何写这个存储过程，要用到游标
bprod bchld bseq
A R1 1
A R2 2
R2 W1 1
R2 W2 2
能否给出具体代码，可以追加分数

追答

怎么说呢，你如果是只想得到你说的输出结果的话，我感觉用游标和存储过程没有意义啊，就用我说的select语句就可以得到了，用游标的话我还真不太会，我只能尽我所能写一个游标，存储过程和递归的样板给你，你看看能用到不？

create procedure find_bprod @bprod varchar(15)

as
declare @bchld varchar(15);

declare cursorrr cursor for

select * from tmbm where bprod=@bprod ;

open cursorrr;

fetch next from cursorrr into @bchld;

while(@@fetch_status = 0)

begin
exec find_bprod @bchld ——按你的要求，用递归的方法，寻找子节点是否还有子节点

fetch next from cursorrr into @bchld;

在这里写入代码就可以实现递归，比如对所有子节点的数据进行更新之类的，比如写个update在这里，但是你要查找并返回结果集，这个我觉得好像实现不了啊，游标可以让我们遍历每一个我们查找出来的结果集里的记录，难道要每个递归都生成一个结果子集，然后最后将结果子集合并吗？这就好比你通过搜索得到一个集合，现在你把集合拆散了，一个个去遍历集合的零件，然后再把这些零件凑起来重新组装成一个原集合一半内容的新集合，那还不如一开始就直接从原集合的基础上拆掉不要的，你明白我的意思么。。那还不如就用专门的select语句来剔除不需要的零件更简单啊。

end;

close cursorrr;

deallocate cursorrr;

按你的要求，改了下select，试试这个，他能找到已知老爸为A的所有子节点：
select bprod,bchld,bseq
from tmbm
start with bprod=A
connect by prior bchld=bprod;