1 PACKAGE okc_dbtree_pvt AUTHID CURRENT_USER AS
2 /*$Header: OKCTREES.pls 120.0 2005/05/25 23:01:28 appldev noship $*/
3 --
4 --===================
5 -- TYPES
6 --===================
7 --
8
9 TYPE TreeDataRec is RECORD
10 (
11 tree_initial_state NUMBER
12 ,tree_depth NUMBER
13 ,tree_label VARCHAR2(255)
14 ,tree_icon_name VARCHAR2(255)
15 ,tree_data VARCHAR2(255)
16 ,tree_node_id NUMBER
17 ,tree_node_type VARCHAR2(4)
18 ,tree_parent_node_id NUMBER
19 ,tree_level_number NUMBER
20 ,tree_num_children NUMBER
21 );
22
23 TYPE ResultRec IS RECORD
24 (
25 initial_state NUMBER
26 ,tree_depth NUMBER
27 ,node_label VARCHAR2(255)
28 ,node_icon VARCHAR2(255)
29 ,node_data VARCHAR2(255)
30 ,node_children NUMBER
31 );
32
33 TYPE ErrorRec IS RECORD
34 (
35 error_type VARCHAR2(10)
36 ,error_message VARCHAR2(255)
37 ,package_name VARCHAR2(100)
38 ,program_name VARCHAR2(100)
39 ,entry_point NUMBER
40 );
41
42 TYPE IndexControlRec IS RECORD
43 (
44 tree_id NUMBER
45 ,node_number NUMBER
46 ,start_ind NUMBER
47 ,end_ind NUMBER
48 ,num_entries NUMBER
49 ,current_set NUMBER
50 );
51
52
53 TYPE TreeDataTableType IS TABLE OF TreeDataRec;
54
55 TYPE ErrorStack IS TABLE OF ErrorRec
56 INDEX BY BINARY_INTEGER;
57
58 TYPE IndexControlTable IS TABLE of IndexControlRec;
59
60 TYPE ResultRecTableType IS TABLE OF ResultRec
61 INDEX BY BINARY_INTEGER;
62
63 --
64 --===================
65 -- Table Definitions
66 --===================
67 --
68
69 tDataTable TreeDataTableType;
70
71 IControlTable IndexControlTable;
72
73 ResultTable ResultRectableType;
74
75 --===================
76 -- CONSTANTS
77 --===================
78 --
79 PackageStateInd NUMBER := 0;
80 ActiveTreeID NUMBER := 0;
81 icon_name CONSTANT VARCHAR2(08) := 'affldhdr';
82
83 --===================
84 -- PUBLIC VARIABLES
85 --===================
86 -- add your public global variables here if any
87
88 --===================
89 -- PROCEDURES AND FUNCTIONS
90 --===================
91 --
92 PROCEDURE push_error
93 (p_package_name IN VARCHAR2
94 ,p_program_name IN VARCHAR2
95 ,p_entry_point IN NUMBER
96 ,p_error_type IN VARCHAR2
97 ,p_error_msg IN VARCHAR2
98 );
99
100 PROCEDURE pop_error
101 (p_delete_flag IN BOOLEAN
102 ,p_Package_name OUT NOCOPY VARCHAR2
103 ,p_program_name OUT NOCOPY VARCHAR2
104 ,p_entry_point OUT NOCOPY NUMBER
105 ,p_error_type OUT NOCOPY VARCHAR2
106 ,p_error_msg OUT NOCOPY VARCHAR2
107 );
108
109 PROCEDURE clear_stack;
110
111 FUNCTION Get_Data_Parameter
112 (p_data_string IN VARCHAR2,
113 p_parm_name IN VARCHAR2
114 )
115 RETURN VARCHAR2;
116
117 FUNCTION Get_Tree_ID
118 (p_tree_name IN VARCHAR2
119 )
120 RETURN NUMBER;
121
122 PROCEDURE ClearNodeCache
123 (p_tree_id IN NUMBER
124 ,p_node_number IN NUMBER
125 );
126
127 PROCEDURE ProcessRootNode
128 (p_tree_id IN NUMBER
129 ,p_access_flag IN VARCHAR2);
130
131 PROCEDURE ReturnChildrenNodes
132 (p_tree_id IN NUMBER
133 ,p_node_number IN NUMBER
134 ,p_reload_flag IN VARCHAR2
135 ,p_nodes_out OUT NOCOPY NUMBER
136 ,p_Result_table OUT NOCOPY okc_dbtree_pvt.ResultRecTableType);
137
138 PROCEDURE LoadNodeChildren
139 (p_tree_id IN NUMBER
140 ,p_node_number IN NUMBER
141 ,p_reload_flag IN VARCHAR2
142 ,p_nodes_out OUT NOCOPY NUMBER);
143
144 PROCEDURE Initialize_Package;
145
146 END okc_dbtree_pvt; -- end of package specification