DBA Data[Home] [Help]

APPS.EAM_PROCESS_CLEARANCE_PVT dependencies on FND_API

Line 83: IF l_return_status <> FND_API.G_RET_STS_SUCCESS

79: , x_work_clearance_header_rec => x_work_clearance_header_rec
80: , x_mesg_token_tbl => l_out_Mesg_Token_Tbl
81: , x_return_status => l_return_status
82: );
83: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
84: THEN
85: EAM_ERROR_MESSAGE_PVT.Translate_And_Insert_Messages
86: ( p_mesg_token_Tbl => l_out_Mesg_Token_Tbl
87: , p_error_level => l_error_level

Line 90: raise fnd_api.g_exc_unexpected_error;

86: ( p_mesg_token_Tbl => l_out_Mesg_Token_Tbl
87: , p_error_level => l_error_level
88: , p_entity_index => l_entity_index
89: );
90: raise fnd_api.g_exc_unexpected_error;
91: END IF;
92:
93: l_clearance_id :=x_work_clearance_header_rec.work_clearance_id;
94:

Line 110: IF l_return_status <> FND_API.G_RET_STS_SUCCESS

106: , x_return_status => l_return_status
107: );
108: END IF;
109:
110: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
111: THEN
112: EAM_ERROR_MESSAGE_PVT.Translate_And_Insert_Messages
113: ( p_mesg_token_Tbl => l_out_Mesg_Token_Tbl
114: , p_error_level => l_error_level

Line 117: raise fnd_api.g_exc_unexpected_error;

113: ( p_mesg_token_Tbl => l_out_Mesg_Token_Tbl
114: , p_error_level => l_error_level
115: , p_entity_index => l_entity_index
116: );
117: raise fnd_api.g_exc_unexpected_error;
118: END IF;
119:
120: IF p_clearance_re_estabish_tbl.COUNT > 0 THEN
121: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling Re-ESTABLISHMENT from PROCESS_WORK_CLEARANCE'); end if;

Line 134: IF l_return_status <> FND_API.G_RET_STS_SUCCESS

130: , x_return_status => l_return_status
131: );
132: END IF;
133:
134: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
135: THEN
136: EAM_ERROR_MESSAGE_PVT.Translate_And_Insert_Messages
137: ( p_mesg_token_Tbl => l_out_Mesg_Token_Tbl
138: , p_error_level => l_error_level

Line 141: raise fnd_api.g_exc_unexpected_error;

137: ( p_mesg_token_Tbl => l_out_Mesg_Token_Tbl
138: , p_error_level => l_error_level
139: , p_entity_index => l_entity_index
140: );
141: raise fnd_api.g_exc_unexpected_error;
142: END IF;
143:
144: IF p_clearance_permit_asso_tbl.COUNT > 0 THEN
145: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling PERMIT_CLEARANCE_ASSOCIATION from PROCESS_WORK_CLEARANCE'); end if;

Line 168: IF l_return_status <> FND_API.G_RET_STS_SUCCESS

164: , x_return_status => l_return_status
165: );
166:
167: END IF;
168: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
169: THEN
170: EAM_ERROR_MESSAGE_PVT.Translate_And_Insert_Messages
171: ( p_mesg_token_Tbl => l_out_Mesg_Token_Tbl
172: , p_error_level => l_error_level

Line 175: raise fnd_api.g_exc_unexpected_error;

171: ( p_mesg_token_Tbl => l_out_Mesg_Token_Tbl
172: , p_error_level => l_error_level
173: , p_entity_index => l_entity_index
174: );
175: raise fnd_api.g_exc_unexpected_error;
176: END IF;
177:
178: IF p_clearance_workorder_asso_tbl.COUNT > 0 THEN
179: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling CLEARANCE_WO_ASSOCIATION from PROCESS_WORK_CLEARANCE'); end if;

Line 200: IF l_return_status <> FND_API.G_RET_STS_SUCCESS

196: );
197: END IF;
198:
199:
200: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
201: THEN
202: EAM_ERROR_MESSAGE_PVT.Translate_And_Insert_Messages
203: ( p_mesg_token_Tbl => l_out_Mesg_Token_Tbl
204: , p_error_level => l_error_level

Line 207: raise fnd_api.g_exc_unexpected_error;

203: ( p_mesg_token_Tbl => l_out_Mesg_Token_Tbl
204: , p_error_level => l_error_level
205: , p_entity_index => l_entity_index
206: );
207: raise fnd_api.g_exc_unexpected_error;
208: END IF;
209:
210: x_return_status :=l_return_status;
211:

Line 212: IF (p_commit = FND_API.G_TRUE) THEN

208: END IF;
209:
210: x_return_status :=l_return_status;
211:
212: IF (p_commit = FND_API.G_TRUE) THEN
213: COMMIT;
214: END IF;
215:
216:

Line 219: WHEN fnd_api.g_exc_unexpected_error THEN

215:
216:
217: EXCEPTION
218:
219: WHEN fnd_api.g_exc_unexpected_error THEN
220: ROLLBACK TO PROCESS_WORK_CLEARANCE;
221: x_return_status := FND_API.G_RET_STS_ERROR;
222: x_msg_count := EAM_ERROR_MESSAGE_PVT.Get_Message_Count;
223:

Line 221: x_return_status := FND_API.G_RET_STS_ERROR;

217: EXCEPTION
218:
219: WHEN fnd_api.g_exc_unexpected_error THEN
220: ROLLBACK TO PROCESS_WORK_CLEARANCE;
221: x_return_status := FND_API.G_RET_STS_ERROR;
222: x_msg_count := EAM_ERROR_MESSAGE_PVT.Get_Message_Count;
223:
224: WHEN OTHERS THEN
225: ROLLBACK TO PROCESS_WORK_CLEARANCE;

Line 226: x_return_status := FND_API.G_RET_STS_ERROR;

222: x_msg_count := EAM_ERROR_MESSAGE_PVT.Get_Message_Count;
223:
224: WHEN OTHERS THEN
225: ROLLBACK TO PROCESS_WORK_CLEARANCE;
226: x_return_status := FND_API.G_RET_STS_ERROR;
227:
228:
229: END PROCESS_WORK_CLEARANCE;
230:

Line 291: IF l_return_status <> FND_API.G_RET_STS_SUCCESS

287: , x_mesg_token_Tbl => l_Mesg_Token_Tbl
288: , x_return_Status => l_return_status
289: );
290:
291: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
292: THEN
293: RAISE l_clearance_transaction_error;
294: END IF;
295: -- test_mesg('status 1 :'||l_return_status);

