declare
cur sys_refcursor;
errcode number(10);
errtext nvarchar2(400);
TYPE mdmtype is RECORD --定义记录的类型
(
Ordinal number(10),
leafid number(10) ,
leafname varchar2(100),
leafcode VARCHAR(20)
);
cur_stu mdmtype;
begin
ha_wt_treedata('clientid','excode','accesstoken',153,cur,errcode,errtext);
fetch cur into cur_stu;
loop
--dbms_output.put_line(cur.code||' '||cur.nodename);
dbms_output.put_line(cur_stu.leafcode||' '||cur_stu.leafname);
fetch cur into cur_stu;
exit when cur%notfound;
end loop;
end;
cur sys_refcursor;
errcode number(10);
errtext nvarchar2(400);
TYPE mdmtype is RECORD --定义记录的类型
(
Ordinal number(10),
leafid number(10) ,
leafname varchar2(100),
leafcode VARCHAR(20)
);
cur_stu mdmtype;
begin
ha_wt_treedata('clientid','excode','accesstoken',153,cur,errcode,errtext);
fetch cur into cur_stu;
loop
--dbms_output.put_line(cur.code||' '||cur.nodename);
dbms_output.put_line(cur_stu.leafcode||' '||cur_stu.leafname);
fetch cur into cur_stu;
exit when cur%notfound;
end loop;
end;