1: function hp_top_level_content_title (filesystem_node IN integer)
2: return varchar2
3: IS
4: CURSOR name_cursor IS
5: select file_pretty_name from users_files
6: where file_id=filesystem_node;
7: CURSOR parent_cursor IS
8: select parent_id from users_files
9: where file_id=filesystem_node;
10: CURSOR managed_p_cursor IS
11: select managed_p from users_files
12: where file_id=filesystem_node;
13: managedp varchar(1);
14: fullname varchar(500);
15: parentid integer;
16: parent_managedp varchar(1);
17: BEGIN
18: OPEN parent_cursor;
19: OPEN name_cursor;
20: OPEN managed_p_cursor;
21: FETCH parent_cursor INTO parentid;
22: FETCH name_cursor INTO fullname;
23: FETCH managed_p_cursor INTO managedp;
24: CLOSE parent_cursor;
25: CLOSE name_cursor;
26: CLOSE managed_p_cursor;
27: IF parentid is null
28: THEN
29: return fullname;
30: END IF;
31: IF managedp = 't'
32: THEN
33: select managed_p into parent_managedp
34: from users_files
35: where file_id=parentid;
36:
37: IF parent_managedp = 'f'
38: THEN
39: return fullname;
40: ELSE
41: return hp_top_level_content_title(parentid);
42: END IF;
43: ELSE
44: return fullname;
45: END IF;
46: END;
|