Line 297: IF (l_work_clearance_id IS NULL) OR (l_work_clearance_id = FND_API.G_MISS_NUM) THEN

293: RAISE l_clearance_transaction_error;
294: END IF;
295: -- test_mesg('status 1 :'||l_return_status);
296: IF (p_validation_level = EAM_PROCESS_WO_PVT.G_OPR_CREATE) THEN
297: IF (l_work_clearance_id IS NULL) OR (l_work_clearance_id = FND_API.G_MISS_NUM) THEN
298: OPEN C4;
299: FETCH C4 INTO l_work_clearance_id;
300: CLOSE C4;
301: l_work_clearance_header_rec.work_clearance_id :=l_work_clearance_id;

Line 314: IF l_return_status <> FND_API.G_RET_STS_SUCCESS

310: , x_mesg_token_Tbl => l_Mesg_Token_Tbl
311: , x_return_Status => l_return_status
312: );
313: -- test_mesg('status 2 :'||l_return_status);
314: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
315: THEN
316: RAISE l_clearance_existence_error;
317: END IF;
318:

Line 340: IF l_return_status <> FND_API.G_RET_STS_SUCCESS

336: , x_mesg_token_Tbl => l_Mesg_Token_Tbl
337: , x_return_Status => l_return_status
338: );
339: -- test_mesg('status 4 :'||l_return_status);
340: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
341: THEN
342: RAISE l_clearance_required_error;
343: END IF;
344:

Line 354: IF l_return_status <> FND_API.G_RET_STS_SUCCESS

