DBA Data[Home] [Help]

PACKAGE BODY: APPS.CNDISL_SLICE_DEF_DIM_PKG

Source


1 PACKAGE BODY CNDISL_slice_def_dim_PKG as
2 -- $Header: cndislbb.pls 115.1 99/07/16 07:06:28 porting ship $
3 
4 
5 -- -----------------------------------------------------------
6 
7 PROCEDURE Default_Rows (X_column_map_id		IN OUT	number,
8 			X_destination_column_id IN OUT number,
9 			X_tmp_column_map_id	IN OUT	number,
10 			X_tmp_dest_column_id 	IN OUT number,
11 			X_rup_column_map_id	IN OUT	number,
12 			X_rup_dest_column_id 	IN OUT number) IS
13 BEGIN
14 
15   SELECT cn_column_maps_s.nextval, cn_objects_s.nextval
16 	INTO X_column_map_id, X_destination_column_id
17 	FROM dual;
18 
19   SELECT cn_column_maps_s.nextval, cn_objects_s.nextval
20 	INTO X_tmp_column_map_id, X_tmp_dest_column_id
21 	FROM dual;
22 
23   SELECT cn_column_maps_s.nextval, cn_objects_s.nextval
24 	INTO X_rup_column_map_id, X_rup_dest_column_id
25 	FROM dual;
26 
27 END Default_Rows;
28 
29 -- -----------------------------------------------------------
30 
31 PROCEDURE Populate_Fields (X_source_column_id	IN 	number,
32 			   X_column_name	IN OUT	varchar2,
33 			   X_dimension_name	IN OUT	varchar2,
34 			   X_dest_column_id	IN	number,
35 			   X_dest_column_name	IN OUT	varchar2) IS
36 BEGIN
37 
38   SELECT col.name, dim.name
39 	INTO X_column_name, X_dimension_name
40 	FROM cn_obj_columns_v col,
41 	     cn_dimensions    dim
42 	WHERE col.column_id = X_source_column_id
43 	  AND col.dimension_id = dim.dimension_id (+);
44 
45   SELECT name
46 	INTO X_dest_column_name
47 	FROM cn_obj_columns_v
48 	WHERE column_id = X_dest_column_id;
49 
50 END Populate_Fields;
51 
52 -- -----------------------------------------------------------
53 
54 PROCEDURE Insert_Row (	X_table_map_id		number,
55 			X_column_map_id		number,
56 			X_source_column_id	number,
57 			X_group_by_flag		varchar,
58 			X_destination_column_id	number,
59 			X_column_name		varchar,
60 			X_repository_id		number,
61 			X_table_id		number,
62 			X_tmp_table_map_id	number,
63 			X_tmp_table_id		number,
64 			X_tmp_column_map_id	number,
65 			X_tmp_dest_column_id 	number,
66 			X_rup_table_map_id	number,
67 			X_rup_table_id		number,
68 			X_rup_column_map_id	number,
69 			X_rup_dest_column_id 	number) IS
70 
71 BEGIN
72 
73   INSERT INTO cn_column_maps (table_map_id, column_map_id,
74 				source_column_id, group_by_flag,
75 				destination_column_id)
76 	VALUES (X_table_map_id, X_column_map_id,
77 				X_source_column_id, X_group_by_flag,
78 				X_destination_column_id);
79 
80   INSERT INTO cn_obj_columns_v (column_id, name, dependency_map_complete,
81 		status, repository_id, table_id, data_length,
82 		data_type, nullable, primary_key, position,
83 		dimension_id, data_scale, column_type, object_type)
84 	(SELECT X_destination_column_id, X_column_name, 'N',
85 		'V', X_repository_id, X_table_id, data_length,
86 		data_type, nullable, 'N', position,
87 		dimension_id, data_scale, column_type, 'COL'
88 	FROM cn_obj_columns_v WHERE column_id = X_source_column_id);
89 
90 
91   -- Temp. slice table definition ----------
92 
93   INSERT INTO cn_column_maps (table_map_id, column_map_id,
94 				source_column_id, group_by_flag,
95 				destination_column_id)
96 	VALUES (X_tmp_table_map_id, X_tmp_column_map_id,
97 				X_source_column_id, X_group_by_flag,
98 				X_tmp_dest_column_id);
99 
100   INSERT INTO cn_obj_columns_v (column_id, name, dependency_map_complete,
101 		status, repository_id, table_id, data_length,
102 		data_type, nullable, primary_key, position,
103 		dimension_id, data_scale, column_type, object_type)
104 	(SELECT X_tmp_dest_column_id, X_column_name, 'N',
105 		'V', X_repository_id, X_tmp_table_id, data_length,
106 		data_type, nullable, 'N', position,
107 		dimension_id, data_scale, column_type, 'COL'
108 	FROM cn_obj_columns_v WHERE column_id = X_source_column_id);
109 
110   -- Temp. Rollup table definition ----------
111 
112   INSERT INTO cn_column_maps (table_map_id, column_map_id,
113 				source_column_id, group_by_flag,
114 				destination_column_id)
115 	VALUES (X_rup_table_map_id, X_rup_column_map_id,
116 				X_source_column_id, X_group_by_flag,
117 				X_rup_dest_column_id);
118 
119   INSERT INTO cn_obj_columns_v (column_id, name, dependency_map_complete,
120 		status, repository_id, table_id, data_length,
121 		data_type, nullable, primary_key, position,
122 		dimension_id, data_scale, column_type, object_type)
123 	(SELECT X_rup_dest_column_id, X_column_name, 'N',
124 		'V', X_repository_id, X_rup_table_id, data_length,
125 		data_type, nullable, 'N', position,
126 		dimension_id, data_scale, column_type, 'COL'
127 	FROM cn_obj_columns_v WHERE column_id = X_source_column_id);
128 
129 END Insert_Row;
130 
131 -- -----------------------------------------------------------
132 
133 PROCEDURE Delete_Row ( 	X_column_map_id		number,
134 		       	X_destination_column_id	number,
135 			X_tmp_column_map_id	number,
136 		       	X_tmp_dest_column_id	number,
137 			X_rup_column_map_id	number,
138 		       	X_rup_dest_column_id	number) IS
139 BEGIN
140 
141   DELETE cn_column_maps WHERE column_map_id = X_column_map_id;
142   DELETE cn_obj_columns_v WHERE column_id = X_destination_column_id;
143 
144   DELETE cn_column_maps WHERE column_map_id = X_tmp_column_map_id;
145   DELETE cn_obj_columns_v WHERE column_id = X_tmp_dest_column_id;
146 
147   DELETE cn_column_maps WHERE column_map_id = X_rup_column_map_id;
148   DELETE cn_obj_columns_v WHERE column_id = X_rup_dest_column_id;
149 
150 END Delete_Row;
151 
152 -- -----------------------------------------------------------
153 
154 END CNDISL_slice_def_dim_PKG;