DBA Data[Home] [Help]

PACKAGE BODY: APPS.WF_NTF_RULEMAPS_PKG

Source


1 package body WF_NTF_RULEMAPS_PKG as
2 /* $Header: WFNTFRMB.pls 120.1 2005/07/02 03:16:26 appldev noship $ */
3 
4 procedure insert_row(x_rule_name      in varchar2,
5 		     x_attribute_name in varchar2,
6 		     x_column_name    in varchar2)
7 is
8 begin
9   insert into wf_ntf_rule_maps (
10     rule_name,
11     attribute_name,
12     column_name,
13     creation_date
14   ) values (
15     x_rule_name,
16     x_attribute_name,
17     x_column_name,
18     sysdate);
19 exception
20   when others then
21     wf_core.context('Wf_ntf_rulemaps_pkg', 'Insert_Row',  x_rule_name, x_attribute_name);
22     raise;
23 end insert_row;
24 
25 procedure delete_row(x_rule_name      in varchar2,
26 		     x_attribute_name in varchar2)
27 is
28 begin
29   delete from wf_ntf_rule_maps
30   where   rule_name      = x_rule_name
31   and   attribute_name = x_attribute_name;
32 
33   if (sql%notfound) then
34     raise no_data_found;
35   end if;
36 exception
37   when others then
38     wf_core.context('Wf_ntf_rulemaps_pkg', 'Delete_Row',  x_rule_name, x_attribute_name);
39     raise;
40 end delete_row;
41 
42 procedure update_row(x_rule_name      in varchar2,
43 		     x_attribute_name in varchar2,
44 		     x_column_name    in varchar2)
45 is
46 begin
47      update wf_ntf_rule_maps
48      set   column_name    = x_column_name
49      where   rule_name      = x_rule_name
50      and   attribute_name = x_attribute_name;
51 
52      if SQL%NOTFOUND then
53        raise no_data_found;
54      end if;
55 exception
56   when others then
57     wf_core.context('Wf_ntf_rulemaps_pkg', 'Update_Row',  x_rule_name, x_attribute_name);
58     raise;
59 end update_row;
60 
61 procedure load_row(x_rule_name      in varchar2,
62 		   x_attribute_name in varchar2,
63 		   x_column_name    in varchar2)
64 is
65 begin
66 
67  if wf_ntf_rules_pkg.g_mode = 'FORCE' then
68    Wf_ntf_rulemaps_pkg.update_row(x_rule_name,
69 			       x_attribute_name,
70 			       x_column_name);
71  end if;
72 exception
73   when others then
74      Wf_ntf_rulemaps_pkg.insert_row(x_rule_name,
75 				 x_attribute_name,
76 				 x_column_name);
77 end load_row;
78 
79 end WF_NTF_RULEMAPS_PKG;
80