350: , x_mesg_token_Tbl => l_Mesg_Token_Tbl
351: , x_return_Status => l_return_status
352: );
353: -- test_mesg('status 5 :'||l_return_status);
354: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
355: THEN
356: RAISE l_clearance_attributes_error;
357: END IF;
358:

Line 435: IF l_return_status <> FND_API.G_RET_STS_SUCCESS

431: , x_mesg_token_Tbl => l_Mesg_Token_Tbl
432: , x_return_Status => l_return_status
433: );
434: -- test_mesg('status 6 :'||l_return_status);
435: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
436: THEN
437: RAISE l_clearance_write_error;
438: END IF;
439:

Line 447: OR (p_work_clearance_header_rec.APPROVED_BY <> FND_API.G_MISS_NUM))

443:
444: --If clearance is approved and no workflow then call the procedure CHANGE_WORK_PERMIT_STATUS
445: IF((l_workflow_enabled = 'N')
446: OR (p_work_clearance_header_rec.APPROVED_BY IS NOT NULL)
447: OR (p_work_clearance_header_rec.APPROVED_BY <> FND_API.G_MISS_NUM))
448: AND (l_old_wc_header_rec.system_status <>l_work_clearance_header_rec.system_status) THEN
449:
450: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Calling CHANGE_WORK_PERMIT_STATUS') ; END IF ;
451:

Line 465: l_return_status := FND_API.G_RET_STS_ERROR;

461: );
462:
463: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Status Change completed with status ' || l_return_status) ; END IF ;
464: IF NVL(l_return_status, 'S') <> 'S' THEN
465: l_return_status := FND_API.G_RET_STS_ERROR;
466: RAISE l_clearance_status_change;
467:
468: END IF;
469:

Line 512: x_return_status := FND_API.G_RET_STS_ERROR;

508: , x_mesg_token_tbl => l_out_mesg_token_tbl
509: );
510: l_mesg_token_tbl := l_out_mesg_token_tbl;
511:
512: x_return_status := FND_API.G_RET_STS_ERROR;
513: x_mesg_token_tbl := l_mesg_token_tbl ;
514: ROLLBACK TO WORK_CLEARANCE;
515:
516: WHEN l_clearance_transaction_error then

Line 529: x_return_status := FND_API.G_RET_STS_ERROR;

525: , x_mesg_token_tbl => l_out_mesg_token_tbl
526: );
527: l_mesg_token_tbl := l_out_mesg_token_tbl;
528:
529: x_return_status := FND_API.G_RET_STS_ERROR;
530: x_mesg_token_tbl := l_mesg_token_tbl ;
531: ROLLBACK TO WORK_CLEARANCE;
532:
533: WHEN l_clearance_existence_error then

Line 546: x_return_status := FND_API.G_RET_STS_ERROR;

542: , x_mesg_token_tbl => l_out_mesg_token_tbl
543: );
544: l_mesg_token_tbl := l_out_mesg_token_tbl;
545:
546: x_return_status := FND_API.G_RET_STS_ERROR;
547: x_mesg_token_tbl := l_mesg_token_tbl ;
548: ROLLBACK TO WORK_CLEARANCE;
549: WHEN l_clearance_required_error then
550: l_token_tbl(1).token_name := 'SAFETY_NAME';

Line 562: x_return_status := FND_API.G_RET_STS_ERROR;

558: , x_mesg_token_tbl => l_out_mesg_token_tbl
559: );
560: l_mesg_token_tbl := l_out_mesg_token_tbl;
561:
562: x_return_status := FND_API.G_RET_STS_ERROR;
563: x_mesg_token_tbl := l_mesg_token_tbl ;
564: ROLLBACK TO WORK_CLEARANCE;
565: WHEN l_clearance_attributes_error then
566: l_token_tbl(1).token_name := 'SAFETY_NAME';

Line 578: x_return_status := FND_API.G_RET_STS_ERROR;

574: , x_mesg_token_tbl => l_out_mesg_token_tbl
575: );
576:
577: l_mesg_token_tbl := l_out_mesg_token_tbl;
578: x_return_status := FND_API.G_RET_STS_ERROR;
579: x_mesg_token_tbl := l_mesg_token_tbl ;
580: ROLLBACK TO WORK_CLEARANCE;
581: WHEN l_clearance_status_change then
582: l_token_tbl(1).token_name := 'SAFETY_NAME';

