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_ORGANIZATION_BE1

Source


1 package body hr_organization_be1 as 
2 --Code generated on 27/11/2012 03:58:19
3 /* $Header: hrapiwfe.pkb 120.11 2011/12/24 13:28:35 vboggava ship $*/
4 procedure create_org_information_a (
5 p_effective_date               date,
6 p_organization_id              number,
7 p_org_info_type_code           varchar2,
8 p_org_information1             varchar2,
9 p_org_information2             varchar2,
10 p_org_information3             varchar2,
11 p_org_information4             varchar2,
12 p_org_information5             varchar2,
13 p_org_information6             varchar2,
14 p_org_information7             varchar2,
15 p_org_information8             varchar2,
16 p_org_information9             varchar2,
17 p_org_information10            varchar2,
18 p_org_information11            varchar2,
19 p_org_information12            varchar2,
20 p_org_information13            varchar2,
21 p_org_information14            varchar2,
22 p_org_information15            varchar2,
23 p_org_information16            varchar2,
24 p_org_information17            varchar2,
25 p_org_information18            varchar2,
26 p_org_information19            varchar2,
27 p_org_information20            varchar2,
28 p_attribute_category           varchar2,
29 p_attribute1                   varchar2,
30 p_attribute2                   varchar2,
31 p_attribute3                   varchar2,
32 p_attribute4                   varchar2,
33 p_attribute5                   varchar2,
34 p_attribute6                   varchar2,
35 p_attribute7                   varchar2,
36 p_attribute8                   varchar2,
37 p_attribute9                   varchar2,
38 p_attribute10                  varchar2,
39 p_attribute11                  varchar2,
40 p_attribute12                  varchar2,
41 p_attribute13                  varchar2,
42 p_attribute14                  varchar2,
43 p_attribute15                  varchar2,
44 p_attribute16                  varchar2,
45 p_attribute17                  varchar2,
46 p_attribute18                  varchar2,
47 p_attribute19                  varchar2,
48 p_attribute20                  varchar2,
49 p_org_information_id           number,
50 p_object_version_number        number) is
51   l_event_key number;
52   l_event_data clob;
53   l_event_name varchar2(250);
54   l_text varchar2(2000);
55   l_message varchar2(10);
56   --
57   cursor get_seq is
58   select per_wf_events_s.nextval from dual;
59   --
60   l_proc varchar2(72):='  hr_organization_be1.create_org_information_a';
61 begin
62   hr_utility.set_location('Entering: '||l_proc,10);
63   -- check the status of the business event
64   l_event_name:='oracle.apps.per.api.organization.create_org_information';
65   l_message:=wf_event.test(l_event_name);
66   --
67   if (l_message='MESSAGE') then
68     hr_utility.set_location(l_proc,20);
69     --
70     -- get a key for the event
71     --
72     open get_seq;
73     fetch get_seq into l_event_key;
74     close get_seq;
75     --
76     -- build the xml data for the event
77     --
78     dbms_lob.createTemporary(l_event_data,false,dbms_lob.call);
79     l_text:='<?xml version =''1.0'' encoding =''ASCII''?>';
80     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
81     l_text:='<organization>';
82     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
83     --
84     l_text:='<effective_date>';
85     l_text:=l_text||fnd_date.date_to_canonical(p_effective_date);
86     l_text:=l_text||'</effective_date>';
87     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
88     l_text:='<organization_id>';
89     l_text:=l_text||fnd_number.number_to_canonical(p_organization_id);
90     l_text:=l_text||'</organization_id>';
91     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
92     l_text:='<org_info_type_code>';
93     l_text:=l_text||irc_utilities_pkg.removeTags(p_org_info_type_code);
94     l_text:=l_text||'</org_info_type_code>';
95     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
96     l_text:='<org_information1>';
97     l_text:=l_text||irc_utilities_pkg.removeTags(p_org_information1);
98     l_text:=l_text||'</org_information1>';
99     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
100     l_text:='<org_information2>';
101     l_text:=l_text||irc_utilities_pkg.removeTags(p_org_information2);
102     l_text:=l_text||'</org_information2>';
103     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
104     l_text:='<org_information3>';
105     l_text:=l_text||irc_utilities_pkg.removeTags(p_org_information3);
106     l_text:=l_text||'</org_information3>';
107     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
108     l_text:='<org_information4>';
109     l_text:=l_text||irc_utilities_pkg.removeTags(p_org_information4);
110     l_text:=l_text||'</org_information4>';
111     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
112     l_text:='<org_information5>';
113     l_text:=l_text||irc_utilities_pkg.removeTags(p_org_information5);
114     l_text:=l_text||'</org_information5>';
115     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
116     l_text:='<org_information6>';
117     l_text:=l_text||irc_utilities_pkg.removeTags(p_org_information6);
118     l_text:=l_text||'</org_information6>';
119     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
120     l_text:='<org_information7>';
121     l_text:=l_text||irc_utilities_pkg.removeTags(p_org_information7);
122     l_text:=l_text||'</org_information7>';
123     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
124     l_text:='<org_information8>';
125     l_text:=l_text||irc_utilities_pkg.removeTags(p_org_information8);
126     l_text:=l_text||'</org_information8>';
127     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
128     l_text:='<org_information9>';
129     l_text:=l_text||irc_utilities_pkg.removeTags(p_org_information9);
130     l_text:=l_text||'</org_information9>';
131     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
132     l_text:='<org_information10>';
133     l_text:=l_text||irc_utilities_pkg.removeTags(p_org_information10);
134     l_text:=l_text||'</org_information10>';
135     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
136     l_text:='<org_information11>';
137     l_text:=l_text||irc_utilities_pkg.removeTags(p_org_information11);
138     l_text:=l_text||'</org_information11>';
139     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
140     l_text:='<org_information12>';
141     l_text:=l_text||irc_utilities_pkg.removeTags(p_org_information12);
142     l_text:=l_text||'</org_information12>';
143     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
144     l_text:='<org_information13>';
145     l_text:=l_text||irc_utilities_pkg.removeTags(p_org_information13);
146     l_text:=l_text||'</org_information13>';
147     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
148     l_text:='<org_information14>';
149     l_text:=l_text||irc_utilities_pkg.removeTags(p_org_information14);
150     l_text:=l_text||'</org_information14>';
151     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
152     l_text:='<org_information15>';
153     l_text:=l_text||irc_utilities_pkg.removeTags(p_org_information15);
154     l_text:=l_text||'</org_information15>';
155     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
156     l_text:='<org_information16>';
157     l_text:=l_text||irc_utilities_pkg.removeTags(p_org_information16);
158     l_text:=l_text||'</org_information16>';
159     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
160     l_text:='<org_information17>';
161     l_text:=l_text||irc_utilities_pkg.removeTags(p_org_information17);
162     l_text:=l_text||'</org_information17>';
163     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
164     l_text:='<org_information18>';
165     l_text:=l_text||irc_utilities_pkg.removeTags(p_org_information18);
166     l_text:=l_text||'</org_information18>';
167     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
168     l_text:='<org_information19>';
169     l_text:=l_text||irc_utilities_pkg.removeTags(p_org_information19);
170     l_text:=l_text||'</org_information19>';
171     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
172     l_text:='<org_information20>';
173     l_text:=l_text||irc_utilities_pkg.removeTags(p_org_information20);
174     l_text:=l_text||'</org_information20>';
175     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
176     l_text:='<attribute_category>';
177     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute_category);
178     l_text:=l_text||'</attribute_category>';
179     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
180     l_text:='<attribute1>';
181     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute1);
182     l_text:=l_text||'</attribute1>';
183     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
184     l_text:='<attribute2>';
185     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute2);
186     l_text:=l_text||'</attribute2>';
187     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
188     l_text:='<attribute3>';
189     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute3);
190     l_text:=l_text||'</attribute3>';
191     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
192     l_text:='<attribute4>';
193     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute4);
194     l_text:=l_text||'</attribute4>';
195     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
196     l_text:='<attribute5>';
197     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute5);
198     l_text:=l_text||'</attribute5>';
199     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
200     l_text:='<attribute6>';
201     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute6);
202     l_text:=l_text||'</attribute6>';
203     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
204     l_text:='<attribute7>';
205     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute7);
206     l_text:=l_text||'</attribute7>';
207     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
208     l_text:='<attribute8>';
209     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute8);
210     l_text:=l_text||'</attribute8>';
211     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
212     l_text:='<attribute9>';
213     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute9);
214     l_text:=l_text||'</attribute9>';
215     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
216     l_text:='<attribute10>';
217     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute10);
218     l_text:=l_text||'</attribute10>';
219     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
220     l_text:='<attribute11>';
221     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute11);
222     l_text:=l_text||'</attribute11>';
223     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
224     l_text:='<attribute12>';
225     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute12);
226     l_text:=l_text||'</attribute12>';
227     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
228     l_text:='<attribute13>';
229     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute13);
230     l_text:=l_text||'</attribute13>';
231     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
232     l_text:='<attribute14>';
233     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute14);
234     l_text:=l_text||'</attribute14>';
235     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
236     l_text:='<attribute15>';
237     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute15);
238     l_text:=l_text||'</attribute15>';
239     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
240     l_text:='<attribute16>';
241     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute16);
242     l_text:=l_text||'</attribute16>';
243     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
244     l_text:='<attribute17>';
245     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute17);
246     l_text:=l_text||'</attribute17>';
247     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
248     l_text:='<attribute18>';
249     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute18);
253     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute19);
250     l_text:=l_text||'</attribute18>';
251     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
252     l_text:='<attribute19>';
254     l_text:=l_text||'</attribute19>';
255     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
256     l_text:='<attribute20>';
257     l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute20);
258     l_text:=l_text||'</attribute20>';
259     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
260     l_text:='<org_information_id>';
261     l_text:=l_text||fnd_number.number_to_canonical(p_org_information_id);
262     l_text:=l_text||'</org_information_id>';
263     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
264     l_text:='<object_version_number>';
265     l_text:=l_text||fnd_number.number_to_canonical(p_object_version_number);
266     l_text:=l_text||'</object_version_number>';
267     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
268     l_text:='</organization>';
269     --
270     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
271     --
272     -- raise the event with the event data
273     wf_event.raise(p_event_name=>l_event_name
274                   ,p_event_key=>l_event_key
275                   ,p_event_data=>l_event_data);
276   elsif (l_message='KEY') then
277     hr_utility.set_location(l_proc,30);
278     -- get a key for the event
279     open get_seq;
280     fetch get_seq into l_event_key;
281     close get_seq;
282     -- this is a key event, so just raise the event
283     -- without the event data
284     wf_event.raise(p_event_name=>l_event_name
285                   ,p_event_key=>l_event_key);
286   elsif (l_message='NONE') then
287     hr_utility.set_location(l_proc,40);
288     -- no event is required, so do nothing
289     null;
290   end if;
291     hr_utility.set_location('Leaving: '||l_proc,50);
292 end create_org_information_a;
293 end hr_organization_be1;