我以前用这个方法可以实现，现在在树上什么也没有显示，是怎么回事呀

我在窗口的  OPEN()  事件中加的
integer str_1,str_2,str_3
long i,ll_curr,handle1,ll_curr1
string bi,cat_id,cat_name,cat_info_id
datastore lds_depar

treeviewitem ltiv_data
lds_depar = create datastore
lds_depar.dataobject = "lds_depar"
lds_depar.settransobject(sqlca)
ll_curr1 = lds_depar.retrieve()

//DECLARE get_cat CURSOR FOR
//SELECT distinct f_type_id,mt_name FROM mt_cat_info;
//where f_type_id = true;
//Open get_cat;
//fetch get_cat into :cat_id,:cat_name;
//i=i+1
//DO while sqlca.sqlcode = 0
for i = 1 to ll_curr1
    //if cat_id<>'' and 2 = len(cat_id) then
       //ltiv_data.label = lds_depar.object.deparment_name[i]
        //ltiv_data.data = lds_depar.object.deparment_id[i]
        ltiv_data.label = lds_depar.getitemstring(i,2)
        ltiv_data.data = lds_depar.getitemstring(i,1)
        //cat_info_id = lds_depar.object.deparment_name[i]
        ltiv_data.pictureindex = 1
        ltiv_data.selectedpictureindex = 1
        ltiv_data.children = true
        handle1 = tv_1.insertitemlast(0,ltiv_data)
    //end if
next
//loop
//Close get_cat;
destroy lds_depar