[Home] [Help]
PACKAGE BODY: APPS.CS_REACTTIME_PVT
Source
1 PACKAGE BODY CS_REACTTIME_PVT AS
2 /* $Header: csctcrtb.pls 115.1 99/07/16 08:51:02 porting ship $ */
3 FUNCTION get_seq_id RETURN NUMBER IS
4 CURSOR get_seq_id_csr IS
5 SELECT CS_COV_REACTION_TIMES_S.nextval FROM SYS.DUAL;
6 l_seq_id NUMBER := 0;
7 BEGIN
8 OPEN get_seq_id_csr;
9 FETCH get_seq_id_csr INTO l_seq_id;
10 CLOSE get_seq_id_csr;
11 RETURN(l_seq_id);
12 END get_seq_id;
13
14
15 -- Validation
16 FUNCTION Validate_Item_Attributes
17 (
18 p_reacttime_rec IN ReactTime_Rec_Type
19 )
20 RETURN VARCHAR2
21 IS
22 l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
23 BEGIN
24 IF p_reacttime_rec.name = TAPI_DEV_KIT.G_MISS_CHAR OR
25 p_reacttime_rec.name IS NULL
26 THEN
27 TAPI_DEV_KIT.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'name');
28 l_return_status := FND_API.G_RET_STS_ERROR;
29 ELSIF p_reacttime_rec.coverage_txn_group_id = TAPI_DEV_KIT.G_MISS_NUM OR
30 p_reacttime_rec.coverage_txn_group_id IS NULL
31 THEN
32 TAPI_DEV_KIT.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'coverage_txn_group_id');
33 l_return_status := FND_API.G_RET_STS_ERROR;
34 ELSIF p_reacttime_rec.last_update_date = TAPI_DEV_KIT.G_MISS_DATE OR
35 p_reacttime_rec.last_update_date IS NULL
36 THEN
37 TAPI_DEV_KIT.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'last_update_date');
38 l_return_status := FND_API.G_RET_STS_ERROR;
39 ELSIF p_reacttime_rec.last_updated_by = TAPI_DEV_KIT.G_MISS_NUM OR
40 p_reacttime_rec.last_updated_by IS NULL
41 THEN
42 TAPI_DEV_KIT.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'last_updated_by');
43 l_return_status := FND_API.G_RET_STS_ERROR;
44 ELSIF p_reacttime_rec.creation_date = TAPI_DEV_KIT.G_MISS_DATE OR
45 p_reacttime_rec.creation_date IS NULL
46 THEN
47 TAPI_DEV_KIT.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'creation_date');
48 l_return_status := FND_API.G_RET_STS_ERROR;
49 ELSIF p_reacttime_rec.created_by = TAPI_DEV_KIT.G_MISS_NUM OR
50 p_reacttime_rec.created_by IS NULL
51 THEN
52 TAPI_DEV_KIT.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'created_by');
53 l_return_status := FND_API.G_RET_STS_ERROR;
54 END IF;
55 RETURN(l_return_status);
56 END Validate_Item_Attributes;
57
58
59 ----- Default
60 FUNCTION Default_Item_Attributes
61 (
62 p_reacttime_rec IN ReactTime_Rec_Type,
63 l_def_reacttime_rec OUT ReactTime_Rec_Type
64 )
65 RETURN VARCHAR2
66 IS
67 l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
68 BEGIN
69 l_def_reacttime_rec := p_reacttime_rec;
70 l_def_reacttime_rec.OBJECT_VERSION_NUMBER := NVL(l_def_reacttime_rec.OBJECT_VERSION_NUMBER, 0) + 1;
71 RETURN(l_return_status);
72 End Default_Item_attributes;
73
74
75 FUNCTION Validate_Item_Record (
76 p_reacttime_rec IN ReactTime_Rec_Type
77 )
78 RETURN VARCHAR2 IS
79 l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
80 FUNCTION validate_foreign_keys (
81 p_reacttime_rec IN ReactTime_Rec_Type
82 )
83 RETURN VARCHAR2 IS
84 item_not_found_error EXCEPTION;
85 CURSOR cs_coverage_txn_groups_pk_csr (p_coverage_txn_group_id IN NUMBER) IS
86 SELECT *
87 FROM Cs_Coverage_Txn_Groups
88 WHERE cs_coverage_txn_groups.coverage_txn_group_id = p_coverage_txn_group_id;
89 l_cs_coverage_txn_groups_pk cs_coverage_txn_groups_pk_csr%ROWTYPE;
90 l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
91 l_row_notfound BOOLEAN := TRUE;
92 BEGIN
93 IF (p_reacttime_rec.COVERAGE_TXN_GROUP_ID IS NOT NULL)
94 THEN
95 OPEN cs_coverage_txn_groups_pk_csr(p_reacttime_rec.COVERAGE_TXN_GROUP_ID);
96 FETCH cs_coverage_txn_groups_pk_csr INTO l_cs_coverage_txn_groups_pk;
97 l_row_notfound := cs_coverage_txn_groups_pk_csr%NOTFOUND;
98 CLOSE cs_coverage_txn_groups_pk_csr;
99 IF (l_row_notfound) THEN
100 TAPI_DEV_KIT.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'COVERAGE_TXN_GROUP_ID');
101 RAISE item_not_found_error;
102 END IF;
103 END IF;
104 RETURN (l_return_status);
105 EXCEPTION
106 WHEN item_not_found_error THEN
107 l_return_status := FND_API.G_RET_STS_ERROR;
108 RETURN (l_return_status);
109 END validate_foreign_keys;
110 BEGIN
111 l_return_status := validate_foreign_keys (p_reacttime_rec);
112 RETURN (l_return_status);
113 END Validate_Item_Record;
114
115
116 PROCEDURE migrate (
117 p_from IN ReactTime_Val_Rec_Type,
118 p_to OUT ReactTime_Rec_Type
119 ) IS
120 BEGIN
121 p_to.reaction_time_id := p_from.reaction_time_id;
122 p_to.name := p_from.name;
123 p_to.description := p_from.description;
124 p_to.reaction_time_sunday := p_from.reaction_time_sunday;
125 p_to.reaction_time_monday := p_from.reaction_time_monday;
126 p_to.reaction_time_tuesday := p_from.reaction_time_tuesday;
127 p_to.reaction_time_wednesday := p_from.reaction_time_wednesday;
128 p_to.reaction_time_thursday := p_from.reaction_time_thursday;
129 p_to.reaction_time_friday := p_from.reaction_time_friday;
130 p_to.reaction_time_saturday := p_from.reaction_time_saturday;
131 p_to.incident_severity_id := p_from.incident_severity_id;
132 p_to.always_covered := p_from.always_covered;
133 p_to.workflow := p_from.workflow;
134 p_to.coverage_txn_group_id := p_from.coverage_txn_group_id;
135 p_to.use_for_sr_date_calc := p_from.use_for_sr_date_calc;
136 p_to.last_update_date := p_from.last_update_date;
137 p_to.last_updated_by := p_from.last_updated_by;
138 p_to.creation_date := p_from.creation_date;
139 p_to.created_by := p_from.created_by;
140 p_to.last_update_login := p_from.last_update_login;
141 p_to.attribute1 := p_from.attribute1;
142 p_to.attribute2 := p_from.attribute2;
143 p_to.attribute3 := p_from.attribute3;
144 p_to.attribute4 := p_from.attribute4;
145 p_to.attribute5 := p_from.attribute5;
146 p_to.attribute6 := p_from.attribute6;
147 p_to.attribute7 := p_from.attribute7;
148 p_to.attribute8 := p_from.attribute8;
149 p_to.attribute9 := p_from.attribute9;
150 p_to.attribute10 := p_from.attribute10;
151 p_to.attribute11 := p_from.attribute11;
152 p_to.attribute12 := p_from.attribute12;
153 p_to.attribute13 := p_from.attribute13;
154 p_to.attribute14 := p_from.attribute14;
155 p_to.attribute15 := p_from.attribute15;
156 p_to.context := p_from.context;
157 p_to.object_version_number := p_from.object_version_number;
158 END migrate;
159 PROCEDURE migrate (
160 p_from IN ReactTime_Rec_Type,
161 p_to OUT ReactTime_Val_Rec_Type
162 ) IS
163 BEGIN
164 p_to.reaction_time_id := p_from.reaction_time_id;
165 p_to.name := p_from.name;
166 p_to.description := p_from.description;
167 p_to.reaction_time_sunday := p_from.reaction_time_sunday;
168 p_to.reaction_time_monday := p_from.reaction_time_monday;
169 p_to.reaction_time_tuesday := p_from.reaction_time_tuesday;
170 p_to.reaction_time_wednesday := p_from.reaction_time_wednesday;
171 p_to.reaction_time_thursday := p_from.reaction_time_thursday;
172 p_to.reaction_time_friday := p_from.reaction_time_friday;
173 p_to.reaction_time_saturday := p_from.reaction_time_saturday;
174 p_to.incident_severity_id := p_from.incident_severity_id;
175 p_to.always_covered := p_from.always_covered;
176 p_to.workflow := p_from.workflow;
177 p_to.coverage_txn_group_id := p_from.coverage_txn_group_id;
178 p_to.use_for_sr_date_calc := p_from.use_for_sr_date_calc;
179 p_to.last_update_date := p_from.last_update_date;
180 p_to.last_updated_by := p_from.last_updated_by;
181 p_to.creation_date := p_from.creation_date;
182 p_to.created_by := p_from.created_by;
183 p_to.last_update_login := p_from.last_update_login;
184 p_to.attribute1 := p_from.attribute1;
185 p_to.attribute2 := p_from.attribute2;
186 p_to.attribute3 := p_from.attribute3;
187 p_to.attribute4 := p_from.attribute4;
188 p_to.attribute5 := p_from.attribute5;
189 p_to.attribute6 := p_from.attribute6;
190 p_to.attribute7 := p_from.attribute7;
191 p_to.attribute8 := p_from.attribute8;
192 p_to.attribute9 := p_from.attribute9;
193 p_to.attribute10 := p_from.attribute10;
194 p_to.attribute11 := p_from.attribute11;
195 p_to.attribute12 := p_from.attribute12;
196 p_to.attribute13 := p_from.attribute13;
197 p_to.attribute14 := p_from.attribute14;
198 p_to.attribute15 := p_from.attribute15;
199 p_to.context := p_from.context;
200 p_to.object_version_number := p_from.object_version_number;
201 END migrate;
202 PROCEDURE insert_row
203 (
204 p_api_version IN NUMBER,
205 p_init_msg_list IN VARCHAR2 := TAPI_DEV_KIT.G_FALSE,
206 p_validation_level IN NUMBER,
207 p_commit IN VARCHAR2 := TAPI_DEV_KIT.G_FALSE,
208 x_return_status OUT VARCHAR2,
209 x_msg_count OUT NUMBER,
210 x_msg_data OUT VARCHAR2,
211 p_reacttime_rec IN ReactTime_Rec_Type := G_MISS_REACTTIME_REC,
212 x_reaction_time_id OUT NUMBER,
213 x_object_version_number OUT NUMBER) IS
214 l_api_name CONSTANT VARCHAR2(30) := 'insert_row';
215 l_api_version CONSTANT NUMBER := 1;
216 l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
217 l_reacttime_rec ReactTime_Rec_Type;
218 l_def_reacttime_rec ReactTime_Rec_Type;
219 BEGIN
220 l_return_status := TAPI_DEV_KIT.START_ACTIVITY(l_api_name,
221 G_PKG_NAME,
222 l_api_version,
223 p_api_version,
224 p_init_msg_list,
225 '_Pvt',
226 x_return_status);
227 IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
228 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
229 ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
230 RAISE FND_API.G_EXC_ERROR;
231 END IF;
232 l_reacttime_rec := p_reacttime_rec;
233 --- Validate all non-missing attributes (Item Level Validation)
234 IF p_validation_level >= FND_API.G_VALID_LEVEL_FULL THEN
235 l_return_status := Validate_Item_Attributes
236 (
237 l_reacttime_rec ---- IN
238 );
239 --- If any errors happen abort API
240 IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
241 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
242 ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
243 RAISE FND_API.G_EXC_ERROR;
244 END IF;
245 END IF;
246 --- Defaulting item attributes
247 l_return_status := Default_Item_Attributes
248 (
249 l_reacttime_rec, ---- IN
250 l_def_reacttime_rec
251 );
252 --- If any errors happen abort API
253 IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
254 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
255 ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
256 RAISE FND_API.G_EXC_ERROR;
257 END IF;
258 IF (p_validation_level >= FND_API.G_VALID_LEVEL_FULL) THEN
259 l_return_status := Validate_Item_Record(l_def_reacttime_rec);
260 IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
261 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
262 ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
263 RAISE FND_API.G_EXC_ERROR;
264 END IF;
265 END IF;
266 -- Set primary key value
267 l_def_reacttime_rec.reaction_time_id := get_seq_id;
268 INSERT INTO CS_COV_REACTION_TIMES(
269 reaction_time_id,
270 name,
271 description,
272 reaction_time_sunday,
273 reaction_time_monday,
277 reaction_time_friday,
274 reaction_time_tuesday,
275 reaction_time_wednesday,
276 reaction_time_thursday,
278 reaction_time_saturday,
279 incident_severity_id,
280 always_covered,
281 workflow,
282 coverage_txn_group_id,
283 use_for_sr_date_calc,
284 last_update_date,
285 last_updated_by,
286 creation_date,
287 created_by,
288 last_update_login,
289 attribute1,
290 attribute2,
291 attribute3,
292 attribute4,
293 attribute5,
294 attribute6,
295 attribute7,
296 attribute8,
297 attribute9,
298 attribute10,
299 attribute11,
300 attribute12,
301 attribute13,
302 attribute14,
303 attribute15,
304 context,
305 object_version_number)
306 VALUES (
307 l_def_reacttime_rec.reaction_time_id,
308 l_def_reacttime_rec.name,
309 l_def_reacttime_rec.description,
310 l_def_reacttime_rec.reaction_time_sunday,
311 l_def_reacttime_rec.reaction_time_monday,
312 l_def_reacttime_rec.reaction_time_tuesday,
313 l_def_reacttime_rec.reaction_time_wednesday,
314 l_def_reacttime_rec.reaction_time_thursday,
315 l_def_reacttime_rec.reaction_time_friday,
316 l_def_reacttime_rec.reaction_time_saturday,
317 l_def_reacttime_rec.incident_severity_id,
321 l_def_reacttime_rec.use_for_sr_date_calc,
318 l_def_reacttime_rec.always_covered,
319 l_def_reacttime_rec.workflow,
320 l_def_reacttime_rec.coverage_txn_group_id,
322 l_def_reacttime_rec.last_update_date,
323 l_def_reacttime_rec.last_updated_by,
324 l_def_reacttime_rec.creation_date,
325 l_def_reacttime_rec.created_by,
326 l_def_reacttime_rec.last_update_login,
327 l_def_reacttime_rec.attribute1,
328 l_def_reacttime_rec.attribute2,
329 l_def_reacttime_rec.attribute3,
330 l_def_reacttime_rec.attribute4,
331 l_def_reacttime_rec.attribute5,
332 l_def_reacttime_rec.attribute6,
333 l_def_reacttime_rec.attribute7,
334 l_def_reacttime_rec.attribute8,
335 l_def_reacttime_rec.attribute9,
336 l_def_reacttime_rec.attribute10,
337 l_def_reacttime_rec.attribute11,
338 l_def_reacttime_rec.attribute12,
339 l_def_reacttime_rec.attribute13,
340 l_def_reacttime_rec.attribute14,
341 l_def_reacttime_rec.attribute15,
342 l_def_reacttime_rec.context,
343 l_def_reacttime_rec.object_version_number);
344 -- Set OUT values
345 x_reaction_time_id := l_def_reacttime_rec.reaction_time_id;
346 x_object_version_number := l_def_reacttime_rec.OBJECT_VERSION_NUMBER;
347 TAPI_DEV_KIT.END_ACTIVITY(p_commit, x_msg_count, x_msg_data);
348 EXCEPTION
349 WHEN FND_API.G_EXC_ERROR THEN
350 x_return_status := TAPI_DEV_KIT.HANDLE_EXCEPTIONS
351 (
352 l_api_name,
353 G_PKG_NAME,
354 'FND_API.G_RET_STS_ERROR',
355 x_msg_count,
356 x_msg_data,
357 '_Pvt'
358 );
359 APP_EXCEPTION.RAISE_EXCEPTION;
360 WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
361 x_return_status :=TAPI_DEV_KIT.HANDLE_EXCEPTIONS
362 (
363 l_api_name,
364 G_PKG_NAME,
365 'FND_API.G_RET_STS_UNEXP_ERROR',
366 x_msg_count,
367 x_msg_data,
368 '_Pvt'
369 );
370 APP_EXCEPTION.RAISE_EXCEPTION;
371 WHEN TAPI_DEV_KIT.G_EXC_DUP_VAL_ON_INDEX THEN
372 x_return_status :=TAPI_DEV_KIT.HANDLE_EXCEPTIONS
373 (
374 l_api_name,
375 G_PKG_NAME,
376 'TAPI_DEV_KIT.G_RET_STS_DUP_VAL_ON_INDEX',
377 x_msg_count,
378 x_msg_data,
382 END insert_row;
379 '_Pvt'
380 );
381 APP_EXCEPTION.RAISE_EXCEPTION;
383 PROCEDURE insert_row
384 (
385 p_api_version IN NUMBER,
386 p_init_msg_list IN VARCHAR2 := TAPI_DEV_KIT.G_FALSE,
387 p_validation_level IN NUMBER,
388 p_commit IN VARCHAR2 := TAPI_DEV_KIT.G_FALSE,
389 x_return_status OUT VARCHAR2,
390 x_msg_count OUT NUMBER,
391 x_msg_data OUT VARCHAR2,
392 p_name IN CS_COV_REACTION_TIMES.NAME%TYPE := NULL,
393 p_description IN CS_COV_REACTION_TIMES.DESCRIPTION%TYPE := NULL,
394 p_reaction_time_sunday IN NUMBER := NULL,
395 p_reaction_time_monday IN NUMBER := NULL,
396 p_reaction_time_tuesday IN NUMBER := NULL,
397 p_reaction_time_wednesday IN NUMBER := NULL,
398 p_reaction_time_thursday IN NUMBER := NULL,
399 p_reaction_time_friday IN NUMBER := NULL,
400 p_reaction_time_saturday IN NUMBER := NULL,
401 p_incident_severity_id IN NUMBER := NULL,
402 p_always_covered IN CS_COV_REACTION_TIMES.ALWAYS_COVERED%TYPE := NULL,
403 p_workflow IN CS_COV_REACTION_TIMES.WORKFLOW%TYPE := NULL,
404 p_coverage_txn_group_id IN NUMBER := NULL,
405 p_use_for_sr_date_calc IN CS_COV_REACTION_TIMES.USE_FOR_SR_DATE_CALC%TYPE := NULL,
406 p_last_update_date IN CS_COV_REACTION_TIMES.LAST_UPDATE_DATE%TYPE := NULL,
407 p_last_updated_by IN NUMBER := NULL,
408 p_creation_date IN CS_COV_REACTION_TIMES.CREATION_DATE%TYPE := NULL,
409 p_created_by IN NUMBER := NULL,
410 p_last_update_login IN NUMBER := NULL,
411 p_attribute1 IN CS_COV_REACTION_TIMES.ATTRIBUTE1%TYPE := NULL,
412 p_attribute2 IN CS_COV_REACTION_TIMES.ATTRIBUTE2%TYPE := NULL,
413 p_attribute3 IN CS_COV_REACTION_TIMES.ATTRIBUTE3%TYPE := NULL,
414 p_attribute4 IN CS_COV_REACTION_TIMES.ATTRIBUTE4%TYPE := NULL,
415 p_attribute5 IN CS_COV_REACTION_TIMES.ATTRIBUTE5%TYPE := NULL,
416 p_attribute6 IN CS_COV_REACTION_TIMES.ATTRIBUTE6%TYPE := NULL,
417 p_attribute7 IN CS_COV_REACTION_TIMES.ATTRIBUTE7%TYPE := NULL,
418 p_attribute8 IN CS_COV_REACTION_TIMES.ATTRIBUTE8%TYPE := NULL,
419 p_attribute9 IN CS_COV_REACTION_TIMES.ATTRIBUTE9%TYPE := NULL,
420 p_attribute10 IN CS_COV_REACTION_TIMES.ATTRIBUTE10%TYPE := NULL,
421 p_attribute11 IN CS_COV_REACTION_TIMES.ATTRIBUTE11%TYPE := NULL,
422 p_attribute12 IN CS_COV_REACTION_TIMES.ATTRIBUTE12%TYPE := NULL,
423 p_attribute13 IN CS_COV_REACTION_TIMES.ATTRIBUTE13%TYPE := NULL,
424 p_attribute14 IN CS_COV_REACTION_TIMES.ATTRIBUTE14%TYPE := NULL,
425 p_attribute15 IN CS_COV_REACTION_TIMES.ATTRIBUTE15%TYPE := NULL,
426 p_context IN CS_COV_REACTION_TIMES.CONTEXT%TYPE := NULL,
430 l_api_name CONSTANT VARCHAR2(30) := 'insert_row';
427 p_object_version_number IN NUMBER := NULL,
428 x_reaction_time_id OUT NUMBER,
429 x_object_version_number OUT NUMBER) IS
431 l_api_version CONSTANT NUMBER := 1;
432 l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
433 l_reacttime_rec ReactTime_Rec_Type;
434 BEGIN
435 l_return_status := TAPI_DEV_KIT.START_ACTIVITY(l_api_name,
436 G_PKG_NAME,
437 l_api_version,
438 p_api_version,
439 p_init_msg_list,
440 '_Pvt',
441 x_return_status);
442 IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
443 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
444 ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
445 RAISE FND_API.G_EXC_ERROR;
446 END IF;
447 l_reacttime_rec.NAME := p_name;
448 l_reacttime_rec.DESCRIPTION := p_description;
449 l_reacttime_rec.REACTION_TIME_SUNDAY := p_reaction_time_sunday;
450 l_reacttime_rec.REACTION_TIME_MONDAY := p_reaction_time_monday;
451 l_reacttime_rec.REACTION_TIME_TUESDAY := p_reaction_time_tuesday;
452 l_reacttime_rec.REACTION_TIME_WEDNESDAY := p_reaction_time_wednesday;
453 l_reacttime_rec.REACTION_TIME_THURSDAY := p_reaction_time_thursday;
454 l_reacttime_rec.REACTION_TIME_FRIDAY := p_reaction_time_friday;
455 l_reacttime_rec.REACTION_TIME_SATURDAY := p_reaction_time_saturday;
456 l_reacttime_rec.INCIDENT_SEVERITY_ID := p_incident_severity_id;
457 l_reacttime_rec.ALWAYS_COVERED := p_always_covered;
458 l_reacttime_rec.WORKFLOW := p_workflow;
459 l_reacttime_rec.COVERAGE_TXN_GROUP_ID := p_coverage_txn_group_id;
460 l_reacttime_rec.USE_FOR_SR_DATE_CALC := p_use_for_sr_date_calc;
461 l_reacttime_rec.LAST_UPDATE_DATE := p_last_update_date;
462 l_reacttime_rec.LAST_UPDATED_BY := p_last_updated_by;
463 l_reacttime_rec.CREATION_DATE := p_creation_date;
464 l_reacttime_rec.CREATED_BY := p_created_by;
465 l_reacttime_rec.LAST_UPDATE_LOGIN := p_last_update_login;
466 l_reacttime_rec.ATTRIBUTE1 := p_attribute1;
467 l_reacttime_rec.ATTRIBUTE2 := p_attribute2;
468 l_reacttime_rec.ATTRIBUTE3 := p_attribute3;
469 l_reacttime_rec.ATTRIBUTE4 := p_attribute4;
470 l_reacttime_rec.ATTRIBUTE5 := p_attribute5;
471 l_reacttime_rec.ATTRIBUTE6 := p_attribute6;
472 l_reacttime_rec.ATTRIBUTE7 := p_attribute7;
473 l_reacttime_rec.ATTRIBUTE8 := p_attribute8;
474 l_reacttime_rec.ATTRIBUTE9 := p_attribute9;
475 l_reacttime_rec.ATTRIBUTE10 := p_attribute10;
476 l_reacttime_rec.ATTRIBUTE11 := p_attribute11;
477 l_reacttime_rec.ATTRIBUTE12 := p_attribute12;
478 l_reacttime_rec.ATTRIBUTE13 := p_attribute13;
479 l_reacttime_rec.ATTRIBUTE14 := p_attribute14;
480 l_reacttime_rec.ATTRIBUTE15 := p_attribute15;
481 l_reacttime_rec.CONTEXT := p_context;
482 l_reacttime_rec.OBJECT_VERSION_NUMBER := p_object_version_number;
483 insert_row(
484 p_api_version,
485 p_init_msg_list,
486 p_validation_level,
487 p_commit,
488 x_return_status,
489 x_msg_count,
490 x_msg_data,
491 l_reacttime_rec,
495 TAPI_DEV_KIT.END_ACTIVITY(p_commit, x_msg_count, x_msg_data);
492 x_reaction_time_id,
493 x_object_version_number
494 );
496 EXCEPTION
497 WHEN FND_API.G_EXC_ERROR THEN
498 x_return_status := TAPI_DEV_KIT.HANDLE_EXCEPTIONS
499 (
500 l_api_name,
501 G_PKG_NAME,
502 'FND_API.G_RET_STS_ERROR',
503 x_msg_count,
504 x_msg_data,
505 '_Pvt'
506 );
507 APP_EXCEPTION.RAISE_EXCEPTION;
508 WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
509 x_return_status :=TAPI_DEV_KIT.HANDLE_EXCEPTIONS
510 (
511 l_api_name,
512 G_PKG_NAME,
513 'FND_API.G_RET_STS_UNEXP_ERROR',
514 x_msg_count,
515 x_msg_data,
516 '_Pvt'
517 );
518 APP_EXCEPTION.RAISE_EXCEPTION;
519 WHEN TAPI_DEV_KIT.G_EXC_DUP_VAL_ON_INDEX THEN
520 x_return_status :=TAPI_DEV_KIT.HANDLE_EXCEPTIONS
521 (
522 l_api_name,
523 G_PKG_NAME,
524 'TAPI_DEV_KIT.G_RET_STS_DUP_VAL_ON_INDEX',
525 x_msg_count,
526 x_msg_data,
527 '_Pvt'
528 );
529 APP_EXCEPTION.RAISE_EXCEPTION;
530 END insert_row;
531 Procedure lock_row
532 (
533 p_api_version IN NUMBER,
534 p_init_msg_list IN VARCHAR2 := TAPI_DEV_KIT.G_FALSE,
535 p_validation_level IN NUMBER,
536 p_commit IN VARCHAR2 := TAPI_DEV_KIT.G_FALSE,
537 x_return_status OUT VARCHAR2,
538 x_msg_count OUT NUMBER,
539 x_msg_data OUT VARCHAR2,
540 p_reaction_time_id IN NUMBER,
541 p_object_version_number IN NUMBER) IS
542 E_Resource_Busy EXCEPTION;
543 PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
544 CURSOR lock_csr IS
545 SELECT OBJECT_VERSION_NUMBER
546 FROM CS_COV_REACTION_TIMES
547 WHERE
548 REACTION_TIME_ID = p_reaction_time_id AND
549 OBJECT_VERSION_NUMBER = p_object_version_number
550 FOR UPDATE OF OBJECT_VERSION_NUMBER NOWAIT;
551
552 CURSOR lchk_csr IS
553 SELECT OBJECT_VERSION_NUMBER
554 FROM CS_COV_REACTION_TIMES
555 WHERE
556 REACTION_TIME_ID = p_reaction_time_id
557 ;
558 l_api_name CONSTANT VARCHAR2(30) := 'lock_row';
562 lc_object_version_number CS_COV_REACTION_TIMES.OBJECT_VERSION_NUMBER%TYPE;
559 l_api_version CONSTANT NUMBER := 1;
560 l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
561 l_object_version_number CS_COV_REACTION_TIMES.OBJECT_VERSION_NUMBER%TYPE;
563 l_row_notfound BOOLEAN := FALSE;
564 lc_row_notfound BOOLEAN := FALSE;
565 BEGIN
566 l_return_status := TAPI_DEV_KIT.START_ACTIVITY(l_api_name,
567 G_PKG_NAME,
568 l_api_version,
569 p_api_version,
570 p_init_msg_list,
571 '_Pvt',
572 x_return_status);
573 IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
574 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
575 ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
576 RAISE FND_API.G_EXC_ERROR;
577 END IF;
578 BEGIN
579 OPEN lock_csr;
580 FETCH lock_csr INTO l_object_version_number;
581 l_row_notfound := lock_csr%NOTFOUND;
582 CLOSE lock_csr;
583 EXCEPTION
584 WHEN E_Resource_Busy THEN
585 IF (lock_csr%ISOPEN) THEN
586 CLOSE lock_csr;
587 END IF;
588 TAPI_DEV_KIT.set_message(G_FND_APP,G_FORM_UNABLE_TO_RESERVE_REC);
589 RAISE APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION;
590 END;
591
592 IF ( l_row_notfound ) THEN
593 OPEN lchk_csr;
594 FETCH lchk_csr INTO lc_object_version_number;
595 lc_row_notfound := lchk_csr%NOTFOUND;
596 CLOSE lchk_csr;
597 END IF;
598 IF (lc_row_notfound) THEN
599 TAPI_DEV_KIT.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
600 RAISE FND_API.G_EXC_ERROR;
601 ELSIF lc_object_version_number > p_object_version_number THEN
602 TAPI_DEV_KIT.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
603 RAISE FND_API.G_EXC_ERROR;
604 ELSIF lc_object_version_number <> p_object_version_number THEN
605 TAPI_DEV_KIT.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
606 RAISE FND_API.G_EXC_ERROR;
607 ELSIF lc_object_version_number = -1 THEN
608 TAPI_DEV_KIT.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
609 RAISE FND_API.G_EXC_ERROR;
610 END IF;
611 TAPI_DEV_KIT.END_ACTIVITY(p_commit, x_msg_count, x_msg_data);
612 EXCEPTION
613 WHEN FND_API.G_EXC_ERROR THEN
614 x_return_status := TAPI_DEV_KIT.HANDLE_EXCEPTIONS
615 (
616 l_api_name,
617 G_PKG_NAME,
621 '_Pvt'
618 'FND_API.G_RET_STS_ERROR',
619 x_msg_count,
620 x_msg_data,
622 );
623 APP_EXCEPTION.RAISE_EXCEPTION;
624 WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
625 x_return_status :=TAPI_DEV_KIT.HANDLE_EXCEPTIONS
626 (
627 l_api_name,
628 G_PKG_NAME,
629 'FND_API.G_RET_STS_UNEXP_ERROR',
630 x_msg_count,
631 x_msg_data,
632 '_Pvt'
633 );
634 APP_EXCEPTION.RAISE_EXCEPTION;
635 WHEN TAPI_DEV_KIT.G_EXC_DUP_VAL_ON_INDEX THEN
636 x_return_status :=TAPI_DEV_KIT.HANDLE_EXCEPTIONS
637 (
638 l_api_name,
639 G_PKG_NAME,
640 'TAPI_DEV_KIT.G_RET_STS_DUP_VAL_ON_INDEX',
641 x_msg_count,
642 x_msg_data,
643 '_Pvt'
644 );
645 APP_EXCEPTION.RAISE_EXCEPTION;
646 END lock_row;
647 Procedure update_row
648 (
649 p_api_version IN NUMBER,
650 p_init_msg_list IN VARCHAR2 := TAPI_DEV_KIT.G_FALSE,
651 p_validation_level IN NUMBER,
652 p_commit IN VARCHAR2 := TAPI_DEV_KIT.G_FALSE,
653 x_return_status OUT VARCHAR2,
654 x_msg_count OUT NUMBER,
655 x_msg_data OUT VARCHAR2,
656 p_reacttime_val_rec IN ReactTime_Val_Rec_Type := G_MISS_REACTTIME_VAL_REC,
657 x_object_version_number OUT NUMBER) IS
658 l_api_name CONSTANT VARCHAR2(30) := 'update_row';
659 l_api_version CONSTANT NUMBER := 1;
660 l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
661 l_reacttime_rec ReactTime_Rec_Type;
662 l_def_reacttime_rec ReactTime_Rec_Type;
663 FUNCTION populate_new_record (
664 p_reacttime_rec IN ReactTime_Rec_Type,
665 x_reacttime_rec OUT ReactTime_Rec_Type
666 ) RETURN VARCHAR2 IS
667 CURSOR cs_coverage_reaction1_csr (p_reaction_time_id IN NUMBER) IS
668 SELECT *
669 FROM Cs_Cov_Reaction_Times
670 WHERE cs_cov_reaction_times.reaction_time_id = p_reaction_time_id;
671 l_cs_coverage_reaction1 cs_coverage_reaction1_csr%ROWTYPE;
672 l_row_notfound BOOLEAN := TRUE;
673 l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
674 BEGIN
675 x_reacttime_rec := p_reacttime_rec;
676 -- Get current database values
677 OPEN cs_coverage_reaction1_csr (p_reacttime_rec.reaction_time_id);
681 IF (l_row_notfound) THEN
678 FETCH cs_coverage_reaction1_csr INTO l_cs_coverage_reaction1;
679 l_row_notfound := cs_coverage_reaction1_csr%NOTFOUND;
680 CLOSE cs_coverage_reaction1_csr;
682 l_return_status := FND_API.G_RET_STS_ERROR;
683 END IF;
684 IF (x_reacttime_rec.reaction_time_id = TAPI_DEV_KIT.G_MISS_NUM)
685 THEN
686 x_reacttime_rec.reaction_time_id := l_cs_coverage_reaction1.reaction_time_id;
687 END IF;
688 IF (x_reacttime_rec.name = TAPI_DEV_KIT.G_MISS_CHAR)
689 THEN
690 x_reacttime_rec.name := l_cs_coverage_reaction1.name;
691 END IF;
692 IF (x_reacttime_rec.description = TAPI_DEV_KIT.G_MISS_CHAR)
693 THEN
694 x_reacttime_rec.description := l_cs_coverage_reaction1.description;
695 END IF;
696 IF (x_reacttime_rec.reaction_time_sunday = TAPI_DEV_KIT.G_MISS_NUM)
697 THEN
698 x_reacttime_rec.reaction_time_sunday := l_cs_coverage_reaction1.reaction_time_sunday;
699 END IF;
700 IF (x_reacttime_rec.reaction_time_monday = TAPI_DEV_KIT.G_MISS_NUM)
701 THEN
702 x_reacttime_rec.reaction_time_monday := l_cs_coverage_reaction1.reaction_time_monday;
703 END IF;
704 IF (x_reacttime_rec.reaction_time_tuesday = TAPI_DEV_KIT.G_MISS_NUM)
705 THEN
706 x_reacttime_rec.reaction_time_tuesday := l_cs_coverage_reaction1.reaction_time_tuesday;
707 END IF;
708 IF (x_reacttime_rec.reaction_time_wednesday = TAPI_DEV_KIT.G_MISS_NUM)
709 THEN
710 x_reacttime_rec.reaction_time_wednesday := l_cs_coverage_reaction1.reaction_time_wednesday;
711 END IF;
712 IF (x_reacttime_rec.reaction_time_thursday = TAPI_DEV_KIT.G_MISS_NUM)
713 THEN
714 x_reacttime_rec.reaction_time_thursday := l_cs_coverage_reaction1.reaction_time_thursday;
715 END IF;
716 IF (x_reacttime_rec.reaction_time_friday = TAPI_DEV_KIT.G_MISS_NUM)
717 THEN
718 x_reacttime_rec.reaction_time_friday := l_cs_coverage_reaction1.reaction_time_friday;
719 END IF;
720 IF (x_reacttime_rec.reaction_time_saturday = TAPI_DEV_KIT.G_MISS_NUM)
721 THEN
722 x_reacttime_rec.reaction_time_saturday := l_cs_coverage_reaction1.reaction_time_saturday;
723 END IF;
724 IF (x_reacttime_rec.incident_severity_id = TAPI_DEV_KIT.G_MISS_NUM)
725 THEN
726 x_reacttime_rec.incident_severity_id := l_cs_coverage_reaction1.incident_severity_id;
727 END IF;
728 IF (x_reacttime_rec.always_covered = TAPI_DEV_KIT.G_MISS_CHAR)
729 THEN
730 x_reacttime_rec.always_covered := l_cs_coverage_reaction1.always_covered;
731 END IF;
732 IF (x_reacttime_rec.workflow = TAPI_DEV_KIT.G_MISS_CHAR)
733 THEN
734 x_reacttime_rec.workflow := l_cs_coverage_reaction1.workflow;
735 END IF;
739 END IF;
736 IF (x_reacttime_rec.coverage_txn_group_id = TAPI_DEV_KIT.G_MISS_NUM)
737 THEN
738 x_reacttime_rec.coverage_txn_group_id := l_cs_coverage_reaction1.coverage_txn_group_id;
740 IF (x_reacttime_rec.use_for_sr_date_calc = TAPI_DEV_KIT.G_MISS_CHAR)
741 THEN
742 x_reacttime_rec.use_for_sr_date_calc := l_cs_coverage_reaction1.use_for_sr_date_calc;
743 END IF;
744 IF (x_reacttime_rec.last_update_date = TAPI_DEV_KIT.G_MISS_DATE)
745 THEN
746 x_reacttime_rec.last_update_date := l_cs_coverage_reaction1.last_update_date;
747 END IF;
748 IF (x_reacttime_rec.last_updated_by = TAPI_DEV_KIT.G_MISS_NUM)
749 THEN
750 x_reacttime_rec.last_updated_by := l_cs_coverage_reaction1.last_updated_by;
751 END IF;
752 IF (x_reacttime_rec.creation_date = TAPI_DEV_KIT.G_MISS_DATE)
753 THEN
754 x_reacttime_rec.creation_date := l_cs_coverage_reaction1.creation_date;
755 END IF;
756 IF (x_reacttime_rec.created_by = TAPI_DEV_KIT.G_MISS_NUM)
757 THEN
758 x_reacttime_rec.created_by := l_cs_coverage_reaction1.created_by;
759 END IF;
760 IF (x_reacttime_rec.last_update_login = TAPI_DEV_KIT.G_MISS_NUM)
761 THEN
762 x_reacttime_rec.last_update_login := l_cs_coverage_reaction1.last_update_login;
763 END IF;
764 IF (x_reacttime_rec.attribute1 = TAPI_DEV_KIT.G_MISS_CHAR)
765 THEN
766 x_reacttime_rec.attribute1 := l_cs_coverage_reaction1.attribute1;
767 END IF;
768 IF (x_reacttime_rec.attribute2 = TAPI_DEV_KIT.G_MISS_CHAR)
769 THEN
770 x_reacttime_rec.attribute2 := l_cs_coverage_reaction1.attribute2;
771 END IF;
772 IF (x_reacttime_rec.attribute3 = TAPI_DEV_KIT.G_MISS_CHAR)
773 THEN
774 x_reacttime_rec.attribute3 := l_cs_coverage_reaction1.attribute3;
775 END IF;
776 IF (x_reacttime_rec.attribute4 = TAPI_DEV_KIT.G_MISS_CHAR)
777 THEN
778 x_reacttime_rec.attribute4 := l_cs_coverage_reaction1.attribute4;
779 END IF;
780 IF (x_reacttime_rec.attribute5 = TAPI_DEV_KIT.G_MISS_CHAR)
781 THEN
782 x_reacttime_rec.attribute5 := l_cs_coverage_reaction1.attribute5;
783 END IF;
784 IF (x_reacttime_rec.attribute6 = TAPI_DEV_KIT.G_MISS_CHAR)
785 THEN
786 x_reacttime_rec.attribute6 := l_cs_coverage_reaction1.attribute6;
787 END IF;
788 IF (x_reacttime_rec.attribute7 = TAPI_DEV_KIT.G_MISS_CHAR)
789 THEN
790 x_reacttime_rec.attribute7 := l_cs_coverage_reaction1.attribute7;
791 END IF;
792 IF (x_reacttime_rec.attribute8 = TAPI_DEV_KIT.G_MISS_CHAR)
793 THEN
794 x_reacttime_rec.attribute8 := l_cs_coverage_reaction1.attribute8;
795 END IF;
796 IF (x_reacttime_rec.attribute9 = TAPI_DEV_KIT.G_MISS_CHAR)
797 THEN
798 x_reacttime_rec.attribute9 := l_cs_coverage_reaction1.attribute9;
799 END IF;
800 IF (x_reacttime_rec.attribute10 = TAPI_DEV_KIT.G_MISS_CHAR)
801 THEN
802 x_reacttime_rec.attribute10 := l_cs_coverage_reaction1.attribute10;
803 END IF;
807 END IF;
804 IF (x_reacttime_rec.attribute11 = TAPI_DEV_KIT.G_MISS_CHAR)
805 THEN
806 x_reacttime_rec.attribute11 := l_cs_coverage_reaction1.attribute11;
808 IF (x_reacttime_rec.attribute12 = TAPI_DEV_KIT.G_MISS_CHAR)
809 THEN
810 x_reacttime_rec.attribute12 := l_cs_coverage_reaction1.attribute12;
811 END IF;
812 IF (x_reacttime_rec.attribute13 = TAPI_DEV_KIT.G_MISS_CHAR)
813 THEN
814 x_reacttime_rec.attribute13 := l_cs_coverage_reaction1.attribute13;
815 END IF;
816 IF (x_reacttime_rec.attribute14 = TAPI_DEV_KIT.G_MISS_CHAR)
817 THEN
818 x_reacttime_rec.attribute14 := l_cs_coverage_reaction1.attribute14;
819 END IF;
820 IF (x_reacttime_rec.attribute15 = TAPI_DEV_KIT.G_MISS_CHAR)
821 THEN
822 x_reacttime_rec.attribute15 := l_cs_coverage_reaction1.attribute15;
823 END IF;
824 IF (x_reacttime_rec.context = TAPI_DEV_KIT.G_MISS_CHAR)
825 THEN
826 x_reacttime_rec.context := l_cs_coverage_reaction1.context;
827 END IF;
828 IF (x_reacttime_rec.object_version_number = TAPI_DEV_KIT.G_MISS_NUM)
829 THEN
830 x_reacttime_rec.object_version_number := l_cs_coverage_reaction1.object_version_number;
831 END IF;
832 RETURN(l_return_status);
833 END populate_new_record;
834 BEGIN
835 l_return_status := TAPI_DEV_KIT.START_ACTIVITY(l_api_name,
836 G_PKG_NAME,
837 l_api_version,
838 p_api_version,
839 p_init_msg_list,
840 '_Pvt',
841 x_return_status);
842 IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
843 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
844 ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
845 RAISE FND_API.G_EXC_ERROR;
846 END IF;
847 migrate(p_reacttime_val_rec, l_reacttime_rec);
848 --- Defaulting item attributes
849 l_return_status := Default_Item_Attributes
850 (
851 l_reacttime_rec, ---- IN
852 l_def_reacttime_rec
853 );
854 --- If any errors happen abort API
855 IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
856 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
857 ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
858 RAISE FND_API.G_EXC_ERROR;
859 END IF;
860 l_return_status := populate_new_record(l_def_reacttime_rec, l_def_reacttime_rec);
861 IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
862 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
863 ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
864 RAISE FND_API.G_EXC_ERROR;
865 END IF;
869 (
866 --- Validate all non-missing attributes (Item Level Validation)
867 IF p_validation_level >= FND_API.G_VALID_LEVEL_FULL THEN
868 l_return_status := Validate_Item_Attributes
870 l_def_reacttime_rec ---- IN
871 );
872 --- If any errors happen abort API
873 IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
874 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
875 ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
876 RAISE FND_API.G_EXC_ERROR;
877 END IF;
878 END IF;
879 IF (p_validation_level >= FND_API.G_VALID_LEVEL_FULL) THEN
880 l_return_status := Validate_Item_Record(l_def_reacttime_rec);
881 IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
882 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
883 ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
884 RAISE FND_API.G_EXC_ERROR;
885 END IF;
886 END IF;
887 UPDATE CS_COV_REACTION_TIMES
888 SET
889 REACTION_TIME_ID = l_def_reacttime_rec.reaction_time_id ,
890 NAME = l_def_reacttime_rec.name ,
891 DESCRIPTION = l_def_reacttime_rec.description ,
892 REACTION_TIME_SUNDAY = l_def_reacttime_rec.reaction_time_sunday ,
893 REACTION_TIME_MONDAY = l_def_reacttime_rec.reaction_time_monday ,
894 REACTION_TIME_TUESDAY = l_def_reacttime_rec.reaction_time_tuesday ,
895 REACTION_TIME_WEDNESDAY = l_def_reacttime_rec.reaction_time_wednesday ,
896 REACTION_TIME_THURSDAY = l_def_reacttime_rec.reaction_time_thursday ,
897 REACTION_TIME_FRIDAY = l_def_reacttime_rec.reaction_time_friday ,
898 REACTION_TIME_SATURDAY = l_def_reacttime_rec.reaction_time_saturday ,
899 INCIDENT_SEVERITY_ID = l_def_reacttime_rec.incident_severity_id ,
900 ALWAYS_COVERED = l_def_reacttime_rec.always_covered ,
901 WORKFLOW = l_def_reacttime_rec.workflow ,
902 COVERAGE_TXN_GROUP_ID = l_def_reacttime_rec.coverage_txn_group_id ,
903 USE_FOR_SR_DATE_CALC = l_def_reacttime_rec.use_for_sr_date_calc ,
904 LAST_UPDATE_DATE = l_def_reacttime_rec.last_update_date ,
905 LAST_UPDATED_BY = l_def_reacttime_rec.last_updated_by ,
906 CREATION_DATE = l_def_reacttime_rec.creation_date ,
907 CREATED_BY = l_def_reacttime_rec.created_by ,
908 LAST_UPDATE_LOGIN = l_def_reacttime_rec.last_update_login ,
909 ATTRIBUTE1 = l_def_reacttime_rec.attribute1 ,
910 ATTRIBUTE2 = l_def_reacttime_rec.attribute2 ,
911 ATTRIBUTE3 = l_def_reacttime_rec.attribute3 ,
912 ATTRIBUTE4 = l_def_reacttime_rec.attribute4 ,
913 ATTRIBUTE5 = l_def_reacttime_rec.attribute5 ,
914 ATTRIBUTE6 = l_def_reacttime_rec.attribute6 ,
915 ATTRIBUTE7 = l_def_reacttime_rec.attribute7 ,
916 ATTRIBUTE8 = l_def_reacttime_rec.attribute8 ,
917 ATTRIBUTE9 = l_def_reacttime_rec.attribute9 ,
918 ATTRIBUTE10 = l_def_reacttime_rec.attribute10 ,
919 ATTRIBUTE11 = l_def_reacttime_rec.attribute11 ,
920 ATTRIBUTE12 = l_def_reacttime_rec.attribute12 ,
921 ATTRIBUTE13 = l_def_reacttime_rec.attribute13 ,
922 ATTRIBUTE14 = l_def_reacttime_rec.attribute14 ,
923 ATTRIBUTE15 = l_def_reacttime_rec.attribute15 ,
924 CONTEXT = l_def_reacttime_rec.context ,
925 OBJECT_VERSION_NUMBER = l_def_reacttime_rec.object_version_number
926 WHERE
927 REACTION_TIME_ID = l_def_reacttime_rec.reaction_time_id
928 ;
929 x_object_version_number := l_def_reacttime_rec.OBJECT_VERSION_NUMBER;
930 TAPI_DEV_KIT.END_ACTIVITY(p_commit, x_msg_count, x_msg_data);
931 EXCEPTION
932 WHEN FND_API.G_EXC_ERROR THEN
933 x_return_status := TAPI_DEV_KIT.HANDLE_EXCEPTIONS
934 (
935 l_api_name,
936 G_PKG_NAME,
937 'FND_API.G_RET_STS_ERROR',
938 x_msg_count,
939 x_msg_data,
940 '_Pvt'
941 );
942 APP_EXCEPTION.RAISE_EXCEPTION;
943 WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
944 x_return_status :=TAPI_DEV_KIT.HANDLE_EXCEPTIONS
945 (
946 l_api_name,
947 G_PKG_NAME,
948 'FND_API.G_RET_STS_UNEXP_ERROR',
949 x_msg_count,
950 x_msg_data,
951 '_Pvt'
952 );
953 APP_EXCEPTION.RAISE_EXCEPTION;
954 WHEN TAPI_DEV_KIT.G_EXC_DUP_VAL_ON_INDEX THEN
955 x_return_status :=TAPI_DEV_KIT.HANDLE_EXCEPTIONS
956 (
957 l_api_name,
958 G_PKG_NAME,
959 'TAPI_DEV_KIT.G_RET_STS_DUP_VAL_ON_INDEX',
960 x_msg_count,
961 x_msg_data,
962 '_Pvt'
963 );
964 APP_EXCEPTION.RAISE_EXCEPTION;
965 END update_row;
966 Procedure update_row
967 (
968 p_api_version IN NUMBER,
969 p_init_msg_list IN VARCHAR2 := TAPI_DEV_KIT.G_FALSE,
970 p_validation_level IN NUMBER,
971 p_commit IN VARCHAR2 := TAPI_DEV_KIT.G_FALSE,
972 x_return_status OUT VARCHAR2,
973 x_msg_count OUT NUMBER,
974 x_msg_data OUT VARCHAR2,
975 p_reaction_time_id IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
976 p_name IN CS_COV_REACTION_TIMES.NAME%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
977 p_description IN CS_COV_REACTION_TIMES.DESCRIPTION%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
978 p_reaction_time_sunday IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
979 p_reaction_time_monday IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
980 p_reaction_time_tuesday IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
981 p_reaction_time_wednesday IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
982 p_reaction_time_thursday IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
983 p_reaction_time_friday IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
984 p_reaction_time_saturday IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
985 p_incident_severity_id IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
986 p_always_covered IN CS_COV_REACTION_TIMES.ALWAYS_COVERED%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
987 p_workflow IN CS_COV_REACTION_TIMES.WORKFLOW%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
988 p_coverage_txn_group_id IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
989 p_use_for_sr_date_calc IN CS_COV_REACTION_TIMES.USE_FOR_SR_DATE_CALC%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
990 p_last_update_date IN CS_COV_REACTION_TIMES.LAST_UPDATE_DATE%TYPE := TAPI_DEV_KIT.G_MISS_DATE,
991 p_last_updated_by IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
992 p_creation_date IN CS_COV_REACTION_TIMES.CREATION_DATE%TYPE := TAPI_DEV_KIT.G_MISS_DATE,
993 p_created_by IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
994 p_last_update_login IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
995 p_attribute1 IN CS_COV_REACTION_TIMES.ATTRIBUTE1%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
996 p_attribute2 IN CS_COV_REACTION_TIMES.ATTRIBUTE2%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
997 p_attribute3 IN CS_COV_REACTION_TIMES.ATTRIBUTE3%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
998 p_attribute4 IN CS_COV_REACTION_TIMES.ATTRIBUTE4%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
999 p_attribute5 IN CS_COV_REACTION_TIMES.ATTRIBUTE5%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
1000 p_attribute6 IN CS_COV_REACTION_TIMES.ATTRIBUTE6%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
1001 p_attribute7 IN CS_COV_REACTION_TIMES.ATTRIBUTE7%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
1002 p_attribute8 IN CS_COV_REACTION_TIMES.ATTRIBUTE8%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
1003 p_attribute9 IN CS_COV_REACTION_TIMES.ATTRIBUTE9%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
1004 p_attribute10 IN CS_COV_REACTION_TIMES.ATTRIBUTE10%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
1005 p_attribute11 IN CS_COV_REACTION_TIMES.ATTRIBUTE11%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
1006 p_attribute12 IN CS_COV_REACTION_TIMES.ATTRIBUTE12%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
1007 p_attribute13 IN CS_COV_REACTION_TIMES.ATTRIBUTE13%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
1008 p_attribute14 IN CS_COV_REACTION_TIMES.ATTRIBUTE14%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
1009 p_attribute15 IN CS_COV_REACTION_TIMES.ATTRIBUTE15%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
1010 p_context IN CS_COV_REACTION_TIMES.CONTEXT%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
1011 p_object_version_number IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
1012 x_object_version_number OUT NUMBER) IS
1013 l_api_name CONSTANT VARCHAR2(30) := 'update_row';
1014 l_api_version CONSTANT NUMBER := 1;
1015 l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1016 l_reacttime_rec ReactTime_Val_Rec_Type;
1017 BEGIN
1018 l_return_status := TAPI_DEV_KIT.START_ACTIVITY(l_api_name,
1019 G_PKG_NAME,
1020 l_api_version,
1021 p_api_version,
1022 p_init_msg_list,
1023 '_Pvt',
1024 x_return_status);
1025 IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1026 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1027 ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1028 RAISE FND_API.G_EXC_ERROR;
1029 END IF;
1030 l_reacttime_rec.REACTION_TIME_ID := p_reaction_time_id;
1031 l_reacttime_rec.NAME := p_name;
1032 l_reacttime_rec.DESCRIPTION := p_description;
1033 l_reacttime_rec.REACTION_TIME_SUNDAY := p_reaction_time_sunday;
1034 l_reacttime_rec.REACTION_TIME_MONDAY := p_reaction_time_monday;
1035 l_reacttime_rec.REACTION_TIME_TUESDAY := p_reaction_time_tuesday;
1036 l_reacttime_rec.REACTION_TIME_WEDNESDAY := p_reaction_time_wednesday;
1037 l_reacttime_rec.REACTION_TIME_THURSDAY := p_reaction_time_thursday;
1038 l_reacttime_rec.REACTION_TIME_FRIDAY := p_reaction_time_friday;
1039 l_reacttime_rec.REACTION_TIME_SATURDAY := p_reaction_time_saturday;
1040 l_reacttime_rec.INCIDENT_SEVERITY_ID := p_incident_severity_id;
1041 l_reacttime_rec.ALWAYS_COVERED := p_always_covered;
1042 l_reacttime_rec.WORKFLOW := p_workflow;
1043 l_reacttime_rec.COVERAGE_TXN_GROUP_ID := p_coverage_txn_group_id;
1044 l_reacttime_rec.USE_FOR_SR_DATE_CALC := p_use_for_sr_date_calc;
1045 l_reacttime_rec.LAST_UPDATE_DATE := p_last_update_date;
1046 l_reacttime_rec.LAST_UPDATED_BY := p_last_updated_by;
1047 l_reacttime_rec.CREATION_DATE := p_creation_date;
1048 l_reacttime_rec.CREATED_BY := p_created_by;
1049 l_reacttime_rec.LAST_UPDATE_LOGIN := p_last_update_login;
1050 l_reacttime_rec.ATTRIBUTE1 := p_attribute1;
1051 l_reacttime_rec.ATTRIBUTE2 := p_attribute2;
1052 l_reacttime_rec.ATTRIBUTE3 := p_attribute3;
1053 l_reacttime_rec.ATTRIBUTE4 := p_attribute4;
1054 l_reacttime_rec.ATTRIBUTE5 := p_attribute5;
1055 l_reacttime_rec.ATTRIBUTE6 := p_attribute6;
1056 l_reacttime_rec.ATTRIBUTE7 := p_attribute7;
1057 l_reacttime_rec.ATTRIBUTE8 := p_attribute8;
1058 l_reacttime_rec.ATTRIBUTE9 := p_attribute9;
1059 l_reacttime_rec.ATTRIBUTE10 := p_attribute10;
1060 l_reacttime_rec.ATTRIBUTE11 := p_attribute11;
1061 l_reacttime_rec.ATTRIBUTE12 := p_attribute12;
1062 l_reacttime_rec.ATTRIBUTE13 := p_attribute13;
1063 l_reacttime_rec.ATTRIBUTE14 := p_attribute14;
1064 l_reacttime_rec.ATTRIBUTE15 := p_attribute15;
1065 l_reacttime_rec.CONTEXT := p_context;
1066 l_reacttime_rec.OBJECT_VERSION_NUMBER := p_object_version_number;
1067 update_row(
1068 p_api_version,
1069 p_init_msg_list,
1070 p_validation_level,
1071 p_commit,
1072 x_return_status,
1073 x_msg_count,
1074 x_msg_data,
1075 l_reacttime_rec,
1076 x_object_version_number
1077 );
1078 TAPI_DEV_KIT.END_ACTIVITY(p_commit, x_msg_count, x_msg_data);
1079 EXCEPTION
1080 WHEN FND_API.G_EXC_ERROR THEN
1081 x_return_status := TAPI_DEV_KIT.HANDLE_EXCEPTIONS
1082 (
1083 l_api_name,
1084 G_PKG_NAME,
1085 'FND_API.G_RET_STS_ERROR',
1086 x_msg_count,
1087 x_msg_data,
1088 '_Pvt'
1089 );
1090 APP_EXCEPTION.RAISE_EXCEPTION;
1091 WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1092 x_return_status :=TAPI_DEV_KIT.HANDLE_EXCEPTIONS
1093 (
1094 l_api_name,
1095 G_PKG_NAME,
1096 'FND_API.G_RET_STS_UNEXP_ERROR',
1097 x_msg_count,
1098 x_msg_data,
1099 '_Pvt'
1100 );
1101 APP_EXCEPTION.RAISE_EXCEPTION;
1102 WHEN TAPI_DEV_KIT.G_EXC_DUP_VAL_ON_INDEX THEN
1103 x_return_status :=TAPI_DEV_KIT.HANDLE_EXCEPTIONS
1104 (
1105 l_api_name,
1106 G_PKG_NAME,
1107 'TAPI_DEV_KIT.G_RET_STS_DUP_VAL_ON_INDEX',
1108 x_msg_count,
1109 x_msg_data,
1110 '_Pvt'
1111 );
1112 APP_EXCEPTION.RAISE_EXCEPTION;
1113 END update_row;
1114 Procedure delete_row
1115 (
1116 p_api_version IN NUMBER,
1117 p_init_msg_list IN VARCHAR2 := TAPI_DEV_KIT.G_FALSE,
1118 p_validation_level IN NUMBER,
1119 p_commit IN VARCHAR2 := TAPI_DEV_KIT.G_FALSE,
1120 x_return_status OUT VARCHAR2,
1121 x_msg_count OUT NUMBER,
1122 x_msg_data OUT VARCHAR2,
1123 p_reaction_time_id IN NUMBER) IS
1124 l_api_name CONSTANT VARCHAR2(30) := 'delete_row';
1125 l_api_version CONSTANT NUMBER := 1;
1126 l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1127 BEGIN
1128 l_return_status := TAPI_DEV_KIT.START_ACTIVITY(l_api_name,
1129 G_PKG_NAME,
1130 l_api_version,
1131 p_api_version,
1132 p_init_msg_list,
1136 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1133 '_Pvt',
1134 x_return_status);
1135 IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1137 ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1138 RAISE FND_API.G_EXC_ERROR;
1139 END IF;
1140 DELETE FROM CS_COV_REACTION_TIMES
1141 WHERE
1142 REACTION_TIME_ID = p_reaction_time_id
1143 ;
1144 TAPI_DEV_KIT.END_ACTIVITY(p_commit, x_msg_count, x_msg_data);
1145 EXCEPTION
1146 WHEN FND_API.G_EXC_ERROR THEN
1147 x_return_status := TAPI_DEV_KIT.HANDLE_EXCEPTIONS
1148 (
1149 l_api_name,
1150 G_PKG_NAME,
1151 'FND_API.G_RET_STS_ERROR',
1152 x_msg_count,
1153 x_msg_data,
1154 '_Pvt'
1155 );
1156 APP_EXCEPTION.RAISE_EXCEPTION;
1157 WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1158 x_return_status :=TAPI_DEV_KIT.HANDLE_EXCEPTIONS
1159 (
1160 l_api_name,
1161 G_PKG_NAME,
1162 'FND_API.G_RET_STS_UNEXP_ERROR',
1163 x_msg_count,
1164 x_msg_data,
1165 '_Pvt'
1166 );
1167 APP_EXCEPTION.RAISE_EXCEPTION;
1168 WHEN TAPI_DEV_KIT.G_EXC_DUP_VAL_ON_INDEX THEN
1169 x_return_status :=TAPI_DEV_KIT.HANDLE_EXCEPTIONS
1170 (
1171 l_api_name,
1172 G_PKG_NAME,
1173 'TAPI_DEV_KIT.G_RET_STS_DUP_VAL_ON_INDEX',
1174 x_msg_count,
1175 x_msg_data,
1176 '_Pvt'
1177 );
1178 APP_EXCEPTION.RAISE_EXCEPTION;
1179 END delete_row;
1180 PROCEDURE validate_row
1181 (
1182 p_api_version IN NUMBER,
1183 p_init_msg_list IN VARCHAR2 := TAPI_DEV_KIT.G_FALSE,
1184 p_validation_level IN NUMBER,
1185 p_commit IN VARCHAR2 := TAPI_DEV_KIT.G_FALSE,
1186 x_return_status OUT VARCHAR2,
1187 x_msg_count OUT NUMBER,
1188 x_msg_data OUT VARCHAR2,
1189 p_reacttime_val_rec IN ReactTime_Val_Rec_Type := G_MISS_REACTTIME_VAL_REC) IS
1190 l_api_name CONSTANT VARCHAR2(30) := 'validate_row';
1191 l_api_version CONSTANT NUMBER := 1;
1192 l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1193 l_reacttime_rec ReactTime_Rec_Type;
1194 l_def_reacttime_rec ReactTime_Rec_Type;
1195 BEGIN
1196 l_return_status := TAPI_DEV_KIT.START_ACTIVITY(l_api_name,
1197 G_PKG_NAME,
1198 l_api_version,
1199 p_api_version,
1200 p_init_msg_list,
1201 '_Pvt',
1202 x_return_status);
1203 IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1204 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1205 ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1206 RAISE FND_API.G_EXC_ERROR;
1207 END IF;
1208 migrate(p_reacttime_val_rec, l_reacttime_rec);
1209 --- Validate all non-missing attributes (Item Level Validation)
1210 IF p_validation_level >= FND_API.G_VALID_LEVEL_FULL THEN
1211 l_return_status := Validate_Item_Attributes
1212 (
1213 l_reacttime_rec ---- IN
1214 );
1215 --- If any errors happen abort API
1216 IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1217 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1218 ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1219 RAISE FND_API.G_EXC_ERROR;
1220 END IF;
1221 END IF;
1222 IF (p_validation_level >= FND_API.G_VALID_LEVEL_FULL) THEN
1223 l_return_status := Validate_Item_Record(l_def_reacttime_rec);
1224 IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1225 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1226 ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1227 RAISE FND_API.G_EXC_ERROR;
1228 END IF;
1229 END IF;
1230 TAPI_DEV_KIT.END_ACTIVITY(p_commit, x_msg_count, x_msg_data);
1231 EXCEPTION
1232 WHEN FND_API.G_EXC_ERROR THEN
1233 x_return_status := TAPI_DEV_KIT.HANDLE_EXCEPTIONS
1234 (
1235 l_api_name,
1236 G_PKG_NAME,
1237 'FND_API.G_RET_STS_ERROR',
1238 x_msg_count,
1239 x_msg_data,
1240 '_Pvt'
1241 );
1242 APP_EXCEPTION.RAISE_EXCEPTION;
1243 WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1244 x_return_status :=TAPI_DEV_KIT.HANDLE_EXCEPTIONS
1245 (
1246 l_api_name,
1247 G_PKG_NAME,
1248 'FND_API.G_RET_STS_UNEXP_ERROR',
1249 x_msg_count,
1250 x_msg_data,
1251 '_Pvt'
1252 );
1253 APP_EXCEPTION.RAISE_EXCEPTION;
1254 WHEN TAPI_DEV_KIT.G_EXC_DUP_VAL_ON_INDEX THEN
1255 x_return_status :=TAPI_DEV_KIT.HANDLE_EXCEPTIONS
1256 (
1257 l_api_name,
1258 G_PKG_NAME,
1259 'TAPI_DEV_KIT.G_RET_STS_DUP_VAL_ON_INDEX',
1260 x_msg_count,
1261 x_msg_data,
1262 '_Pvt'
1263 );
1264 APP_EXCEPTION.RAISE_EXCEPTION;
1268 p_api_version IN NUMBER,
1265 END validate_row;
1266 PROCEDURE validate_row
1267 (
1269 p_init_msg_list IN VARCHAR2 := TAPI_DEV_KIT.G_FALSE,
1270 p_validation_level IN NUMBER,
1271 p_commit IN VARCHAR2 := TAPI_DEV_KIT.G_FALSE,
1272 x_return_status OUT VARCHAR2,
1273 x_msg_count OUT NUMBER,
1274 x_msg_data OUT VARCHAR2,
1275 p_reaction_time_id IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
1276 p_name IN CS_COV_REACTION_TIMES.NAME%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
1277 p_description IN CS_COV_REACTION_TIMES.DESCRIPTION%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
1278 p_reaction_time_sunday IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
1279 p_reaction_time_monday IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
1280 p_reaction_time_tuesday IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
1281 p_reaction_time_wednesday IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
1282 p_reaction_time_thursday IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
1283 p_reaction_time_friday IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
1284 p_reaction_time_saturday IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
1285 p_incident_severity_id IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
1286 p_always_covered IN CS_COV_REACTION_TIMES.ALWAYS_COVERED%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
1287 p_workflow IN CS_COV_REACTION_TIMES.WORKFLOW%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
1288 p_coverage_txn_group_id IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
1289 p_use_for_sr_date_calc IN CS_COV_REACTION_TIMES.USE_FOR_SR_DATE_CALC%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
1290 p_last_update_date IN CS_COV_REACTION_TIMES.LAST_UPDATE_DATE%TYPE := TAPI_DEV_KIT.G_MISS_DATE,
1291 p_last_updated_by IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
1292 p_creation_date IN CS_COV_REACTION_TIMES.CREATION_DATE%TYPE := TAPI_DEV_KIT.G_MISS_DATE,
1293 p_created_by IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
1294 p_last_update_login IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM,
1295 p_attribute1 IN CS_COV_REACTION_TIMES.ATTRIBUTE1%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
1296 p_attribute2 IN CS_COV_REACTION_TIMES.ATTRIBUTE2%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
1297 p_attribute3 IN CS_COV_REACTION_TIMES.ATTRIBUTE3%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
1298 p_attribute4 IN CS_COV_REACTION_TIMES.ATTRIBUTE4%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
1299 p_attribute5 IN CS_COV_REACTION_TIMES.ATTRIBUTE5%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
1300 p_attribute6 IN CS_COV_REACTION_TIMES.ATTRIBUTE6%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
1301 p_attribute7 IN CS_COV_REACTION_TIMES.ATTRIBUTE7%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
1302 p_attribute8 IN CS_COV_REACTION_TIMES.ATTRIBUTE8%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
1303 p_attribute9 IN CS_COV_REACTION_TIMES.ATTRIBUTE9%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
1304 p_attribute10 IN CS_COV_REACTION_TIMES.ATTRIBUTE10%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
1305 p_attribute11 IN CS_COV_REACTION_TIMES.ATTRIBUTE11%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
1306 p_attribute12 IN CS_COV_REACTION_TIMES.ATTRIBUTE12%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
1307 p_attribute13 IN CS_COV_REACTION_TIMES.ATTRIBUTE13%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
1308 p_attribute14 IN CS_COV_REACTION_TIMES.ATTRIBUTE14%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
1309 p_attribute15 IN CS_COV_REACTION_TIMES.ATTRIBUTE15%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
1313 l_api_version CONSTANT NUMBER := 1;
1310 p_context IN CS_COV_REACTION_TIMES.CONTEXT%TYPE := TAPI_DEV_KIT.G_MISS_CHAR,
1311 p_object_version_number IN NUMBER := TAPI_DEV_KIT.G_MISS_NUM) IS
1312 l_api_name CONSTANT VARCHAR2(30) := 'validate_row';
1314 l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1315 l_reacttime_rec ReactTime_Val_Rec_Type;
1316 BEGIN
1317 l_return_status := TAPI_DEV_KIT.START_ACTIVITY(l_api_name,
1318 G_PKG_NAME,
1319 l_api_version,
1320 p_api_version,
1321 p_init_msg_list,
1322 '_Pvt',
1323 x_return_status);
1324 IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1325 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1326 ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1327 RAISE FND_API.G_EXC_ERROR;
1328 END IF;
1329 l_reacttime_rec.REACTION_TIME_ID := p_reaction_time_id;
1330 l_reacttime_rec.NAME := p_name;
1331 l_reacttime_rec.DESCRIPTION := p_description;
1332 l_reacttime_rec.REACTION_TIME_SUNDAY := p_reaction_time_sunday;
1333 l_reacttime_rec.REACTION_TIME_MONDAY := p_reaction_time_monday;
1334 l_reacttime_rec.REACTION_TIME_TUESDAY := p_reaction_time_tuesday;
1335 l_reacttime_rec.REACTION_TIME_WEDNESDAY := p_reaction_time_wednesday;
1336 l_reacttime_rec.REACTION_TIME_THURSDAY := p_reaction_time_thursday;
1337 l_reacttime_rec.REACTION_TIME_FRIDAY := p_reaction_time_friday;
1338 l_reacttime_rec.REACTION_TIME_SATURDAY := p_reaction_time_saturday;
1339 l_reacttime_rec.INCIDENT_SEVERITY_ID := p_incident_severity_id;
1340 l_reacttime_rec.ALWAYS_COVERED := p_always_covered;
1341 l_reacttime_rec.WORKFLOW := p_workflow;
1342 l_reacttime_rec.COVERAGE_TXN_GROUP_ID := p_coverage_txn_group_id;
1343 l_reacttime_rec.USE_FOR_SR_DATE_CALC := p_use_for_sr_date_calc;
1344 l_reacttime_rec.LAST_UPDATE_DATE := p_last_update_date;
1345 l_reacttime_rec.LAST_UPDATED_BY := p_last_updated_by;
1346 l_reacttime_rec.CREATION_DATE := p_creation_date;
1347 l_reacttime_rec.CREATED_BY := p_created_by;
1348 l_reacttime_rec.LAST_UPDATE_LOGIN := p_last_update_login;
1349 l_reacttime_rec.ATTRIBUTE1 := p_attribute1;
1350 l_reacttime_rec.ATTRIBUTE2 := p_attribute2;
1351 l_reacttime_rec.ATTRIBUTE3 := p_attribute3;
1352 l_reacttime_rec.ATTRIBUTE4 := p_attribute4;
1353 l_reacttime_rec.ATTRIBUTE5 := p_attribute5;
1354 l_reacttime_rec.ATTRIBUTE6 := p_attribute6;
1355 l_reacttime_rec.ATTRIBUTE7 := p_attribute7;
1356 l_reacttime_rec.ATTRIBUTE8 := p_attribute8;
1357 l_reacttime_rec.ATTRIBUTE9 := p_attribute9;
1358 l_reacttime_rec.ATTRIBUTE10 := p_attribute10;
1359 l_reacttime_rec.ATTRIBUTE11 := p_attribute11;
1360 l_reacttime_rec.ATTRIBUTE12 := p_attribute12;
1361 l_reacttime_rec.ATTRIBUTE13 := p_attribute13;
1362 l_reacttime_rec.ATTRIBUTE14 := p_attribute14;
1363 l_reacttime_rec.ATTRIBUTE15 := p_attribute15;
1364 l_reacttime_rec.CONTEXT := p_context;
1368 p_init_msg_list,
1365 l_reacttime_rec.OBJECT_VERSION_NUMBER := p_object_version_number;
1366 validate_row(
1367 p_api_version,
1369 p_validation_level,
1370 p_commit,
1371 x_return_status,
1372 x_msg_count,
1373 x_msg_data,
1374 l_reacttime_rec
1375 );
1376 TAPI_DEV_KIT.END_ACTIVITY(p_commit, x_msg_count, x_msg_data);
1377 EXCEPTION
1378 WHEN FND_API.G_EXC_ERROR THEN
1379 x_return_status := TAPI_DEV_KIT.HANDLE_EXCEPTIONS
1380 (
1381 l_api_name,
1382 G_PKG_NAME,
1383 'FND_API.G_RET_STS_ERROR',
1384 x_msg_count,
1385 x_msg_data,
1386 '_Pvt'
1387 );
1388 APP_EXCEPTION.RAISE_EXCEPTION;
1389 WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1390 x_return_status :=TAPI_DEV_KIT.HANDLE_EXCEPTIONS
1391 (
1392 l_api_name,
1393 G_PKG_NAME,
1394 'FND_API.G_RET_STS_UNEXP_ERROR',
1395 x_msg_count,
1396 x_msg_data,
1397 '_Pvt'
1398 );
1399 APP_EXCEPTION.RAISE_EXCEPTION;
1400 WHEN TAPI_DEV_KIT.G_EXC_DUP_VAL_ON_INDEX THEN
1401 x_return_status :=TAPI_DEV_KIT.HANDLE_EXCEPTIONS
1402 (
1403 l_api_name,
1404 G_PKG_NAME,
1405 'TAPI_DEV_KIT.G_RET_STS_DUP_VAL_ON_INDEX',
1406 x_msg_count,
1407 x_msg_data,
1408 '_Pvt'
1409 );
1410 APP_EXCEPTION.RAISE_EXCEPTION;
1411 END validate_row;
1412 END CS_REACTTIME_PVT;