DBA Data[Home] [Help]

PACKAGE BODY: APPS.ALR_ALERTS_PKG

Source


1 package body ALR_ALERTS_PKG as
2 /* $Header: ALRALRTB.pls 120.4.12010000.1 2008/07/27 06:58:21 appldev ship $ */
3 procedure INSERT_ROW (
4   X_ROWID in out nocopy VARCHAR2,
5   X_APPLICATION_ID in NUMBER,
6   X_ALERT_ID in NUMBER,
7   X_ALERT_NAME in VARCHAR2,
8   X_ALERT_CONDITION_TYPE in VARCHAR2,
9   X_ENABLED_FLAG in VARCHAR2,
10   X_START_DATE_ACTIVE in DATE,
11   X_END_DATE_ACTIVE in DATE,
12   X_TABLE_ID in NUMBER,
13   X_TABLE_APPLICATION_ID in NUMBER,
14   X_DESCRIPTION in VARCHAR2,
15   X_FREQUENCY_TYPE in VARCHAR2,
16   X_WEEKLY_CHECK_DAY in VARCHAR2,
17   X_MONTHLY_CHECK_DAY_NUM in NUMBER,
18   X_DAYS_BETWEEN_CHECKS in NUMBER,
19   X_CHECK_BEGIN_DATE in DATE,
20   X_DATE_LAST_CHECKED in DATE,
21   X_INSERT_FLAG in VARCHAR2,
22   X_UPDATE_FLAG in VARCHAR2,
23   X_DELETE_FLAG in VARCHAR2,
24   X_MAINTAIN_HISTORY_DAYS in NUMBER,
25   X_CHECK_TIME in NUMBER,
26   X_CHECK_START_TIME in NUMBER,
27   X_CHECK_END_TIME in NUMBER,
28   X_SECONDS_BETWEEN_CHECKS in NUMBER,
29   X_CHECK_ONCE_DAILY_FLAG in VARCHAR2,
30   X_SQL_STATEMENT_TEXT in LONG,
31   X_ONE_TIME_ONLY_FLAG in NUMBER,
32   X_TABLE_NAME in VARCHAR2,
33   X_CREATION_DATE in DATE,
34   X_CREATED_BY in NUMBER,
35   X_LAST_UPDATE_DATE in DATE,
36   X_LAST_UPDATED_BY in NUMBER,
37   X_LAST_UPDATE_LOGIN in NUMBER
38 ) is
39   cursor C is select ROWID from ALR_ALERTS
40     where APPLICATION_ID = X_APPLICATION_ID
41     and ALERT_ID = X_ALERT_ID
42     ;
43 begin
44   insert into ALR_ALERTS (
45     APPLICATION_ID,
46     ALERT_ID,
47     ALERT_NAME,
48     LAST_UPDATE_DATE,
49     LAST_UPDATED_BY,
50     CREATION_DATE,
51     CREATED_BY,
52     LAST_UPDATE_LOGIN,
53     ALERT_CONDITION_TYPE,
54     ENABLED_FLAG,
55     START_DATE_ACTIVE,
56     END_DATE_ACTIVE,
57     TABLE_ID,
58     TABLE_APPLICATION_ID,
59     DESCRIPTION,
60     FREQUENCY_TYPE,
61     WEEKLY_CHECK_DAY,
62     MONTHLY_CHECK_DAY_NUM,
63     DAYS_BETWEEN_CHECKS,
64     CHECK_BEGIN_DATE,
65     DATE_LAST_CHECKED,
66     INSERT_FLAG,
67     UPDATE_FLAG,
68     DELETE_FLAG,
69     MAINTAIN_HISTORY_DAYS,
70     CHECK_TIME,
71     CHECK_START_TIME,
72     CHECK_END_TIME,
73     SECONDS_BETWEEN_CHECKS,
74     CHECK_ONCE_DAILY_FLAG,
75     SQL_STATEMENT_TEXT,
76     ONE_TIME_ONLY_FLAG,
77     TABLE_NAME
78   ) values (
79     X_APPLICATION_ID,
80     X_ALERT_ID,
81     X_ALERT_NAME,
82     X_LAST_UPDATE_DATE,
83     X_LAST_UPDATED_BY,
84     X_CREATION_DATE,
85     X_CREATED_BY,
86     X_LAST_UPDATE_LOGIN,
87     X_ALERT_CONDITION_TYPE,
88     X_ENABLED_FLAG,
89     X_START_DATE_ACTIVE,
90     X_END_DATE_ACTIVE,
91     X_TABLE_ID,
92     X_TABLE_APPLICATION_ID,
93     X_DESCRIPTION,
94     X_FREQUENCY_TYPE,
95     X_WEEKLY_CHECK_DAY,
96     X_MONTHLY_CHECK_DAY_NUM,
97     X_DAYS_BETWEEN_CHECKS,
98     X_CHECK_BEGIN_DATE,
99     X_DATE_LAST_CHECKED,
100     X_INSERT_FLAG,
101     X_UPDATE_FLAG,
102     X_DELETE_FLAG,
103     X_MAINTAIN_HISTORY_DAYS,
104     X_CHECK_TIME,
105     X_CHECK_START_TIME,
106     X_CHECK_END_TIME,
107     X_SECONDS_BETWEEN_CHECKS,
108     X_CHECK_ONCE_DAILY_FLAG,
109     X_SQL_STATEMENT_TEXT,
110     X_ONE_TIME_ONLY_FLAG,
111     X_TABLE_NAME
112   );
113 
114   open c;
115   fetch c into X_ROWID;
116   if (c%notfound) then
117     close c;
118     raise no_data_found;
119   end if;
120   close c;
121 
122 end INSERT_ROW;
123 
124 procedure LOAD_ROW (
125   X_APPLICATION_SHORT_NAME in VARCHAR2,
126   X_ALERT_NAME in VARCHAR2,
127   X_OWNER in VARCHAR2,
128   X_ALERT_CONDITION_TYPE in VARCHAR2,
129   X_ENABLED_FLAG in VARCHAR2,
130   X_START_DATE_ACTIVE in VARCHAR2,
131   X_END_DATE_ACTIVE in VARCHAR2,
132   X_TABLE_APPLICATION_SHORT_NAME in VARCHAR2,
133   X_DESCRIPTION in VARCHAR2,
134   X_FREQUENCY_TYPE in VARCHAR2,
135   X_WEEKLY_CHECK_DAY in VARCHAR2,
136   X_MONTHLY_CHECK_DAY_NUM in VARCHAR2,
137   X_DAYS_BETWEEN_CHECKS in VARCHAR2,
138   X_CHECK_BEGIN_DATE in VARCHAR2,
139   X_DATE_LAST_CHECKED in VARCHAR2,
140   X_INSERT_FLAG in VARCHAR2,
141   X_UPDATE_FLAG in VARCHAR2,
142   X_DELETE_FLAG in VARCHAR2,
143   X_MAINTAIN_HISTORY_DAYS in VARCHAR2,
144   X_CHECK_TIME in VARCHAR2,
145   X_CHECK_START_TIME in VARCHAR2,
146   X_CHECK_END_TIME in VARCHAR2,
147   X_SECONDS_BETWEEN_CHECKS in VARCHAR2,
148   X_CHECK_ONCE_DAILY_FLAG in VARCHAR2,
149   X_SQL_STATEMENT_TEXT in VARCHAR2,
150   X_ONE_TIME_ONLY_FLAG in VARCHAR2,
151   X_TABLE_NAME in VARCHAR2,
152   X_LAST_UPDATE_DATE in VARCHAR2,
153   X_CUSTOM_MODE in VARCHAR2
154 ) is
155     l_user_id number := 0;
156     l_app_id  number := 0;
157     l_alert_id number := 0;
158     l_table_id number := null;
159     l_table_app_id number := null;
160     l_row_id varchar2(64);
161     f_luby    number;  -- entity owner in file
162     f_ludate  date;    -- entity update date in file
163     db_luby   number;  -- entity owner in db
164     db_ludate date;    -- entity update date in db
165 
166 begin
167 
168    -- Translate owner to file_last_updated_by
169   f_luby := fnd_load_util.owner_id(X_OWNER);
170 
171  -- Translate char last_update_date to date
172   f_ludate := nvl(to_date(x_last_update_date, 'YYYY/MM/DD'), sysdate);
173 
174   select APPLICATION_ID into l_app_id
175   from FND_APPLICATION
176   where APPLICATION_SHORT_NAME = X_APPLICATION_SHORT_NAME;
177 
178   if (X_TABLE_APPLICATION_SHORT_NAME is not null) then
179     select APPLICATION_ID into l_table_app_id
180     from FND_APPLICATION
181     where APPLICATION_SHORT_NAME = X_TABLE_APPLICATION_SHORT_NAME;
182   end if;
183 
184   if ((X_TABLE_APPLICATION_SHORT_NAME is not null)
185     and (X_TABLE_NAME is not null)) then
186     select TABLE_ID into l_table_id
187     from FND_TABLES
188     where APPLICATION_ID = l_table_app_id
189     and TABLE_NAME = X_TABLE_NAME;
190   end if;
191 
192   select ALERT_ID into l_alert_id
193   from ALR_ALERTS
194   where APPLICATION_ID = l_app_id
195   and ALERT_NAME = X_ALERT_NAME;
196 
197   select last_updated_by, last_update_date
198   into  db_luby, db_ludate
199   from ALR_ALERTS
200   where application_id = l_app_id
201   and   alert_id = l_alert_id;
202 
203  if (fnd_load_util.upload_test(f_luby, f_ludate, db_luby,db_ludate,
204                                 x_custom_mode)) then
205 
206   ALR_ALERTS_PKG.UPDATE_ROW(
207     X_APPLICATION_ID => l_app_id,
208     X_ALERT_ID => l_alert_id,
209     X_ALERT_NAME => X_ALERT_NAME,
210     X_ALERT_CONDITION_TYPE => X_ALERT_CONDITION_TYPE,
211     X_ENABLED_FLAG => X_ENABLED_FLAG,
212     X_START_DATE_ACTIVE =>
213       to_date(X_START_DATE_ACTIVE,'YYYY/MM/DD HH24:MI:SS'),
214     X_END_DATE_ACTIVE => to_date(X_END_DATE_ACTIVE,'YYYY/MM/DD HH24:MI:SS'),
215     X_TABLE_ID => l_table_id,
216     X_TABLE_APPLICATION_ID => l_table_app_id,
217     X_DESCRIPTION => X_DESCRIPTION,
218     X_FREQUENCY_TYPE => X_FREQUENCY_TYPE,
219     X_WEEKLY_CHECK_DAY => X_WEEKLY_CHECK_DAY,
220     X_MONTHLY_CHECK_DAY_NUM => to_number(X_MONTHLY_CHECK_DAY_NUM),
221     X_DAYS_BETWEEN_CHECKS => to_number(X_DAYS_BETWEEN_CHECKS),
222     X_CHECK_BEGIN_DATE =>
223       to_date(X_CHECK_BEGIN_DATE,'YYYY/MM/DD HH24:MI:SS'),
224     X_DATE_LAST_CHECKED =>
225       to_date(X_DATE_LAST_CHECKED,'YYYY/MM/DD HH24:MI:SS'),
226     X_INSERT_FLAG => X_INSERT_FLAG,
227     X_UPDATE_FLAG => X_UPDATE_FLAG,
228     X_DELETE_FLAG => X_DELETE_FLAG,
229     X_MAINTAIN_HISTORY_DAYS => to_number(X_MAINTAIN_HISTORY_DAYS),
230     X_CHECK_TIME => to_number(X_CHECK_TIME),
231     X_CHECK_START_TIME => to_number(X_CHECK_START_TIME),
232     X_CHECK_END_TIME => to_number(X_CHECK_END_TIME),
233     X_SECONDS_BETWEEN_CHECKS => to_number(X_SECONDS_BETWEEN_CHECKS),
234     X_CHECK_ONCE_DAILY_FLAG => X_CHECK_ONCE_DAILY_FLAG,
235     X_SQL_STATEMENT_TEXT => X_SQL_STATEMENT_TEXT,
236     X_ONE_TIME_ONLY_FLAG => to_number(X_ONE_TIME_ONLY_FLAG),
237     X_TABLE_NAME => X_TABLE_NAME,
238     X_LAST_UPDATE_DATE => f_ludate,
239     X_LAST_UPDATED_BY => f_luby,
240     X_LAST_UPDATE_LOGIN => 0 );
241 end if;
242 
243 exception
244   when NO_DATA_FOUND then
245 
246   select ALR_ALERTS_S.nextval into l_alert_id from dual;
247 
248   ALR_ALERTS_PKG.INSERT_ROW(
249     X_ROWID => l_row_id,
250     X_APPLICATION_ID => l_app_id,
251     X_ALERT_ID => l_alert_id,
252     X_ALERT_NAME => X_ALERT_NAME,
253     X_ALERT_CONDITION_TYPE => X_ALERT_CONDITION_TYPE,
254     X_ENABLED_FLAG => X_ENABLED_FLAG,
255     X_START_DATE_ACTIVE =>
256       to_date(X_START_DATE_ACTIVE,'YYYY/MM/DD HH24:MI:SS'),
257     X_END_DATE_ACTIVE =>
258       to_date(X_END_DATE_ACTIVE,'YYYY/MM/DD HH24:MI:SS'),
259     X_TABLE_ID => l_table_id,
260     X_TABLE_APPLICATION_ID => l_table_app_id,
261     X_DESCRIPTION => X_DESCRIPTION,
262     X_FREQUENCY_TYPE => X_FREQUENCY_TYPE,
263     X_WEEKLY_CHECK_DAY => X_WEEKLY_CHECK_DAY,
264     X_MONTHLY_CHECK_DAY_NUM => to_number(X_MONTHLY_CHECK_DAY_NUM),
265     X_DAYS_BETWEEN_CHECKS => to_number(X_DAYS_BETWEEN_CHECKS),
266     X_CHECK_BEGIN_DATE =>
267       to_date(X_CHECK_BEGIN_DATE,'YYYY/MM/DD HH24:MI:SS'),
268     X_DATE_LAST_CHECKED =>
269       to_date(X_DATE_LAST_CHECKED,'YYYY/MM/DD HH24:MI:SS'),
270     X_INSERT_FLAG => X_INSERT_FLAG,
271     X_UPDATE_FLAG => X_UPDATE_FLAG,
272     X_DELETE_FLAG => X_DELETE_FLAG,
273     X_MAINTAIN_HISTORY_DAYS => to_number(X_MAINTAIN_HISTORY_DAYS),
274     X_CHECK_TIME => to_number(X_CHECK_TIME),
275     X_CHECK_START_TIME => to_number(X_CHECK_START_TIME),
276     X_CHECK_END_TIME => to_number(X_CHECK_END_TIME),
277     X_SECONDS_BETWEEN_CHECKS => to_number(X_SECONDS_BETWEEN_CHECKS),
278     X_CHECK_ONCE_DAILY_FLAG => X_CHECK_ONCE_DAILY_FLAG,
279     X_SQL_STATEMENT_TEXT => X_SQL_STATEMENT_TEXT,
280     X_ONE_TIME_ONLY_FLAG => to_number(X_ONE_TIME_ONLY_FLAG),
281     X_TABLE_NAME => X_TABLE_NAME,
282     X_CREATION_DATE => f_ludate,
283     X_CREATED_BY => f_luby,
284     X_LAST_UPDATE_DATE => f_ludate,
285     X_LAST_UPDATED_BY => f_luby,
286     X_LAST_UPDATE_LOGIN => 0 );
287 
288 end LOAD_ROW;
289 
290 procedure LOCK_ROW (
291   X_APPLICATION_ID in NUMBER,
292   X_ALERT_ID in NUMBER,
293   X_ALERT_NAME in VARCHAR2,
294   X_ALERT_CONDITION_TYPE in VARCHAR2,
295   X_ENABLED_FLAG in VARCHAR2,
296   X_START_DATE_ACTIVE in DATE,
297   X_END_DATE_ACTIVE in DATE,
298   X_TABLE_ID in NUMBER,
299   X_TABLE_APPLICATION_ID in NUMBER,
300   X_DESCRIPTION in VARCHAR2,
301   X_FREQUENCY_TYPE in VARCHAR2,
302   X_WEEKLY_CHECK_DAY in VARCHAR2,
303   X_MONTHLY_CHECK_DAY_NUM in NUMBER,
304   X_DAYS_BETWEEN_CHECKS in NUMBER,
305   X_CHECK_BEGIN_DATE in DATE,
306   X_DATE_LAST_CHECKED in DATE,
307   X_INSERT_FLAG in VARCHAR2,
308   X_UPDATE_FLAG in VARCHAR2,
309   X_DELETE_FLAG in VARCHAR2,
310   X_MAINTAIN_HISTORY_DAYS in NUMBER,
311   X_CHECK_TIME in NUMBER,
312   X_CHECK_START_TIME in NUMBER,
313   X_CHECK_END_TIME in NUMBER,
314   X_SECONDS_BETWEEN_CHECKS in NUMBER,
315   X_CHECK_ONCE_DAILY_FLAG in VARCHAR2,
316   X_SQL_STATEMENT_TEXT in LONG,
317   X_ONE_TIME_ONLY_FLAG in NUMBER,
318   X_TABLE_NAME in VARCHAR2
319 ) is
320   cursor c1 is select
321       ALERT_NAME,
322       ALERT_CONDITION_TYPE,
323       ENABLED_FLAG,
324       START_DATE_ACTIVE,
325       END_DATE_ACTIVE,
326       TABLE_ID,
327       TABLE_APPLICATION_ID,
328       DESCRIPTION,
329       FREQUENCY_TYPE,
330       WEEKLY_CHECK_DAY,
331       MONTHLY_CHECK_DAY_NUM,
332       DAYS_BETWEEN_CHECKS,
333       CHECK_BEGIN_DATE,
334       DATE_LAST_CHECKED,
335       INSERT_FLAG,
336       UPDATE_FLAG,
337       DELETE_FLAG,
338       MAINTAIN_HISTORY_DAYS,
339       CHECK_TIME,
340       CHECK_START_TIME,
341       CHECK_END_TIME,
342       SECONDS_BETWEEN_CHECKS,
343       CHECK_ONCE_DAILY_FLAG,
344       SQL_STATEMENT_TEXT,
345       ONE_TIME_ONLY_FLAG,
346       TABLE_NAME,
347       APPLICATION_ID,
348       ALERT_ID
349     from ALR_ALERTS
350     where APPLICATION_ID = X_APPLICATION_ID
351     and ALERT_ID = X_ALERT_ID
352     for update of APPLICATION_ID nowait;
353 begin
354   for recinfo in c1 loop
355       if (    (recinfo.APPLICATION_ID = X_APPLICATION_ID)
356           AND (recinfo.ALERT_ID = X_ALERT_ID)
357           AND (recinfo.ALERT_NAME = X_ALERT_NAME)
358           AND (recinfo.ALERT_CONDITION_TYPE = X_ALERT_CONDITION_TYPE)
359           AND (recinfo.ENABLED_FLAG = X_ENABLED_FLAG)
363           AND ((recinfo.TABLE_ID = X_TABLE_ID)
360           AND (recinfo.START_DATE_ACTIVE = X_START_DATE_ACTIVE)
361           AND ((recinfo.END_DATE_ACTIVE = X_END_DATE_ACTIVE)
362                OR ((recinfo.END_DATE_ACTIVE is null) AND (X_END_DATE_ACTIVE is null)))
364                OR ((recinfo.TABLE_ID is null) AND (X_TABLE_ID is null)))
365           AND ((recinfo.TABLE_APPLICATION_ID = X_TABLE_APPLICATION_ID)
366                OR ((recinfo.TABLE_APPLICATION_ID is null) AND (X_TABLE_APPLICATION_ID is null)))
367           AND ((recinfo.DESCRIPTION = X_DESCRIPTION)
368                OR ((recinfo.DESCRIPTION is null) AND (X_DESCRIPTION is null)))
369           AND ((recinfo.FREQUENCY_TYPE = X_FREQUENCY_TYPE)
370                OR ((recinfo.FREQUENCY_TYPE is null) AND (X_FREQUENCY_TYPE is null)))
371           AND ((recinfo.WEEKLY_CHECK_DAY = X_WEEKLY_CHECK_DAY)
372                OR ((recinfo.WEEKLY_CHECK_DAY is null) AND (X_WEEKLY_CHECK_DAY is null)))
373           AND ((recinfo.MONTHLY_CHECK_DAY_NUM = X_MONTHLY_CHECK_DAY_NUM)
374                OR ((recinfo.MONTHLY_CHECK_DAY_NUM is null) AND (X_MONTHLY_CHECK_DAY_NUM is null)))
375           AND ((recinfo.DAYS_BETWEEN_CHECKS = X_DAYS_BETWEEN_CHECKS)
376                OR ((recinfo.DAYS_BETWEEN_CHECKS is null) AND (X_DAYS_BETWEEN_CHECKS is null)))
377           AND ((recinfo.CHECK_BEGIN_DATE = X_CHECK_BEGIN_DATE)
378                OR ((recinfo.CHECK_BEGIN_DATE is null) AND (X_CHECK_BEGIN_DATE is null)))
379           AND ((recinfo.DATE_LAST_CHECKED = X_DATE_LAST_CHECKED)
380                OR ((recinfo.DATE_LAST_CHECKED is null) AND (X_DATE_LAST_CHECKED is null)))
381           AND ((recinfo.INSERT_FLAG = X_INSERT_FLAG)
382                OR ((recinfo.INSERT_FLAG is null) AND (X_INSERT_FLAG is null)))
383           AND ((recinfo.UPDATE_FLAG = X_UPDATE_FLAG)
384                OR ((recinfo.UPDATE_FLAG is null) AND (X_UPDATE_FLAG is null)))
385           AND ((recinfo.DELETE_FLAG = X_DELETE_FLAG)
386                OR ((recinfo.DELETE_FLAG is null) AND (X_DELETE_FLAG is null)))
387           AND ((recinfo.MAINTAIN_HISTORY_DAYS = X_MAINTAIN_HISTORY_DAYS)
388                OR ((recinfo.MAINTAIN_HISTORY_DAYS is null) AND (X_MAINTAIN_HISTORY_DAYS is null)))
389           AND ((recinfo.CHECK_TIME = X_CHECK_TIME)
390                OR ((recinfo.CHECK_TIME is null) AND (X_CHECK_TIME is null)))
391           AND ((recinfo.CHECK_START_TIME = X_CHECK_START_TIME)
392                OR ((recinfo.CHECK_START_TIME is null) AND (X_CHECK_START_TIME is null)))
393           AND ((recinfo.CHECK_END_TIME = X_CHECK_END_TIME)
394                OR ((recinfo.CHECK_END_TIME is null) AND (X_CHECK_END_TIME is null)))
395           AND ((recinfo.SECONDS_BETWEEN_CHECKS = X_SECONDS_BETWEEN_CHECKS)
396                OR ((recinfo.SECONDS_BETWEEN_CHECKS is null) AND (X_SECONDS_BETWEEN_CHECKS is null)))
397           AND ((recinfo.CHECK_ONCE_DAILY_FLAG = X_CHECK_ONCE_DAILY_FLAG)
398                OR ((recinfo.CHECK_ONCE_DAILY_FLAG is null) AND (X_CHECK_ONCE_DAILY_FLAG is null)))
399           AND ((recinfo.SQL_STATEMENT_TEXT = X_SQL_STATEMENT_TEXT)
400                OR ((recinfo.SQL_STATEMENT_TEXT is null) AND (X_SQL_STATEMENT_TEXT is null)))
401           AND ((recinfo.ONE_TIME_ONLY_FLAG = X_ONE_TIME_ONLY_FLAG)
402                OR ((recinfo.ONE_TIME_ONLY_FLAG is null) AND (X_ONE_TIME_ONLY_FLAG is null)))
403           AND ((recinfo.TABLE_NAME = X_TABLE_NAME)
404                OR ((recinfo.TABLE_NAME is null) AND (X_TABLE_NAME is null)))
405       ) then
406         null;
407       else
408         fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
409         app_exception.raise_exception;
410       end if;
411   end loop;
412   return;
413 end LOCK_ROW;
414 
415 procedure UPDATE_ROW (
416   X_APPLICATION_ID in NUMBER,
417   X_ALERT_ID in NUMBER,
418   X_ALERT_NAME in VARCHAR2,
419   X_ALERT_CONDITION_TYPE in VARCHAR2,
420   X_ENABLED_FLAG in VARCHAR2,
421   X_START_DATE_ACTIVE in DATE,
422   X_END_DATE_ACTIVE in DATE,
423   X_TABLE_ID in NUMBER,
424   X_TABLE_APPLICATION_ID in NUMBER,
425   X_DESCRIPTION in VARCHAR2,
426   X_FREQUENCY_TYPE in VARCHAR2,
427   X_WEEKLY_CHECK_DAY in VARCHAR2,
428   X_MONTHLY_CHECK_DAY_NUM in NUMBER,
429   X_DAYS_BETWEEN_CHECKS in NUMBER,
430   X_CHECK_BEGIN_DATE in DATE,
431   X_DATE_LAST_CHECKED in DATE,
432   X_INSERT_FLAG in VARCHAR2,
433   X_UPDATE_FLAG in VARCHAR2,
434   X_DELETE_FLAG in VARCHAR2,
435   X_MAINTAIN_HISTORY_DAYS in NUMBER,
436   X_CHECK_TIME in NUMBER,
437   X_CHECK_START_TIME in NUMBER,
438   X_CHECK_END_TIME in NUMBER,
439   X_SECONDS_BETWEEN_CHECKS in NUMBER,
440   X_CHECK_ONCE_DAILY_FLAG in VARCHAR2,
441   X_SQL_STATEMENT_TEXT in LONG,
442   X_ONE_TIME_ONLY_FLAG in NUMBER,
443   X_TABLE_NAME in VARCHAR2,
444   X_LAST_UPDATE_DATE in DATE,
445   X_LAST_UPDATED_BY in NUMBER,
446   X_LAST_UPDATE_LOGIN in NUMBER
447 ) is
448 begin
449   update ALR_ALERTS set
450     ALERT_NAME = X_ALERT_NAME,
451     ALERT_CONDITION_TYPE = X_ALERT_CONDITION_TYPE,
452     ENABLED_FLAG = X_ENABLED_FLAG,
453     START_DATE_ACTIVE = X_START_DATE_ACTIVE,
454     END_DATE_ACTIVE = X_END_DATE_ACTIVE,
455     TABLE_ID = X_TABLE_ID,
456     TABLE_APPLICATION_ID = X_TABLE_APPLICATION_ID,
457     DESCRIPTION = X_DESCRIPTION,
458     FREQUENCY_TYPE = X_FREQUENCY_TYPE,
459     WEEKLY_CHECK_DAY = X_WEEKLY_CHECK_DAY,
460     MONTHLY_CHECK_DAY_NUM = X_MONTHLY_CHECK_DAY_NUM,
461     DAYS_BETWEEN_CHECKS = X_DAYS_BETWEEN_CHECKS,
462     CHECK_BEGIN_DATE = X_CHECK_BEGIN_DATE,
463     DATE_LAST_CHECKED = X_DATE_LAST_CHECKED,
464     INSERT_FLAG = X_INSERT_FLAG,
465     UPDATE_FLAG = X_UPDATE_FLAG,
466     DELETE_FLAG = X_DELETE_FLAG,
467     MAINTAIN_HISTORY_DAYS = X_MAINTAIN_HISTORY_DAYS,
468     CHECK_TIME = X_CHECK_TIME,
469     CHECK_START_TIME = X_CHECK_START_TIME,
470     CHECK_END_TIME = X_CHECK_END_TIME,
471     SECONDS_BETWEEN_CHECKS = X_SECONDS_BETWEEN_CHECKS,
472     CHECK_ONCE_DAILY_FLAG = X_CHECK_ONCE_DAILY_FLAG,
476     LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
473     SQL_STATEMENT_TEXT = X_SQL_STATEMENT_TEXT,
474     ONE_TIME_ONLY_FLAG = X_ONE_TIME_ONLY_FLAG,
475     TABLE_NAME = X_TABLE_NAME,
477     LAST_UPDATED_BY = X_LAST_UPDATED_BY,
478     LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
479   where APPLICATION_ID = X_APPLICATION_ID
480   and ALERT_ID = X_ALERT_ID;
481 
482   if (sql%notfound) then
483     raise no_data_found;
484   end if;
485 end UPDATE_ROW;
486 
487 procedure DELETE_ROW (
488   X_APPLICATION_ID in NUMBER,
489   X_ALERT_ID in NUMBER
490 ) is
491 begin
492   delete from ALR_ALERTS
493   where APPLICATION_ID = X_APPLICATION_ID
494   and ALERT_ID = X_ALERT_ID;
495 
496   if (sql%notfound) then
497     raise no_data_found;
498   end if;
499 
500 end DELETE_ROW;
501 
502 
503 end ALR_ALERTS_PKG;