[Home] [Help]
PACKAGE BODY: APPS.CNDISL_SLICE_ATTRIBUTES_PKG
Source
1 PACKAGE BODY CNDISL_Slice_Attributes_PKG as
2 -- $Header: cndislcb.pls 115.1 99/07/16 07:06:33 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_dest_column_id IN number,
34 X_dest_column_name IN OUT varchar2) IS
35 BEGIN
36
37 SELECT col.name
38 INTO X_column_name
39 FROM cn_obj_columns_v col
40 WHERE col.column_id = X_source_column_id;
41
42 SELECT name
43 INTO X_dest_column_name
44 FROM cn_obj_columns_v
45 WHERE column_id = X_dest_column_id;
46
47 END Populate_Fields;
48
49 -- -----------------------------------------------------------
50
51 PROCEDURE Insert_Row ( X_table_map_id number,
52 X_column_map_id number,
53 X_source_column_id number,
54 X_group_by_flag varchar,
55 X_destination_column_id number,
56 X_aggregate_function varchar,
57 X_column_name varchar,
58 X_repository_id number,
59 X_table_id number,
60 X_tmp_table_map_id number,
61 X_tmp_table_id number,
62 X_tmp_column_map_id number,
63 X_tmp_dest_column_id number,
64 X_rup_table_map_id number,
65 X_rup_table_id number,
66 X_rup_column_map_id number,
67 X_rup_dest_column_id number) IS
68
69 BEGIN
70
71 -- Slice table definition --
72
73 INSERT INTO cn_column_maps ( table_map_id,
74 column_map_id,
75 source_column_id,
76 group_by_flag,
77 destination_column_id,
78 aggregate_function)
79 VALUES (X_table_map_id, X_column_map_id,
80 X_source_column_id,
81 X_group_by_flag,
82 X_destination_column_id,
83 X_aggregate_function);
84
85 INSERT INTO cn_obj_columns_v (column_id, name, dependency_map_complete,
86 status, repository_id, table_id, data_length,
87 data_type, nullable, primary_key, position,
88 data_scale, column_type, object_type)
89 (SELECT X_destination_column_id, X_column_name, 'N',
90 'V', X_repository_id, X_table_id, data_length,
91 data_type, nullable, 'N', position,
92 data_scale, column_type, 'COL'
93 FROM cn_obj_columns_v WHERE column_id = X_source_column_id);
94
95 -- Temp. slice table definition --
96
97 INSERT INTO cn_column_maps ( table_map_id,
98 column_map_id,
99 source_column_id,
100 group_by_flag,
101 destination_column_id,
102 aggregate_function)
103 VALUES (X_tmp_table_map_id, X_tmp_column_map_id,
104 X_source_column_id,
105 X_group_by_flag,
106 X_tmp_dest_column_id,
107 X_aggregate_function);
108
109 INSERT INTO cn_obj_columns_v (column_id, name, dependency_map_complete,
110 status, repository_id, table_id, data_length,
111 data_type, nullable, primary_key, position,
112 data_scale, column_type, object_type)
113 (SELECT X_tmp_dest_column_id, X_column_name, 'N',
114 'V', X_repository_id, X_tmp_table_id, data_length,
115 data_type, nullable, 'N', position,
116 data_scale, column_type, 'COL'
117 FROM cn_obj_columns_v WHERE column_id = X_source_column_id);
118
119 -- Rollup table definition --
120
121 INSERT INTO cn_column_maps ( table_map_id,
122 column_map_id,
123 source_column_id,
124 group_by_flag,
125 destination_column_id,
126 aggregate_function)
127 VALUES (X_rup_table_map_id, X_rup_column_map_id,
128 X_source_column_id,
129 X_group_by_flag,
130 X_rup_dest_column_id,
131 X_aggregate_function);
132
133 INSERT INTO cn_obj_columns_v (column_id, name, dependency_map_complete,
134 status, repository_id, table_id, data_length,
135 data_type, nullable, primary_key, position,
136 data_scale, column_type, object_type)
137 (SELECT X_rup_dest_column_id, X_column_name, 'N',
138 'V', X_repository_id, X_rup_table_id, data_length,
139 data_type, nullable, 'N', position,
140 data_scale, column_type, 'COL'
141 FROM cn_obj_columns_v WHERE column_id = X_source_column_id);
142
143 END Insert_Row;
144
145 -- -----------------------------------------------------------
146
147 PROCEDURE Delete_Row ( X_column_map_id number,
148 X_destination_column_id number,
149 X_tmp_column_map_id number,
150 X_tmp_dest_column_id number,
151 X_rup_column_map_id number,
152 X_rup_dest_column_id number) IS
153
154 BEGIN
155
156 DELETE cn_column_maps WHERE column_map_id = X_column_map_id;
157 DELETE cn_obj_columns_v WHERE column_id = X_destination_column_id;
158
159 DELETE cn_column_maps WHERE column_map_id = X_tmp_column_map_id;
160 DELETE cn_obj_columns_v WHERE column_id = X_tmp_dest_column_id;
161
162 DELETE cn_column_maps WHERE column_map_id = X_rup_column_map_id;
163 DELETE cn_obj_columns_v WHERE column_id = X_rup_dest_column_id;
164
165 END Delete_Row;
166
167 -- -----------------------------------------------------------
168
169 END CNDISL_Slice_Attributes_PKG;