机关架构目录树的函数没有取出下级单位，何解

组织架构目录树的函数没有取出下级单位，何解？
f_inntree(tv_1,'0',1,0)


///函数名称f_inntree
//函数变量
//参数：treeview  tv1
//      string    fathercd  父店码
//      integer   handle    目录树节点
//      integer   treestat  判断是否是第一次插入，如果是第一次插入的话则为0

TreeViewItem ltvi_Item,ltvi_st
integer li_handle
long ll_count


if treestat=0 then 
ltvi_Item.label='组织架构'
ltvi_Item.data='0'
tv1.InsertItemlast(0,ltvi_item)

end if

string ls_inncd,ls_innname
DECLARE inn_cur CURSOR FOR

        SELECT inncd,innname 

        FROM info_inn where fathercd=:fathercd using sqlca;
  
  open inn_cur;
  
  fetch inn_cur into :ls_inncd,:ls_innname;
 
  do  while sqlca.sqlcode=0 
   messagebox(ls_innname,ls_inncd)
ltvi_Item.label=ls_innname
ltvi_Item.data=ls_inncd

li_handle=tv1.InsertItemlast(handle,ltvi_item)
tv1.EditLabel ( li_handle )

   messagebox(ls_inncd,string(li_handle))

f_inntree(tv1,ls_inncd,li_handle,1)

fetch inn_cur into :ls_inncd,:ls_innname;

  loop
  
  close inn_cur;


运行程序并中断查看，发现当ls_inncd=‘02’的时候，所对应的fathercd为02的下级单位没有取出来 
------解决思路----------------------
运行程序并中断查看，发现当ls_inncd=‘02’的时候，所对应的fathercd为02的下级单位没有取出来 

是不是sql写的不对或者压根就没有数据？