[Home] [Help]
PACKAGE BODY: APPS.HR_SE_WORK_INCIDENT_API
Source
1 package body hr_se_work_incident_api as
2 /* $Header: peincsei.pkb 120.0 2005/05/31 10:09:57 appldev noship $ */
3
4 -- Package Variables
5 --
6 g_package varchar2(33) := 'hr_se_work_incident_api.';
7 --
8 -- ----------------------------------------------------------------------
9 -- |----------------------< create_se_work_incident >--------------------|
10 -- ----------------------------------------------------------------------
11 --
12 procedure create_se_work_incident
13 (p_validate in boolean default false
14 ,p_effective_date in date
15 ,p_person_id in number
16 ,p_incident_reference in varchar2
17 ,p_incident_type in varchar2
18 ,p_at_work_flag in varchar2
19 ,p_incident_date in date
20 ,p_incident_time in varchar2 default null
21 ,p_org_notified_date in date default null
22 ,p_assignment_id in number default null
23 ,p_location in varchar2 default null
24 ,p_report_date in date default null
25 ,p_report_time in varchar2 default null
26 ,p_report_method in varchar2 default null
27 ,p_person_reported_by in number default null
28 ,p_person_reported_to in varchar2 default null
29 ,p_witness_details in varchar2 default null
30 ,p_description in varchar2 default null
31 ,p_injury_type in varchar2 default null
32 ,p_disease_type in varchar2 default null
33 ,p_hazard_type in varchar2 default null
34 ,p_body_part in varchar2 default null
35 ,p_treatment_received_flag in varchar2 default null
36 ,p_hospital_details in varchar2 default null
37 ,p_emergency_code in varchar2 default null
38 ,p_hospitalized_flag in varchar2 default null
39 ,p_hospital_address in varchar2 default null
40 ,p_activity_at_time_of_work in varchar2 default null
41 ,p_objects_involved in varchar2 default null
42 ,p_privacy_issue in varchar2 default null
43 ,p_work_start_time in varchar2 default null
44 ,p_date_of_death in date default null
45 ,p_report_completed_by in varchar2 default null
46 ,p_reporting_person_title in varchar2 default null
47 ,p_reporting_person_phone in varchar2 default null
48 ,p_days_restricted_work in number default null
49 ,p_days_away_from_work in number default null
50 ,p_doctor_name in varchar2 default null
51 ,p_compensation_date in date default null
52 ,p_compensation_currency in varchar2 default null
53 ,p_compensation_amount in number default null
54 ,p_remedial_hs_action in varchar2 default null
55 ,p_notified_hsrep_id in number default null
56 ,p_notified_hsrep_date in date default null
57 ,p_notified_rep_id in number default null
58 ,p_notified_rep_date in date default null
59 ,p_notified_rep_org_id in number default null
60 ,p_related_incident_id in number default null
61 ,p_over_time_flag in varchar2 default null
62 ,p_absence_exists_flag in varchar2 default null
63 ,p_attribute_category in varchar2 default null
64 ,p_attribute1 in varchar2 default null
65 ,p_attribute2 in varchar2 default null
66 ,p_attribute3 in varchar2 default null
67 ,p_attribute4 in varchar2 default null
68 ,p_attribute5 in varchar2 default null
69 ,p_attribute6 in varchar2 default null
70 ,p_attribute7 in varchar2 default null
71 ,p_attribute8 in varchar2 default null
72 ,p_attribute9 in varchar2 default null
73 ,p_attribute10 in varchar2 default null
74 ,p_attribute11 in varchar2 default null
75 ,p_attribute12 in varchar2 default null
76 ,p_attribute13 in varchar2 default null
77 ,p_attribute14 in varchar2 default null
78 ,p_attribute15 in varchar2 default null
79 ,p_attribute16 in varchar2 default null
80 ,p_attribute17 in varchar2 default null
81 ,p_attribute18 in varchar2 default null
82 ,p_attribute19 in varchar2 default null
83 ,p_attribute20 in varchar2 default null
84 ,p_attribute21 in varchar2 default null
85 ,p_attribute22 in varchar2 default null
86 ,p_attribute23 in varchar2 default null
87 ,p_attribute24 in varchar2 default null
88 ,p_attribute25 in varchar2 default null
89 ,p_attribute26 in varchar2 default null
90 ,p_attribute27 in varchar2 default null
91 ,p_attribute28 in varchar2 default null
92 ,p_attribute29 in varchar2 default null
93 ,p_attribute30 in varchar2 default null
94 ,p_employment_category in varchar2 default null
95 ,p_coverage_comm_date in varchar2 default null
96 ,p_coverage_expiry_date in varchar2 default null
97 ,p_personnel_category in varchar2 default null
98 ,p_main_duties in varchar2 default null
99 ,p_vessel_reg_number in varchar2 default null
100 ,p_main_activity in varchar2 default null
101 ,p_accident_site_work in varchar2 default null
102 ,p_accident_site_emp in varchar2 default null
103 ,p_equipment_materials in varchar2 default null
104 ,p_manufacturing_details in varchar2 default null
105 ,p_purpose_chemical in varchar2 default null
106 ,p_chemical_equipment in varchar2 default null
107 ,p_circumstances in varchar2 default null
108 ,p_type_of_injury in varchar2 default null
109 ,p_affected_areas in varchar2 default null
110 ,p_est_period_Absence in varchar2 default null
111 ,p_num_sick_pay_days in varchar2 default null
112 ,p_safety_delegate in varchar2 default null
113 ,p_reason_not_notify in varchar2 default null
114 ,p_incident_id out nocopy number
115 ,p_object_version_number out nocopy number
116 ) is
117 --
118 -- Declare cursors and local variables
119 --
120 l_business_group_id per_contracts_f.business_group_id%TYPE;
121 l_proc varchar2(72) := g_package||'create_se_work_incident';
122 l_legislation_code varchar2(2);
123 --
124 cursor csr_get_business_group_id is
125 select per.business_group_id
126 from per_all_people_f per
127 where per.person_id = p_person_id
128 and p_effective_date between per.effective_start_date
129 and per.effective_end_date;
130 --
131 cursor csr_bg is
132 select legislation_code
133 from per_business_groups pbg
134 where pbg.business_group_id = l_business_group_id;
135 --
136 begin
137
138 hr_utility.set_location('Entering:'|| l_proc, 10);
139 --
140 -- Issue a savepoint if operating in validation only mode
141 --
142 savepoint create_no_work_incident;
143 --
144 hr_utility.set_location(l_proc, 20);
145 --
146 -- Process Logic
147 --
148 -- Get person details.
149 --
150 open csr_get_business_group_id;
151 fetch csr_get_business_group_id
152 into l_business_group_id;
153 --
154 if csr_get_business_group_id%NOTFOUND then
155 close csr_get_business_group_id;
156 hr_utility.set_location(l_proc, 30);
157 hr_utility.set_message(801,'HR_7432_ASG_INVALID_PERSON');
158 hr_utility.raise_error;
159 end if;
160 close csr_get_business_group_id;
161 --
162 hr_utility.set_location(l_proc, 40);
163 --
164 -- Check that the specified business group is valid.
165 --
166 open csr_bg;
167 fetch csr_bg
168 into l_legislation_code;
169 if csr_bg%notfound then
170 close csr_bg;
171 hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
172 hr_utility.raise_error;
173 end if;
174 close csr_bg;
175 hr_utility.set_location(l_proc, 50);
176 --
177 -- Check that the legislation of the specified business group is 'SE'.
178 --
179 if l_legislation_code <> 'SE' then
180 hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
181 hr_utility.set_message_token('LEG_CODE','SE');
182 hr_utility.raise_error;
183 end if;
184 hr_utility.set_location(l_proc, 60);
185 --
186 -- Call the Work Incident business process
187 --
188 per_work_incident_api.create_work_incident
189 (p_validate => p_validate
190 ,p_effective_date => p_effective_date
191 ,p_person_id => p_person_id
192 ,p_incident_reference => p_incident_reference
193 ,p_incident_type => p_incident_type
194 ,p_at_work_flag => p_at_work_flag
195 ,p_incident_date => p_incident_date
196 ,p_incident_time => p_incident_time
197 ,p_org_notified_date => p_org_notified_date
198 ,p_assignment_id => p_assignment_id
199 ,p_location => p_location
200 ,p_report_date => p_report_date
201 ,p_report_time => p_report_time
202 ,p_report_method => p_report_method
203 ,p_person_reported_by => p_person_reported_by
204 ,p_person_reported_to => p_person_reported_to
205 ,p_witness_details => p_witness_details
206 ,p_description => p_description
207 ,p_injury_type => p_injury_type
208 ,p_disease_type => p_disease_type
209 ,p_hazard_type => p_hazard_type
210 ,p_body_part => p_body_part
211 ,p_treatment_received_flag => p_treatment_received_flag
212 ,p_hospital_details => p_hospital_details
213 ,p_emergency_code => p_emergency_code
214 ,p_hospitalized_flag => p_hospitalized_flag
215 ,p_hospital_address => p_hospital_address
216 ,p_activity_at_time_of_work => p_activity_at_time_of_work
217 ,p_objects_involved => p_objects_involved
218 ,p_privacy_issue => p_privacy_issue
219 ,p_work_start_time => p_work_start_time
220 ,p_date_of_death => p_date_of_death
221 ,p_report_completed_by => p_report_completed_by
222 ,p_reporting_person_title => p_reporting_person_title
223 ,p_reporting_person_phone => p_reporting_person_phone
224 ,p_days_restricted_work => p_days_restricted_work
225 ,p_days_away_from_work => p_days_away_from_work
226 ,p_doctor_name => p_doctor_name
227 ,p_compensation_date => p_compensation_date
228 ,p_compensation_currency => p_compensation_currency
229 ,p_compensation_amount => p_compensation_amount
230 ,p_remedial_hs_action => p_remedial_hs_action
231 ,p_notified_hsrep_id => p_notified_hsrep_id
232 ,p_notified_hsrep_date => p_notified_hsrep_date
233 ,p_notified_rep_id => p_notified_rep_id
234 ,p_notified_rep_date => p_notified_rep_date
235 ,p_notified_rep_org_id => p_notified_rep_org_id
236 ,p_related_incident_id => p_related_incident_id
237 ,p_over_time_flag => p_over_time_flag
238 ,p_absence_exists_flag => p_absence_exists_flag
239 ,p_attribute_category => p_attribute_category
240 ,p_attribute1 => p_attribute1
241 ,p_attribute2 => p_attribute2
242 ,p_attribute3 => p_attribute3
243 ,p_attribute4 => p_attribute4
244 ,p_attribute5 => p_attribute5
245 ,p_attribute6 => p_attribute6
246 ,p_attribute7 => p_attribute7
247 ,p_attribute8 => p_attribute8
248 ,p_attribute9 => p_attribute9
249 ,p_attribute10 => p_attribute10
250 ,p_attribute11 => p_attribute11
251 ,p_attribute12 => p_attribute12
252 ,p_attribute13 => p_attribute13
253 ,p_attribute14 => p_attribute14
254 ,p_attribute15 => p_attribute15
255 ,p_attribute16 => p_attribute16
256 ,p_attribute17 => p_attribute17
257 ,p_attribute18 => p_attribute18
258 ,p_attribute19 => p_attribute19
259 ,p_attribute20 => p_attribute20
260 ,p_attribute21 => p_attribute21
261 ,p_attribute22 => p_attribute22
262 ,p_attribute23 => p_attribute23
263 ,p_attribute24 => p_attribute24
264 ,p_attribute25 => p_attribute25
265 ,p_attribute26 => p_attribute26
266 ,p_attribute27 => p_attribute27
267 ,p_attribute28 => p_attribute28
268 ,p_attribute29 => p_attribute29
269 ,p_attribute30 => p_attribute30
270 ,p_inc_information_category => 'SE'
271 ,p_inc_information1 => p_employment_category
272 ,p_inc_information2 => p_coverage_comm_date
273 ,p_inc_information3 => p_coverage_expiry_date
274 ,p_inc_information4 => p_personnel_category
275 ,p_inc_information5 => p_main_duties
276 ,p_inc_information6 => p_vessel_reg_number
277 ,p_inc_information7 => p_main_activity
278 ,p_inc_information8 => p_accident_site_work
279 ,p_inc_information9 => p_accident_site_emp
280 ,p_inc_information10 => p_equipment_materials
281 ,p_inc_information11 => p_manufacturing_details
282 ,p_inc_information12 => p_purpose_chemical
283 ,p_inc_information13 => p_chemical_equipment
284 ,p_inc_information14 => p_circumstances
285 ,p_inc_information15 => p_type_of_injury
286 ,p_inc_information16 => p_affected_areas
287 ,p_inc_information17 => p_est_period_Absence
288 ,p_inc_information18 => p_num_sick_pay_days
289 ,p_inc_information19 => p_safety_delegate
290 ,p_inc_information20 => p_reason_not_notify
291 ,p_incident_id => p_incident_id
292 ,p_object_version_number => p_object_version_number
293 );
294
295 --
296 hr_utility.set_location(' Leaving:'||l_proc, 70);
297 --
298 end create_se_work_incident;
299 --
300 -- ----------------------------------------------------------------------
301 -- |--------------------< update_se_work_incident >---------------------|
302 -- ----------------------------------------------------------------------
303 --
304 procedure update_se_work_incident
305 (p_validate in boolean default false
306 ,p_effective_date in date
307 ,p_incident_id in number
308 ,p_object_version_number in out nocopy number
309 ,p_incident_reference in varchar2 default hr_api.g_varchar2
310 ,p_incident_type in varchar2 default hr_api.g_varchar2
311 ,p_at_work_flag in varchar2 default hr_api.g_varchar2
312 ,p_incident_date in date default hr_api.g_date
313 ,p_incident_time in varchar2 default hr_api.g_varchar2
314 ,p_org_notified_date in date default hr_api.g_date
315 ,p_assignment_id in number default hr_api.g_number
316 ,p_location in varchar2 default hr_api.g_varchar2
317 ,p_report_date in date default hr_api.g_date
318 ,p_report_time in varchar2 default hr_api.g_varchar2
319 ,p_report_method in varchar2 default hr_api.g_varchar2
320 ,p_person_reported_by in number default hr_api.g_number
321 ,p_person_reported_to in varchar2 default hr_api.g_varchar2
322 ,p_witness_details in varchar2 default hr_api.g_varchar2
323 ,p_description in varchar2 default hr_api.g_varchar2
324 ,p_injury_type in varchar2 default hr_api.g_varchar2
325 ,p_disease_type in varchar2 default hr_api.g_varchar2
326 ,p_hazard_type in varchar2 default hr_api.g_varchar2
327 ,p_body_part in varchar2 default hr_api.g_varchar2
328 ,p_treatment_received_flag in varchar2 default hr_api.g_varchar2
329 ,p_hospital_details in varchar2 default hr_api.g_varchar2
330 ,p_emergency_code in varchar2 default hr_api.g_varchar2
331 ,p_hospitalized_flag in varchar2 default hr_api.g_varchar2
332 ,p_hospital_address in varchar2 default hr_api.g_varchar2
333 ,p_activity_at_time_of_work in varchar2 default hr_api.g_varchar2
334 ,p_objects_involved in varchar2 default hr_api.g_varchar2
335 ,p_privacy_issue in varchar2 default hr_api.g_varchar2
336 ,p_work_start_time in varchar2 default hr_api.g_varchar2
337 ,p_date_of_death in date default hr_api.g_date
338 ,p_report_completed_by in varchar2 default hr_api.g_varchar2
339 ,p_reporting_person_title in varchar2 default hr_api.g_varchar2
340 ,p_reporting_person_phone in varchar2 default hr_api.g_varchar2
341 ,p_days_restricted_work in number default hr_api.g_number
342 ,p_days_away_from_work in number default hr_api.g_number
343 ,p_doctor_name in varchar2 default hr_api.g_varchar2
344 ,p_compensation_date in date default hr_api.g_date
345 ,p_compensation_currency in varchar2 default hr_api.g_varchar2
346 ,p_compensation_amount in number default hr_api.g_number
347 ,p_remedial_hs_action in varchar2 default hr_api.g_varchar2
348 ,p_notified_hsrep_id in number default hr_api.g_number
349 ,p_notified_hsrep_date in date default hr_api.g_date
350 ,p_notified_rep_id in number default hr_api.g_number
351 ,p_notified_rep_date in date default hr_api.g_date
352 ,p_notified_rep_org_id in number default hr_api.g_number
353 ,p_related_incident_id in number default hr_api.g_number
354 ,p_over_time_flag in varchar2 default hr_api.g_varchar2
355 ,p_absence_exists_flag in varchar2 default hr_api.g_varchar2
356 ,p_attribute_category in varchar2 default hr_api.g_varchar2
357 ,p_attribute1 in varchar2 default hr_api.g_varchar2
358 ,p_attribute2 in varchar2 default hr_api.g_varchar2
359 ,p_attribute3 in varchar2 default hr_api.g_varchar2
360 ,p_attribute4 in varchar2 default hr_api.g_varchar2
361 ,p_attribute5 in varchar2 default hr_api.g_varchar2
362 ,p_attribute6 in varchar2 default hr_api.g_varchar2
363 ,p_attribute7 in varchar2 default hr_api.g_varchar2
364 ,p_attribute8 in varchar2 default hr_api.g_varchar2
365 ,p_attribute9 in varchar2 default hr_api.g_varchar2
366 ,p_attribute10 in varchar2 default hr_api.g_varchar2
367 ,p_attribute11 in varchar2 default hr_api.g_varchar2
368 ,p_attribute12 in varchar2 default hr_api.g_varchar2
369 ,p_attribute13 in varchar2 default hr_api.g_varchar2
370 ,p_attribute14 in varchar2 default hr_api.g_varchar2
371 ,p_attribute15 in varchar2 default hr_api.g_varchar2
372 ,p_attribute16 in varchar2 default hr_api.g_varchar2
373 ,p_attribute17 in varchar2 default hr_api.g_varchar2
374 ,p_attribute18 in varchar2 default hr_api.g_varchar2
375 ,p_attribute19 in varchar2 default hr_api.g_varchar2
376 ,p_attribute20 in varchar2 default hr_api.g_varchar2
377 ,p_attribute21 in varchar2 default hr_api.g_varchar2
378 ,p_attribute22 in varchar2 default hr_api.g_varchar2
379 ,p_attribute23 in varchar2 default hr_api.g_varchar2
380 ,p_attribute24 in varchar2 default hr_api.g_varchar2
381 ,p_attribute25 in varchar2 default hr_api.g_varchar2
382 ,p_attribute26 in varchar2 default hr_api.g_varchar2
383 ,p_attribute27 in varchar2 default hr_api.g_varchar2
384 ,p_attribute28 in varchar2 default hr_api.g_varchar2
385 ,p_attribute29 in varchar2 default hr_api.g_varchar2
386 ,p_attribute30 in varchar2 default hr_api.g_varchar2
387 ,p_employment_category in varchar2 default hr_api.g_varchar2
388 ,p_coverage_comm_date in varchar2 default hr_api.g_varchar2
389 ,p_coverage_expiry_date in varchar2 default hr_api.g_varchar2
390 ,p_personnel_category in varchar2 default hr_api.g_varchar2
391 ,p_main_duties in varchar2 default hr_api.g_varchar2
392 ,p_vessel_reg_number in varchar2 default hr_api.g_varchar2
393 ,p_main_activity in varchar2 default hr_api.g_varchar2
394 ,p_accident_site_work in varchar2 default hr_api.g_varchar2
395 ,p_accident_site_emp in varchar2 default hr_api.g_varchar2
396 ,p_equipment_materials in varchar2 default hr_api.g_varchar2
397 ,p_manufacturing_details in varchar2 default hr_api.g_varchar2
398 ,p_purpose_chemical in varchar2 default hr_api.g_varchar2
399 ,p_chemical_equipment in varchar2 default hr_api.g_varchar2
400 ,p_circumstances in varchar2 default hr_api.g_varchar2
401 ,p_type_of_injury in varchar2 default hr_api.g_varchar2
402 ,p_affected_areas in varchar2 default hr_api.g_varchar2
403 ,p_est_period_Absence in varchar2 default hr_api.g_varchar2
404 ,p_num_sick_pay_days in varchar2 default hr_api.g_varchar2
405 ,p_safety_delegate in varchar2 default hr_api.g_varchar2
406 ,p_reason_not_notify in varchar2 default hr_api.g_varchar2
407 ) is
408 --
409 -- Declare cursors and local variables
410 --
411 l_business_group_id per_contracts_f.business_group_id%TYPE;
412 l_proc varchar2(72) := g_package||'update_se_work_incident';
413 l_legislation_code varchar2(2);
414 --
415 cursor csr_get_business_group_id is
416 select per.business_group_id
417 from per_all_people_f per
418 where per.person_id = (select person_id
419 from per_work_incidents
420 where incident_id = p_incident_id)
421 and p_effective_date between per.effective_start_date
422 and per.effective_end_date;
423 --
424 cursor csr_bg is
425 select legislation_code
426 from per_business_groups pbg
427 where pbg.business_group_id = l_business_group_id;
428 --
429 begin
430 --
431 hr_utility.set_location('Entering:'|| l_proc, 10);
432 --
433 -- Issue a savepoint if operating in validation only mode
434 --
435 savepoint update_no_work_incident;
436 --
437 hr_utility.set_location(l_proc, 20);
438 --
439 -- Process Logic
440 --
441 -- Get person details.
442 --
443 open csr_get_business_group_id;
444 fetch csr_get_business_group_id
445 into l_business_group_id;
446 --
447 if csr_get_business_group_id%NOTFOUND then
448 close csr_get_business_group_id;
449 hr_utility.set_location(l_proc, 30);
450 hr_utility.set_message(801,'HR_7432_ASG_INVALID_PERSON');
451 hr_utility.raise_error;
452 end if;
453 close csr_get_business_group_id;
454 --
455 hr_utility.set_location(l_proc, 40);
456 --
457 -- Check that the specified business group is valid.
458 --
459 open csr_bg;
460 fetch csr_bg
461 into l_legislation_code;
462 if csr_bg%notfound then
463 close csr_bg;
464 hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
465 hr_utility.raise_error;
466 end if;
467 close csr_bg;
468 --
469 hr_utility.set_location(l_proc, 50);
470 --
471 -- Check that the legislation of the specified business group is 'NO'.
472 --
473 if l_legislation_code <> 'SE' then
474 hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
475 hr_utility.set_message_token('LEG_CODE','SE');
476 hr_utility.raise_error;
477 end if;
478 hr_utility.set_location(l_proc, 60);
479 --
480 -- Call the contract business process
481 --
482 per_work_incident_api.update_work_incident
483 (p_validate => p_validate
484 ,p_effective_date => p_effective_date
485 ,p_incident_id => p_incident_id
486 ,p_object_version_number => p_object_version_number
487 ,p_incident_reference => p_incident_reference
488 ,p_incident_type => p_incident_type
489 ,p_at_work_flag => p_at_work_flag
490 ,p_incident_date => p_incident_date
491 ,p_incident_time => p_incident_time
492 ,p_org_notified_date => p_org_notified_date
493 ,p_assignment_id => p_assignment_id
494 ,p_location => p_location
495 ,p_report_date => p_report_date
496 ,p_report_time => p_report_time
497 ,p_report_method => p_report_method
498 ,p_person_reported_by => p_person_reported_by
499 ,p_person_reported_to => p_person_reported_to
500 ,p_witness_details => p_witness_details
501 ,p_description => p_description
502 ,p_injury_type => p_injury_type
503 ,p_disease_type => p_disease_type
504 ,p_hazard_type => p_hazard_type
505 ,p_body_part => p_body_part
506 ,p_treatment_received_flag => p_treatment_received_flag
507 ,p_hospital_details => p_hospital_details
508 ,p_emergency_code => p_emergency_code
509 ,p_hospitalized_flag => p_hospitalized_flag
510 ,p_hospital_address => p_hospital_address
511 ,p_activity_at_time_of_work => p_activity_at_time_of_work
512 ,p_objects_involved => p_objects_involved
513 ,p_privacy_issue => p_privacy_issue
514 ,p_work_start_time => p_work_start_time
515 ,p_date_of_death => p_date_of_death
516 ,p_report_completed_by => p_report_completed_by
517 ,p_reporting_person_title => p_reporting_person_title
518 ,p_reporting_person_phone => p_reporting_person_phone
519 ,p_days_restricted_work => p_days_restricted_work
520 ,p_days_away_from_work => p_days_away_from_work
521 ,p_doctor_name => p_doctor_name
522 ,p_compensation_date => p_compensation_date
523 ,p_compensation_currency => p_compensation_currency
524 ,p_compensation_amount => p_compensation_amount
525 ,p_remedial_hs_action => p_remedial_hs_action
526 ,p_notified_hsrep_id => p_notified_hsrep_id
527 ,p_notified_hsrep_date => p_notified_hsrep_date
528 ,p_notified_rep_id => p_notified_rep_id
529 ,p_notified_rep_date => p_notified_rep_date
530 ,p_notified_rep_org_id => p_notified_rep_org_id
531 ,p_related_incident_id => p_related_incident_id
532 ,p_over_time_flag => p_over_time_flag
533 ,p_absence_exists_flag => p_absence_exists_flag
534 ,p_attribute_category => p_attribute_category
535 ,p_attribute1 => p_attribute1
536 ,p_attribute2 => p_attribute2
537 ,p_attribute3 => p_attribute3
538 ,p_attribute4 => p_attribute4
539 ,p_attribute5 => p_attribute5
540 ,p_attribute6 => p_attribute6
541 ,p_attribute7 => p_attribute7
542 ,p_attribute8 => p_attribute8
543 ,p_attribute9 => p_attribute9
544 ,p_attribute10 => p_attribute10
545 ,p_attribute11 => p_attribute11
546 ,p_attribute12 => p_attribute12
547 ,p_attribute13 => p_attribute13
548 ,p_attribute14 => p_attribute14
549 ,p_attribute15 => p_attribute15
550 ,p_attribute16 => p_attribute16
551 ,p_attribute17 => p_attribute17
552 ,p_attribute18 => p_attribute18
553 ,p_attribute19 => p_attribute19
554 ,p_attribute20 => p_attribute20
555 ,p_attribute21 => p_attribute21
556 ,p_attribute22 => p_attribute22
557 ,p_attribute23 => p_attribute23
558 ,p_attribute24 => p_attribute24
559 ,p_attribute25 => p_attribute25
560 ,p_attribute26 => p_attribute26
561 ,p_attribute27 => p_attribute27
562 ,p_attribute28 => p_attribute28
563 ,p_attribute29 => p_attribute29
564 ,p_attribute30 => p_attribute30
565 ,p_inc_information_category => 'SE'
566 ,p_inc_information1 => p_employment_category
567 ,p_inc_information2 => p_coverage_comm_date
568 ,p_inc_information3 => p_coverage_expiry_date
569 ,p_inc_information4 => p_personnel_category
570 ,p_inc_information5 => p_main_duties
571 ,p_inc_information6 => p_vessel_reg_number
572 ,p_inc_information7 => p_main_activity
573 ,p_inc_information8 => p_accident_site_work
574 ,p_inc_information9 => p_accident_site_emp
575 ,p_inc_information10 => p_equipment_materials
576 ,p_inc_information11 => p_manufacturing_details
577 ,p_inc_information12 => p_purpose_chemical
578 ,p_inc_information13 => p_chemical_equipment
579 ,p_inc_information14 => p_circumstances
580 ,p_inc_information15 => p_type_of_injury
581 ,p_inc_information16 => p_affected_areas
582 ,p_inc_information17 => p_est_period_Absence
583 ,p_inc_information18 => p_num_sick_pay_days
584 ,p_inc_information19 => p_safety_delegate
585 ,p_inc_information20 => p_reason_not_notify
586 );
587 --
588 hr_utility.set_location(' Leaving:'||l_proc, 70);
589 --
590 end update_se_work_incident;
591 --
592 end hr_se_work_incident_api;