DBA Data[Home] [Help]

PACKAGE BODY: APPS.HR_FI_PREVIOUS_EMPLOYMENT_API

Source


1 Package body hr_fi_previous_employment_api as
2 /* $Header: pepemfii.pkb 120.0 2005/05/31 13:25:51 appldev noship $ */
3 
4  -- Package Variables
5    g_package   VARCHAR2(33) := 'hr_fi_previous_employment_api.';
6    g_debug boolean := hr_utility.debug_enabled;
7 
8 procedure create_fi_previous_job
9 (  p_effective_date                 in     date
10   ,p_validate                       in     boolean  default false
11   ,p_previous_employer_id           in     number
12   ,p_start_date                     in     date     default null
13   ,p_end_date                       in     date     default null
14   ,p_period_years                   in     number   default null
15   ,p_period_months                  in     number   default null
16   ,p_period_days                    in     number   default null
17   ,p_job_name                       in     varchar2 default null
18   ,p_employment_category            in     varchar2 default null
19   ,p_description                    in     varchar2 default null
20   ,p_all_assignments                in     varchar2 default 'N'
21   ,p_pjo_attribute_category         in     varchar2 default null
22   ,p_pjo_attribute1                 in     varchar2 default null
23   ,p_pjo_attribute2                 in     varchar2 default null
24   ,p_pjo_attribute3                 in     varchar2 default null
25   ,p_pjo_attribute4                 in     varchar2 default null
26   ,p_pjo_attribute5                 in     varchar2 default null
27   ,p_pjo_attribute6                 in     varchar2 default null
28   ,p_pjo_attribute7                 in     varchar2 default null
29   ,p_pjo_attribute8                 in     varchar2 default null
30   ,p_pjo_attribute9                 in     varchar2 default null
31   ,p_pjo_attribute10                in     varchar2 default null
32   ,p_pjo_attribute11                in     varchar2 default null
33   ,p_pjo_attribute12                in     varchar2 default null
34   ,p_pjo_attribute13                in     varchar2 default null
35   ,p_pjo_attribute14                in     varchar2 default null
36   ,p_pjo_attribute15                in     varchar2 default null
37   ,p_pjo_attribute16                in     varchar2 default null
38   ,p_pjo_attribute17                in     varchar2 default null
39   ,p_pjo_attribute18                in     varchar2 default null
40   ,p_pjo_attribute19                in     varchar2 default null
41   ,p_pjo_attribute20                in     varchar2 default null
42   ,p_pjo_attribute21                in     varchar2 default null
43   ,p_pjo_attribute22                in     varchar2 default null
44   ,p_pjo_attribute23                in     varchar2 default null
45   ,p_pjo_attribute24                in     varchar2 default null
46   ,p_pjo_attribute25                in     varchar2 default null
47   ,p_pjo_attribute26                in     varchar2 default null
48   ,p_pjo_attribute27                in     varchar2 default null
49   ,p_pjo_attribute28                in     varchar2 default null
50   ,p_pjo_attribute29                in     varchar2 default null
51   ,p_pjo_attribute30                in     varchar2 default null
52   ,p_job_exp_classification  	    in     varchar2 default null
53   ,p_previous_job_id                out nocopy    number
54   ,p_object_version_number          out nocopy    number
55   ) is
56 
57 
58   -- Declare cursors and local variables
59   --
60   l_proc                 varchar2(72) := g_package||'create_fi_previous_job';
61   l_legislation_code     varchar2(2);
62   --
63   cursor csr_bg is
64 		select legislation_code
65 		from per_business_groups
66 		where business_group_id in
67 					(
68 					select business_group_id
69 					from per_previous_employers
70 					where previous_employer_id = p_previous_employer_id
71 					);
72   --
73 begin
74   --
75   -- Validation in addition to Row Handlers
76   --
77   -- Check that the specified business group is valid.
78   --
79   open csr_bg;
80   fetch csr_bg
81   into l_legislation_code;
82   if csr_bg%notfound then
83     close csr_bg;
84     hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
85     hr_utility.raise_error;
86   end if;
87   close csr_bg;
88   --
89   -- Check that the legislation of the specified business group is 'FI'.
90   --
91   if l_legislation_code <> 'FI' then
92     hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
93     hr_utility.set_message_token('LEG_CODE','FI');
94     hr_utility.raise_error;
95   end if;
96 
97 
98   --
99   -- Call the business process
100 
101   -- Create the previous Job record using the create_previous_job
102   --
103 hr_previous_employment_api.create_previous_job
104 (      p_effective_date                 =>     p_effective_date
105       ,p_previous_job_id                =>     p_previous_job_id
106       ,p_previous_employer_id           =>     p_previous_employer_id
107       ,p_start_date                     =>     p_start_date
108       ,p_end_date                       =>     p_end_date
109       ,p_period_years                   =>     p_period_years
110       ,p_period_months                  =>     p_period_months
111       ,p_period_days                    =>     p_period_days
112       ,p_job_name                       =>     p_job_name
113       ,p_employment_category            =>     p_employment_category
114       ,p_description                    =>     p_description
115       ,p_all_assignments                =>     p_all_assignments
116       ,p_pjo_attribute_category         =>     p_pjo_attribute_category
117       ,p_pjo_attribute1                 =>     p_pjo_attribute1
118       ,p_pjo_attribute2                 =>     p_pjo_attribute2
119       ,p_pjo_attribute3                 =>     p_pjo_attribute3
120       ,p_pjo_attribute4                 =>     p_pjo_attribute4
121       ,p_pjo_attribute5                 =>     p_pjo_attribute5
122       ,p_pjo_attribute6                 =>     p_pjo_attribute6
123       ,p_pjo_attribute7                 =>     p_pjo_attribute7
124       ,p_pjo_attribute8                 =>     p_pjo_attribute8
125       ,p_pjo_attribute9                 =>     p_pjo_attribute9
126       ,p_pjo_attribute10                =>     p_pjo_attribute10
127       ,p_pjo_attribute11                =>     p_pjo_attribute11
128       ,p_pjo_attribute12                =>     p_pjo_attribute12
129       ,p_pjo_attribute13                =>     p_pjo_attribute13
130       ,p_pjo_attribute14                =>     p_pjo_attribute14
131       ,p_pjo_attribute15                =>     p_pjo_attribute15
132       ,p_pjo_attribute16                =>     p_pjo_attribute16
133       ,p_pjo_attribute17                =>     p_pjo_attribute17
134       ,p_pjo_attribute18                =>     p_pjo_attribute18
135       ,p_pjo_attribute19                =>     p_pjo_attribute19
136       ,p_pjo_attribute20                =>     p_pjo_attribute20
137       ,p_pjo_attribute21                =>     p_pjo_attribute21
138       ,p_pjo_attribute22                =>     p_pjo_attribute22
139       ,p_pjo_attribute23                =>     p_pjo_attribute23
140       ,p_pjo_attribute24                =>     p_pjo_attribute24
141       ,p_pjo_attribute25                =>     p_pjo_attribute25
142       ,p_pjo_attribute26                =>     p_pjo_attribute26
143       ,p_pjo_attribute27                =>     p_pjo_attribute27
144       ,p_pjo_attribute28                =>     p_pjo_attribute28
145       ,p_pjo_attribute29                =>     p_pjo_attribute29
146       ,p_pjo_attribute30                =>     p_pjo_attribute30
147       ,p_pjo_information_category       =>     'FI'
148       ,p_pjo_information1               =>     p_job_exp_classification
149       ,p_object_version_number          =>     p_object_version_number
150       );
151       --
152       if g_debug then
153 	 hr_utility.set_location(' Leaving:'||l_proc, 40);
154 	end if;
155 
156 END ;
157 --
158 -- -----------------------------------------------------------------------
159 -- |-------------------------< update_fi_previous_job >---------------------|
160 -- -----------------------------------------------------------------------
161 --
162 procedure update_fi_previous_job
163   (p_effective_date               in     date
164   ,p_validate                     in     boolean   default false
165   ,p_previous_job_id              in     number
166   ,p_start_date                   in     date      default null
167   ,p_end_date                     in     date      default null
168   ,p_period_years                 in     number    default null
169   ,p_period_months                in     number    default null
170   ,p_period_days                  in     number    default null
171   ,p_job_name                     in     varchar2  default null
172   ,p_employment_category          in     varchar2  default null
173   ,p_description                  in     varchar2  default null
174   ,p_all_assignments              in     varchar2  default 'N'
175   ,p_pjo_attribute_category       in     varchar2  default null
176   ,p_pjo_attribute1               in     varchar2  default null
177   ,p_pjo_attribute2               in     varchar2  default null
178   ,p_pjo_attribute3               in     varchar2  default null
179   ,p_pjo_attribute4               in     varchar2  default null
180   ,p_pjo_attribute5               in     varchar2  default null
181   ,p_pjo_attribute6               in     varchar2  default null
182   ,p_pjo_attribute7               in     varchar2  default null
183   ,p_pjo_attribute8               in     varchar2  default null
184   ,p_pjo_attribute9               in     varchar2  default null
185   ,p_pjo_attribute10              in     varchar2  default null
186   ,p_pjo_attribute11              in     varchar2  default null
187   ,p_pjo_attribute12              in     varchar2  default null
188   ,p_pjo_attribute13              in     varchar2  default null
189   ,p_pjo_attribute14              in     varchar2  default null
190   ,p_pjo_attribute15              in     varchar2  default null
191   ,p_pjo_attribute16              in     varchar2  default null
192   ,p_pjo_attribute17              in     varchar2  default null
193   ,p_pjo_attribute18              in     varchar2  default null
194   ,p_pjo_attribute19              in     varchar2  default null
195   ,p_pjo_attribute20              in     varchar2  default null
196   ,p_pjo_attribute21              in     varchar2  default null
197   ,p_pjo_attribute22              in     varchar2  default null
198   ,p_pjo_attribute23              in     varchar2  default null
199   ,p_pjo_attribute24              in     varchar2  default null
200   ,p_pjo_attribute25              in     varchar2  default null
201   ,p_pjo_attribute26              in     varchar2  default null
202   ,p_pjo_attribute27              in     varchar2  default null
203   ,p_pjo_attribute28              in     varchar2  default null
204   ,p_pjo_attribute29              in     varchar2  default null
205   ,p_pjo_attribute30              in     varchar2  default null
206   ,p_job_exp_classification 	  in     varchar2  default null
207   ,p_object_version_number        in out nocopy number
208   ) is
209 
210   --
211   -- Declare cursors and local variables
212   --
213   l_proc                 varchar2(72) := g_package||'update_fi_previous_job';
214   l_legislation_code     varchar2(2);
215   --
216   cursor csr_bg is
217     select legislation_code
218     from per_business_groups pbg
219     where pbg.business_group_id in (select pe.business_group_id
220 from per_previous_jobs pj , per_previous_employers pe
221 where pj.PREVIOUS_EMPLOYER_ID = pe.PREVIOUS_EMPLOYER_ID
222 and pj.PREVIOUS_JOB_ID = p_previous_job_id
223 );
224   --
225 begin
226   --
227   -- Validation in addition to Row Handlers
228   --
229   -- Check that the specified business group is valid.
230   --
231   open csr_bg;
232   fetch csr_bg
233   into l_legislation_code;
234   if csr_bg%notfound then
235     close csr_bg;
236     hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
237     hr_utility.raise_error;
238   end if;
239   close csr_bg;
240   --
241   -- Check that the legislation of the specified business group is 'FI'.
242   --
243   if l_legislation_code <> 'FI' then
244     hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
245     hr_utility.set_message_token('LEG_CODE','FI');
246     hr_utility.raise_error;
247   end if;
248 
249 
250   --
251   -- Call the business process
252   --
253   hr_previous_employment_api.update_previous_job
254   (p_effective_date                 =>     p_effective_date
255       ,p_previous_job_id                =>     p_previous_job_id
256       ,p_start_date                     =>     p_start_date
257       ,p_end_date                       =>     p_end_date
258       ,p_period_years                   =>     p_period_years
259       ,p_period_months                  =>     p_period_months
260       ,p_period_days                    =>     p_period_days
261       ,p_job_name                       =>     p_job_name
262       ,p_employment_category            =>     p_employment_category
263       ,p_description                    =>     p_description
264       ,p_all_assignments                =>     p_all_assignments
265       ,p_pjo_attribute_category         =>     p_pjo_attribute_category
266       ,p_pjo_attribute1                 =>     p_pjo_attribute1
267       ,p_pjo_attribute2                 =>     p_pjo_attribute2
268       ,p_pjo_attribute3                 =>     p_pjo_attribute3
269       ,p_pjo_attribute4                 =>     p_pjo_attribute4
270       ,p_pjo_attribute5                 =>     p_pjo_attribute5
271       ,p_pjo_attribute6                 =>     p_pjo_attribute6
272       ,p_pjo_attribute7                 =>     p_pjo_attribute7
273       ,p_pjo_attribute8                 =>     p_pjo_attribute8
274       ,p_pjo_attribute9                 =>     p_pjo_attribute9
275       ,p_pjo_attribute10                =>     p_pjo_attribute10
276       ,p_pjo_attribute11                =>     p_pjo_attribute11
277       ,p_pjo_attribute12                =>     p_pjo_attribute12
278       ,p_pjo_attribute13                =>     p_pjo_attribute13
279       ,p_pjo_attribute14                =>     p_pjo_attribute14
280       ,p_pjo_attribute15                =>     p_pjo_attribute15
281       ,p_pjo_attribute16                =>     p_pjo_attribute16
282       ,p_pjo_attribute17                =>     p_pjo_attribute17
283       ,p_pjo_attribute18                =>     p_pjo_attribute18
284       ,p_pjo_attribute19                =>     p_pjo_attribute19
285       ,p_pjo_attribute20                =>     p_pjo_attribute20
286       ,p_pjo_attribute21                =>     p_pjo_attribute21
287       ,p_pjo_attribute22                =>     p_pjo_attribute22
288       ,p_pjo_attribute23                =>     p_pjo_attribute23
289       ,p_pjo_attribute24                =>     p_pjo_attribute24
290       ,p_pjo_attribute25                =>     p_pjo_attribute25
291       ,p_pjo_attribute26                =>     p_pjo_attribute26
292       ,p_pjo_attribute27                =>     p_pjo_attribute27
293       ,p_pjo_attribute28                =>     p_pjo_attribute28
294       ,p_pjo_attribute29                =>     p_pjo_attribute29
295       ,p_pjo_attribute30                =>     p_pjo_attribute30
296       ,p_pjo_information_category       =>     'FI'
297       ,p_pjo_information1               =>     p_job_exp_classification
298       ,p_object_version_number          =>     p_object_version_number
299       );
300 
301       if g_debug then
302 	  hr_utility.set_location(' Leaving:'||l_proc, 40);
303 	end if;
304 end update_fi_previous_job;
305 
306 --
307 end hr_fi_previous_employment_api;