DBA Data[Home] [Help]

APPS.EAM_SAFETY_ASSOCIATION_PVT dependencies on EAM_ERROR_MESSAGE_PVT

Line 34: , x_mesg_token_tbl OUT NOCOPY EAM_ERROR_MESSAGE_PVT.MESG_TOKEN_TBL_TYPE

30: * Purpose : This will process clearance permit association
31: ***************************************************************************/
32: PROCEDURE PERMIT_CLEARANCE_ASSOCIATION
33: ( p_permit_clearance_asso_tbl IN EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_tbl_type
34: , x_mesg_token_tbl OUT NOCOPY EAM_ERROR_MESSAGE_PVT.MESG_TOKEN_TBL_TYPE
35: , x_return_status OUT NOCOPY VARCHAR2
36: )IS
37:
38: CURSOR C2 IS SELECT EAM_SAFETY_ASSOCIATIONS_S.NEXTVAL FROM SYS.DUAL;

Line 41: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type;

37:
38: CURSOR C2 IS SELECT EAM_SAFETY_ASSOCIATIONS_S.NEXTVAL FROM SYS.DUAL;
39:
40: --Error handling variables
41: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type;
42: l_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
43: l_return_status VARCHAR2(1);
44: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
45:

Line 42: l_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;

38: CURSOR C2 IS SELECT EAM_SAFETY_ASSOCIATIONS_S.NEXTVAL FROM SYS.DUAL;
39:
40: --Error handling variables
41: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type;
42: l_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
43: l_return_status VARCHAR2(1);
44: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
45:
46: l_safety_assoc_rec EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_rec_type;

Line 44: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;

40: --Error handling variables
41: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type;
42: l_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
43: l_return_status VARCHAR2(1);
44: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
45:
46: l_safety_assoc_rec EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_rec_type;
47: l_safety_assoc_id NUMBER;
48: l_count NUMBER;

Line 53: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Inside EAM_SAFETY_ASSOCIATION_PVT.PERMIT_CLEARANCE_ASSOCIATION'); end if;

49:
50: BEGIN
51:
52: SAVEPOINT PERMIT_CLEARANCE_ASSOCIATION;
53: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Inside EAM_SAFETY_ASSOCIATION_PVT.PERMIT_CLEARANCE_ASSOCIATION'); end if;
54:
55: IF p_permit_clearance_asso_tbl.COUNT > 0 THEN
56: FOR i in p_permit_clearance_asso_tbl.FIRST..p_permit_clearance_asso_tbl.LAST LOOP
57:

Line 60: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Checking clearance existence'); end if;

56: FOR i in p_permit_clearance_asso_tbl.FIRST..p_permit_clearance_asso_tbl.LAST LOOP
57:
58: l_safety_assoc_rec := p_permit_clearance_asso_tbl(i);
59:
60: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Checking clearance existence'); end if;
61:
62: SELECT COUNT(*)
63: INTO l_count
64: FROM EAM_WORK_CLEARANCES

Line 74: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Checking permit existence'); end if;

70: RAISE G_SAFETY_EXISTENCE_ERROR;
71: END IF;
72:
73:
74: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Checking permit existence'); end if;
75:
76: SELECT COUNT(*)
77: INTO l_count
78: FROM EAM_WORK_PERMITS

Line 98: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Checking for duplicate association'); end if;

94: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
95: RAISE G_SAFETY_TRANSACTION_ERROR;
96: END IF;
97:
98: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Checking for duplicate association'); end if;
99: IF l_safety_assoc_rec.TRANSACTION_TYPE = EAM_PROCESS_WO_PVT.G_OPR_CREATE THEN
100: SELECT COUNT(*)
101: INTO l_count
102: FROM EAM_SAFETY_ASSOCIATIONS

Line 113: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling Perform_Writes within PERMIT_CLEARANCE_ASSOCIATION'); end if;

