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_APPLICATION_BE1

Source


1 package body hr_application_be1 as 
2 --Code generated on 03/01/2007 10:48:19
3 /* $Header: hrapiwfe.pkb 120.3 2006/06/20 10:26:28 sayyampe noship $*/
4 procedure update_apl_details_a (
5 p_application_id               number,
6 p_object_version_number        number,
7 p_effective_date               date,
8 p_comments                     varchar2,
9 p_current_employer             varchar2,
10 p_projected_hire_date          date,
11 p_termination_reason           varchar2,
12 p_appl_attribute_category      varchar2,
13 p_appl_attribute1              varchar2,
14 p_appl_attribute2              varchar2,
15 p_appl_attribute3              varchar2,
16 p_appl_attribute4              varchar2,
17 p_appl_attribute5              varchar2,
18 p_appl_attribute6              varchar2,
19 p_appl_attribute7              varchar2,
20 p_appl_attribute8              varchar2,
21 p_appl_attribute9              varchar2,
22 p_appl_attribute10             varchar2,
23 p_appl_attribute11             varchar2,
24 p_appl_attribute12             varchar2,
25 p_appl_attribute13             varchar2,
26 p_appl_attribute14             varchar2,
27 p_appl_attribute15             varchar2,
28 p_appl_attribute16             varchar2,
29 p_appl_attribute17             varchar2,
30 p_appl_attribute18             varchar2,
31 p_appl_attribute19             varchar2,
32 p_appl_attribute20             varchar2) is
33   l_event_key number;
34   l_event_data clob;
35   l_event_name varchar2(250);
36   l_text varchar2(2000);
37   l_message varchar2(10);
38   --
39   cursor get_seq is
40   select per_wf_events_s.nextval from dual;
41   --
42   l_proc varchar2(72):='  hr_application_be1.update_apl_details_a';
43 begin
44   hr_utility.set_location('Entering: '||l_proc,10);
45   -- check the status of the business event
46   l_event_name:='oracle.apps.per.api.application.update_apl_details';
47   l_message:=wf_event.test(l_event_name);
48   --
49   if (l_message='MESSAGE') then
50     hr_utility.set_location(l_proc,20);
51     --
52     -- get a key for the event
53     --
54     open get_seq;
55     fetch get_seq into l_event_key;
56     close get_seq;
57     --
58     -- build the xml data for the event
59     --
60     dbms_lob.createTemporary(l_event_data,false,dbms_lob.call);
61     l_text:='<?xml version =''1.0'' encoding =''ASCII''?>';
62     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
63     l_text:='<application>';
64     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
65     --
66     l_text:='<application_id>';
67     l_text:=l_text||fnd_number.number_to_canonical(p_application_id);
68     l_text:=l_text||'</application_id>';
69     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
70     l_text:='<object_version_number>';
71     l_text:=l_text||fnd_number.number_to_canonical(p_object_version_number);
72     l_text:=l_text||'</object_version_number>';
73     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
74     l_text:='<effective_date>';
75     l_text:=l_text||fnd_date.date_to_canonical(p_effective_date);
76     l_text:=l_text||'</effective_date>';
77     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
78     l_text:='<comments>';
79     l_text:=l_text||irc_utilities_pkg.removeTags(p_comments);
80     l_text:=l_text||'</comments>';
81     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
82     l_text:='<current_employer>';
83     l_text:=l_text||irc_utilities_pkg.removeTags(p_current_employer);
84     l_text:=l_text||'</current_employer>';
85     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
86     l_text:='<projected_hire_date>';
87     l_text:=l_text||fnd_date.date_to_canonical(p_projected_hire_date);
88     l_text:=l_text||'</projected_hire_date>';
89     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
90     l_text:='<termination_reason>';
91     l_text:=l_text||irc_utilities_pkg.removeTags(p_termination_reason);
92     l_text:=l_text||'</termination_reason>';
93     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
94     l_text:='<appl_attribute_category>';
95     l_text:=l_text||irc_utilities_pkg.removeTags(p_appl_attribute_category);
96     l_text:=l_text||'</appl_attribute_category>';
97     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
98     l_text:='<appl_attribute1>';
99     l_text:=l_text||irc_utilities_pkg.removeTags(p_appl_attribute1);
100     l_text:=l_text||'</appl_attribute1>';
101     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
102     l_text:='<appl_attribute2>';
103     l_text:=l_text||irc_utilities_pkg.removeTags(p_appl_attribute2);
104     l_text:=l_text||'</appl_attribute2>';
105     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
106     l_text:='<appl_attribute3>';
107     l_text:=l_text||irc_utilities_pkg.removeTags(p_appl_attribute3);
108     l_text:=l_text||'</appl_attribute3>';
109     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
110     l_text:='<appl_attribute4>';
111     l_text:=l_text||irc_utilities_pkg.removeTags(p_appl_attribute4);
112     l_text:=l_text||'</appl_attribute4>';
113     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
114     l_text:='<appl_attribute5>';
115     l_text:=l_text||irc_utilities_pkg.removeTags(p_appl_attribute5);
116     l_text:=l_text||'</appl_attribute5>';
117     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
118     l_text:='<appl_attribute6>';
119     l_text:=l_text||irc_utilities_pkg.removeTags(p_appl_attribute6);
120     l_text:=l_text||'</appl_attribute6>';
121     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
122     l_text:='<appl_attribute7>';
123     l_text:=l_text||irc_utilities_pkg.removeTags(p_appl_attribute7);
124     l_text:=l_text||'</appl_attribute7>';
125     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
126     l_text:='<appl_attribute8>';
127     l_text:=l_text||irc_utilities_pkg.removeTags(p_appl_attribute8);
128     l_text:=l_text||'</appl_attribute8>';
129     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
130     l_text:='<appl_attribute9>';
131     l_text:=l_text||irc_utilities_pkg.removeTags(p_appl_attribute9);
132     l_text:=l_text||'</appl_attribute9>';
133     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
134     l_text:='<appl_attribute10>';
135     l_text:=l_text||irc_utilities_pkg.removeTags(p_appl_attribute10);
136     l_text:=l_text||'</appl_attribute10>';
137     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
138     l_text:='<appl_attribute11>';
139     l_text:=l_text||irc_utilities_pkg.removeTags(p_appl_attribute11);
140     l_text:=l_text||'</appl_attribute11>';
141     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
142     l_text:='<appl_attribute12>';
143     l_text:=l_text||irc_utilities_pkg.removeTags(p_appl_attribute12);
144     l_text:=l_text||'</appl_attribute12>';
145     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
146     l_text:='<appl_attribute13>';
147     l_text:=l_text||irc_utilities_pkg.removeTags(p_appl_attribute13);
148     l_text:=l_text||'</appl_attribute13>';
149     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
150     l_text:='<appl_attribute14>';
151     l_text:=l_text||irc_utilities_pkg.removeTags(p_appl_attribute14);
152     l_text:=l_text||'</appl_attribute14>';
153     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
154     l_text:='<appl_attribute15>';
155     l_text:=l_text||irc_utilities_pkg.removeTags(p_appl_attribute15);
156     l_text:=l_text||'</appl_attribute15>';
157     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
158     l_text:='<appl_attribute16>';
159     l_text:=l_text||irc_utilities_pkg.removeTags(p_appl_attribute16);
160     l_text:=l_text||'</appl_attribute16>';
161     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
162     l_text:='<appl_attribute17>';
163     l_text:=l_text||irc_utilities_pkg.removeTags(p_appl_attribute17);
164     l_text:=l_text||'</appl_attribute17>';
165     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
166     l_text:='<appl_attribute18>';
167     l_text:=l_text||irc_utilities_pkg.removeTags(p_appl_attribute18);
168     l_text:=l_text||'</appl_attribute18>';
169     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
170     l_text:='<appl_attribute19>';
171     l_text:=l_text||irc_utilities_pkg.removeTags(p_appl_attribute19);
172     l_text:=l_text||'</appl_attribute19>';
173     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
174     l_text:='<appl_attribute20>';
175     l_text:=l_text||irc_utilities_pkg.removeTags(p_appl_attribute20);
176     l_text:=l_text||'</appl_attribute20>';
177     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
178     l_text:='</application>';
179     --
180     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
181     --
182     -- raise the event with the event data
183     wf_event.raise(p_event_name=>l_event_name
184                   ,p_event_key=>l_event_key
185                   ,p_event_data=>l_event_data);
186     --
187   elsif (l_message='KEY') then
188     hr_utility.set_location(l_proc,30);
189     -- get a key for the event
190     open get_seq;
191     fetch get_seq into l_event_key;
192     close get_seq;
193     -- this is a key event, so just raise the event
194     -- without the event data
195     wf_event.raise(p_event_name=>l_event_name
196                   ,p_event_key=>l_event_key);
197     --
198   elsif (l_message='NONE') then
199     hr_utility.set_location(l_proc,40);
200     -- no event is required, so do nothing
201     null;
202   end if;
203     hr_utility.set_location('Leaving: '||l_proc,50);
204 end update_apl_details_a;
205 end hr_application_be1;