eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.
PACKAGE BODY: APPS.HR_PERSON_ADDRESS_BE2

Source


1 package body hr_person_address_be2 as 
2 --Code generated on 30/03/2009 04:46:16
3 /* $Header: hrapiwfe.pkb 120.4.12010000.2 2008/09/29 12:54:07 srgnanas ship $*/
4 procedure update_person_address_a (
5 p_effective_date               date,
6 p_validate_county              boolean,
7 p_address_id                   number,
8 p_object_version_number        number,
9 p_date_from                    date,
10 p_date_to                      date,
11 p_address_type                 varchar2,
12 p_comments                     long,
13 p_address_line1                varchar2,
14 p_address_line2                varchar2,
15 p_address_line3                varchar2,
16 p_town_or_city                 varchar2,
17 p_region_1                     varchar2,
18 p_region_2                     varchar2,
19 p_region_3                     varchar2,
20 p_postal_code                  varchar2,
21 p_country                      varchar2,
22 p_telephone_number_1           varchar2,
23 p_telephone_number_2           varchar2,
24 p_telephone_number_3           varchar2,
25 p_addr_attribute_category      varchar2,
26 p_addr_attribute1              varchar2,
27 p_addr_attribute2              varchar2,
28 p_addr_attribute3              varchar2,
29 p_addr_attribute4              varchar2,
30 p_addr_attribute5              varchar2,
31 p_addr_attribute6              varchar2,
32 p_addr_attribute7              varchar2,
33 p_addr_attribute8              varchar2,
34 p_addr_attribute9              varchar2,
35 p_addr_attribute10             varchar2,
36 p_addr_attribute11             varchar2,
37 p_addr_attribute12             varchar2,
38 p_addr_attribute13             varchar2,
39 p_addr_attribute14             varchar2,
40 p_addr_attribute15             varchar2,
41 p_addr_attribute16             varchar2,
42 p_addr_attribute17             varchar2,
43 p_addr_attribute18             varchar2,
44 p_addr_attribute19             varchar2,
45 p_addr_attribute20             varchar2,
46 p_add_information13            varchar2,
47 p_add_information14            varchar2,
48 p_add_information15            varchar2,
49 p_add_information16            varchar2,
50 p_add_information17            varchar2,
51 p_add_information18            varchar2,
52 p_add_information19            varchar2,
53 p_add_information20            varchar2) is
54   l_event_key number;
55   l_event_data clob;
56   l_event_name varchar2(250);
57   l_text varchar2(2000);
58   l_message varchar2(10);
59   --
60   cursor get_seq is
61   select per_wf_events_s.nextval from dual;
62   --
63   l_proc varchar2(72):='  hr_person_address_be2.update_person_address_a';
64 begin
65   hr_utility.set_location('Entering: '||l_proc,10);
66   -- check the status of the business event
67   l_event_name:='oracle.apps.per.api.person_address.update_person_address';
68   l_message:=wf_event.test(l_event_name);
69   --
70   if (l_message='MESSAGE') then
71     hr_utility.set_location(l_proc,20);
72     --
73     -- get a key for the event
74     --
75     open get_seq;
76     fetch get_seq into l_event_key;
77     close get_seq;
78     --
79     -- build the xml data for the event
80     --
81     dbms_lob.createTemporary(l_event_data,false,dbms_lob.call);
82     l_text:='<?xml version =''1.0'' encoding =''ASCII''?>';
83     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
84     l_text:='<person_address>';
85     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
86     --
87     l_text:='<effective_date>';
88     l_text:=l_text||fnd_date.date_to_canonical(p_effective_date);
89     l_text:=l_text||'</effective_date>';
90     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
91     l_text:='<validate_county>';
92 if(P_VALIDATE_COUNTY) then
93 l_text:=l_text||'TRUE';
94 else
95 l_text:=l_text||'FALSE';
96 end if;
97     l_text:=l_text||'</validate_county>';
98     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
99     l_text:='<address_id>';
100     l_text:=l_text||fnd_number.number_to_canonical(p_address_id);
101     l_text:=l_text||'</address_id>';
102     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
103     l_text:='<object_version_number>';
104     l_text:=l_text||fnd_number.number_to_canonical(p_object_version_number);
105     l_text:=l_text||'</object_version_number>';
106     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
107     l_text:='<date_from>';
108     l_text:=l_text||fnd_date.date_to_canonical(p_date_from);
109     l_text:=l_text||'</date_from>';
110     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
111     l_text:='<date_to>';
112     l_text:=l_text||fnd_date.date_to_canonical(p_date_to);
113     l_text:=l_text||'</date_to>';
114     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
115     l_text:='<address_type>';
116     l_text:=l_text||irc_utilities_pkg.removeTags(p_address_type);
117     l_text:=l_text||'</address_type>';
118     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
119     l_text:='<comments>';
120     l_text:=l_text||irc_utilities_pkg.removeTags(p_comments);
121     l_text:=l_text||'</comments>';
122     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
123     l_text:='<address_line1>';
124     l_text:=l_text||irc_utilities_pkg.removeTags(p_address_line1);
125     l_text:=l_text||'</address_line1>';
126     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
127     l_text:='<address_line2>';
128     l_text:=l_text||irc_utilities_pkg.removeTags(p_address_line2);
129     l_text:=l_text||'</address_line2>';
130     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
131     l_text:='<address_line3>';
132     l_text:=l_text||irc_utilities_pkg.removeTags(p_address_line3);
133     l_text:=l_text||'</address_line3>';
134     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
135     l_text:='<town_or_city>';
136     l_text:=l_text||irc_utilities_pkg.removeTags(p_town_or_city);
137     l_text:=l_text||'</town_or_city>';
138     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
139     l_text:='<region_1>';
140     l_text:=l_text||irc_utilities_pkg.removeTags(p_region_1);
141     l_text:=l_text||'</region_1>';
142     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
143     l_text:='<region_2>';
144     l_text:=l_text||irc_utilities_pkg.removeTags(p_region_2);
145     l_text:=l_text||'</region_2>';
146     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
147     l_text:='<region_3>';
148     l_text:=l_text||irc_utilities_pkg.removeTags(p_region_3);
149     l_text:=l_text||'</region_3>';
150     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
151     l_text:='<postal_code>';
152     l_text:=l_text||irc_utilities_pkg.removeTags(p_postal_code);
153     l_text:=l_text||'</postal_code>';
154     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
155     l_text:='<country>';
156     l_text:=l_text||irc_utilities_pkg.removeTags(p_country);
157     l_text:=l_text||'</country>';
158     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
159     l_text:='<telephone_number_1>';
160     l_text:=l_text||irc_utilities_pkg.removeTags(p_telephone_number_1);
161     l_text:=l_text||'</telephone_number_1>';
162     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
163     l_text:='<telephone_number_2>';
164     l_text:=l_text||irc_utilities_pkg.removeTags(p_telephone_number_2);
165     l_text:=l_text||'</telephone_number_2>';
166     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
167     l_text:='<telephone_number_3>';
168     l_text:=l_text||irc_utilities_pkg.removeTags(p_telephone_number_3);
169     l_text:=l_text||'</telephone_number_3>';
170     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
171     l_text:='<addr_attribute_category>';
172     l_text:=l_text||irc_utilities_pkg.removeTags(p_addr_attribute_category);
173     l_text:=l_text||'</addr_attribute_category>';
174     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
175     l_text:='<addr_attribute1>';
176     l_text:=l_text||irc_utilities_pkg.removeTags(p_addr_attribute1);
177     l_text:=l_text||'</addr_attribute1>';
178     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
179     l_text:='<addr_attribute2>';
180     l_text:=l_text||irc_utilities_pkg.removeTags(p_addr_attribute2);
181     l_text:=l_text||'</addr_attribute2>';
182     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
183     l_text:='<addr_attribute3>';
184     l_text:=l_text||irc_utilities_pkg.removeTags(p_addr_attribute3);
185     l_text:=l_text||'</addr_attribute3>';
186     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
187     l_text:='<addr_attribute4>';
188     l_text:=l_text||irc_utilities_pkg.removeTags(p_addr_attribute4);
189     l_text:=l_text||'</addr_attribute4>';
190     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
191     l_text:='<addr_attribute5>';
192     l_text:=l_text||irc_utilities_pkg.removeTags(p_addr_attribute5);
193     l_text:=l_text||'</addr_attribute5>';
194     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
195     l_text:='<addr_attribute6>';
196     l_text:=l_text||irc_utilities_pkg.removeTags(p_addr_attribute6);
197     l_text:=l_text||'</addr_attribute6>';
198     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
199     l_text:='<addr_attribute7>';
200     l_text:=l_text||irc_utilities_pkg.removeTags(p_addr_attribute7);
201     l_text:=l_text||'</addr_attribute7>';
202     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
203     l_text:='<addr_attribute8>';
204     l_text:=l_text||irc_utilities_pkg.removeTags(p_addr_attribute8);
205     l_text:=l_text||'</addr_attribute8>';
206     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
207     l_text:='<addr_attribute9>';
208     l_text:=l_text||irc_utilities_pkg.removeTags(p_addr_attribute9);
209     l_text:=l_text||'</addr_attribute9>';
210     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
211     l_text:='<addr_attribute10>';
212     l_text:=l_text||irc_utilities_pkg.removeTags(p_addr_attribute10);
213     l_text:=l_text||'</addr_attribute10>';
214     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
215     l_text:='<addr_attribute11>';
216     l_text:=l_text||irc_utilities_pkg.removeTags(p_addr_attribute11);
217     l_text:=l_text||'</addr_attribute11>';
218     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
219     l_text:='<addr_attribute12>';
220     l_text:=l_text||irc_utilities_pkg.removeTags(p_addr_attribute12);
221     l_text:=l_text||'</addr_attribute12>';
222     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
223     l_text:='<addr_attribute13>';
224     l_text:=l_text||irc_utilities_pkg.removeTags(p_addr_attribute13);
225     l_text:=l_text||'</addr_attribute13>';
226     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
227     l_text:='<addr_attribute14>';
228     l_text:=l_text||irc_utilities_pkg.removeTags(p_addr_attribute14);
229     l_text:=l_text||'</addr_attribute14>';
230     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
231     l_text:='<addr_attribute15>';
232     l_text:=l_text||irc_utilities_pkg.removeTags(p_addr_attribute15);
233     l_text:=l_text||'</addr_attribute15>';
234     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
235     l_text:='<addr_attribute16>';
236     l_text:=l_text||irc_utilities_pkg.removeTags(p_addr_attribute16);
237     l_text:=l_text||'</addr_attribute16>';
238     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
239     l_text:='<addr_attribute17>';
240     l_text:=l_text||irc_utilities_pkg.removeTags(p_addr_attribute17);
241     l_text:=l_text||'</addr_attribute17>';
242     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
243     l_text:='<addr_attribute18>';
244     l_text:=l_text||irc_utilities_pkg.removeTags(p_addr_attribute18);
245     l_text:=l_text||'</addr_attribute18>';
246     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
247     l_text:='<addr_attribute19>';
248     l_text:=l_text||irc_utilities_pkg.removeTags(p_addr_attribute19);
249     l_text:=l_text||'</addr_attribute19>';
250     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
251     l_text:='<addr_attribute20>';
252     l_text:=l_text||irc_utilities_pkg.removeTags(p_addr_attribute20);
253     l_text:=l_text||'</addr_attribute20>';
254     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
255     l_text:='<add_information13>';
256     l_text:=l_text||irc_utilities_pkg.removeTags(p_add_information13);
257     l_text:=l_text||'</add_information13>';
258     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
259     l_text:='<add_information14>';
260     l_text:=l_text||irc_utilities_pkg.removeTags(p_add_information14);
261     l_text:=l_text||'</add_information14>';
262     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
263     l_text:='<add_information15>';
264     l_text:=l_text||irc_utilities_pkg.removeTags(p_add_information15);
265     l_text:=l_text||'</add_information15>';
266     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
267     l_text:='<add_information16>';
268     l_text:=l_text||irc_utilities_pkg.removeTags(p_add_information16);
269     l_text:=l_text||'</add_information16>';
270     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
271     l_text:='<add_information17>';
272     l_text:=l_text||irc_utilities_pkg.removeTags(p_add_information17);
273     l_text:=l_text||'</add_information17>';
274     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
275     l_text:='<add_information18>';
276     l_text:=l_text||irc_utilities_pkg.removeTags(p_add_information18);
277     l_text:=l_text||'</add_information18>';
278     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
279     l_text:='<add_information19>';
280     l_text:=l_text||irc_utilities_pkg.removeTags(p_add_information19);
281     l_text:=l_text||'</add_information19>';
282     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
283     l_text:='<add_information20>';
284     l_text:=l_text||irc_utilities_pkg.removeTags(p_add_information20);
285     l_text:=l_text||'</add_information20>';
286     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
287     l_text:='</person_address>';
288     --
289     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
290     --
291     -- raise the event with the event data
292     wf_event.raise(p_event_name=>l_event_name
293                   ,p_event_key=>l_event_key
294                   ,p_event_data=>l_event_data);
295   elsif (l_message='KEY') then
296     hr_utility.set_location(l_proc,30);
297     -- get a key for the event
298     open get_seq;
299     fetch get_seq into l_event_key;
300     close get_seq;
301     -- this is a key event, so just raise the event
302     -- without the event data
303     wf_event.raise(p_event_name=>l_event_name
304                   ,p_event_key=>l_event_key);
305   elsif (l_message='NONE') then
306     hr_utility.set_location(l_proc,40);
307     -- no event is required, so do nothing
308     null;
309   end if;
310     hr_utility.set_location('Leaving: '||l_proc,50);
311 end update_person_address_a;
312 end hr_person_address_be2;