[Home] [Help]
PACKAGE BODY: APPS.IEU_UWQ_SEL_RT_NODES_PKG
Source
1 package body IEU_UWQ_SEL_RT_NODES_PKG as
2 /* $Header: IEUSRTNB.pls 120.0 2005/06/02 15:44:00 appldev noship $ */
3 procedure INSERT_ROW (
4 X_RESOURCE_ID in NUMBER,
5 X_SEL_ENUM_ID in NUMBER,
6 X_NODE_ID in NUMBER,
7 X_NODE_TYPE in NUMBER,
8 X_NODE_PID in NUMBER,
9 X_NODE_WEIGHT in NUMBER,
10 X_SEL_ENUM_PID in NUMBER,
11 X_SEL_RT_NODE_ID in NUMBER,
12 X_MEDIA_TYPE_ID in NUMBER,
13 X_COUNT in NUMBER,
14 X_DATA_SOURCE in VARCHAR2,
15 X_VIEW_NAME in VARCHAR2,
16 X_WHERE_CLAUSE in VARCHAR2,
17 X_HIDE_IF_EMPTY in VARCHAR2,
18 X_NOT_VALID in VARCHAR2,
19 X_NODE_LABEL in VARCHAR2,
20 X_CREATION_DATE in DATE,
21 X_CREATED_BY in NUMBER,
22 X_LAST_UPDATE_DATE in DATE,
23 X_LAST_UPDATED_BY in NUMBER,
24 X_LAST_UPDATE_LOGIN in NUMBER,
25 X_REFRESH_VIEW_NAME in varchar2,
26 X_RES_CAT_ENUM_FLAG in VARCHAR2,
27 X_REFRESH_VIEW_SUM_COL in VARCHAR2
28 ) is
29
30 begin
31 insert into IEU_UWQ_SEL_RT_NODES (
32 SEL_ENUM_ID,
33 NODE_LABEL,
34 NODE_WEIGHT,
35 SEL_ENUM_PID,
36 SEL_RT_NODE_ID,
37 CREATED_BY,
38 CREATION_DATE,
39 LAST_UPDATED_BY,
40 LAST_UPDATE_DATE,
41 LAST_UPDATE_LOGIN,
42 MEDIA_TYPE_ID,
43 RESOURCE_ID,
44 NODE_ID,
45 NODE_TYPE,
46 COUNT,
47 DATA_SOURCE,
48 VIEW_NAME,
49 NODE_PID,
50 WHERE_CLAUSE,
51 HIDE_IF_EMPTY,
52 REFRESH_VIEW_NAME,
53 REFRESH_VIEW_SUM_COL,
54 RES_CAT_ENUM_FLAG,
55 NOT_VALID
56 ) values
57 (
58 X_SEL_ENUM_ID,
59 X_NODE_LABEL,
60 X_NODE_WEIGHT,
61 X_SEL_ENUM_PID,
62 X_SEL_RT_NODE_ID,
63 X_CREATED_BY,
64 X_CREATION_DATE,
65 X_LAST_UPDATED_BY,
66 X_LAST_UPDATE_DATE,
67 X_LAST_UPDATE_LOGIN,
68 X_MEDIA_TYPE_ID,
69 X_RESOURCE_ID,
70 X_NODE_ID,
71 X_NODE_TYPE,
72 X_COUNT,
73 X_DATA_SOURCE,
74 X_VIEW_NAME,
75 X_NODE_PID,
76 X_WHERE_CLAUSE,
77 X_HIDE_IF_EMPTY,
78 X_REFRESH_VIEW_NAME,
79 X_REFRESH_VIEW_SUM_COL,
80 X_RES_CAT_ENUM_FLAG,
81 X_NOT_VALID
82 );
83
84 end INSERT_ROW;
85
86 procedure UPDATE_ROW (
87 X_SEL_RT_NODE_ID in NUMBER,
88 X_RESOURCE_ID in NUMBER,
89 X_SEL_ENUM_ID in NUMBER,
90 X_NODE_ID in NUMBER,
91 X_NODE_TYPE in NUMBER,
92 X_NODE_PID in NUMBER,
93 X_NODE_WEIGHT in NUMBER,
94 X_SEL_ENUM_PID in NUMBER,
95 X_MEDIA_TYPE_ID in NUMBER,
96 X_COUNT in NUMBER,
97 X_DATA_SOURCE in VARCHAR2,
98 X_VIEW_NAME in VARCHAR2,
99 X_WHERE_CLAUSE in VARCHAR2,
100 X_HIDE_IF_EMPTY in VARCHAR2,
101 X_NOT_VALID in VARCHAR2,
102 X_NODE_LABEL in VARCHAR2,
103 X_LAST_UPDATE_DATE in DATE,
104 X_LAST_UPDATED_BY in NUMBER,
105 X_LAST_UPDATE_LOGIN in NUMBER,
106 X_REFRESH_VIEW_NAME in varchar2,
107 X_RES_CAT_ENUM_FLAG IN VARCHAR2,
108 X_REFRESH_VIEW_SUM_COL in VARCHAR2
109 ) is
110 begin
111 update IEU_UWQ_SEL_RT_NODES set
112 SEL_ENUM_ID = X_SEL_ENUM_ID,
113 NODE_ID = X_NODE_ID,
114 NODE_TYPE = X_NODE_TYPE,
115 NODE_PID = X_NODE_PID,
116 NODE_WEIGHT = X_NODE_WEIGHT,
117 SEL_ENUM_PID = X_SEL_ENUM_PID,
118 MEDIA_TYPE_ID = X_MEDIA_TYPE_ID,
119 COUNT = X_COUNT,
120 DATA_SOURCE = X_DATA_SOURCE,
121 VIEW_NAME = X_VIEW_NAME,
122 WHERE_CLAUSE = X_WHERE_CLAUSE,
123 HIDE_IF_EMPTY = X_HIDE_IF_EMPTY,
124 REFRESH_VIEW_NAME = X_REFRESH_VIEW_NAME,
125 REFRESH_VIEW_SUM_COL = X_REFRESH_VIEW_SUM_COL,
126 RES_CAT_ENUM_FLAG = X_RES_CAT_ENUM_FLAG,
127 NOT_VALID = X_NOT_VALID,
128 NODE_LABEL = X_NODE_LABEL,
129 LAST_UPDATE_DATE = sysdate,
130 LAST_UPDATED_BY = FND_GLOBAL.USER_ID,
131 LAST_UPDATE_LOGIN = FND_GLOBAL.LOGIN_ID
132 where RESOURCE_ID = X_RESOURCE_ID
133 and NODE_ID = X_NODE_ID;
134
135 if (sql%notfound) then
136 raise no_data_found;
137 end if;
138 end UPDATE_ROW;
139
140 PROCEDURE LOAD_ROW (
141 X_RESOURCE_ID in NUMBER,
142 X_SEL_ENUM_ID in NUMBER,
143 X_NODE_ID in NUMBER,
144 X_NODE_TYPE in NUMBER,
145 X_NODE_PID in NUMBER,
146 X_NODE_WEIGHT in NUMBER,
147 X_NODE_DEPTH in NUMBER,
148 X_SEL_ENUM_PID in NUMBER,
149 X_MEDIA_TYPE_ID in NUMBER,
150 X_COUNT in NUMBER,
151 X_DATA_SOURCE in VARCHAR2,
152 X_VIEW_NAME in VARCHAR2,
153 X_WHERE_CLAUSE in VARCHAR2,
154 X_HIDE_IF_EMPTY in VARCHAR2,
155 X_NOT_VALID in VARCHAR2,
156 X_NODE_LABEL in VARCHAR2,
157 X_REFRESH_VIEW_NAME in varchar2,
158 X_RES_CAT_ENUM_FLAG IN VARCHAR2,
159 X_REFRESH_VIEW_SUM_COL in varchar2
160
161 ) is
162
163 begin
164 update IEU_UWQ_SEL_RT_NODES set
165 SEL_ENUM_ID = X_SEL_ENUM_ID,
166 NODE_ID = X_NODE_ID,
167 NODE_TYPE = X_NODE_TYPE,
168 NODE_PID = X_NODE_PID,
169 NODE_WEIGHT = X_NODE_WEIGHT,
170 NODE_DEPTH = X_NODE_DEPTH,
171 SEL_ENUM_PID = X_SEL_ENUM_PID,
172 MEDIA_TYPE_ID = X_MEDIA_TYPE_ID,
173 COUNT = X_COUNT,
174 DATA_SOURCE = X_DATA_SOURCE,
175 VIEW_NAME = X_VIEW_NAME,
176 WHERE_CLAUSE = X_WHERE_CLAUSE,
177 HIDE_IF_EMPTY = X_HIDE_IF_EMPTY,
178 REFRESH_VIEW_NAME = X_REFRESH_VIEW_NAME,
179 REFRESH_VIEW_SUM_COL = X_REFRESH_VIEW_SUM_COL,
180 RES_CAT_ENUM_FLAG = X_RES_CAT_ENUM_FLAG,
181 NOT_VALID = X_NOT_VALID,
182 NODE_LABEL = X_NODE_LABEL,
183 LAST_UPDATE_DATE = sysdate,
184 LAST_UPDATED_BY = FND_GLOBAL.USER_ID,
185 LAST_UPDATE_LOGIN = FND_GLOBAL.LOGIN_ID
186 where RESOURCE_ID = X_RESOURCE_ID
187 and NODE_ID = X_NODE_ID;
188
189 if (sql%notfound) then --dbms_output.put_line('proc load row');
190 raise no_data_found;
191 end if;
192
193 exception
194 when no_data_found then
195 -- dbms_output.put_line('inserting');
196 insert into IEU_UWQ_SEL_RT_NODES (
197 SEL_RT_NODE_ID,
198 SEL_ENUM_ID,
199 NODE_LABEL,
200 NODE_WEIGHT,
201 NODE_DEPTH,
202 SEL_ENUM_PID,
203 CREATED_BY,
204 CREATION_DATE,
205 LAST_UPDATED_BY,
206 LAST_UPDATE_DATE,
207 LAST_UPDATE_LOGIN,
208 MEDIA_TYPE_ID,
209 RESOURCE_ID,
210 NODE_ID,
211 NODE_TYPE,
212 COUNT,
213 DATA_SOURCE,
214 VIEW_NAME,
215 NODE_PID,
216 WHERE_CLAUSE,
217 HIDE_IF_EMPTY,
218 REFRESH_VIEW_NAME,
219 REFRESH_VIEW_SUM_COL,
220 RES_CAT_ENUM_FLAG,
221 NOT_VALID
222 ) values
223 (
224 IEU_UWQ_SEL_RT_NODES_S1.NEXTVAL,
225 X_SEL_ENUM_ID,
226 X_NODE_LABEL,
227 X_NODE_WEIGHT,
228 X_NODE_DEPTH,
229 X_SEL_ENUM_PID,
230 FND_GLOBAL.USER_ID,
231 sysdate,
232 FND_GLOBAL.USER_ID,
233 sysdate,
234 FND_GLOBAL.LOGIN_ID,
235 X_MEDIA_TYPE_ID,
236 X_RESOURCE_ID,
237 X_NODE_ID,
238 X_NODE_TYPE,
239 X_COUNT,
240 X_DATA_SOURCE,
241 X_VIEW_NAME,
242 X_NODE_PID,
243 X_WHERE_CLAUSE,
244 X_HIDE_IF_EMPTY,
245 X_REFRESH_VIEW_NAME,
246 X_REFRESH_VIEW_SUM_COL,
247 X_RES_CAT_ENUM_FLAG,
248 X_NOT_VALID
249 );
250
251 END LOAD_ROW;
252
253 procedure DELETE_ROW (
254 X_RESOURCE_ID in NUMBER,
255 X_SEL_ENUM_ID in NUMBER,
256 X_NODE_ID in NUMBER,
257 X_NODE_TYPE in NUMBER,
258 X_NODE_PID in NUMBER
259 ) is
260 begin
261 delete from IEU_UWQ_SEL_RT_NODES
262 where RESOURCE_ID = X_RESOURCE_ID
263 and SEL_ENUM_ID = X_SEL_ENUM_ID
264 and NODE_ID = X_NODE_ID
265 and NODE_TYPE = X_NODE_TYPE
266 and NODE_PID = X_NODE_PID;
267
268 if (sql%notfound) then
269 raise no_data_found;
270 end if;
271
272 end DELETE_ROW;
273
274 end IEU_UWQ_SEL_RT_NODES_PKG;