Line 593: x_return_status := FND_API.G_RET_STS_ERROR;

589: , p_mesg_token_tbl => l_mesg_token_tbl
590: , x_mesg_token_tbl => l_out_mesg_token_tbl
591: );
592: l_mesg_token_tbl := l_out_mesg_token_tbl;
593: x_return_status := FND_API.G_RET_STS_ERROR;
594: x_mesg_token_tbl := l_mesg_token_tbl ;
595: ROLLBACK TO WORK_CLEARANCE;
596:
597: WHEN OTHERS THEN

Line 609: x_return_status := FND_API.G_RET_STS_ERROR;

605: , x_mesg_token_tbl => l_out_mesg_token_tbl
606: );
607: l_mesg_token_tbl := l_out_mesg_token_tbl;
608:
609: x_return_status := FND_API.G_RET_STS_ERROR;
610: x_mesg_token_tbl := l_mesg_token_tbl ;
611: ROLLBACK TO WORK_CLEARANCE;
612:
613: END WORK_CLEARANCE;

Line 714: x_return_status := FND_API.G_RET_STS_ERROR;

710:
711: EXCEPTION
712: WHEN OTHERS THEN
713: WF_CORE.CONTEXT('Enterprise Asset Management...',l_event_name,'Exception during event construction and raise: ' || SQLERRM);
714: x_return_status := FND_API.G_RET_STS_ERROR;
715:
716: END RAISE_WORKFLOW_EVENTS;
717:
718: /*********************************************************

Line 737: x_return_status := FND_API.G_RET_STS_SUCCESS;

733:
734: IF (p_entity = 'WORK CLEARANCE') THEN
735: IF (p_validation_level = EAM_PROCESS_WO_PVT.G_OPR_CREATE)
736: OR (p_validation_level = EAM_PROCESS_WO_PVT.G_OPR_UPDATE) then
737: x_return_status := FND_API.G_RET_STS_SUCCESS;
738:
739: ELSE
740: x_return_status := FND_API.G_RET_STS_ERROR;
741: END IF;

Line 740: x_return_status := FND_API.G_RET_STS_ERROR;

736: OR (p_validation_level = EAM_PROCESS_WO_PVT.G_OPR_UPDATE) then
737: x_return_status := FND_API.G_RET_STS_SUCCESS;
738:
739: ELSE
740: x_return_status := FND_API.G_RET_STS_ERROR;
741: END IF;
742:
743: END IF;
744: END VALIDATE_TRANSACTION_TYPE;

Line 813: IF l_return_status <> FND_API.G_RET_STS_SUCCESS

809: , x_work_clearance_header_rec => l_wc_header_rec
810: , x_return_Status => l_return_status
811: );
812:
813: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
814: THEN
815: RAISE fnd_api.g_exc_unexpected_error;
816: END IF;
817: /*Get the next permit name sequence*/

Line 815: RAISE fnd_api.g_exc_unexpected_error;

811: );
812:
813: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
814: THEN
815: RAISE fnd_api.g_exc_unexpected_error;
816: END IF;
817: /*Get the next permit name sequence*/
818: OPEN C;
819: FETCH C INTO l_clearance_name;

Line 865: IF(l_return_status = FND_API.G_RET_STS_SUCCESS ) THEN

861: );
862:
863: -- x_return_status :=l_return_status;
864:
865: IF(l_return_status = FND_API.G_RET_STS_SUCCESS ) THEN
866: px_clearance_id :=l_out_wc_header_rec.WORK_CLEARANCE_ID;
867: /* IF(p_commit = FND_API.G_TRUE) THEN
868: COMMIT;
869: END IF;*/

Line 867: /* IF(p_commit = FND_API.G_TRUE) THEN

863: -- x_return_status :=l_return_status;
864:
865: IF(l_return_status = FND_API.G_RET_STS_SUCCESS ) THEN
866: px_clearance_id :=l_out_wc_header_rec.WORK_CLEARANCE_ID;
867: /* IF(p_commit = FND_API.G_TRUE) THEN
868: COMMIT;
869: END IF;*/
870: END IF;
871:

