DBA Data[Home] [Help]

PACKAGE BODY: APPS.PER_SA_WORK_INCIDENT_API

Source


1 package body per_sa_work_incident_api as
2 /* $Header: peincsai.pkb 115.0 2003/09/10 02:19:17 adevanat noship $ */
3 
4 -- Package Variables
5 --
6 g_package  varchar2(33) := 'per_sa_work_incident_api.';
7 --
8 -- ----------------------------------------------------------------------
9 -- |----------------------< create_sa_work_incident >--------------------|
10 -- ----------------------------------------------------------------------
11 --
12 procedure create_sa_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
44   ,p_date_of_death                 in     date     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
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_date_wage_stop                in     varchar2 default null
95   ,p_patient_number                in     varchar2 default null
96   ,p_admission_date                in     varchar2 default null
97   ,p_hospitalised_from             in     varchar2 default null
98   ,p_hospitalised_to               in     varchar2 default null
99   ,p_rest_home_from                in     varchar2 default null
100   ,p_rest_home_to                  in     varchar2 default null
101   ,p_number_external_visits        in     varchar2 default null
102   ,p_days_violated_med             in     varchar2 default null
103   ,p_violation_type                in     varchar2 default null
104   ,p_days_escorted                 in     varchar2 default null
105   ,p_date_commenced                in     varchar2 default null
106   ,p_incident_id                      out nocopy number
107   ,p_object_version_number            out nocopy number
108   ) is
109   --
110   -- Declare cursors and local variables
111   --
112   l_business_group_id per_contracts_f.business_group_id%TYPE;
113   l_proc              varchar2(72) := g_package||'create_sa_work_incident';
114   l_legislation_code  varchar2(2);
115   --
116   cursor csr_get_business_group_id is
117     select per.business_group_id
118     from per_all_people_f per
119     where per.person_id = p_person_id
120     and   p_effective_date between per.effective_start_date
121                                and per.effective_end_date;
122   --
123   cursor csr_bg is
124     select legislation_code
125     from per_business_groups pbg
126     where pbg.business_group_id = l_business_group_id;
127   --
128 begin
129 
130   hr_utility.set_location('Entering:'|| l_proc, 10);
131   --
132   -- Issue a savepoint if operating in validation only mode
133   --
134   savepoint create_sa_work_incident;
135   --
136   hr_utility.set_location(l_proc, 20);
137   --
138   -- Process Logic
139   --
140   -- Get person details.
141   --
142   open  csr_get_business_group_id;
143   fetch csr_get_business_group_id
144   into l_business_group_id;
145   --
146   if csr_get_business_group_id%NOTFOUND then
147     close csr_get_business_group_id;
148     hr_utility.set_location(l_proc, 30);
149     hr_utility.set_message(801,'HR_7432_ASG_INVALID_PERSON');
150     hr_utility.raise_error;
151   end if;
152   close csr_get_business_group_id;
156   -- Check that the specified business group is valid.
153   --
154   hr_utility.set_location(l_proc, 40);
155   --
157   --
158   open csr_bg;
159   fetch csr_bg
160   into l_legislation_code;
161   if csr_bg%notfound then
162     close csr_bg;
163     hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
164     hr_utility.raise_error;
165   end if;
166   close csr_bg;
167   hr_utility.set_location(l_proc, 50);
168   --
169   -- Check that the legislation of the specified business group is 'SA'.
170   --
171   if l_legislation_code <> 'SA' then
172     hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
173     hr_utility.set_message_token('LEG_CODE','SA');
174     hr_utility.raise_error;
175   end if;
176   hr_utility.set_location(l_proc, 60);
177   --
178   -- Call the Work Incident business process
179   --
180     per_work_incident_api.create_work_incident
181       (p_validate                       => p_validate
182        ,p_effective_date                => p_effective_date
183        ,p_person_id                     => p_person_id
184        ,p_incident_reference            => p_incident_reference
185        ,p_incident_type                 => p_incident_type
186        ,p_at_work_flag                  => p_at_work_flag
187        ,p_incident_date                 => p_incident_date
188        ,p_incident_time                 => p_incident_time
189        ,p_org_notified_date             => p_org_notified_date
190        ,p_assignment_id                 => p_assignment_id
191        ,p_location                      => p_location
192        ,p_report_date                   => p_report_date
193        ,p_report_time                   => p_report_time
194        ,p_report_method                 => p_report_method
195        ,p_person_reported_by            => p_person_reported_by
196        ,p_person_reported_to            => p_person_reported_to
197        ,p_witness_details               => p_witness_details
198        ,p_description                   => p_description
199        ,p_injury_type                   => p_injury_type
200        ,p_disease_type                  => p_disease_type
201        ,p_hazard_type                   => p_hazard_type
202        ,p_body_part                     => p_body_part
203        ,p_treatment_received_flag       => p_treatment_received_flag
204        ,p_hospital_details              => p_hospital_details
205        ,p_emergency_code                => p_emergency_code
206        ,p_hospitalized_flag             => p_hospitalized_flag
207        ,p_hospital_address              => p_hospital_address
208        ,p_activity_at_time_of_work      => p_activity_at_time_of_work
209        ,p_objects_involved              => p_objects_involved
210        ,p_privacy_issue                 => p_privacy_issue
211        ,p_work_start_time               => p_work_start_time
212        ,p_date_of_death                 => p_date_of_death
213        ,p_report_completed_by           => p_report_completed_by
214        ,p_reporting_person_title        => p_reporting_person_title
215        ,p_reporting_person_phone        => p_reporting_person_phone
216        ,p_days_restricted_work          => p_days_restricted_work
217        ,p_days_away_from_work           => p_days_away_from_work
218        ,p_doctor_name                   => p_doctor_name
219        ,p_compensation_date             => p_compensation_date
220        ,p_compensation_currency         => p_compensation_currency
221        ,p_compensation_amount           => p_compensation_amount
222        ,p_remedial_hs_action            => p_remedial_hs_action
223        ,p_notified_hsrep_id             => p_notified_hsrep_id
224        ,p_notified_hsrep_date           => p_notified_hsrep_date
225        ,p_notified_rep_id               => p_notified_rep_id
226        ,p_notified_rep_date             => p_notified_rep_date
227        ,p_notified_rep_org_id           => p_notified_rep_org_id
228        ,p_related_incident_id           => p_related_incident_id
229        ,p_over_time_flag                => p_over_time_flag
230        ,p_absence_exists_flag           => p_absence_exists_flag
231        ,p_attribute_category            => p_attribute_category
232        ,p_attribute1                    => p_attribute1
233        ,p_attribute2                    => p_attribute2
234        ,p_attribute3                    => p_attribute3
235        ,p_attribute4                    => p_attribute4
236        ,p_attribute5                    => p_attribute5
237        ,p_attribute6                    => p_attribute6
238        ,p_attribute7                    => p_attribute7
239        ,p_attribute8                    => p_attribute8
240        ,p_attribute9                    => p_attribute9
241        ,p_attribute10                   => p_attribute10
242        ,p_attribute11                   => p_attribute11
243        ,p_attribute12                   => p_attribute12
244        ,p_attribute13                   => p_attribute13
245        ,p_attribute14                   => p_attribute14
246        ,p_attribute15                   => p_attribute15
247        ,p_attribute16                   => p_attribute16
248        ,p_attribute17                   => p_attribute17
249        ,p_attribute18                   => p_attribute18
250        ,p_attribute19                   => p_attribute19
251        ,p_attribute20                   => p_attribute20
252        ,p_attribute21                   => p_attribute21
253        ,p_attribute22                   => p_attribute22
254        ,p_attribute23                   => p_attribute23
255        ,p_attribute24                   => p_attribute24
256        ,p_attribute25                   => p_attribute25
257        ,p_attribute26                   => p_attribute26
258        ,p_attribute27                   => p_attribute27
259        ,p_attribute28                   => p_attribute28
263        ,p_inc_information1              => p_date_wage_stop
260        ,p_attribute29                   => p_attribute29
261        ,p_attribute30                   => p_attribute30
262        ,p_inc_information_category      => 'SA'
264        ,p_inc_information2              => p_patient_number
265        ,p_inc_information3              => p_admission_date
266        ,p_inc_information4              => p_hospitalised_from
267        ,p_inc_information5              => p_hospitalised_to
268        ,p_inc_information6              => p_rest_home_from
269        ,p_inc_information7              => p_rest_home_to
270        ,p_inc_information8              => p_number_external_visits
271        ,p_inc_information9              => p_days_violated_med
272        ,p_inc_information10             => p_violation_type
273        ,p_inc_information11             => p_days_escorted
274        ,p_inc_information12             => p_date_commenced
275        ,p_incident_id                   => p_incident_id
276        ,p_object_version_number         => p_object_version_number
277       );
278 
279   --
280   hr_utility.set_location(' Leaving:'||l_proc, 70);
281   --
282 end create_sa_work_incident;
283 --
284 -- ----------------------------------------------------------------------
285 -- |--------------------< update_sa_work_incident >---------------------|
286 -- ----------------------------------------------------------------------
287 --
288 procedure update_sa_work_incident
289   (p_validate                      in     boolean  default false
290   ,p_effective_date                in     date
291   ,p_incident_id                   in     number
292   ,p_object_version_number         in out nocopy number
293   ,p_incident_reference            in     varchar2 default hr_api.g_varchar2
294   ,p_incident_type                 in     varchar2 default hr_api.g_varchar2
295   ,p_at_work_flag                  in     varchar2 default hr_api.g_varchar2
296   ,p_incident_date                 in     date     default hr_api.g_date
297   ,p_incident_time                 in     varchar2 default hr_api.g_varchar2
298   ,p_org_notified_date             in     date     default hr_api.g_date
299   ,p_assignment_id                 in     number   default hr_api.g_number
300   ,p_location                      in     varchar2 default hr_api.g_varchar2
301   ,p_report_date                   in     date     default hr_api.g_date
302   ,p_report_time                   in     varchar2 default hr_api.g_varchar2
303   ,p_report_method                 in     varchar2 default hr_api.g_varchar2
304   ,p_person_reported_by            in     number   default hr_api.g_number
305   ,p_person_reported_to            in     varchar2 default hr_api.g_varchar2
306   ,p_witness_details               in     varchar2 default hr_api.g_varchar2
307   ,p_description                   in     varchar2 default hr_api.g_varchar2
308   ,p_injury_type                   in     varchar2 default hr_api.g_varchar2
309   ,p_disease_type                  in     varchar2 default hr_api.g_varchar2
310   ,p_hazard_type                   in     varchar2 default hr_api.g_varchar2
311   ,p_body_part                     in     varchar2 default hr_api.g_varchar2
312   ,p_treatment_received_flag       in     varchar2 default hr_api.g_varchar2
313   ,p_hospital_details              in     varchar2 default hr_api.g_varchar2
314   ,p_emergency_code                in     varchar2 default hr_api.g_varchar2
315   ,p_hospitalized_flag             in     varchar2 default hr_api.g_varchar2
316   ,p_hospital_address              in     varchar2 default hr_api.g_varchar2
317   ,p_activity_at_time_of_work      in     varchar2 default hr_api.g_varchar2
318   ,p_objects_involved              in     varchar2 default hr_api.g_varchar2
319   ,p_privacy_issue                 in     varchar2 default hr_api.g_varchar2
320   ,p_work_start_time               in     varchar2 default hr_api.g_varchar2
321   ,p_date_of_death                 in     date     default hr_api.g_date
322   ,p_report_completed_by           in     varchar2 default hr_api.g_varchar2
323   ,p_reporting_person_title        in     varchar2 default hr_api.g_varchar2
324   ,p_reporting_person_phone        in     varchar2 default hr_api.g_varchar2
325   ,p_days_restricted_work          in     number   default hr_api.g_number
326   ,p_days_away_from_work           in     number   default hr_api.g_number
327   ,p_doctor_name                   in     varchar2 default hr_api.g_varchar2
328   ,p_compensation_date             in     date     default hr_api.g_date
329   ,p_compensation_currency         in     varchar2 default hr_api.g_varchar2
330   ,p_compensation_amount           in     number   default hr_api.g_number
331   ,p_remedial_hs_action            in     varchar2 default hr_api.g_varchar2
332   ,p_notified_hsrep_id             in     number   default hr_api.g_number
333   ,p_notified_hsrep_date           in     date     default hr_api.g_date
334   ,p_notified_rep_id               in     number   default hr_api.g_number
335   ,p_notified_rep_date             in     date     default hr_api.g_date
336   ,p_notified_rep_org_id           in     number   default hr_api.g_number
337   ,p_related_incident_id           in     number   default hr_api.g_number
338   ,p_over_time_flag                in     varchar2 default hr_api.g_varchar2
339   ,p_absence_exists_flag           in     varchar2 default hr_api.g_varchar2
340   ,p_attribute_category            in     varchar2 default hr_api.g_varchar2
341   ,p_attribute1                    in     varchar2 default hr_api.g_varchar2
342   ,p_attribute2                    in     varchar2 default hr_api.g_varchar2
343   ,p_attribute3                    in     varchar2 default hr_api.g_varchar2
344   ,p_attribute4                    in     varchar2 default hr_api.g_varchar2
345   ,p_attribute5                    in     varchar2 default hr_api.g_varchar2
349   ,p_attribute9                    in     varchar2 default hr_api.g_varchar2
346   ,p_attribute6                    in     varchar2 default hr_api.g_varchar2
347   ,p_attribute7                    in     varchar2 default hr_api.g_varchar2
348   ,p_attribute8                    in     varchar2 default hr_api.g_varchar2
350   ,p_attribute10                   in     varchar2 default hr_api.g_varchar2
351   ,p_attribute11                   in     varchar2 default hr_api.g_varchar2
352   ,p_attribute12                   in     varchar2 default hr_api.g_varchar2
353   ,p_attribute13                   in     varchar2 default hr_api.g_varchar2
354   ,p_attribute14                   in     varchar2 default hr_api.g_varchar2
355   ,p_attribute15                   in     varchar2 default hr_api.g_varchar2
356   ,p_attribute16                   in     varchar2 default hr_api.g_varchar2
357   ,p_attribute17                   in     varchar2 default hr_api.g_varchar2
358   ,p_attribute18                   in     varchar2 default hr_api.g_varchar2
359   ,p_attribute19                   in     varchar2 default hr_api.g_varchar2
360   ,p_attribute20                   in     varchar2 default hr_api.g_varchar2
361   ,p_attribute21                   in     varchar2 default hr_api.g_varchar2
362   ,p_attribute22                   in     varchar2 default hr_api.g_varchar2
363   ,p_attribute23                   in     varchar2 default hr_api.g_varchar2
364   ,p_attribute24                   in     varchar2 default hr_api.g_varchar2
365   ,p_attribute25                   in     varchar2 default hr_api.g_varchar2
366   ,p_attribute26                   in     varchar2 default hr_api.g_varchar2
367   ,p_attribute27                   in     varchar2 default hr_api.g_varchar2
368   ,p_attribute28                   in     varchar2 default hr_api.g_varchar2
369   ,p_attribute29                   in     varchar2 default hr_api.g_varchar2
370   ,p_attribute30                   in     varchar2 default hr_api.g_varchar2
371   ,p_date_wage_stop                in     varchar2 default hr_api.g_varchar2
372   ,p_patient_number                in     varchar2 default hr_api.g_varchar2
373   ,p_admission_date                in     varchar2 default hr_api.g_varchar2
374   ,p_hospitalised_from             in     varchar2 default hr_api.g_varchar2
375   ,p_hospitalised_to               in     varchar2 default hr_api.g_varchar2
376   ,p_rest_home_from                in     varchar2 default hr_api.g_varchar2
377   ,p_rest_home_to                  in     varchar2 default hr_api.g_varchar2
378   ,p_number_external_visits        in     varchar2 default hr_api.g_varchar2
379   ,p_days_violated_med             in     varchar2 default hr_api.g_varchar2
380   ,p_violation_type                in     varchar2 default hr_api.g_varchar2
381   ,p_days_escorted                 in     varchar2 default hr_api.g_varchar2
382   ,p_date_commenced                in     varchar2 default hr_api.g_varchar2
383   ) is
384   --
385   -- Declare cursors and local variables
386   --
387   l_business_group_id    per_contracts_f.business_group_id%TYPE;
388   l_proc                 varchar2(72) := g_package||'update_sa_work_incident';
389   l_legislation_code     varchar2(2);
390   --
391   cursor csr_get_business_group_id is
392     select per.business_group_id
393     from per_all_people_f per
394     where per.person_id = (select person_id
395                           from    per_work_incidents
396                           where   incident_id = p_incident_id)
397     and   p_effective_date between per.effective_start_date
398                                and per.effective_end_date;
399   --
400   cursor csr_bg is
401     select legislation_code
402     from per_business_groups pbg
403     where pbg.business_group_id = l_business_group_id;
404   --
405 begin
406   --
407   hr_utility.set_location('Entering:'|| l_proc, 10);
408   --
409   -- Issue a savepoint if operating in validation only mode
410   --
411   savepoint update_sa_work_incident;
412   --
413   hr_utility.set_location(l_proc, 20);
414   --
415   -- Process Logic
416   --
417   -- Get person details.
418   --
419   open  csr_get_business_group_id;
420   fetch csr_get_business_group_id
421   into l_business_group_id;
422   --
423   if csr_get_business_group_id%NOTFOUND then
424     close csr_get_business_group_id;
425     hr_utility.set_location(l_proc, 30);
426     hr_utility.set_message(801,'HR_7432_ASG_INVALID_PERSON');
427     hr_utility.raise_error;
428   end if;
429   close csr_get_business_group_id;
430   --
431   hr_utility.set_location(l_proc, 40);
432   --
433   -- Check that the specified business group is valid.
434   --
435   open csr_bg;
436   fetch csr_bg
437   into l_legislation_code;
438   if csr_bg%notfound then
439     close csr_bg;
440     hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
441     hr_utility.raise_error;
442   end if;
443   close csr_bg;
444   --
445   hr_utility.set_location(l_proc, 50);
446   --
447   -- Check that the legislation of the specified business group is 'SA'.
448   --
449   if l_legislation_code  <>  'SA' then
450     hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
451     hr_utility.set_message_token('LEG_CODE','SA');
452     hr_utility.raise_error;
453   end if;
454   hr_utility.set_location(l_proc, 60);
455   --
456   -- Call the contract business process
457   --
458     per_work_incident_api.update_work_incident
459       (p_validate                       => p_validate
460        ,p_effective_date                => p_effective_date
461        ,p_incident_id                   => p_incident_id
462        ,p_object_version_number         => p_object_version_number
463        ,p_incident_reference            => p_incident_reference
464        ,p_incident_type                 => p_incident_type
465        ,p_at_work_flag                  => p_at_work_flag
466        ,p_incident_date                 => p_incident_date
467        ,p_incident_time                 => p_incident_time
468        ,p_org_notified_date             => p_org_notified_date
469        ,p_assignment_id                 => p_assignment_id
470        ,p_location                      => p_location
471        ,p_report_date                   => p_report_date
472        ,p_report_time                   => p_report_time
473        ,p_report_method                 => p_report_method
474        ,p_person_reported_by            => p_person_reported_by
475        ,p_person_reported_to            => p_person_reported_to
476        ,p_witness_details               => p_witness_details
477        ,p_description                   => p_description
478        ,p_injury_type                   => p_injury_type
479        ,p_disease_type                  => p_disease_type
480        ,p_hazard_type                   => p_hazard_type
481        ,p_body_part                     => p_body_part
482        ,p_treatment_received_flag       => p_treatment_received_flag
483        ,p_hospital_details              => p_hospital_details
484        ,p_emergency_code                => p_emergency_code
485        ,p_hospitalized_flag             => p_hospitalized_flag
486        ,p_hospital_address              => p_hospital_address
487        ,p_activity_at_time_of_work      => p_activity_at_time_of_work
488        ,p_objects_involved              => p_objects_involved
489        ,p_privacy_issue                 => p_privacy_issue
490        ,p_work_start_time               => p_work_start_time
491        ,p_date_of_death                 => p_date_of_death
492        ,p_report_completed_by           => p_report_completed_by
493        ,p_reporting_person_title        => p_reporting_person_title
494        ,p_reporting_person_phone        => p_reporting_person_phone
495        ,p_days_restricted_work          => p_days_restricted_work
496        ,p_days_away_from_work           => p_days_away_from_work
497        ,p_doctor_name                   => p_doctor_name
498        ,p_compensation_date             => p_compensation_date
499        ,p_compensation_currency         => p_compensation_currency
500        ,p_compensation_amount           => p_compensation_amount
501        ,p_remedial_hs_action            => p_remedial_hs_action
502        ,p_notified_hsrep_id             => p_notified_hsrep_id
503        ,p_notified_hsrep_date           => p_notified_hsrep_date
504        ,p_notified_rep_id               => p_notified_rep_id
505        ,p_notified_rep_date             => p_notified_rep_date
506        ,p_notified_rep_org_id           => p_notified_rep_org_id
507        ,p_related_incident_id           => p_related_incident_id
508        ,p_over_time_flag                => p_over_time_flag
509        ,p_absence_exists_flag           => p_absence_exists_flag
510        ,p_attribute_category            => p_attribute_category
511        ,p_attribute1                    => p_attribute1
512        ,p_attribute2                    => p_attribute2
513        ,p_attribute3                    => p_attribute3
514        ,p_attribute4                    => p_attribute4
515        ,p_attribute5                    => p_attribute5
516        ,p_attribute6                    => p_attribute6
517        ,p_attribute7                    => p_attribute7
518        ,p_attribute8                    => p_attribute8
519        ,p_attribute9                    => p_attribute9
520        ,p_attribute10                   => p_attribute10
521        ,p_attribute11                   => p_attribute11
522        ,p_attribute12                   => p_attribute12
523        ,p_attribute13                   => p_attribute13
524        ,p_attribute14                   => p_attribute14
525        ,p_attribute15                   => p_attribute15
526        ,p_attribute16                   => p_attribute16
527        ,p_attribute17                   => p_attribute17
528        ,p_attribute18                   => p_attribute18
529        ,p_attribute19                   => p_attribute19
530        ,p_attribute20                   => p_attribute20
531        ,p_attribute21                   => p_attribute21
532        ,p_attribute22                   => p_attribute22
533        ,p_attribute23                   => p_attribute23
534        ,p_attribute24                   => p_attribute24
535        ,p_attribute25                   => p_attribute25
536        ,p_attribute26                   => p_attribute26
537        ,p_attribute27                   => p_attribute27
538        ,p_attribute28                   => p_attribute28
539        ,p_attribute29                   => p_attribute29
540        ,p_attribute30                   => p_attribute30
541        ,p_inc_information_category      => 'SA'
542        ,p_inc_information1              => p_date_wage_stop
543        ,p_inc_information2              => p_patient_number
544        ,p_inc_information3              => p_admission_date
545        ,p_inc_information4              => p_hospitalised_from
546        ,p_inc_information5              => p_hospitalised_to
547        ,p_inc_information6              => p_rest_home_from
548        ,p_inc_information7              => p_rest_home_to
549        ,p_inc_information8              => p_number_external_visits
550        ,p_inc_information9              => p_days_violated_med
551        ,p_inc_information10             => p_violation_type
552        ,p_inc_information11             => p_days_escorted
553        ,p_inc_information12             => p_date_commenced
554       );
555   --
556   hr_utility.set_location(' Leaving:'||l_proc, 70);
557   --
558 end update_sa_work_incident;
559 --
560 end per_sa_work_incident_api;