[Home] [Help]
PACKAGE BODY: APPS.IRC_NOTIFICATION_PREFS_BE2
Source
1 package body irc_notification_prefs_be2 as
2 --Code generated on 06/11/2008 12:45:34
3 /* $Header: hrapiwfe.pkb 120.4 2008/02/15 06:27:49 viviswan ship $*/
4 procedure update_notification_prefs_a (
5 p_party_id number,
6 p_person_id number,
7 p_notification_preference_id number,
8 p_effective_date date,
9 p_matching_jobs varchar2,
10 p_matching_job_freq varchar2,
11 p_allow_access varchar2,
12 p_receive_info_mail varchar2,
13 p_object_version_number number,
14 p_address_id number,
15 p_attribute_category varchar2,
16 p_attribute1 varchar2,
17 p_attribute2 varchar2,
18 p_attribute3 varchar2,
19 p_attribute4 varchar2,
20 p_attribute5 varchar2,
21 p_attribute6 varchar2,
22 p_attribute7 varchar2,
23 p_attribute8 varchar2,
24 p_attribute9 varchar2,
25 p_attribute10 varchar2,
26 p_attribute11 varchar2,
27 p_attribute12 varchar2,
28 p_attribute13 varchar2,
29 p_attribute14 varchar2,
30 p_attribute15 varchar2,
31 p_attribute16 varchar2,
32 p_attribute17 varchar2,
33 p_attribute18 varchar2,
34 p_attribute19 varchar2,
35 p_attribute20 varchar2,
36 p_attribute21 varchar2,
37 p_attribute22 varchar2,
38 p_attribute23 varchar2,
39 p_attribute24 varchar2,
40 p_attribute25 varchar2,
41 p_attribute26 varchar2,
42 p_attribute27 varchar2,
43 p_attribute28 varchar2,
44 p_attribute29 varchar2,
45 p_attribute30 varchar2,
46 p_agency_id number,
47 p_attempt_id number) is
48 l_event_key number;
49 l_event_data clob;
50 l_event_name varchar2(250);
51 l_text varchar2(2000);
52 l_message varchar2(10);
53 --
54 cursor get_seq is
55 select per_wf_events_s.nextval from dual;
56 --
57 l_proc varchar2(72):=' irc_notification_prefs_be2.update_notification_prefs_a';
58 begin
59 hr_utility.set_location('Entering: '||l_proc,10);
60 -- check the status of the business event
61 l_event_name:='oracle.apps.per.irc.api.notification_prefs.update_notification_prefs';
62 l_message:=wf_event.test(l_event_name);
63 --
64 if (l_message='MESSAGE') then
65 hr_utility.set_location(l_proc,20);
66 --
67 -- get a key for the event
68 --
69 open get_seq;
70 fetch get_seq into l_event_key;
71 close get_seq;
72 --
73 -- build the xml data for the event
74 --
75 dbms_lob.createTemporary(l_event_data,false,dbms_lob.call);
76 l_text:='<?xml version =''1.0'' encoding =''ASCII''?>';
77 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
78 l_text:='<notification_prefs>';
79 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
80 --
81 l_text:='<party_id>';
82 l_text:=l_text||fnd_number.number_to_canonical(p_party_id);
83 l_text:=l_text||'</party_id>';
84 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
85 l_text:='<person_id>';
86 l_text:=l_text||fnd_number.number_to_canonical(p_person_id);
87 l_text:=l_text||'</person_id>';
88 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
89 l_text:='<notification_preference_id>';
90 l_text:=l_text||fnd_number.number_to_canonical(p_notification_preference_id);
91 l_text:=l_text||'</notification_preference_id>';
92 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
93 l_text:='<effective_date>';
94 l_text:=l_text||fnd_date.date_to_canonical(p_effective_date);
95 l_text:=l_text||'</effective_date>';
96 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
97 l_text:='<matching_jobs>';
98 l_text:=l_text||irc_utilities_pkg.removeTags(p_matching_jobs);
99 l_text:=l_text||'</matching_jobs>';
100 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
101 l_text:='<matching_job_freq>';
102 l_text:=l_text||irc_utilities_pkg.removeTags(p_matching_job_freq);
103 l_text:=l_text||'</matching_job_freq>';
104 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
105 l_text:='<allow_access>';
106 l_text:=l_text||irc_utilities_pkg.removeTags(p_allow_access);
107 l_text:=l_text||'</allow_access>';
108 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
109 l_text:='<receive_info_mail>';
110 l_text:=l_text||irc_utilities_pkg.removeTags(p_receive_info_mail);
111 l_text:=l_text||'</receive_info_mail>';
112 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
113 l_text:='<object_version_number>';
114 l_text:=l_text||fnd_number.number_to_canonical(p_object_version_number);
115 l_text:=l_text||'</object_version_number>';
116 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
117 l_text:='<address_id>';
118 l_text:=l_text||fnd_number.number_to_canonical(p_address_id);
119 l_text:=l_text||'</address_id>';
120 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
121 l_text:='<attribute_category>';
122 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute_category);
123 l_text:=l_text||'</attribute_category>';
124 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
125 l_text:='<attribute1>';
126 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute1);
127 l_text:=l_text||'</attribute1>';
128 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
129 l_text:='<attribute2>';
130 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute2);
131 l_text:=l_text||'</attribute2>';
132 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
133 l_text:='<attribute3>';
134 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute3);
135 l_text:=l_text||'</attribute3>';
136 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
137 l_text:='<attribute4>';
138 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute4);
139 l_text:=l_text||'</attribute4>';
140 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
141 l_text:='<attribute5>';
142 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute5);
143 l_text:=l_text||'</attribute5>';
144 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
145 l_text:='<attribute6>';
146 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute6);
147 l_text:=l_text||'</attribute6>';
148 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
149 l_text:='<attribute7>';
150 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute7);
151 l_text:=l_text||'</attribute7>';
152 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
153 l_text:='<attribute8>';
154 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute8);
155 l_text:=l_text||'</attribute8>';
156 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
157 l_text:='<attribute9>';
158 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute9);
159 l_text:=l_text||'</attribute9>';
160 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
161 l_text:='<attribute10>';
162 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute10);
163 l_text:=l_text||'</attribute10>';
164 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
165 l_text:='<attribute11>';
166 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute11);
167 l_text:=l_text||'</attribute11>';
168 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
169 l_text:='<attribute12>';
170 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute12);
171 l_text:=l_text||'</attribute12>';
172 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
173 l_text:='<attribute13>';
174 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute13);
175 l_text:=l_text||'</attribute13>';
176 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
177 l_text:='<attribute14>';
178 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute14);
179 l_text:=l_text||'</attribute14>';
180 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
181 l_text:='<attribute15>';
182 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute15);
183 l_text:=l_text||'</attribute15>';
184 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
185 l_text:='<attribute16>';
186 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute16);
187 l_text:=l_text||'</attribute16>';
188 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
189 l_text:='<attribute17>';
190 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute17);
191 l_text:=l_text||'</attribute17>';
192 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
193 l_text:='<attribute18>';
194 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute18);
195 l_text:=l_text||'</attribute18>';
196 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
197 l_text:='<attribute19>';
198 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute19);
199 l_text:=l_text||'</attribute19>';
200 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
201 l_text:='<attribute20>';
202 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute20);
203 l_text:=l_text||'</attribute20>';
204 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
205 l_text:='<attribute21>';
206 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute21);
207 l_text:=l_text||'</attribute21>';
208 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
209 l_text:='<attribute22>';
210 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute22);
211 l_text:=l_text||'</attribute22>';
212 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
213 l_text:='<attribute23>';
214 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute23);
215 l_text:=l_text||'</attribute23>';
216 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
217 l_text:='<attribute24>';
218 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute24);
219 l_text:=l_text||'</attribute24>';
220 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
221 l_text:='<attribute25>';
222 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute25);
223 l_text:=l_text||'</attribute25>';
224 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
225 l_text:='<attribute26>';
226 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute26);
227 l_text:=l_text||'</attribute26>';
228 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
229 l_text:='<attribute27>';
230 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute27);
231 l_text:=l_text||'</attribute27>';
232 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
233 l_text:='<attribute28>';
234 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute28);
235 l_text:=l_text||'</attribute28>';
236 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
237 l_text:='<attribute29>';
238 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute29);
239 l_text:=l_text||'</attribute29>';
240 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
241 l_text:='<attribute30>';
242 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute30);
243 l_text:=l_text||'</attribute30>';
244 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
245 l_text:='<agency_id>';
246 l_text:=l_text||fnd_number.number_to_canonical(p_agency_id);
247 l_text:=l_text||'</agency_id>';
248 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
249 l_text:='<attempt_id>';
250 l_text:=l_text||fnd_number.number_to_canonical(p_attempt_id);
251 l_text:=l_text||'</attempt_id>';
252 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
253 l_text:='</notification_prefs>';
254 --
255 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
256 --
257 -- raise the event with the event data
258 wf_event.raise(p_event_name=>l_event_name
259 ,p_event_key=>l_event_key
260 ,p_event_data=>l_event_data);
261 --
262 elsif (l_message='KEY') then
263 hr_utility.set_location(l_proc,30);
264 -- get a key for the event
265 open get_seq;
266 fetch get_seq into l_event_key;
267 close get_seq;
268 -- this is a key event, so just raise the event
269 -- without the event data
270 wf_event.raise(p_event_name=>l_event_name
271 ,p_event_key=>l_event_key);
272 --
273 elsif (l_message='NONE') then
274 hr_utility.set_location(l_proc,40);
275 -- no event is required, so do nothing
276 null;
277 end if;
278 hr_utility.set_location('Leaving: '||l_proc,50);
279 end update_notification_prefs_a;
280 end irc_notification_prefs_be2;