Line 873: IF l_return_status <> FND_API.G_RET_STS_SUCCESS

869: END IF;*/
870: END IF;
871:
872:
873: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
874: THEN
875: EAM_ERROR_MESSAGE_PVT.Translate_And_Insert_Messages
876: ( p_mesg_token_Tbl => l_out_Mesg_Token_Tbl
877: , p_error_level => l_error_level

Line 880: raise fnd_api.g_exc_unexpected_error;

876: ( p_mesg_token_Tbl => l_out_Mesg_Token_Tbl
877: , p_error_level => l_error_level
878: , p_entity_index => l_entity_index
879: );
880: raise fnd_api.g_exc_unexpected_error;
881: END IF;
882:
883: -- Copy all establishment and re-establishment records
884: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Start of copy ESTABLISHMENT from copy clearance '); end if;

Line 959: IF(x_return_status = FND_API.G_RET_STS_SUCCESS ) THEN

955: END IF;
956:
957: x_return_status :=l_return_status;
958:
959: IF(x_return_status = FND_API.G_RET_STS_SUCCESS ) THEN
960: IF(p_commit = FND_API.G_TRUE) THEN
961: COMMIT;
962: END IF;
963: END IF;

Line 960: IF(p_commit = FND_API.G_TRUE) THEN

956:
957: x_return_status :=l_return_status;
958:
959: IF(x_return_status = FND_API.G_RET_STS_SUCCESS ) THEN
960: IF(p_commit = FND_API.G_TRUE) THEN
961: COMMIT;
962: END IF;
963: END IF;
964:

Line 966: IF l_return_status <> FND_API.G_RET_STS_SUCCESS

962: END IF;
963: END IF;
964:
965:
966: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
967: THEN
968: EAM_ERROR_MESSAGE_PVT.Translate_And_Insert_Messages
969: ( p_mesg_token_Tbl => l_out_Mesg_Token_Tbl
970: , p_error_level => l_error_level

Line 973: raise fnd_api.g_exc_unexpected_error;

969: ( p_mesg_token_Tbl => l_out_Mesg_Token_Tbl
970: , p_error_level => l_error_level
971: , p_entity_index => l_entity_index
972: );
973: raise fnd_api.g_exc_unexpected_error;
974: END IF;
975:
976: EXCEPTION
977: WHEN fnd_api.g_exc_unexpected_error THEN

Line 977: WHEN fnd_api.g_exc_unexpected_error THEN

973: raise fnd_api.g_exc_unexpected_error;
974: END IF;
975:
976: EXCEPTION
977: WHEN fnd_api.g_exc_unexpected_error THEN
978: ROLLBACK TO COPY_WORK_CLEARANCE;
979: x_return_status := FND_API.G_RET_STS_ERROR;
980: x_msg_count := EAM_ERROR_MESSAGE_PVT.Get_Message_Count;
981: WHEN OTHERS THEN

Line 979: x_return_status := FND_API.G_RET_STS_ERROR;

975:
976: EXCEPTION
977: WHEN fnd_api.g_exc_unexpected_error THEN
978: ROLLBACK TO COPY_WORK_CLEARANCE;
979: x_return_status := FND_API.G_RET_STS_ERROR;
980: x_msg_count := EAM_ERROR_MESSAGE_PVT.Get_Message_Count;
981: WHEN OTHERS THEN
982: ROLLBACK TO COPY_WORK_CLEARANCE;
983: x_return_status := FND_API.G_RET_STS_ERROR;

Line 983: x_return_status := FND_API.G_RET_STS_ERROR;

979: x_return_status := FND_API.G_RET_STS_ERROR;
980: x_msg_count := EAM_ERROR_MESSAGE_PVT.Get_Message_Count;
981: WHEN OTHERS THEN
982: ROLLBACK TO COPY_WORK_CLEARANCE;
983: x_return_status := FND_API.G_RET_STS_ERROR;
984:
985: END COPY_WORK_CLEARANCE;
986:
987: