DBA Data[Home] [Help]

PACKAGE: APPS.OKC_DBTREE_PVT

Source


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