156: cln_debug_pub.Add('TP Detail Id -'||l_tp_dtl_id, 1);
157: END IF;
158: EXCEPTION
159: WHEN NO_DATA_FOUND THEN
160: --FND_MESSAGE.SET_NAME('CLN','M4U_TP_DTL_SETUP_NEW');
161: --l_msg_data := FND_MESSAGE.GET;
162: l_record_found := FALSE;
163:
164: IF (l_Debug_Level <= 1) THEN
157: END IF;
158: EXCEPTION
159: WHEN NO_DATA_FOUND THEN
160: --FND_MESSAGE.SET_NAME('CLN','M4U_TP_DTL_SETUP_NEW');
161: --l_msg_data := FND_MESSAGE.GET;
162: l_record_found := FALSE;
163:
164: IF (l_Debug_Level <= 1) THEN
165: cln_debug_pub.Add('-- TP Detail Setup for M4U does not exist --',1);
165: cln_debug_pub.Add('-- TP Detail Setup for M4U does not exist --',1);
166: END IF;
167:
168: WHEN OTHERS THEN
169: FND_MESSAGE.SET_NAME('CLN','M4U_TP_DTL_SETUP_ISSUE');
170: FND_MESSAGE.SET_TOKEN('PARAM1',l_transaction_type);
171: FND_MESSAGE.SET_TOKEN('PARAM2',l_transaction_subtype);
172: FND_MESSAGE.SET_TOKEN('PARAM3',l_direction);
173: FND_MESSAGE.SET_TOKEN('PARAM4',l_standard_code);
166: END IF;
167:
168: WHEN OTHERS THEN
169: FND_MESSAGE.SET_NAME('CLN','M4U_TP_DTL_SETUP_ISSUE');
170: FND_MESSAGE.SET_TOKEN('PARAM1',l_transaction_type);
171: FND_MESSAGE.SET_TOKEN('PARAM2',l_transaction_subtype);
172: FND_MESSAGE.SET_TOKEN('PARAM3',l_direction);
173: FND_MESSAGE.SET_TOKEN('PARAM4',l_standard_code);
174: l_msg_data := FND_MESSAGE.GET;
167:
168: WHEN OTHERS THEN
169: FND_MESSAGE.SET_NAME('CLN','M4U_TP_DTL_SETUP_ISSUE');
170: FND_MESSAGE.SET_TOKEN('PARAM1',l_transaction_type);
171: FND_MESSAGE.SET_TOKEN('PARAM2',l_transaction_subtype);
172: FND_MESSAGE.SET_TOKEN('PARAM3',l_direction);
173: FND_MESSAGE.SET_TOKEN('PARAM4',l_standard_code);
174: l_msg_data := FND_MESSAGE.GET;
175: RAISE FND_API.G_EXC_ERROR;
168: WHEN OTHERS THEN
169: FND_MESSAGE.SET_NAME('CLN','M4U_TP_DTL_SETUP_ISSUE');
170: FND_MESSAGE.SET_TOKEN('PARAM1',l_transaction_type);
171: FND_MESSAGE.SET_TOKEN('PARAM2',l_transaction_subtype);
172: FND_MESSAGE.SET_TOKEN('PARAM3',l_direction);
173: FND_MESSAGE.SET_TOKEN('PARAM4',l_standard_code);
174: l_msg_data := FND_MESSAGE.GET;
175: RAISE FND_API.G_EXC_ERROR;
176: END;
169: FND_MESSAGE.SET_NAME('CLN','M4U_TP_DTL_SETUP_ISSUE');
170: FND_MESSAGE.SET_TOKEN('PARAM1',l_transaction_type);
171: FND_MESSAGE.SET_TOKEN('PARAM2',l_transaction_subtype);
172: FND_MESSAGE.SET_TOKEN('PARAM3',l_direction);
173: FND_MESSAGE.SET_TOKEN('PARAM4',l_standard_code);
174: l_msg_data := FND_MESSAGE.GET;
175: RAISE FND_API.G_EXC_ERROR;
176: END;
177:
170: FND_MESSAGE.SET_TOKEN('PARAM1',l_transaction_type);
171: FND_MESSAGE.SET_TOKEN('PARAM2',l_transaction_subtype);
172: FND_MESSAGE.SET_TOKEN('PARAM3',l_direction);
173: FND_MESSAGE.SET_TOKEN('PARAM4',l_standard_code);
174: l_msg_data := FND_MESSAGE.GET;
175: RAISE FND_API.G_EXC_ERROR;
176: END;
177:
178: BEGIN
207: cln_debug_pub.Add('-- Ext Process ID does not exist --',1);
208: END IF;
209:
210: WHEN TOO_MANY_ROWS THEN
211: FND_MESSAGE.SET_NAME('CLN','M4U_EXT_PROCESS_SETUP_EXISTS');
212: FND_MESSAGE.SET_TOKEN('PARAM1',l_transaction_type);
213: FND_MESSAGE.SET_TOKEN('PARAM2',l_transaction_subtype);
214: FND_MESSAGE.SET_TOKEN('PARAM3',l_direction);
215: FND_MESSAGE.SET_TOKEN('PARAM4',l_standard_code);
208: END IF;
209:
210: WHEN TOO_MANY_ROWS THEN
211: FND_MESSAGE.SET_NAME('CLN','M4U_EXT_PROCESS_SETUP_EXISTS');
212: FND_MESSAGE.SET_TOKEN('PARAM1',l_transaction_type);
213: FND_MESSAGE.SET_TOKEN('PARAM2',l_transaction_subtype);
214: FND_MESSAGE.SET_TOKEN('PARAM3',l_direction);
215: FND_MESSAGE.SET_TOKEN('PARAM4',l_standard_code);
216: l_msg_data := FND_MESSAGE.GET;
209:
210: WHEN TOO_MANY_ROWS THEN
211: FND_MESSAGE.SET_NAME('CLN','M4U_EXT_PROCESS_SETUP_EXISTS');
212: FND_MESSAGE.SET_TOKEN('PARAM1',l_transaction_type);
213: FND_MESSAGE.SET_TOKEN('PARAM2',l_transaction_subtype);
214: FND_MESSAGE.SET_TOKEN('PARAM3',l_direction);
215: FND_MESSAGE.SET_TOKEN('PARAM4',l_standard_code);
216: l_msg_data := FND_MESSAGE.GET;
217:
210: WHEN TOO_MANY_ROWS THEN
211: FND_MESSAGE.SET_NAME('CLN','M4U_EXT_PROCESS_SETUP_EXISTS');
212: FND_MESSAGE.SET_TOKEN('PARAM1',l_transaction_type);
213: FND_MESSAGE.SET_TOKEN('PARAM2',l_transaction_subtype);
214: FND_MESSAGE.SET_TOKEN('PARAM3',l_direction);
215: FND_MESSAGE.SET_TOKEN('PARAM4',l_standard_code);
216: l_msg_data := FND_MESSAGE.GET;
217:
218: IF (l_Debug_Level <= 1) THEN
211: FND_MESSAGE.SET_NAME('CLN','M4U_EXT_PROCESS_SETUP_EXISTS');
212: FND_MESSAGE.SET_TOKEN('PARAM1',l_transaction_type);
213: FND_MESSAGE.SET_TOKEN('PARAM2',l_transaction_subtype);
214: FND_MESSAGE.SET_TOKEN('PARAM3',l_direction);
215: FND_MESSAGE.SET_TOKEN('PARAM4',l_standard_code);
216: l_msg_data := FND_MESSAGE.GET;
217:
218: IF (l_Debug_Level <= 1) THEN
219: cln_debug_pub.Add('-- Two Many Ext Process ID for M4U exists --',1);
212: FND_MESSAGE.SET_TOKEN('PARAM1',l_transaction_type);
213: FND_MESSAGE.SET_TOKEN('PARAM2',l_transaction_subtype);
214: FND_MESSAGE.SET_TOKEN('PARAM3',l_direction);
215: FND_MESSAGE.SET_TOKEN('PARAM4',l_standard_code);
216: l_msg_data := FND_MESSAGE.GET;
217:
218: IF (l_Debug_Level <= 1) THEN
219: cln_debug_pub.Add('-- Two Many Ext Process ID for M4U exists --',1);
220: END IF;
255: p_confirmation => l_doc_conf
256: );
257:
258: IF l_retcode <> 0 THEN
259: FND_MESSAGE.SET_NAME('CLN','M4U_ECXTPDTL_API_FAILED');
260: FND_MESSAGE.SET_TOKEN('PARAM1','create');
261: l_msg_data := FND_MESSAGE.GET;
262: RAISE FND_API.G_EXC_ERROR;
263: END IF;
256: );
257:
258: IF l_retcode <> 0 THEN
259: FND_MESSAGE.SET_NAME('CLN','M4U_ECXTPDTL_API_FAILED');
260: FND_MESSAGE.SET_TOKEN('PARAM1','create');
261: l_msg_data := FND_MESSAGE.GET;
262: RAISE FND_API.G_EXC_ERROR;
263: END IF;
264:
257:
258: IF l_retcode <> 0 THEN
259: FND_MESSAGE.SET_NAME('CLN','M4U_ECXTPDTL_API_FAILED');
260: FND_MESSAGE.SET_TOKEN('PARAM1','create');
261: l_msg_data := FND_MESSAGE.GET;
262: RAISE FND_API.G_EXC_ERROR;
263: END IF;
264:
265: IF (l_Debug_Level <= 1) THEN
290: p_passupd_flag => 'Y'
291: );
292:
293: IF l_retcode <> 0 THEN
294: FND_MESSAGE.SET_NAME('CLN','M4U_ECXTPDTL_API_FAILED');
295: FND_MESSAGE.SET_TOKEN('PARAM1','update');
296: l_msg_data := FND_MESSAGE.GET;
297: RAISE FND_API.G_EXC_ERROR;
298: END IF;
291: );
292:
293: IF l_retcode <> 0 THEN
294: FND_MESSAGE.SET_NAME('CLN','M4U_ECXTPDTL_API_FAILED');
295: FND_MESSAGE.SET_TOKEN('PARAM1','update');
296: l_msg_data := FND_MESSAGE.GET;
297: RAISE FND_API.G_EXC_ERROR;
298: END IF;
299:
292:
293: IF l_retcode <> 0 THEN
294: FND_MESSAGE.SET_NAME('CLN','M4U_ECXTPDTL_API_FAILED');
295: FND_MESSAGE.SET_TOKEN('PARAM1','update');
296: l_msg_data := FND_MESSAGE.GET;
297: RAISE FND_API.G_EXC_ERROR;
298: END IF;
299:
300: IF (l_Debug_Level <= 1) THEN
445: cln_debug_pub.Add('Object Version No -'||l_obj_ver_num, 1);
446: END IF;
447:
448: WHEN OTHERS THEN
449: FND_MESSAGE.SET_NAME('CLN','M4U_HR_API_ISSUE');
450: l_msg_data := FND_MESSAGE.GET;
451: RAISE FND_API.G_EXC_ERROR;
452: END;
453:
446: END IF;
447:
448: WHEN OTHERS THEN
449: FND_MESSAGE.SET_NAME('CLN','M4U_HR_API_ISSUE');
450: l_msg_data := FND_MESSAGE.GET;
451: RAISE FND_API.G_EXC_ERROR;
452: END;
453:
454: IF NOT l_record_found THEN
456: cln_debug_pub.Add('---- Setup HR Location Values in DB ----', 1);
457: cln_debug_pub.Add('---- Call HR_LOCATION_API.create_location ----', 1);
458: END IF;
459:
460: FND_MESSAGE.SET_NAME('CLN','M4U_HR_API_FAILED');
461: FND_MESSAGE.SET_TOKEN('PARAM','Create');
462: l_msg_data := FND_MESSAGE.GET;
463:
464: HR_LOCATION_API.create_location(
457: cln_debug_pub.Add('---- Call HR_LOCATION_API.create_location ----', 1);
458: END IF;
459:
460: FND_MESSAGE.SET_NAME('CLN','M4U_HR_API_FAILED');
461: FND_MESSAGE.SET_TOKEN('PARAM','Create');
462: l_msg_data := FND_MESSAGE.GET;
463:
464: HR_LOCATION_API.create_location(
465: p_effective_date => sysdate,
458: END IF;
459:
460: FND_MESSAGE.SET_NAME('CLN','M4U_HR_API_FAILED');
461: FND_MESSAGE.SET_TOKEN('PARAM','Create');
462: l_msg_data := FND_MESSAGE.GET;
463:
464: HR_LOCATION_API.create_location(
465: p_effective_date => sysdate,
466: p_language_code => userenv('LANG'),
484: cln_debug_pub.Add('---- Update HR Location Values in DB ----', 1);
485: cln_debug_pub.Add('---- Call HR_LOCATION_API.update_location ----', 1);
486: END IF;
487:
488: FND_MESSAGE.SET_NAME('CLN','M4U_HR_API_FAILED');
489: FND_MESSAGE.SET_TOKEN('PARAM','Update');
490: l_msg_data := FND_MESSAGE.GET;
491:
492: HR_LOCATION_API.update_location(
485: cln_debug_pub.Add('---- Call HR_LOCATION_API.update_location ----', 1);
486: END IF;
487:
488: FND_MESSAGE.SET_NAME('CLN','M4U_HR_API_FAILED');
489: FND_MESSAGE.SET_TOKEN('PARAM','Update');
490: l_msg_data := FND_MESSAGE.GET;
491:
492: HR_LOCATION_API.update_location(
493: p_effective_date => sysdate,
486: END IF;
487:
488: FND_MESSAGE.SET_NAME('CLN','M4U_HR_API_FAILED');
489: FND_MESSAGE.SET_TOKEN('PARAM','Update');
490: l_msg_data := FND_MESSAGE.GET;
491:
492: HR_LOCATION_API.update_location(
493: p_effective_date => sysdate,
494: p_language_code => userenv('LANG'),
543: cln_debug_pub.Add('-- TP Header Setup for M4U does not exist --',1);
544: END IF;
545:
546: WHEN OTHERS THEN
547: FND_MESSAGE.SET_NAME('CLN','M4U_TP_HDR_SETUP_ISSUE');
548: l_msg_data := FND_MESSAGE.GET;
549: RAISE FND_API.G_EXC_ERROR;
550: END;
551:
544: END IF;
545:
546: WHEN OTHERS THEN
547: FND_MESSAGE.SET_NAME('CLN','M4U_TP_HDR_SETUP_ISSUE');
548: l_msg_data := FND_MESSAGE.GET;
549: RAISE FND_API.G_EXC_ERROR;
550: END;
551:
552: IF NOT l_record_found THEN
571: cln_debug_pub.Add('Return Code - '||l_retcode, 1);
572: END IF;
573:
574: IF l_retcode <> 0 THEN
575: FND_MESSAGE.SET_NAME('CLN','M4U_ECXTPHDR_API_FAILED');
576: FND_MESSAGE.SET_TOKEN('PARAM','Create');
577: l_msg_data := FND_MESSAGE.GET||' : '||l_retmesg;
578: RAISE FND_API.G_EXC_ERROR;
579: END IF;
572: END IF;
573:
574: IF l_retcode <> 0 THEN
575: FND_MESSAGE.SET_NAME('CLN','M4U_ECXTPHDR_API_FAILED');
576: FND_MESSAGE.SET_TOKEN('PARAM','Create');
577: l_msg_data := FND_MESSAGE.GET||' : '||l_retmesg;
578: RAISE FND_API.G_EXC_ERROR;
579: END IF;
580:
573:
574: IF l_retcode <> 0 THEN
575: FND_MESSAGE.SET_NAME('CLN','M4U_ECXTPHDR_API_FAILED');
576: FND_MESSAGE.SET_TOKEN('PARAM','Create');
577: l_msg_data := FND_MESSAGE.GET||' : '||l_retmesg;
578: RAISE FND_API.G_EXC_ERROR;
579: END IF;
580:
581: IF (l_Debug_Level <= 1) THEN
600: cln_debug_pub.Add('Return Code - '||l_retcode, 1);
601: END IF;
602:
603: IF l_retcode <> 0 THEN
604: FND_MESSAGE.SET_NAME('CLN','M4U_ECXTPHDR_API_FAILED');
605: FND_MESSAGE.SET_TOKEN('PARAM','update');
606: l_msg_data := FND_MESSAGE.GET||' : '||l_retmesg;
607: RAISE FND_API.G_EXC_ERROR;
608: END IF;
601: END IF;
602:
603: IF l_retcode <> 0 THEN
604: FND_MESSAGE.SET_NAME('CLN','M4U_ECXTPHDR_API_FAILED');
605: FND_MESSAGE.SET_TOKEN('PARAM','update');
606: l_msg_data := FND_MESSAGE.GET||' : '||l_retmesg;
607: RAISE FND_API.G_EXC_ERROR;
608: END IF;
609:
602:
603: IF l_retcode <> 0 THEN
604: FND_MESSAGE.SET_NAME('CLN','M4U_ECXTPHDR_API_FAILED');
605: FND_MESSAGE.SET_TOKEN('PARAM','update');
606: l_msg_data := FND_MESSAGE.GET||' : '||l_retmesg;
607: RAISE FND_API.G_EXC_ERROR;
608: END IF;
609:
610: IF (l_Debug_Level <= 1) THEN
625: cln_debug_pub.Add('Return Code - '||l_retcode, 1);
626: END IF;
627:
628: IF l_retcode <> FND_API.G_RET_STS_SUCCESS THEN
629: FND_MESSAGE.SET_NAME('CLN','M4U_ECXTPDTL_FAILURE');
630: l_msg_data := FND_MESSAGE.GET||' : '||l_retmesg;
631: RAISE FND_API.G_EXC_ERROR;
632: END IF;
633:
626: END IF;
627:
628: IF l_retcode <> FND_API.G_RET_STS_SUCCESS THEN
629: FND_MESSAGE.SET_NAME('CLN','M4U_ECXTPDTL_FAILURE');
630: l_msg_data := FND_MESSAGE.GET||' : '||l_retmesg;
631: RAISE FND_API.G_EXC_ERROR;
632: END IF;
633:
634: --2
639: cln_debug_pub.Add('Return Code - '||l_retcode, 1);
640: END IF;
641:
642: IF l_retcode <> FND_API.G_RET_STS_SUCCESS THEN
643: FND_MESSAGE.SET_NAME('CLN','M4U_ECXTPDTL_FAILURE');
644: l_msg_data := FND_MESSAGE.GET||' : '||l_retmesg;
645: RAISE FND_API.G_EXC_ERROR;
646: END IF;
647:
640: END IF;
641:
642: IF l_retcode <> FND_API.G_RET_STS_SUCCESS THEN
643: FND_MESSAGE.SET_NAME('CLN','M4U_ECXTPDTL_FAILURE');
644: l_msg_data := FND_MESSAGE.GET||' : '||l_retmesg;
645: RAISE FND_API.G_EXC_ERROR;
646: END IF;
647:
648:
654: cln_debug_pub.Add('Return Code - '||l_retcode, 1);
655: END IF;
656:
657: IF l_retcode <> FND_API.G_RET_STS_SUCCESS THEN
658: FND_MESSAGE.SET_NAME('CLN','M4U_ECXTPDTL_FAILURE');
659: l_msg_data := FND_MESSAGE.GET||' : '||l_retmesg;
660: RAISE FND_API.G_EXC_ERROR;
661:
662: END IF;
655: END IF;
656:
657: IF l_retcode <> FND_API.G_RET_STS_SUCCESS THEN
658: FND_MESSAGE.SET_NAME('CLN','M4U_ECXTPDTL_FAILURE');
659: l_msg_data := FND_MESSAGE.GET||' : '||l_retmesg;
660: RAISE FND_API.G_EXC_ERROR;
661:
662: END IF;
663:
669: cln_debug_pub.Add('Return Code - '||l_retcode, 1);
670: END IF;
671:
672: IF l_retcode <> FND_API.G_RET_STS_SUCCESS THEN
673: FND_MESSAGE.SET_NAME('CLN','M4U_ECXTPDTL_FAILURE');
674: l_msg_data := FND_MESSAGE.GET||' : '||l_retmesg;
675: RAISE FND_API.G_EXC_ERROR;
676: END IF;
677:
670: END IF;
671:
672: IF l_retcode <> FND_API.G_RET_STS_SUCCESS THEN
673: FND_MESSAGE.SET_NAME('CLN','M4U_ECXTPDTL_FAILURE');
674: l_msg_data := FND_MESSAGE.GET||' : '||l_retmesg;
675: RAISE FND_API.G_EXC_ERROR;
676: END IF;
677:
678: --5
683: cln_debug_pub.Add('Return Code - '||l_retcode, 1);
684: END IF;
685:
686: IF l_retcode <> FND_API.G_RET_STS_SUCCESS THEN
687: FND_MESSAGE.SET_NAME('CLN','M4U_ECXTPDTL_FAILURE');
688: l_msg_data := FND_MESSAGE.GET||' : '||l_retmesg;
689: RAISE FND_API.G_EXC_ERROR;
690: END IF;
691:
684: END IF;
685:
686: IF l_retcode <> FND_API.G_RET_STS_SUCCESS THEN
687: FND_MESSAGE.SET_NAME('CLN','M4U_ECXTPDTL_FAILURE');
688: l_msg_data := FND_MESSAGE.GET||' : '||l_retmesg;
689: RAISE FND_API.G_EXC_ERROR;
690: END IF;
691:
692: --6
697: cln_debug_pub.Add('Return Code - '||l_retcode, 1);
698: END IF;
699:
700: IF l_retcode <> FND_API.G_RET_STS_SUCCESS THEN
701: FND_MESSAGE.SET_NAME('CLN','M4U_ECXTPDTL_FAILURE');
702: l_msg_data := FND_MESSAGE.GET||' : '||l_retmesg;
703: RAISE FND_API.G_EXC_ERROR;
704: END IF;
705:
698: END IF;
699:
700: IF l_retcode <> FND_API.G_RET_STS_SUCCESS THEN
701: FND_MESSAGE.SET_NAME('CLN','M4U_ECXTPDTL_FAILURE');
702: l_msg_data := FND_MESSAGE.GET||' : '||l_retmesg;
703: RAISE FND_API.G_EXC_ERROR;
704: END IF;
705:
706: --7
711: cln_debug_pub.Add('Return Code - '||l_retcode, 1);
712: END IF;
713:
714: IF l_retcode <> FND_API.G_RET_STS_SUCCESS THEN
715: FND_MESSAGE.SET_NAME('CLN','M4U_ECXTPDTL_FAILURE');
716: l_msg_data := FND_MESSAGE.GET||' : '||l_retmesg;
717: RAISE FND_API.G_EXC_ERROR;
718: END IF;
719:
712: END IF;
713:
714: IF l_retcode <> FND_API.G_RET_STS_SUCCESS THEN
715: FND_MESSAGE.SET_NAME('CLN','M4U_ECXTPDTL_FAILURE');
716: l_msg_data := FND_MESSAGE.GET||' : '||l_retmesg;
717: RAISE FND_API.G_EXC_ERROR;
718: END IF;
719:
720: --8
725: cln_debug_pub.Add('Return Code - '||l_retcode, 1);
726: END IF;
727:
728: IF l_retcode <> FND_API.G_RET_STS_SUCCESS THEN
729: FND_MESSAGE.SET_NAME('CLN','M4U_ECXTPDTL_FAILURE');
730: l_msg_data := FND_MESSAGE.GET||' : '||l_retmesg;
731: RAISE FND_API.G_EXC_ERROR;
732: END IF;
733:
726: END IF;
727:
728: IF l_retcode <> FND_API.G_RET_STS_SUCCESS THEN
729: FND_MESSAGE.SET_NAME('CLN','M4U_ECXTPDTL_FAILURE');
730: l_msg_data := FND_MESSAGE.GET||' : '||l_retmesg;
731: RAISE FND_API.G_EXC_ERROR;
732: END IF;
733:
734: --9
739: cln_debug_pub.Add('Return Code - '||l_retcode, 1);
740: END IF;
741:
742: IF l_retcode <> FND_API.G_RET_STS_SUCCESS THEN
743: FND_MESSAGE.SET_NAME('CLN','M4U_ECXTPDTL_FAILURE');
744: l_msg_data := FND_MESSAGE.GET||' : '||l_retmesg;
745: RAISE FND_API.G_EXC_ERROR;
746: END IF;
747:
740: END IF;
741:
742: IF l_retcode <> FND_API.G_RET_STS_SUCCESS THEN
743: FND_MESSAGE.SET_NAME('CLN','M4U_ECXTPDTL_FAILURE');
744: l_msg_data := FND_MESSAGE.GET||' : '||l_retmesg;
745: RAISE FND_API.G_EXC_ERROR;
746: END IF;
747:
748: --10
753: cln_debug_pub.Add('Return Code - '||l_retcode, 1);
754: END IF;
755:
756: IF l_retcode <> FND_API.G_RET_STS_SUCCESS THEN
757: FND_MESSAGE.SET_NAME('CLN','M4U_ECXTPDTL_FAILURE');
758: l_msg_data := FND_MESSAGE.GET||' : '||l_retmesg;
759: RAISE FND_API.G_EXC_ERROR;
760: END IF;
761:
754: END IF;
755:
756: IF l_retcode <> FND_API.G_RET_STS_SUCCESS THEN
757: FND_MESSAGE.SET_NAME('CLN','M4U_ECXTPDTL_FAILURE');
758: l_msg_data := FND_MESSAGE.GET||' : '||l_retmesg;
759: RAISE FND_API.G_EXC_ERROR;
760: END IF;
761:
762: --11
767: cln_debug_pub.Add('Return Code - '||l_retcode, 1);
768: END IF;
769:
770: IF l_retcode <> FND_API.G_RET_STS_SUCCESS THEN
771: FND_MESSAGE.SET_NAME('CLN','M4U_ECXTPDTL_FAILURE');
772: l_msg_data := FND_MESSAGE.GET||' : '||l_retmesg;
773: RAISE FND_API.G_EXC_ERROR;
774: END IF;
775:
768: END IF;
769:
770: IF l_retcode <> FND_API.G_RET_STS_SUCCESS THEN
771: FND_MESSAGE.SET_NAME('CLN','M4U_ECXTPDTL_FAILURE');
772: l_msg_data := FND_MESSAGE.GET||' : '||l_retmesg;
773: RAISE FND_API.G_EXC_ERROR;
774: END IF;
775:
776: x_retcode := 0;
792: END IF;
793:
794: WHEN OTHERS THEN
795: x_retcode := 2;
796: FND_MESSAGE.SET_NAME('CLN','M4U_SETUP_FAILURE');
797: -- Setup Failed
798: x_errbuf := FND_MESSAGE.GET || ' - ' ||SQLCODE||' - '||SQLERRM;
799:
800: IF (l_Debug_Level <= 2) THEN
794: WHEN OTHERS THEN
795: x_retcode := 2;
796: FND_MESSAGE.SET_NAME('CLN','M4U_SETUP_FAILURE');
797: -- Setup Failed
798: x_errbuf := FND_MESSAGE.GET || ' - ' ||SQLCODE||' - '||SQLERRM;
799:
800: IF (l_Debug_Level <= 2) THEN
801: cln_debug_pub.Add('ERROR : '||x_errbuf, 2);
802: cln_debug_pub.Add('==========ERROR :EXTING SETUP API ===========', 2);