109: RAISE G_SAFETY_DUPLICATE_ASSO_ERROR;
110: END IF;
111: END IF;
112:
113: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling Perform_Writes within PERMIT_CLEARANCE_ASSOCIATION'); end if;
114:
115: IF l_safety_assoc_rec.TRANSACTION_TYPE = EAM_PROCESS_WO_PVT.G_OPR_CREATE THEN
116: OPEN C2;
117: FETCH C2 INTO l_safety_assoc_id;

Line 144: EAM_ERROR_MESSAGE_PVT.Add_Error_Token

140: EXCEPTION
141: WHEN G_SAFETY_EXISTENCE_ERROR THEN
142:
143: l_out_mesg_token_tbl := l_mesg_token_tbl;
144: EAM_ERROR_MESSAGE_PVT.Add_Error_Token
145: ( p_message_name => 'EAM_SAF_EXISTENCE_ERROR'
146: , p_token_tbl => l_token_tbl
147: , p_mesg_token_tbl => l_mesg_token_tbl
148: , x_mesg_token_tbl => l_out_mesg_token_tbl

Line 158: EAM_ERROR_MESSAGE_PVT.Add_Error_Token

154: ROLLBACK TO PERMIT_CLEARANCE_ASSOCIATION;
155: WHEN G_SAFETY_TRANSACTION_ERROR THEN
156:
157: l_out_mesg_token_tbl := l_mesg_token_tbl;
158: EAM_ERROR_MESSAGE_PVT.Add_Error_Token
159: ( p_message_name => 'EAM_SAF_TRANSACTION_ERROR'
160: , p_token_tbl => l_token_tbl
161: , p_mesg_token_tbl => l_mesg_token_tbl
162: , x_mesg_token_tbl => l_out_mesg_token_tbl

Line 172: EAM_ERROR_MESSAGE_PVT.Add_Error_Token

168: ROLLBACK TO PERMIT_CLEARANCE_ASSOCIATION;
169: WHEN G_SAFETY_ASSOCIATION_ERROR THEN
170:
171: l_out_mesg_token_tbl := l_mesg_token_tbl;
172: EAM_ERROR_MESSAGE_PVT.Add_Error_Token
173: ( p_message_name => 'EAM_SAF_ASSOCIATION_ERROR'
174: , p_token_tbl => l_token_tbl
175: , p_mesg_token_tbl => l_mesg_token_tbl
176: , x_mesg_token_tbl => l_out_mesg_token_tbl

Line 198: EAM_ERROR_MESSAGE_PVT.Add_Error_Token

194: WHERE EWC.WORK_CLEARANCE_ID = l_safety_assoc_rec.TARGET_REF_ID
195: AND EWC.organization_id = l_safety_assoc_rec.ORGANIZATION_ID;
196:
197: l_out_mesg_token_tbl := l_mesg_token_tbl;
198: EAM_ERROR_MESSAGE_PVT.Add_Error_Token
199: ( p_message_name => 'EAM_SAF_DUPLICATE_ASSO_ERROR'
200: , p_token_tbl => l_token_tbl
201: , p_mesg_token_tbl => l_mesg_token_tbl
202: , x_mesg_token_tbl => l_out_mesg_token_tbl

Line 222: , x_mesg_token_tbl OUT NOCOPY EAM_ERROR_MESSAGE_PVT.MESG_TOKEN_TBL_TYPE

218: * Purpose : This will process clearance work order association
219: ***************************************************************************/
220: PROCEDURE CLEARANCE_WO_ASSOCIATION
221: ( p_clearance_workorder_asso_tbl IN EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_tbl_type
222: , x_mesg_token_tbl OUT NOCOPY EAM_ERROR_MESSAGE_PVT.MESG_TOKEN_TBL_TYPE
223: , x_return_status OUT NOCOPY VARCHAR2
224: )IS
225:
226: CURSOR C1 IS SELECT EAM_SAFETY_ASSOCIATIONS_S.NEXTVAL FROM SYS.DUAL;

Line 229: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type;

225:
226: CURSOR C1 IS SELECT EAM_SAFETY_ASSOCIATIONS_S.NEXTVAL FROM SYS.DUAL;
227:
228: --Error handling variables
229: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type;
230: l_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
231: l_return_status VARCHAR2(1);
232: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
233:

Line 230: l_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;

226: CURSOR C1 IS SELECT EAM_SAFETY_ASSOCIATIONS_S.NEXTVAL FROM SYS.DUAL;
227:
228: --Error handling variables
229: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type;
230: l_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
231: l_return_status VARCHAR2(1);
232: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
233:
234: l_safety_assoc_rec EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_rec_type;

Line 232: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;

228: --Error handling variables
229: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type;
230: l_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
231: l_return_status VARCHAR2(1);
232: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
233:
234: l_safety_assoc_rec EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_rec_type;
235: l_safety_assoc_id NUMBER;
236: l_count NUMBER;

Line 237: l_error_level NUMBER :=EAM_ERROR_MESSAGE_PVT.G_BO_LEVEL;

233:
234: l_safety_assoc_rec EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_rec_type;
235: l_safety_assoc_id NUMBER;
236: l_count NUMBER;
237: l_error_level NUMBER :=EAM_ERROR_MESSAGE_PVT.G_BO_LEVEL;
238: l_entity_index NUMBER :=1;
239:
240: BEGIN
241:

Line 244: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Inside EAM_SAFETY_ASSOCIATION_PVT.CLEARANCE_WO_ASSOCIATION'); end if;

240: BEGIN
241:
242: SAVEPOINT CLEARANCE_WO_ASSOCIATION;
243:
244: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Inside EAM_SAFETY_ASSOCIATION_PVT.CLEARANCE_WO_ASSOCIATION'); end if;
245:
246: IF p_clearance_workorder_asso_tbl.COUNT > 0 THEN
247: FOR i in p_clearance_workorder_asso_tbl.FIRST..p_clearance_workorder_asso_tbl.LAST LOOP
248:

Line 251: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Checking clearance existence'); end if;

247: FOR i in p_clearance_workorder_asso_tbl.FIRST..p_clearance_workorder_asso_tbl.LAST LOOP
248:
249: l_safety_assoc_rec := p_clearance_workorder_asso_tbl(i);
250:
251: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Checking clearance existence'); end if;
252:
253: SELECT COUNT(*)
254: INTO l_count
255: FROM EAM_WORK_CLEARANCES

Line 265: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Checking wo existence'); end if;

261: RAISE G_SAFETY_EXISTENCE_ERROR;
262: END IF;
263: -- END IF;
264:
265: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Checking wo existence'); end if;
266:
267: SELECT COUNT(*)
268: INTO l_count
269: FROM WIP_ENTITIES

Line 289: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Checking for duplicate association'); end if;

285: RAISE G_SAFETY_TRANSACTION_ERROR;
286: END IF;
287:
288:
289: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Checking for duplicate association'); end if;
290: IF l_safety_assoc_rec.TRANSACTION_TYPE = EAM_PROCESS_WO_PVT.G_OPR_CREATE THEN
291: SELECT COUNT(*)
292: INTO l_count
293: FROM EAM_SAFETY_ASSOCIATIONS

Line 304: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling Perform_Writes from within CLEARANCE_WO_ASSOCIATION'); end if;

300: RAISE G_SAFETY_DUPLICATE_ASSO_ERROR;
301: END IF;
302: END IF;
303:
304: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling Perform_Writes from within CLEARANCE_WO_ASSOCIATION'); end if;
305:
306: IF l_safety_assoc_rec.TRANSACTION_TYPE = EAM_PROCESS_WO_PVT.G_OPR_CREATE THEN
307: OPEN C1;
308: FETCH C1 INTO l_safety_assoc_id;

Line 335: EAM_ERROR_MESSAGE_PVT.Add_Error_Token

331: EXCEPTION
332: WHEN G_SAFETY_EXISTENCE_ERROR THEN
333:
334: l_out_mesg_token_tbl := l_mesg_token_tbl;
335: EAM_ERROR_MESSAGE_PVT.Add_Error_Token
336: ( p_message_name => 'EAM_SAF_EXISTENCE_ERROR'
337: , p_token_tbl => l_token_tbl
338: , p_mesg_token_tbl => l_mesg_token_tbl
339: , x_mesg_token_tbl => l_out_mesg_token_tbl

Line 346: EAM_ERROR_MESSAGE_PVT.Translate_And_Insert_Messages

342:
343: x_return_status := FND_API.G_RET_STS_ERROR;
344: x_mesg_token_tbl := l_mesg_token_tbl ;
345:
346: EAM_ERROR_MESSAGE_PVT.Translate_And_Insert_Messages
347: ( p_mesg_token_Tbl => l_out_Mesg_Token_Tbl
348: , p_error_level => l_error_level
349: , p_entity_index => l_entity_index
350: );

Line 356: EAM_ERROR_MESSAGE_PVT.Add_Error_Token

352: ROLLBACK TO CLEARANCE_WO_ASSOCIATION;
353: WHEN G_SAFETY_TRANSACTION_ERROR THEN
354:
355: l_out_mesg_token_tbl := l_mesg_token_tbl;
356: EAM_ERROR_MESSAGE_PVT.Add_Error_Token
357: ( p_message_name => 'EAM_SAF_TRANSACTION_ERROR'
358: , p_token_tbl => l_token_tbl
359: , p_mesg_token_tbl => l_mesg_token_tbl
360: , x_mesg_token_tbl => l_out_mesg_token_tbl

Line 367: EAM_ERROR_MESSAGE_PVT.Translate_And_Insert_Messages

363:
364: x_return_status := FND_API.G_RET_STS_ERROR;
365: x_mesg_token_tbl := l_mesg_token_tbl ;
366:
367: EAM_ERROR_MESSAGE_PVT.Translate_And_Insert_Messages
368: ( p_mesg_token_Tbl => l_out_Mesg_Token_Tbl
369: , p_error_level => l_error_level
370: , p_entity_index => l_entity_index
371: );

Line 377: EAM_ERROR_MESSAGE_PVT.Add_Error_Token

373: ROLLBACK TO CLEARANCE_WO_ASSOCIATION;
374: WHEN G_SAFETY_ASSOCIATION_ERROR THEN
375:
376: l_out_mesg_token_tbl := l_mesg_token_tbl;
377: EAM_ERROR_MESSAGE_PVT.Add_Error_Token
378: ( p_message_name => 'EAM_SAF_ASSOCIATION_ERROR'
379: , p_token_tbl => l_token_tbl
380: , p_mesg_token_tbl => l_mesg_token_tbl
381: , x_mesg_token_tbl => l_out_mesg_token_tbl

Line 388: EAM_ERROR_MESSAGE_PVT.Translate_And_Insert_Messages

384:
385: x_return_status := FND_API.G_RET_STS_ERROR;
386: x_mesg_token_tbl := l_mesg_token_tbl ;
387:
388: EAM_ERROR_MESSAGE_PVT.Translate_And_Insert_Messages
389: ( p_mesg_token_Tbl => l_out_Mesg_Token_Tbl
390: , p_error_level => l_error_level
391: , p_entity_index => l_entity_index
392: );

Line 410: EAM_ERROR_MESSAGE_PVT.Add_Error_Token

406: WHERE we.WIP_ENTITY_ID = l_safety_assoc_rec.TARGET_REF_ID
407: AND WE.organization_id = l_safety_assoc_rec.ORGANIZATION_ID;
408:
409: l_out_mesg_token_tbl := l_mesg_token_tbl;
410: EAM_ERROR_MESSAGE_PVT.Add_Error_Token
411: ( p_message_name => 'EAM_SAF_DUPLICATE_ASSO_ERROR'
412: , p_token_tbl => l_token_tbl
413: , p_mesg_token_tbl => l_mesg_token_tbl
414: , x_mesg_token_tbl => l_out_mesg_token_tbl

Line 417: EAM_ERROR_MESSAGE_PVT.Translate_And_Insert_Messages

413: , p_mesg_token_tbl => l_mesg_token_tbl
414: , x_mesg_token_tbl => l_out_mesg_token_tbl
415: );
416:
417: EAM_ERROR_MESSAGE_PVT.Translate_And_Insert_Messages
418: ( p_mesg_token_Tbl => l_out_Mesg_Token_Tbl
419: , p_error_level => l_error_level
420: , p_entity_index => l_entity_index
421: );

Line 441: , x_mesg_token_tbl OUT NOCOPY EAM_ERROR_MESSAGE_PVT.MESG_TOKEN_TBL_TYPE

437: * Purpose : This will process permit work order association
438: ************************************************************/
439: PROCEDURE PERMIT_WORK_ORDER_ASSOCIATION
440: ( p_permit_wo_association_tbl IN EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_tbl_type
441: , x_mesg_token_tbl OUT NOCOPY EAM_ERROR_MESSAGE_PVT.MESG_TOKEN_TBL_TYPE
442: , x_return_status OUT NOCOPY VARCHAR2
443: )IS
444: CURSOR C IS SELECT EAM_SAFETY_ASSOCIATIONS_S.NEXTVAL FROM SYS.DUAL;
445:

Line 447: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type;

443: )IS
444: CURSOR C IS SELECT EAM_SAFETY_ASSOCIATIONS_S.NEXTVAL FROM SYS.DUAL;
445:
446: --Error handling variables
447: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type;
448: l_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
449: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
450: l_return_status VARCHAR2(1);
451:

Line 448: l_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;

444: CURSOR C IS SELECT EAM_SAFETY_ASSOCIATIONS_S.NEXTVAL FROM SYS.DUAL;
445:
446: --Error handling variables
447: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type;
448: l_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
449: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
450: l_return_status VARCHAR2(1);
451:
452: l_safety_assoc_rec EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_rec_type;

Line 449: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;

445:
446: --Error handling variables
447: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type;
448: l_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
449: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
450: l_return_status VARCHAR2(1);
451:
452: l_safety_assoc_rec EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_rec_type;
453: l_safety_assoc_id NUMBER;

Line 459: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Inside EAM_SAFETY_ASSOCIATION_PVT.PERMIT_WORK_ORDER_ASSOCIATION'); end if;

455:
456: BEGIN
457:
458: SAVEPOINT PERMIT_WORK_ORDER_ASSOCIATION;
459: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Inside EAM_SAFETY_ASSOCIATION_PVT.PERMIT_WORK_ORDER_ASSOCIATION'); end if;
460:
461: IF p_permit_wo_association_tbl.COUNT > 0 THEN
462: FOR i in p_permit_wo_association_tbl.FIRST..p_permit_wo_association_tbl.LAST LOOP
463:

Line 466: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Checking permit existence'); end if;

462: FOR i in p_permit_wo_association_tbl.FIRST..p_permit_wo_association_tbl.LAST LOOP
463:
464: l_safety_assoc_rec := p_permit_wo_association_tbl(i);
465:
466: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Checking permit existence'); end if;
467:
468: SELECT COUNT(*)
469: INTO l_count
470: FROM EAM_WORK_PERMITS

Line 480: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Checking wo existence'); end if;

476: THEN
477: RAISE G_SAFETY_EXISTENCE_ERROR;
478: END IF;
479:
480: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Checking wo existence'); end if;
481:
482: SELECT COUNT(*)
483: INTO l_count
484: FROM WIP_ENTITIES

Line 504: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Checking for duplicate association'); end if;

500: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
501: RAISE G_SAFETY_TRANSACTION_ERROR;
502: END IF;
503:
504: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Checking for duplicate association'); end if;
505: IF l_safety_assoc_rec.TRANSACTION_TYPE = EAM_PROCESS_WO_PVT.G_OPR_CREATE THEN
506: SELECT COUNT(*)
507: INTO l_count
508: FROM EAM_SAFETY_ASSOCIATIONS

Line 519: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling Perform_Writes from within PERMIT_WORK_ORDER_ASSOCIATION'); end if;

515: RAISE G_SAFETY_DUPLICATE_ASSO_ERROR;
516: END IF;
517: END IF;
518:
519: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling Perform_Writes from within PERMIT_WORK_ORDER_ASSOCIATION'); end if;
520: IF l_safety_assoc_rec.TRANSACTION_TYPE = EAM_PROCESS_WO_PVT.G_OPR_CREATE THEN
521: OPEN C;
522: FETCH C INTO l_safety_assoc_id;
523: CLOSE C;

Line 549: EAM_ERROR_MESSAGE_PVT.Add_Error_Token

545:
546: WHEN G_SAFETY_EXISTENCE_ERROR THEN
547:
548: l_out_mesg_token_tbl := l_mesg_token_tbl;
549: EAM_ERROR_MESSAGE_PVT.Add_Error_Token
550: ( p_message_name => 'EAM_SAF_EXISTENCE_ERROR'
551: , p_token_tbl => l_token_tbl
552: , p_mesg_token_tbl => l_mesg_token_tbl
553: , x_mesg_token_tbl => l_out_mesg_token_tbl

Line 563: EAM_ERROR_MESSAGE_PVT.Add_Error_Token

559: ROLLBACK TO PERMIT_WORK_ORDER_ASSOCIATION;
560: WHEN G_SAFETY_TRANSACTION_ERROR THEN
561:
562: l_out_mesg_token_tbl := l_mesg_token_tbl;
563: EAM_ERROR_MESSAGE_PVT.Add_Error_Token
564: ( p_message_name => 'EAM_SAF_TRANSACTION_ERROR'
565: , p_token_tbl => l_token_tbl
566: , p_mesg_token_tbl => l_mesg_token_tbl
567: , x_mesg_token_tbl => l_out_mesg_token_tbl

Line 577: EAM_ERROR_MESSAGE_PVT.Add_Error_Token

573: ROLLBACK TO PERMIT_WORK_ORDER_ASSOCIATION;
574: WHEN G_SAFETY_ASSOCIATION_ERROR THEN
575:
576: l_out_mesg_token_tbl := l_mesg_token_tbl;
577: EAM_ERROR_MESSAGE_PVT.Add_Error_Token
578: ( p_message_name => 'EAM_SAF_ASSOCIATION_ERROR'
579: , p_token_tbl => l_token_tbl
580: , p_mesg_token_tbl => l_mesg_token_tbl
581: , x_mesg_token_tbl => l_out_mesg_token_tbl

Line 604: EAM_ERROR_MESSAGE_PVT.Add_Error_Token

600: WHERE we.WIP_ENTITY_ID = l_safety_assoc_rec.TARGET_REF_ID
601: AND WE.organization_id = l_safety_assoc_rec.ORGANIZATION_ID;
602:
603: l_out_mesg_token_tbl := l_mesg_token_tbl;
604: EAM_ERROR_MESSAGE_PVT.Add_Error_Token
605: ( p_message_name => 'EAM_SAF_DUPLICATE_ASSO_ERROR'
606: , p_token_tbl => l_token_tbl
607: , p_mesg_token_tbl => l_mesg_token_tbl
608: , x_mesg_token_tbl => l_out_mesg_token_tbl

Line 629: , x_mesg_token_tbl OUT NOCOPY EAM_ERROR_MESSAGE_PVT.MESG_TOKEN_TBL_TYPE

625: ************************************************************/
626: PROCEDURE ASSET_ISOLATION_ASSOCIATION
627: (
628: p_isolated_assets_tbl IN EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_tbl_type
629: , x_mesg_token_tbl OUT NOCOPY EAM_ERROR_MESSAGE_PVT.MESG_TOKEN_TBL_TYPE
630: , x_return_status OUT NOCOPY VARCHAR2
631: ) IS
632: CURSOR C IS SELECT EAM_SAFETY_ASSOCIATIONS_S.NEXTVAL FROM SYS.DUAL;
633:

Line 635: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type;

631: ) IS
632: CURSOR C IS SELECT EAM_SAFETY_ASSOCIATIONS_S.NEXTVAL FROM SYS.DUAL;
633:
634: --Error handling variables
635: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type;
636: l_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
637: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
638: l_return_status VARCHAR2(1);
639:

Line 636: l_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;

632: CURSOR C IS SELECT EAM_SAFETY_ASSOCIATIONS_S.NEXTVAL FROM SYS.DUAL;
633:
634: --Error handling variables
635: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type;
636: l_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
637: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
638: l_return_status VARCHAR2(1);
639:
640: l_safety_assoc_rec EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_rec_type;

Line 637: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;

633:
634: --Error handling variables
635: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type;
636: l_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
637: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
638: l_return_status VARCHAR2(1);
639:
640: l_safety_assoc_rec EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_rec_type;
641: l_safety_assoc_id NUMBER;

Line 647: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Inside EAM_SAFETY_ASSOCIATION_PVT.ASSET_ISOLATION_ASSOCIATION'); end if;

643: l_count NUMBER;
644: BEGIN
645:
646: SAVEPOINT ASSET_ISOLATION_ASSOCIATION;
647: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Inside EAM_SAFETY_ASSOCIATION_PVT.ASSET_ISOLATION_ASSOCIATION'); end if;
648:
649: IF p_isolated_assets_tbl.COUNT > 0 THEN
650: FOR i in p_isolated_assets_tbl.FIRST..p_isolated_assets_tbl.LAST LOOP
651:

Line 652: IF EAM_PROCESS_WO_PVT.GET_DEBUG = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Validating transaction type '); END IF;

648:
649: IF p_isolated_assets_tbl.COUNT > 0 THEN
650: FOR i in p_isolated_assets_tbl.FIRST..p_isolated_assets_tbl.LAST LOOP
651:
652: IF EAM_PROCESS_WO_PVT.GET_DEBUG = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Validating transaction type '); END IF;
653:
654: l_safety_assoc_rec := p_isolated_assets_tbl(i);
655:
656: VALIDATE_TRANSACTION_TYPE

Line 667: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Checking for duplicate association'); end if;

663: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
664: RAISE G_SAFETY_TRANSACTION_ERROR;
665: END IF;
666:
667: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Checking for duplicate association'); end if;
668: IF l_safety_assoc_rec.TRANSACTION_TYPE = EAM_PROCESS_WO_PVT.G_OPR_CREATE THEN
669: SELECT COUNT(*)
670: INTO l_count
671: FROM EAM_SAFETY_ASSOCIATIONS

Line 682: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling Perform_Writes from within ASSET_ISOLATION_ASSOCIATION'); end if;

678: RAISE G_SAFETY_DUPLICATE_ASSO_ERROR;
679: END IF;
680: END IF;
681:
682: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling Perform_Writes from within ASSET_ISOLATION_ASSOCIATION'); end if;
683: IF l_safety_assoc_rec.TRANSACTION_TYPE = EAM_PROCESS_WO_PVT.G_OPR_CREATE THEN
684: OPEN C;
685: FETCH C INTO l_safety_assoc_id;
686: CLOSE C;

Line 710: EAM_ERROR_MESSAGE_PVT.Add_Error_Token

706: EXCEPTION
707: WHEN G_SAFETY_EXISTENCE_ERROR THEN
708:
709: l_out_mesg_token_tbl := l_mesg_token_tbl;
710: EAM_ERROR_MESSAGE_PVT.Add_Error_Token
711: ( p_message_name => 'EAM_SAF_EXISTENCE_ERROR'
712: , p_token_tbl => l_token_tbl
713: , p_mesg_token_tbl => l_mesg_token_tbl
714: , x_mesg_token_tbl => l_out_mesg_token_tbl

Line 724: EAM_ERROR_MESSAGE_PVT.Add_Error_Token

720: ROLLBACK TO ASSET_ISOLATION_ASSOCIATION;
721: WHEN G_SAFETY_TRANSACTION_ERROR THEN
722:
723: l_out_mesg_token_tbl := l_mesg_token_tbl;
724: EAM_ERROR_MESSAGE_PVT.Add_Error_Token
725: ( p_message_name => 'EAM_SAF_TRANSACTION_ERROR'
726: , p_token_tbl => l_token_tbl
727: , p_mesg_token_tbl => l_mesg_token_tbl
728: , x_mesg_token_tbl => l_out_mesg_token_tbl

Line 738: EAM_ERROR_MESSAGE_PVT.Add_Error_Token

734: ROLLBACK TO ASSET_ISOLATION_ASSOCIATION;
735: WHEN G_SAFETY_ASSOCIATION_ERROR THEN
736:
737: l_out_mesg_token_tbl := l_mesg_token_tbl;
738: EAM_ERROR_MESSAGE_PVT.Add_Error_Token
739: ( p_message_name => 'EAM_SAF_ASSOCIATION_ERROR'
740: , p_token_tbl => l_token_tbl
741: , p_mesg_token_tbl => l_mesg_token_tbl
742: , x_mesg_token_tbl => l_out_mesg_token_tbl

Line 765: EAM_ERROR_MESSAGE_PVT.Add_Error_Token

761: WHERE csi.instance_id = l_safety_assoc_rec.TARGET_REF_ID
762: AND csi.last_vld_organization_id = l_safety_assoc_rec.ORGANIZATION_ID;
763:
764: l_out_mesg_token_tbl := l_mesg_token_tbl;
765: EAM_ERROR_MESSAGE_PVT.Add_Error_Token
766: ( p_message_name => 'EAM_SAF_DUPLICATE_ASSO_ERROR'
767: , p_token_tbl => l_token_tbl
768: , p_mesg_token_tbl => l_mesg_token_tbl
769: , x_mesg_token_tbl => l_out_mesg_token_tbl

Line 790: , x_Mesg_Token_Tbl OUT NOCOPY EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type

786: PROCEDURE VALIDATE_TRANSACTION_TYPE(
787: p_validation_level IN NUMBER
788: , p_entity IN VARCHAR2
789: , x_return_status OUT NOCOPY VARCHAR2
790: , x_Mesg_Token_Tbl OUT NOCOPY EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type
791: )IS
792: BEGIN
793:
794: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Inside EAM_SAFETY_ASSOCIATION_PVT.VALIDATE_TRANSACTION_TYPE'); end if;

Line 794: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Inside EAM_SAFETY_ASSOCIATION_PVT.VALIDATE_TRANSACTION_TYPE'); end if;

790: , x_Mesg_Token_Tbl OUT NOCOPY EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type
791: )IS
792: BEGIN
793:
794: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Inside EAM_SAFETY_ASSOCIATION_PVT.VALIDATE_TRANSACTION_TYPE'); end if;
795:
796: IF (p_entity = 'ASSOCIATION') THEN
797: IF (p_validation_level = EAM_PROCESS_WO_PVT.G_OPR_CREATE)
798: OR (p_validation_level = EAM_PROCESS_WO_PVT.G_OPR_UPDATE)