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.PER_WORK_INCIDENT_BK1

Source


1 package body PER_WORK_INCIDENT_BK1 as
2 /* $Header: peincapi.pkb 115.16 2002/12/11 11:15:34 generated noship $ */
3 -- Code generated by the Oracle HRMS API Hook Pre-processor
4 -- Created on 2009/03/30 04:53:55 (YYYY/MM/DD HH24:MI:SS)
5 procedure CREATE_WORK_INCIDENT_A
6 (P_EFFECTIVE_DATE in DATE
7 ,P_PERSON_ID in NUMBER
8 ,P_INCIDENT_REFERENCE in VARCHAR2
9 ,P_INCIDENT_TYPE in VARCHAR2
10 ,P_INCIDENT_DATE in DATE
11 ,P_INCIDENT_TIME in VARCHAR2
12 ,P_ORG_NOTIFIED_DATE in DATE
13 ,P_ASSIGNMENT_ID in NUMBER
14 ,P_LOCATION in VARCHAR2
15 ,P_AT_WORK_FLAG in VARCHAR2
16 ,P_REPORT_DATE in DATE
17 ,P_REPORT_TIME in VARCHAR2
18 ,P_REPORT_METHOD in VARCHAR2
19 ,P_PERSON_REPORTED_BY in NUMBER
20 ,P_PERSON_REPORTED_TO in VARCHAR2
21 ,P_WITNESS_DETAILS in VARCHAR2
22 ,P_DESCRIPTION in VARCHAR2
23 ,P_INJURY_TYPE in VARCHAR2
24 ,P_DISEASE_TYPE in VARCHAR2
25 ,P_HAZARD_TYPE in VARCHAR2
26 ,P_BODY_PART in VARCHAR2
27 ,P_TREATMENT_RECEIVED_FLAG in VARCHAR2
28 ,P_HOSPITAL_DETAILS in VARCHAR2
29 ,P_EMERGENCY_CODE in VARCHAR2
30 ,P_HOSPITALIZED_FLAG in VARCHAR2
31 ,P_HOSPITAL_ADDRESS in VARCHAR2
32 ,P_ACTIVITY_AT_TIME_OF_WORK in VARCHAR2
33 ,P_OBJECTS_INVOLVED in VARCHAR2
34 ,P_PRIVACY_ISSUE in VARCHAR2
35 ,P_WORK_START_TIME in VARCHAR2
36 ,P_DATE_OF_DEATH in DATE
37 ,P_REPORT_COMPLETED_BY in VARCHAR2
38 ,P_REPORTING_PERSON_TITLE in VARCHAR2
39 ,P_REPORTING_PERSON_PHONE in VARCHAR2
40 ,P_DAYS_RESTRICTED_WORK in NUMBER
41 ,P_DAYS_AWAY_FROM_WORK in NUMBER
42 ,P_DOCTOR_NAME in VARCHAR2
43 ,P_COMPENSATION_DATE in DATE
44 ,P_COMPENSATION_CURRENCY in VARCHAR2
45 ,P_COMPENSATION_AMOUNT in NUMBER
46 ,P_REMEDIAL_HS_ACTION in VARCHAR2
47 ,P_NOTIFIED_HSREP_ID in NUMBER
48 ,P_NOTIFIED_HSREP_DATE in DATE
49 ,P_NOTIFIED_REP_ID in NUMBER
50 ,P_NOTIFIED_REP_DATE in DATE
51 ,P_NOTIFIED_REP_ORG_ID in NUMBER
52 ,P_RELATED_INCIDENT_ID in NUMBER
53 ,P_OVER_TIME_FLAG in VARCHAR2
54 ,P_ABSENCE_EXISTS_FLAG in VARCHAR2
55 ,P_ATTRIBUTE_CATEGORY in VARCHAR2
56 ,P_ATTRIBUTE1 in VARCHAR2
57 ,P_ATTRIBUTE2 in VARCHAR2
58 ,P_ATTRIBUTE3 in VARCHAR2
59 ,P_ATTRIBUTE4 in VARCHAR2
60 ,P_ATTRIBUTE5 in VARCHAR2
61 ,P_ATTRIBUTE6 in VARCHAR2
62 ,P_ATTRIBUTE7 in VARCHAR2
63 ,P_ATTRIBUTE8 in VARCHAR2
64 ,P_ATTRIBUTE9 in VARCHAR2
65 ,P_ATTRIBUTE10 in VARCHAR2
66 ,P_ATTRIBUTE11 in VARCHAR2
67 ,P_ATTRIBUTE12 in VARCHAR2
68 ,P_ATTRIBUTE13 in VARCHAR2
69 ,P_ATTRIBUTE14 in VARCHAR2
70 ,P_ATTRIBUTE15 in VARCHAR2
71 ,P_ATTRIBUTE16 in VARCHAR2
72 ,P_ATTRIBUTE17 in VARCHAR2
73 ,P_ATTRIBUTE18 in VARCHAR2
74 ,P_ATTRIBUTE19 in VARCHAR2
75 ,P_ATTRIBUTE20 in VARCHAR2
76 ,P_ATTRIBUTE21 in VARCHAR2
77 ,P_ATTRIBUTE22 in VARCHAR2
78 ,P_ATTRIBUTE23 in VARCHAR2
79 ,P_ATTRIBUTE24 in VARCHAR2
80 ,P_ATTRIBUTE25 in VARCHAR2
81 ,P_ATTRIBUTE26 in VARCHAR2
82 ,P_ATTRIBUTE27 in VARCHAR2
83 ,P_ATTRIBUTE28 in VARCHAR2
84 ,P_ATTRIBUTE29 in VARCHAR2
85 ,P_ATTRIBUTE30 in VARCHAR2
86 ,P_INC_INFORMATION_CATEGORY in VARCHAR2
87 ,P_INC_INFORMATION1 in VARCHAR2
88 ,P_INC_INFORMATION2 in VARCHAR2
89 ,P_INC_INFORMATION3 in VARCHAR2
90 ,P_INC_INFORMATION4 in VARCHAR2
91 ,P_INC_INFORMATION5 in VARCHAR2
92 ,P_INC_INFORMATION6 in VARCHAR2
93 ,P_INC_INFORMATION7 in VARCHAR2
94 ,P_INC_INFORMATION8 in VARCHAR2
95 ,P_INC_INFORMATION9 in VARCHAR2
96 ,P_INC_INFORMATION10 in VARCHAR2
97 ,P_INC_INFORMATION11 in VARCHAR2
98 ,P_INC_INFORMATION12 in VARCHAR2
99 ,P_INC_INFORMATION13 in VARCHAR2
100 ,P_INC_INFORMATION14 in VARCHAR2
101 ,P_INC_INFORMATION15 in VARCHAR2
102 ,P_INC_INFORMATION16 in VARCHAR2
103 ,P_INC_INFORMATION17 in VARCHAR2
104 ,P_INC_INFORMATION18 in VARCHAR2
105 ,P_INC_INFORMATION19 in VARCHAR2
106 ,P_INC_INFORMATION20 in VARCHAR2
107 ,P_INC_INFORMATION21 in VARCHAR2
108 ,P_INC_INFORMATION22 in VARCHAR2
109 ,P_INC_INFORMATION23 in VARCHAR2
110 ,P_INC_INFORMATION24 in VARCHAR2
111 ,P_INC_INFORMATION25 in VARCHAR2
112 ,P_INC_INFORMATION26 in VARCHAR2
113 ,P_INC_INFORMATION27 in VARCHAR2
114 ,P_INC_INFORMATION28 in VARCHAR2
115 ,P_INC_INFORMATION29 in VARCHAR2
116 ,P_INC_INFORMATION30 in VARCHAR2
117 ,P_INCIDENT_ID in NUMBER
118 ,P_OBJECT_VERSION_NUMBER in NUMBER
119 )is
120 begin
121 hr_utility.set_location('Entering: PER_WORK_INCIDENT_BK1.CREATE_WORK_INCIDENT_A', 10);
122 hr_utility.set_location(' Leaving: PER_WORK_INCIDENT_BK1.CREATE_WORK_INCIDENT_A', 20);
123 end CREATE_WORK_INCIDENT_A;
124 procedure CREATE_WORK_INCIDENT_B
125 (P_EFFECTIVE_DATE in DATE
126 ,P_PERSON_ID in NUMBER
127 ,P_INCIDENT_REFERENCE in VARCHAR2
128 ,P_INCIDENT_TYPE in VARCHAR2
129 ,P_INCIDENT_DATE in DATE
130 ,P_INCIDENT_TIME in VARCHAR2
131 ,P_ORG_NOTIFIED_DATE in DATE
132 ,P_ASSIGNMENT_ID in NUMBER
133 ,P_LOCATION in VARCHAR2
134 ,P_AT_WORK_FLAG in VARCHAR2
135 ,P_REPORT_DATE in DATE
136 ,P_REPORT_TIME in VARCHAR2
137 ,P_REPORT_METHOD in VARCHAR2
138 ,P_PERSON_REPORTED_BY in NUMBER
139 ,P_PERSON_REPORTED_TO in VARCHAR2
140 ,P_WITNESS_DETAILS in VARCHAR2
141 ,P_DESCRIPTION in VARCHAR2
142 ,P_INJURY_TYPE in VARCHAR2
143 ,P_DISEASE_TYPE in VARCHAR2
144 ,P_HAZARD_TYPE in VARCHAR2
145 ,P_BODY_PART in VARCHAR2
146 ,P_TREATMENT_RECEIVED_FLAG in VARCHAR2
147 ,P_HOSPITAL_DETAILS in VARCHAR2
148 ,P_EMERGENCY_CODE in VARCHAR2
149 ,P_HOSPITALIZED_FLAG in VARCHAR2
150 ,P_HOSPITAL_ADDRESS in VARCHAR2
151 ,P_ACTIVITY_AT_TIME_OF_WORK in VARCHAR2
152 ,P_OBJECTS_INVOLVED in VARCHAR2
153 ,P_PRIVACY_ISSUE in VARCHAR2
154 ,P_WORK_START_TIME in VARCHAR2
155 ,P_DATE_OF_DEATH in DATE
156 ,P_REPORT_COMPLETED_BY in VARCHAR2
157 ,P_REPORTING_PERSON_TITLE in VARCHAR2
158 ,P_REPORTING_PERSON_PHONE in VARCHAR2
159 ,P_DAYS_RESTRICTED_WORK in NUMBER
160 ,P_DAYS_AWAY_FROM_WORK in NUMBER
161 ,P_DOCTOR_NAME in VARCHAR2
162 ,P_COMPENSATION_DATE in DATE
163 ,P_COMPENSATION_CURRENCY in VARCHAR2
164 ,P_COMPENSATION_AMOUNT in NUMBER
165 ,P_REMEDIAL_HS_ACTION in VARCHAR2
166 ,P_NOTIFIED_HSREP_ID in NUMBER
167 ,P_NOTIFIED_HSREP_DATE in DATE
168 ,P_NOTIFIED_REP_ID in NUMBER
169 ,P_NOTIFIED_REP_DATE in DATE
170 ,P_NOTIFIED_REP_ORG_ID in NUMBER
171 ,P_RELATED_INCIDENT_ID in NUMBER
172 ,P_OVER_TIME_FLAG in VARCHAR2
173 ,P_ABSENCE_EXISTS_FLAG in VARCHAR2
174 ,P_ATTRIBUTE_CATEGORY in VARCHAR2
175 ,P_ATTRIBUTE1 in VARCHAR2
176 ,P_ATTRIBUTE2 in VARCHAR2
177 ,P_ATTRIBUTE3 in VARCHAR2
178 ,P_ATTRIBUTE4 in VARCHAR2
179 ,P_ATTRIBUTE5 in VARCHAR2
180 ,P_ATTRIBUTE6 in VARCHAR2
181 ,P_ATTRIBUTE7 in VARCHAR2
182 ,P_ATTRIBUTE8 in VARCHAR2
183 ,P_ATTRIBUTE9 in VARCHAR2
184 ,P_ATTRIBUTE10 in VARCHAR2
185 ,P_ATTRIBUTE11 in VARCHAR2
186 ,P_ATTRIBUTE12 in VARCHAR2
187 ,P_ATTRIBUTE13 in VARCHAR2
188 ,P_ATTRIBUTE14 in VARCHAR2
189 ,P_ATTRIBUTE15 in VARCHAR2
190 ,P_ATTRIBUTE16 in VARCHAR2
191 ,P_ATTRIBUTE17 in VARCHAR2
192 ,P_ATTRIBUTE18 in VARCHAR2
193 ,P_ATTRIBUTE19 in VARCHAR2
194 ,P_ATTRIBUTE20 in VARCHAR2
195 ,P_ATTRIBUTE21 in VARCHAR2
196 ,P_ATTRIBUTE22 in VARCHAR2
197 ,P_ATTRIBUTE23 in VARCHAR2
198 ,P_ATTRIBUTE24 in VARCHAR2
199 ,P_ATTRIBUTE25 in VARCHAR2
200 ,P_ATTRIBUTE26 in VARCHAR2
201 ,P_ATTRIBUTE27 in VARCHAR2
202 ,P_ATTRIBUTE28 in VARCHAR2
203 ,P_ATTRIBUTE29 in VARCHAR2
204 ,P_ATTRIBUTE30 in VARCHAR2
205 ,P_INC_INFORMATION_CATEGORY in VARCHAR2
206 ,P_INC_INFORMATION1 in VARCHAR2
207 ,P_INC_INFORMATION2 in VARCHAR2
208 ,P_INC_INFORMATION3 in VARCHAR2
209 ,P_INC_INFORMATION4 in VARCHAR2
210 ,P_INC_INFORMATION5 in VARCHAR2
211 ,P_INC_INFORMATION6 in VARCHAR2
212 ,P_INC_INFORMATION7 in VARCHAR2
213 ,P_INC_INFORMATION8 in VARCHAR2
214 ,P_INC_INFORMATION9 in VARCHAR2
215 ,P_INC_INFORMATION10 in VARCHAR2
216 ,P_INC_INFORMATION11 in VARCHAR2
217 ,P_INC_INFORMATION12 in VARCHAR2
218 ,P_INC_INFORMATION13 in VARCHAR2
219 ,P_INC_INFORMATION14 in VARCHAR2
220 ,P_INC_INFORMATION15 in VARCHAR2
221 ,P_INC_INFORMATION16 in VARCHAR2
222 ,P_INC_INFORMATION17 in VARCHAR2
223 ,P_INC_INFORMATION18 in VARCHAR2
224 ,P_INC_INFORMATION19 in VARCHAR2
225 ,P_INC_INFORMATION20 in VARCHAR2
226 ,P_INC_INFORMATION21 in VARCHAR2
227 ,P_INC_INFORMATION22 in VARCHAR2
228 ,P_INC_INFORMATION23 in VARCHAR2
229 ,P_INC_INFORMATION24 in VARCHAR2
230 ,P_INC_INFORMATION25 in VARCHAR2
231 ,P_INC_INFORMATION26 in VARCHAR2
232 ,P_INC_INFORMATION27 in VARCHAR2
233 ,P_INC_INFORMATION28 in VARCHAR2
234 ,P_INC_INFORMATION29 in VARCHAR2
235 ,P_INC_INFORMATION30 in VARCHAR2
236 )is
237 l_commit_unit_number number;
238 l_legislation_code   varchar2(30);
239 begin
240 hr_utility.set_location('Entering: PER_WORK_INCIDENT_BK1.CREATE_WORK_INCIDENT_B', 10);
241 l_commit_unit_number := hr_api.return_commit_unit;
242 if hr_api.call_leg_hooks then
243 l_legislation_code := PER_PER_BUS.RETURN_LEGISLATION_CODE(P_PERSON_ID => P_PERSON_ID
244 );
245 if l_legislation_code = 'DE' then
246 HR_DE_EXTRA_WORK_INC_CHECKS.WORK_INCIDENT_CHECKS
247 (P_INCIDENT_DATE => P_INCIDENT_DATE
248 ,P_INC_INFORMATION3 => P_INC_INFORMATION3
249 ,P_INC_INFORMATION9 => P_INC_INFORMATION9
250 ,P_INC_INFORMATION10 => P_INC_INFORMATION10
251 ,P_INC_INFORMATION11 => P_INC_INFORMATION11
252 );
253 elsif l_legislation_code = 'NO' then
254 HR_NO_VALIDATE_PKG.WORKINC_VALIDATE
255 (P_INCIDENT_DATE => P_INCIDENT_DATE
256 ,P_INC_INFORMATION_CATEGORY => P_INC_INFORMATION_CATEGORY
257 ,P_INC_INFORMATION1 => P_INC_INFORMATION1
258 ,P_INC_INFORMATION2 => P_INC_INFORMATION2
259 );
260 end if;
261 end if;
262 hr_api.validate_commit_unit(l_commit_unit_number, 'CREATE_WORK_INCIDENT', 'BP');
263 hr_utility.set_location(' Leaving: PER_WORK_INCIDENT_BK1.CREATE_WORK_INCIDENT_B', 20);
264 end CREATE_WORK_INCIDENT_B;
265 end PER_WORK_INCIDENT_BK1;