DBA Data[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;