DBA Data[Home] [Help]

APPS.IGC_CC_APPROVAL_WF_PKG dependencies on FND_API

Line 195: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

191: IF ( funcmode = 'RUN' ) THEN
192:
193: Get_Parameters(x_return_status =>l_return_status );
194:
195: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
196: raise FND_API.G_EXC_ERROR;
197: END IF;
198:
199: IF (g_wf_version = 1) THEN --First version - no approval hierarchy

Line 196: raise FND_API.G_EXC_ERROR;

192:
193: Get_Parameters(x_return_status =>l_return_status );
194:
195: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
196: raise FND_API.G_EXC_ERROR;
197: END IF;
198:
199: IF (g_wf_version = 1) THEN --First version - no approval hierarchy
200: g_approver_name := g_owner_name;

Line 230: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

226: g_old_approver_name:=g_approver_name;
227:
228: Find_Next_Approver(x_return_status =>l_return_status );
229:
230: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
231: raise FND_API.G_EXC_ERROR;
232: END IF;
233:
234: END IF;

Line 231: raise FND_API.G_EXC_ERROR;

227:
228: Find_Next_Approver(x_return_status =>l_return_status );
229:
230: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
231: raise FND_API.G_EXC_ERROR;
232: END IF;
233:
234: END IF;
235:

Line 265: WHEN FND_API.G_EXC_ERROR THEN

261: return;
262: END IF;
263:
264: EXCEPTION
265: WHEN FND_API.G_EXC_ERROR THEN
266: --If execution error, rollback all database changes, generate message text
267: --and return failure status to the WF
268: ROLLBACK TO Select_Approver;
269: resultout := 'COMPLETE:E';

Line 273: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

269: resultout := 'COMPLETE:E';
270: Generate_Message();
271: --Bug 3199488
272: IF ( g_excep_level >= g_debug_level ) THEN
273: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
274: END IF;
275: --Bug 3199488
276: return;
277:

Line 336: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

332: IF ( funcmode = 'RUN' ) THEN
333:
334: Get_Parameters(x_return_status =>l_return_status );
335:
336: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
337: raise FND_API.G_EXC_ERROR;
338: END IF;
339:
340: --Check the supplier

Line 337: raise FND_API.G_EXC_ERROR;

333:
334: Get_Parameters(x_return_status =>l_return_status );
335:
336: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
337: raise FND_API.G_EXC_ERROR;
338: END IF;
339:
340: --Check the supplier
341:

Line 344: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

340: --Check the supplier
341:
342: Check_Supplier(x_return_status =>l_return_status );
343:
344: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
345: raise FND_API.G_EXC_ERROR;
346: END IF;
347:
348: IF (g_wf_version = 1) THEN --First version - no approval hierarchy

Line 345: raise FND_API.G_EXC_ERROR;

341:
342: Check_Supplier(x_return_status =>l_return_status );
343:
344: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
345: raise FND_API.G_EXC_ERROR;
346: END IF;
347:
348: IF (g_wf_version = 1) THEN --First version - no approval hierarchy
349:

Line 367: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

363:
364: Check_Authority(p_result=> l_result,
365: x_return_status =>l_return_status );
366:
367: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
368: raise FND_API.G_EXC_ERROR;
369: END IF;
370:
371: IF g_debug_mode = 'Y'

Line 368: raise FND_API.G_EXC_ERROR;

364: Check_Authority(p_result=> l_result,
365: x_return_status =>l_return_status );
366:
367: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
368: raise FND_API.G_EXC_ERROR;
369: END IF;
370:
371: IF g_debug_mode = 'Y'
372: THEN

Line 396: WHEN FND_API.G_EXC_ERROR THEN

392: return;
393: END IF;
394:
395: EXCEPTION
396: WHEN FND_API.G_EXC_ERROR THEN
397: --If execution error, rollback all database changes, generate message text
398: --and return failure status to the WF
399:
400: ROLLBACK TO Check_Authority;

Line 405: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

401: resultout := 'COMPLETE:E';
402: Generate_Message();
403: --Bug 3199488
404: IF ( g_excep_level >= g_debug_level ) THEN
405: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
406: END IF;
407: --Bug 3199488
408: return;
409:

Line 560: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

556: Process_request(
557: p_action => 'R',
558: x_return_status => l_return_status );
559:
560: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
561: raise FND_API.G_EXC_ERROR;
562: END IF;
563:
564: IF g_debug_mode = 'Y'

Line 561: raise FND_API.G_EXC_ERROR;

557: p_action => 'R',
558: x_return_status => l_return_status );
559:
560: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
561: raise FND_API.G_EXC_ERROR;
562: END IF;
563:
564: IF g_debug_mode = 'Y'
565: THEN

Line 589: WHEN FND_API.G_EXC_ERROR THEN

585: return;
586: END IF;
587:
588: EXCEPTION
589: WHEN FND_API.G_EXC_ERROR THEN
590: --If execution error, rollback all database changes, generate message text
591: --and return failure status to the WF
592:
593: ROLLBACK TO Reject_Contract;

Line 598: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

594: resultout := 'COMPLETE:E';
595: Generate_Message();
596: --Bug 3199488
597: IF ( g_excep_level >= g_debug_level ) THEN
598: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
599: END IF;
600: -- Bug 3199488
601: return;
602:

Line 658: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

654: Process_request(
655: p_action => 'A',
656: x_return_status => l_return_status );
657:
658: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
659: raise FND_API.G_EXC_ERROR;
660: END IF;
661:
662: IF g_debug_mode = 'Y'

Line 659: raise FND_API.G_EXC_ERROR;

655: p_action => 'A',
656: x_return_status => l_return_status );
657:
658: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
659: raise FND_API.G_EXC_ERROR;
660: END IF;
661:
662: IF g_debug_mode = 'Y'
663: THEN

Line 687: WHEN FND_API.G_EXC_ERROR THEN

683: return;
684: END IF;
685:
686: EXCEPTION
687: WHEN FND_API.G_EXC_ERROR THEN
688: --If execution error, rollback all database changes, generate message text
689: --and return failure status to the WF
690:
691: ROLLBACK TO Approve_Contract;

Line 696: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

692: resultout := 'COMPLETE:E';
693: Generate_Message();
694: -- Bug 3199488
695: IF ( g_excep_level >= g_debug_level ) THEN
696: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
697: END IF;
698: -- Bug 3199488
699: return;
700:

Line 757: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

753: IF ( funcmode = 'RUN' ) THEN
754:
755: Get_Parameters(x_return_status =>l_return_status );
756:
757: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
758: raise FND_API.G_EXC_ERROR;
759: END IF;
760:
761: --Exec BC

Line 758: raise FND_API.G_EXC_ERROR;

754:
755: Get_Parameters(x_return_status =>l_return_status );
756:
757: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
758: raise FND_API.G_EXC_ERROR;
759: END IF;
760:
761: --Exec BC
762:

Line 781: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

777:
778:
779: SAVEPOINT Execute_BC;
780:
781: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
782: IF g_debug_mode = 'Y'
783: THEN
784: --Put_Debug_Msg( l_full_path,'IGC_CC_BUDGETARY_CTRL_PKG.Execute_Budgetary_Ctrl returned error ');
785: -- Bug 3199488

Line 791: raise FND_API.G_EXC_ERROR;

787: FND_LOG.STRING (g_excep_level,l_full_path,'IGC_CC_BUDGETARY_CTRL_PKG.Execute_Budgetary_Ctrl returned error ');
788: END IF;
789: -- Bug 3199488
790: END IF;
791: raise FND_API.G_EXC_ERROR;
792: END IF;
793:
794: IF g_debug_mode = 'Y'
795: THEN

Line 799: IF l_bc_status = FND_API.G_TRUE THEN

795: THEN
796: Put_Debug_Msg( l_full_path,'Successfully executed');
797: END IF;
798:
799: IF l_bc_status = FND_API.G_TRUE THEN
800:
801: --Setting bc executed status
802: Reinit_Version(x_return_status =>l_return_status );
803:

Line 804: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

800:
801: --Setting bc executed status
802: Reinit_Version(x_return_status =>l_return_status );
803:
804: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
805: raise FND_API.G_EXC_ERROR;
806: END IF;
807:
808: g_bc_executed :='Y';

Line 805: raise FND_API.G_EXC_ERROR;

801: --Setting bc executed status
802: Reinit_Version(x_return_status =>l_return_status );
803:
804: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
805: raise FND_API.G_EXC_ERROR;
806: END IF;
807:
808: g_bc_executed :='Y';
809:

Line 853: WHEN FND_API.G_EXC_ERROR THEN

849: return;
850: END IF;
851:
852: EXCEPTION
853: WHEN FND_API.G_EXC_ERROR THEN
854: --If execution error, rollback all database changes, generate message text
855: --and return failure status to the WF
856:
857: ROLLBACK TO Execute_BC;

Line 863: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

859: resultout := 'COMPLETE:E';
860: Generate_Message();
861: -- Bug 3199488
862: IF ( g_excep_level >= g_debug_level ) THEN
863: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
864: END IF;
865: -- Bug 3199488
866: return;
867:

Line 923: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

919: Process_request(
920: p_action => 'E',
921: x_return_status => l_return_status );
922:
923: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
924: raise FND_API.G_EXC_ERROR;
925: END IF;
926:
927: IF g_debug_mode = 'Y'

Line 924: raise FND_API.G_EXC_ERROR;

920: p_action => 'E',
921: x_return_status => l_return_status );
922:
923: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
924: raise FND_API.G_EXC_ERROR;
925: END IF;
926:
927: IF g_debug_mode = 'Y'
928: THEN

Line 952: WHEN FND_API.G_EXC_ERROR THEN

948: return;
949: END IF;
950:
951: EXCEPTION
952: WHEN FND_API.G_EXC_ERROR THEN
953: --If execution error, rollback all database changes, generate message text
954: --and return failure status to the WF
955:
956: ROLLBACK TO Failed_Process;

Line 960: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

956: ROLLBACK TO Failed_Process;
957: Generate_Message();
958: --Bug 3199488
959: IF ( g_excep_level >= g_debug_level ) THEN
960: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
961: END IF;
962: -- Bug 3199488
963: RAISE;
964:

Line 1020: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1016: Process_request(
1017: p_action => 'F',
1018: x_return_status => l_return_status );
1019:
1020: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1021: raise FND_API.G_EXC_ERROR;
1022: END IF;
1023:
1024: IF g_debug_mode = 'Y'

Line 1021: raise FND_API.G_EXC_ERROR;

1017: p_action => 'F',
1018: x_return_status => l_return_status );
1019:
1020: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1021: raise FND_API.G_EXC_ERROR;
1022: END IF;
1023:
1024: IF g_debug_mode = 'Y'
1025: THEN

Line 1049: WHEN FND_API.G_EXC_ERROR THEN

1045: return;
1046: END IF;
1047:
1048: EXCEPTION
1049: WHEN FND_API.G_EXC_ERROR THEN
1050: --If execution error, rollback all database changes, generate message text
1051: --and return failure status to the WF
1052:
1053: ROLLBACK TO BC_Failed;

Line 1058: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

1054: resultout := 'COMPLETE:E';
1055: Generate_Message();
1056: --Bug 3199488
1057: IF ( g_excep_level >= g_debug_level ) THEN
1058: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
1059: END IF;
1060: --Bug 3199488
1061: return;
1062:

Line 1090: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,

1086:
1087: PROCEDURE Start_Process
1088: (
1089: p_api_version IN NUMBER ,
1090: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
1091: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
1092: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,
1093: p_wf_version IN NUMBER := 2,
1094: x_return_status OUT NOCOPY VARCHAR2 ,

Line 1091: p_commit IN VARCHAR2 := FND_API.G_FALSE ,

1087: PROCEDURE Start_Process
1088: (
1089: p_api_version IN NUMBER ,
1090: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
1091: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
1092: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,
1093: p_wf_version IN NUMBER := 2,
1094: x_return_status OUT NOCOPY VARCHAR2 ,
1095: x_msg_count OUT NOCOPY NUMBER ,

Line 1092: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,

1088: (
1089: p_api_version IN NUMBER ,
1090: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
1091: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
1092: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,
1093: p_wf_version IN NUMBER := 2,
1094: x_return_status OUT NOCOPY VARCHAR2 ,
1095: x_msg_count OUT NOCOPY NUMBER ,
1096: x_msg_data OUT NOCOPY VARCHAR2 ,

Line 1101: p_debug_mode IN VARCHAR2 := FND_API.G_FALSE

1097: p_item_key IN VARCHAR2 ,
1098: p_cc_header_id IN NUMBER ,
1099: p_acct_date IN DATE ,
1100: p_note IN VARCHAR2 := '',
1101: p_debug_mode IN VARCHAR2 := FND_API.G_FALSE
1102: )
1103: IS
1104:
1105: l_api_name CONSTANT VARCHAR2(30) := 'Start_Process' ;

Line 1135: IF FND_API.to_Boolean ( p_init_msg_list ) THEN

1131: BEGIN
1132:
1133: SAVEPOINT Start_Process;
1134: --
1135: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
1136: FND_MSG_PUB.initialize ;
1137: END IF;
1138: --
1139: x_return_status := FND_API.G_RET_STS_SUCCESS ;

Line 1139: x_return_status := FND_API.G_RET_STS_SUCCESS ;

1135: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
1136: FND_MSG_PUB.initialize ;
1137: END IF;
1138: --
1139: x_return_status := FND_API.G_RET_STS_SUCCESS ;
1140:
1141:
1142: g_cc_header_id := p_cc_header_id;
1143: g_itemkey := p_item_key;

Line 1162: /*IF p_debug_mode = FND_API.G_TRUE OR p_debug_mode = 'Y' OR (upper(fnd_profile.value('IGC_DEBUG_ENABLED')) ='Y') THEN

1158:
1159: g_itemtype := g_wf_name;
1160:
1161:
1162: /*IF p_debug_mode = FND_API.G_TRUE OR p_debug_mode = 'Y' OR (upper(fnd_profile.value('IGC_DEBUG_ENABLED')) ='Y') THEN
1163: IGC_MSGS_PKG.g_debug_mode := TRUE;
1164: l_debug_mode := 'Y';
1165: ELSE
1166: IGC_MSGS_PKG.g_debug_mode := FALSE;

Line 1190: RAISE FND_API.G_EXC_ERROR;

1186:
1187: CLOSE c_update_cc;
1188: message_token ('CC_HEADER_ID', g_cc_header_id);
1189: add_message ('IGC', 'IGC_CC_NOT_FOUND');
1190: RAISE FND_API.G_EXC_ERROR;
1191:
1192: END IF;
1193:
1194: IF g_debug_mode = 'Y'

Line 1214: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1210:
1211: --Read values from the original CC to global variables and init WF variables
1212: Init_variables(x_return_status =>l_return_status );
1213:
1214: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1215: raise FND_API.G_EXC_ERROR;
1216: END IF;
1217:
1218: --Set meaning values for all parameters

Line 1215: raise FND_API.G_EXC_ERROR;

1211: --Read values from the original CC to global variables and init WF variables
1212: Init_variables(x_return_status =>l_return_status );
1213:
1214: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1215: raise FND_API.G_EXC_ERROR;
1216: END IF;
1217:
1218: --Set meaning values for all parameters
1219:

Line 1222: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1218: --Set meaning values for all parameters
1219:
1220: Set_Parameters(x_return_status =>l_return_status );
1221:
1222: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1223: raise FND_API.G_EXC_ERROR;
1224: END IF;
1225:
1226: --Initialize g_bc_enabled parameter

Line 1223: raise FND_API.G_EXC_ERROR;

1219:
1220: Set_Parameters(x_return_status =>l_return_status );
1221:
1222: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1223: raise FND_API.G_EXC_ERROR;
1224: END IF;
1225:
1226: --Initialize g_bc_enabled parameter
1227:

Line 1230: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1226: --Initialize g_bc_enabled parameter
1227:
1228: Set_BC_Parameter(x_return_status =>l_return_status );
1229:
1230: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1231: raise FND_API.G_EXC_ERROR;
1232: END IF;
1233:
1234: wf_engine.SetItemAttrText (g_itemtype,g_itemkey,'BC_REQUIRED',g_bc_reqired);

Line 1231: raise FND_API.G_EXC_ERROR;

1227:
1228: Set_BC_Parameter(x_return_status =>l_return_status );
1229:
1230: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1231: raise FND_API.G_EXC_ERROR;
1232: END IF;
1233:
1234: wf_engine.SetItemAttrText (g_itemtype,g_itemkey,'BC_REQUIRED',g_bc_reqired);
1235:

Line 1242: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1238: Generate_CC_Action(
1239: p_action => 'A',
1240: x_return_status => l_return_status );
1241:
1242: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1243: raise FND_API.G_EXC_ERROR;
1244: END IF;
1245:
1246: --Insert history record

Line 1243: raise FND_API.G_EXC_ERROR;

1239: p_action => 'A',
1240: x_return_status => l_return_status );
1241:
1242: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1243: raise FND_API.G_EXC_ERROR;
1244: END IF;
1245:
1246: --Insert history record
1247:

Line 1256: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1252:
1253: Create_History_Record(
1254: x_return_status => l_return_status );
1255:
1256: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1257: raise FND_API.G_EXC_ERROR;
1258: END IF;
1259:
1260: g_cc_new_state := NULL;

Line 1257: raise FND_API.G_EXC_ERROR;

1253: Create_History_Record(
1254: x_return_status => l_return_status );
1255:
1256: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1257: raise FND_API.G_EXC_ERROR;
1258: END IF;
1259:
1260: g_cc_new_state := NULL;
1261: g_cc_new_appr_status := NULL;

Line 1281: wf_engine.SetItemAttrText(g_itemtype,g_itemkey,'DEBUG_MODE', FND_API.G_TRUE);

1277:
1278: -- Start the process
1279:
1280: IF IGC_MSGS_PKG.g_debug_mode = TRUE THEN
1281: wf_engine.SetItemAttrText(g_itemtype,g_itemkey,'DEBUG_MODE', FND_API.G_TRUE);
1282: ELSE
1283: wf_engine.SetItemAttrText(g_itemtype,g_itemkey,'DEBUG_MODE', FND_API.G_FALSE);
1284: END IF;
1285:

Line 1283: wf_engine.SetItemAttrText(g_itemtype,g_itemkey,'DEBUG_MODE', FND_API.G_FALSE);

1279:
1280: IF IGC_MSGS_PKG.g_debug_mode = TRUE THEN
1281: wf_engine.SetItemAttrText(g_itemtype,g_itemkey,'DEBUG_MODE', FND_API.G_TRUE);
1282: ELSE
1283: wf_engine.SetItemAttrText(g_itemtype,g_itemkey,'DEBUG_MODE', FND_API.G_FALSE);
1284: END IF;
1285:
1286: IF g_debug_mode = 'Y'
1287: THEN

Line 1306: WHEN FND_API.G_EXC_ERROR THEN

1302: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1303: p_data => x_msg_data );
1304:
1305: EXCEPTION
1306: WHEN FND_API.G_EXC_ERROR THEN
1307: Rollback to Start_Process;
1308: x_return_status := FND_API.G_RET_STS_ERROR;
1309:
1310: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,

Line 1308: x_return_status := FND_API.G_RET_STS_ERROR;

1304:
1305: EXCEPTION
1306: WHEN FND_API.G_EXC_ERROR THEN
1307: Rollback to Start_Process;
1308: x_return_status := FND_API.G_RET_STS_ERROR;
1309:
1310: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1311: p_data => x_msg_data );
1312: --Bug 3199488

Line 1314: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

1310: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1311: p_data => x_msg_data );
1312: --Bug 3199488
1313: IF ( g_excep_level >= g_debug_level ) THEN
1314: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
1315: END IF;
1316: --Bug 3199488
1317:
1318: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1318: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1314: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
1315: END IF;
1316: --Bug 3199488
1317:
1318: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1319: Rollback to Start_Process;
1320: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1321:
1322: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,

Line 1320: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1316: --Bug 3199488
1317:
1318: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1319: Rollback to Start_Process;
1320: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1321:
1322: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1323: p_data => x_msg_data );
1324: --Bug 3199488

Line 1326: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

1322: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1323: p_data => x_msg_data );
1324: --Bug 3199488
1325: IF ( g_excep_level >= g_debug_level ) THEN
1326: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
1327: END IF;
1328: --Bug 3199488
1329:
1330: WHEN OTHERS THEN

Line 1335: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1331:
1332: Put_Debug_Msg( l_full_path,l_api_name||' raised unhandled exception');
1333:
1334: Rollback to Start_Process;
1335: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1336:
1337: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) THEN
1338: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
1339: END IF;

Line 1370: x_return_status := FND_API.G_RET_STS_SUCCESS ;

1366:
1367: l_full_path VARCHAR2(255) := g_path||'Generate_CC_action';
1368: BEGIN
1369:
1370: x_return_status := FND_API.G_RET_STS_SUCCESS ;
1371:
1372: IF g_debug_mode = 'Y'
1373: THEN
1374: Put_Debug_Msg( l_full_path,l_api_name||' started');

Line 1522: RAISE FND_API.G_EXC_ERROR;

1518: message_token ('CC_STATE', g_cc_state);
1519: message_token ('CC_ENC_STATUS', g_cc_enc_status);
1520: message_token ('CC_APR_STATUS', g_cc_appr_status);
1521: add_message ('IGC', 'IGC_CC_STATE_ERROR');
1522: RAISE FND_API.G_EXC_ERROR;
1523:
1524: END IF;
1525:
1526:

Line 1571: WHEN FND_API.G_EXC_ERROR THEN

1567: Put_Debug_Msg( l_full_path,l_api_name||' Successfully completed');
1568: END IF;
1569:
1570: EXCEPTION
1571: WHEN FND_API.G_EXC_ERROR THEN
1572: x_return_status := FND_API.G_RET_STS_ERROR;
1573: --Bug 3199488
1574: IF ( g_excep_level >= g_debug_level ) THEN
1575: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

Line 1572: x_return_status := FND_API.G_RET_STS_ERROR;

1568: END IF;
1569:
1570: EXCEPTION
1571: WHEN FND_API.G_EXC_ERROR THEN
1572: x_return_status := FND_API.G_RET_STS_ERROR;
1573: --Bug 3199488
1574: IF ( g_excep_level >= g_debug_level ) THEN
1575: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
1576: END IF;

Line 1575: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

1571: WHEN FND_API.G_EXC_ERROR THEN
1572: x_return_status := FND_API.G_RET_STS_ERROR;
1573: --Bug 3199488
1574: IF ( g_excep_level >= g_debug_level ) THEN
1575: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
1576: END IF;
1577: --Bug 3199488
1578: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1579: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1578: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1574: IF ( g_excep_level >= g_debug_level ) THEN
1575: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
1576: END IF;
1577: --Bug 3199488
1578: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1579: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1580: --Bug 3199488
1581: IF ( g_excep_level >= g_debug_level ) THEN
1582: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

Line 1579: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1575: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
1576: END IF;
1577: --Bug 3199488
1578: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1579: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1580: --Bug 3199488
1581: IF ( g_excep_level >= g_debug_level ) THEN
1582: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
1583: END IF;

Line 1582: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

1578: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1579: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1580: --Bug 3199488
1581: IF ( g_excep_level >= g_debug_level ) THEN
1582: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
1583: END IF;
1584: --Bug 3199488
1585:
1586: WHEN OTHERS THEN

Line 1587: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1583: END IF;
1584: --Bug 3199488
1585:
1586: WHEN OTHERS THEN
1587: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1588:
1589: Put_Debug_Msg( l_full_path,l_api_name||' raised unhandled exception');
1590:
1591: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) THEN

Line 1617: x_return_status := FND_API.G_RET_STS_SUCCESS ;

1613: l_full_path VARCHAR2(255) := g_path||'Get_Parameters';
1614:
1615: BEGIN
1616:
1617: x_return_status := FND_API.G_RET_STS_SUCCESS ;
1618: IF g_debug_mode = 'Y'
1619: THEN
1620: Put_Debug_Msg( l_full_path,l_api_name||' started');
1621: END IF;

Line 1682: WHEN FND_API.G_EXC_ERROR THEN

1678: Put_Debug_Msg( l_full_path,l_api_name||' Successfully completed');
1679: END IF;
1680:
1681: EXCEPTION
1682: WHEN FND_API.G_EXC_ERROR THEN
1683: x_return_status := FND_API.G_RET_STS_ERROR;
1684: --Bug 3199488
1685: IF ( g_excep_level >= g_debug_level ) THEN
1686: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

Line 1683: x_return_status := FND_API.G_RET_STS_ERROR;

1679: END IF;
1680:
1681: EXCEPTION
1682: WHEN FND_API.G_EXC_ERROR THEN
1683: x_return_status := FND_API.G_RET_STS_ERROR;
1684: --Bug 3199488
1685: IF ( g_excep_level >= g_debug_level ) THEN
1686: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
1687: END IF;

Line 1686: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

1682: WHEN FND_API.G_EXC_ERROR THEN
1683: x_return_status := FND_API.G_RET_STS_ERROR;
1684: --Bug 3199488
1685: IF ( g_excep_level >= g_debug_level ) THEN
1686: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
1687: END IF;
1688: --Bug 3199488
1689:
1690: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1690: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1686: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
1687: END IF;
1688: --Bug 3199488
1689:
1690: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1691: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1692: --Bug 3199488
1693: IF ( g_excep_level >= g_debug_level ) THEN
1694: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

Line 1691: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1687: END IF;
1688: --Bug 3199488
1689:
1690: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1691: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1692: --Bug 3199488
1693: IF ( g_excep_level >= g_debug_level ) THEN
1694: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
1695: END IF;

Line 1694: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

1690: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1691: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1692: --Bug 3199488
1693: IF ( g_excep_level >= g_debug_level ) THEN
1694: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
1695: END IF;
1696: --Bug 3199488
1697:
1698: WHEN OTHERS THEN

Line 1700: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1696: --Bug 3199488
1697:
1698: WHEN OTHERS THEN
1699: Put_Debug_Msg( l_full_path,l_api_name||' raised unhandled exception');
1700: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1701:
1702: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) THEN
1703: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
1704: END IF;

Line 1733: x_return_status := FND_API.G_RET_STS_SUCCESS ;

1729:
1730: l_full_path VARCHAR2(255) := g_path||'Set_parameters';
1731: BEGIN
1732:
1733: x_return_status := FND_API.G_RET_STS_SUCCESS ;
1734: IF g_debug_mode = 'Y'
1735: THEN
1736: Put_Debug_Msg( l_full_path,l_api_name||' started');
1737: END IF;

Line 1798: WHEN FND_API.G_EXC_ERROR THEN

1794: Put_Debug_Msg( l_full_path,l_api_name||' Successfully completed');
1795: END IF;
1796:
1797: EXCEPTION
1798: WHEN FND_API.G_EXC_ERROR THEN
1799: x_return_status := FND_API.G_RET_STS_ERROR;
1800: --Bug 3199488
1801: IF ( g_excep_level >= g_debug_level ) THEN
1802: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

Line 1799: x_return_status := FND_API.G_RET_STS_ERROR;

1795: END IF;
1796:
1797: EXCEPTION
1798: WHEN FND_API.G_EXC_ERROR THEN
1799: x_return_status := FND_API.G_RET_STS_ERROR;
1800: --Bug 3199488
1801: IF ( g_excep_level >= g_debug_level ) THEN
1802: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
1803: END IF;

Line 1802: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

1798: WHEN FND_API.G_EXC_ERROR THEN
1799: x_return_status := FND_API.G_RET_STS_ERROR;
1800: --Bug 3199488
1801: IF ( g_excep_level >= g_debug_level ) THEN
1802: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
1803: END IF;
1804: --Bug 3199488
1805:
1806: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1806: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1802: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
1803: END IF;
1804: --Bug 3199488
1805:
1806: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1807: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1808: --Bug 3199488
1809: IF ( g_excep_level >= g_debug_level ) THEN
1810: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

Line 1807: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1803: END IF;
1804: --Bug 3199488
1805:
1806: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1807: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1808: --Bug 3199488
1809: IF ( g_excep_level >= g_debug_level ) THEN
1810: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
1811: END IF;

Line 1810: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

1806: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1807: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1808: --Bug 3199488
1809: IF ( g_excep_level >= g_debug_level ) THEN
1810: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
1811: END IF;
1812: --Bug 3199488
1813:
1814: WHEN OTHERS THEN

Line 1817: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1813:
1814: WHEN OTHERS THEN
1815: Put_Debug_Msg( l_full_path,l_api_name||' raised unhandled exception');
1816:
1817: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1818:
1819: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) THEN
1820: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
1821: END IF;

Line 1885: x_return_status := FND_API.G_RET_STS_SUCCESS ;

1881:
1882: l_full_path VARCHAR2(500) := g_path || 'Init_variables';
1883: BEGIN
1884:
1885: x_return_status := FND_API.G_RET_STS_SUCCESS ;
1886: IF g_debug_mode = 'Y'
1887: THEN
1888: Put_Debug_Msg( l_full_path,l_api_name||' started');
1889: END IF;

Line 1916: RAISE FND_API.G_EXC_ERROR;

1912:
1913: CLOSE c_cc_data;
1914: message_token ('CC_HEADER_ID', g_cc_header_id);
1915: add_message ('IGC', 'IGC_CC_NOT_FOUND');
1916: RAISE FND_API.G_EXC_ERROR;
1917:
1918: END IF;
1919:
1920: CLOSE c_cc_data;

Line 1953: RAISE FND_API.G_EXC_ERROR;

1949:
1950: CLOSE c_fin_par;
1951: message_token ('ORG_ID', g_org_id);
1952: add_message ('IGC', 'IGC_ORG_NOT_FOUND');
1953: RAISE FND_API.G_EXC_ERROR;
1954:
1955: END IF;
1956:
1957: CLOSE c_fin_par;

Line 2054: WHEN FND_API.G_EXC_ERROR THEN

2050: Put_Debug_Msg( l_full_path,l_api_name||' Successfully completed');
2051: END IF;
2052:
2053: EXCEPTION
2054: WHEN FND_API.G_EXC_ERROR THEN
2055: x_return_status := FND_API.G_RET_STS_ERROR;
2056: --Bug 3199488
2057: IF ( g_excep_level >= g_debug_level ) THEN
2058: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

Line 2055: x_return_status := FND_API.G_RET_STS_ERROR;

2051: END IF;
2052:
2053: EXCEPTION
2054: WHEN FND_API.G_EXC_ERROR THEN
2055: x_return_status := FND_API.G_RET_STS_ERROR;
2056: --Bug 3199488
2057: IF ( g_excep_level >= g_debug_level ) THEN
2058: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
2059: END IF;

Line 2058: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

2054: WHEN FND_API.G_EXC_ERROR THEN
2055: x_return_status := FND_API.G_RET_STS_ERROR;
2056: --Bug 3199488
2057: IF ( g_excep_level >= g_debug_level ) THEN
2058: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
2059: END IF;
2060: --Bug 3199488
2061:
2062: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2062: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2058: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
2059: END IF;
2060: --Bug 3199488
2061:
2062: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2063: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2064: --Bug 3199488
2065: IF ( g_excep_level >= g_debug_level ) THEN
2066: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

Line 2063: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2059: END IF;
2060: --Bug 3199488
2061:
2062: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2063: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2064: --Bug 3199488
2065: IF ( g_excep_level >= g_debug_level ) THEN
2066: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
2067: END IF;

Line 2066: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

2062: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2063: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2064: --Bug 3199488
2065: IF ( g_excep_level >= g_debug_level ) THEN
2066: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
2067: END IF;
2068: --Bug 3199488
2069:
2070: WHEN OTHERS THEN

Line 2073: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2069:
2070: WHEN OTHERS THEN
2071: Put_Debug_Msg( l_full_path,l_api_name||' raised unhandled exception');
2072:
2073: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2074:
2075: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) THEN
2076: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
2077: END IF;

Line 2106: x_return_status := FND_API.G_RET_STS_SUCCESS ;

2102: l_full_path VARCHAR2(255) := g_path||'Reinit_version';
2103:
2104: BEGIN
2105:
2106: x_return_status := FND_API.G_RET_STS_SUCCESS ;
2107: IF g_debug_mode = 'Y'
2108: THEN
2109: Put_Debug_Msg( l_full_path,l_api_name||' started');
2110: END IF;

Line 2122: RAISE FND_API.G_EXC_ERROR;

2118:
2119: CLOSE c_cc_data;
2120: message_token ('CC_HEADER_ID', g_cc_header_id);
2121: add_message ('IGC', 'IGC_CC_NOT_FOUND');
2122: RAISE FND_API.G_EXC_ERROR;
2123:
2124: END IF;
2125:
2126: CLOSE c_cc_data;

Line 2141: WHEN FND_API.G_EXC_ERROR THEN

2137: Put_Debug_Msg( l_full_path,l_api_name||' Successfully completed');
2138: END IF;
2139:
2140: EXCEPTION
2141: WHEN FND_API.G_EXC_ERROR THEN
2142: x_return_status := FND_API.G_RET_STS_ERROR;
2143: --Bug 3199488
2144: IF ( g_excep_level >= g_debug_level ) THEN
2145: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

Line 2142: x_return_status := FND_API.G_RET_STS_ERROR;

2138: END IF;
2139:
2140: EXCEPTION
2141: WHEN FND_API.G_EXC_ERROR THEN
2142: x_return_status := FND_API.G_RET_STS_ERROR;
2143: --Bug 3199488
2144: IF ( g_excep_level >= g_debug_level ) THEN
2145: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
2146: END IF;

Line 2145: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

2141: WHEN FND_API.G_EXC_ERROR THEN
2142: x_return_status := FND_API.G_RET_STS_ERROR;
2143: --Bug 3199488
2144: IF ( g_excep_level >= g_debug_level ) THEN
2145: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
2146: END IF;
2147: --Bug 3199488
2148:
2149: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2149: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2145: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
2146: END IF;
2147: --Bug 3199488
2148:
2149: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2150: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2151: --Bug 3199488
2152: IF ( g_excep_level >= g_debug_level ) THEN
2153: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

Line 2150: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2146: END IF;
2147: --Bug 3199488
2148:
2149: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2150: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2151: --Bug 3199488
2152: IF ( g_excep_level >= g_debug_level ) THEN
2153: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
2154: END IF;

Line 2153: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

2149: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2150: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2151: --Bug 3199488
2152: IF ( g_excep_level >= g_debug_level ) THEN
2153: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
2154: END IF;
2155: --Bug 3199488
2156:
2157: WHEN OTHERS THEN

Line 2160: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2156:
2157: WHEN OTHERS THEN
2158: Put_Debug_Msg( l_full_path,l_api_name||' raised unhandled exception');
2159:
2160: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2161:
2162: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) THEN
2163: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
2164: END IF;

Line 2190: x_return_status := FND_API.G_RET_STS_SUCCESS ;

2186:
2187: l_full_path VARCHAR2(500) := g_path || 'Generate_PO';
2188: BEGIN
2189:
2190: x_return_status := FND_API.G_RET_STS_SUCCESS ;
2191: IF g_debug_mode = 'Y'
2192: THEN
2193: Put_Debug_Msg( l_full_path,l_api_name||' started');
2194: END IF;

Line 2204: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2200: x_msg_data => l_msg_data,
2201: p_cc_header_id => g_cc_header_id
2202: );
2203:
2204: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2205: IF g_debug_mode = 'Y'
2206: THEN
2207: Put_Debug_Msg( l_full_path,'Error during PO generation');
2208: END IF;

Line 2209: raise FND_API.G_EXC_ERROR;

2205: IF g_debug_mode = 'Y'
2206: THEN
2207: Put_Debug_Msg( l_full_path,'Error during PO generation');
2208: END IF;
2209: raise FND_API.G_EXC_ERROR;
2210: END IF;
2211:
2212: IF g_debug_mode = 'Y'
2213: THEN

Line 2218: WHEN FND_API.G_EXC_ERROR THEN

2214: Put_Debug_Msg( l_full_path,l_api_name||' Successfully completed');
2215: END IF;
2216:
2217: EXCEPTION
2218: WHEN FND_API.G_EXC_ERROR THEN
2219: x_return_status := FND_API.G_RET_STS_ERROR;
2220: --Bug 3199488
2221: IF ( g_excep_level >= g_debug_level ) THEN
2222: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

Line 2219: x_return_status := FND_API.G_RET_STS_ERROR;

2215: END IF;
2216:
2217: EXCEPTION
2218: WHEN FND_API.G_EXC_ERROR THEN
2219: x_return_status := FND_API.G_RET_STS_ERROR;
2220: --Bug 3199488
2221: IF ( g_excep_level >= g_debug_level ) THEN
2222: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
2223: END IF;

Line 2222: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

2218: WHEN FND_API.G_EXC_ERROR THEN
2219: x_return_status := FND_API.G_RET_STS_ERROR;
2220: --Bug 3199488
2221: IF ( g_excep_level >= g_debug_level ) THEN
2222: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
2223: END IF;
2224: --Bug 3199488
2225:
2226: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2226: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2222: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
2223: END IF;
2224: --Bug 3199488
2225:
2226: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2227: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2228: --Bug 3199488
2229: IF ( g_excep_level >= g_debug_level ) THEN
2230: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

Line 2227: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2223: END IF;
2224: --Bug 3199488
2225:
2226: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2227: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2228: --Bug 3199488
2229: IF ( g_excep_level >= g_debug_level ) THEN
2230: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
2231: END IF;

Line 2230: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

2226: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2227: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2228: --Bug 3199488
2229: IF ( g_excep_level >= g_debug_level ) THEN
2230: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
2231: END IF;
2232: --Bug 3199488
2233:
2234: WHEN OTHERS THEN

Line 2237: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2233:
2234: WHEN OTHERS THEN
2235: Put_Debug_Msg( l_full_path,l_api_name||' raised unhandled exception');
2236:
2237: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2238:
2239: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) THEN
2240: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
2241: END IF;

Line 2266: x_return_status := FND_API.G_RET_STS_SUCCESS ;

2262: l_full_path VARCHAR2(500) := g_path || 'Process_request';
2263:
2264: BEGIN
2265:
2266: x_return_status := FND_API.G_RET_STS_SUCCESS ;
2267: IF g_debug_mode = 'Y'
2268: THEN
2269: Put_Debug_Msg( l_full_path,l_api_name||' started');
2270: END IF;

Line 2276: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2272: --Get parameters from the WF
2273:
2274: Get_Parameters(x_return_status =>l_return_status );
2275:
2276: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2277: raise FND_API.G_EXC_ERROR;
2278: END IF;
2279:
2280: --Generate appropriate statuses and states

Line 2277: raise FND_API.G_EXC_ERROR;

2273:
2274: Get_Parameters(x_return_status =>l_return_status );
2275:
2276: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2277: raise FND_API.G_EXC_ERROR;
2278: END IF;
2279:
2280: --Generate appropriate statuses and states
2281:

Line 2286: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2282: Generate_CC_Action(
2283: p_action => p_action,
2284: x_return_status => l_return_status );
2285:
2286: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2287: raise FND_API.G_EXC_ERROR;
2288: END IF;
2289:
2290: --Apply changes to CC

Line 2287: raise FND_API.G_EXC_ERROR;

2283: p_action => p_action,
2284: x_return_status => l_return_status );
2285:
2286: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2287: raise FND_API.G_EXC_ERROR;
2288: END IF;
2289:
2290: --Apply changes to CC
2291:

Line 2294: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2290: --Apply changes to CC
2291:
2292: Update_CC(x_return_status =>l_return_status );
2293:
2294: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2295: raise FND_API.G_EXC_ERROR;
2296: END IF;
2297:
2298: --Check if we need to generate PO

Line 2295: raise FND_API.G_EXC_ERROR;

2291:
2292: Update_CC(x_return_status =>l_return_status );
2293:
2294: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2295: raise FND_API.G_EXC_ERROR;
2296: END IF;
2297:
2298: --Check if we need to generate PO
2299:

Line 2304: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2300: IF g_create_po_entries THEN
2301:
2302: Generate_PO(x_return_status =>l_return_status );
2303:
2304: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2305: raise FND_API.G_EXC_ERROR;
2306: END IF;
2307: END IF;
2308:

Line 2305: raise FND_API.G_EXC_ERROR;

2301:
2302: Generate_PO(x_return_status =>l_return_status );
2303:
2304: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2305: raise FND_API.G_EXC_ERROR;
2306: END IF;
2307: END IF;
2308:
2309: --Create history record

Line 2313: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2309: --Create history record
2310:
2311: Create_History_Record(x_return_status =>l_return_status );
2312:
2313: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2314: raise FND_API.G_EXC_ERROR;
2315: END IF;
2316:
2317: --Applying new values to a WF process

Line 2314: raise FND_API.G_EXC_ERROR;

2310:
2311: Create_History_Record(x_return_status =>l_return_status );
2312:
2313: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2314: raise FND_API.G_EXC_ERROR;
2315: END IF;
2316:
2317: --Applying new values to a WF process
2318:

Line 2321: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2317: --Applying new values to a WF process
2318:
2319: Set_Parameters(x_return_status =>l_return_status );
2320:
2321: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2322: raise FND_API.G_EXC_ERROR;
2323: END IF;
2324:
2325: IF g_debug_mode = 'Y'

Line 2322: raise FND_API.G_EXC_ERROR;

2318:
2319: Set_Parameters(x_return_status =>l_return_status );
2320:
2321: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2322: raise FND_API.G_EXC_ERROR;
2323: END IF;
2324:
2325: IF g_debug_mode = 'Y'
2326: THEN

Line 2331: WHEN FND_API.G_EXC_ERROR THEN

2327: Put_Debug_Msg( l_full_path,l_api_name||' Successfully completed');
2328: END IF;
2329:
2330: EXCEPTION
2331: WHEN FND_API.G_EXC_ERROR THEN
2332: x_return_status := FND_API.G_RET_STS_ERROR;
2333: --Bug 3199488
2334: IF ( g_excep_level >= g_debug_level ) THEN
2335: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

Line 2332: x_return_status := FND_API.G_RET_STS_ERROR;

2328: END IF;
2329:
2330: EXCEPTION
2331: WHEN FND_API.G_EXC_ERROR THEN
2332: x_return_status := FND_API.G_RET_STS_ERROR;
2333: --Bug 3199488
2334: IF ( g_excep_level >= g_debug_level ) THEN
2335: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
2336: END IF;

Line 2335: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

2331: WHEN FND_API.G_EXC_ERROR THEN
2332: x_return_status := FND_API.G_RET_STS_ERROR;
2333: --Bug 3199488
2334: IF ( g_excep_level >= g_debug_level ) THEN
2335: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
2336: END IF;
2337: --Bug 3199488
2338:
2339: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2339: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2335: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
2336: END IF;
2337: --Bug 3199488
2338:
2339: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2340: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2341: --Bug 3199488
2342: IF ( g_excep_level >= g_debug_level ) THEN
2343: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

Line 2340: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2336: END IF;
2337: --Bug 3199488
2338:
2339: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2340: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2341: --Bug 3199488
2342: IF ( g_excep_level >= g_debug_level ) THEN
2343: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
2344: END IF;

Line 2343: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

2339: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2340: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2341: --Bug 3199488
2342: IF ( g_excep_level >= g_debug_level ) THEN
2343: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
2344: END IF;
2345: --Bug 3199488
2346:
2347: WHEN OTHERS THEN

Line 2350: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2346:
2347: WHEN OTHERS THEN
2348: Put_Debug_Msg( l_full_path,l_api_name||' raised unhandled exception');
2349:
2350: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2351:
2352: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) THEN
2353: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
2354: END IF;

Line 2380: x_return_status := FND_API.G_RET_STS_SUCCESS ;

2376: l_msg_data VARCHAR2(2000) ;
2377: l_full_path VARCHAR2(500) := g_path || 'Set_BC_Parameter';
2378: BEGIN
2379:
2380: x_return_status := FND_API.G_RET_STS_SUCCESS ;
2381: IF g_debug_mode = 'Y'
2382: THEN
2383: Put_Debug_Msg( l_full_path,l_api_name||' started');
2384: END IF;

Line 2396: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2392: p_sob_id => g_sob_id,
2393: p_cc_state => g_cc_state,
2394: x_encumbrance_on => g_bc_reqired);
2395:
2396: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2397: raise FND_API.G_EXC_ERROR;
2398: END IF;
2399:
2400: IF g_bc_reqired = FND_API.G_TRUE THEN

Line 2397: raise FND_API.G_EXC_ERROR;

2393: p_cc_state => g_cc_state,
2394: x_encumbrance_on => g_bc_reqired);
2395:
2396: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2397: raise FND_API.G_EXC_ERROR;
2398: END IF;
2399:
2400: IF g_bc_reqired = FND_API.G_TRUE THEN
2401: g_bc_reqired := 'Y';

Line 2400: IF g_bc_reqired = FND_API.G_TRUE THEN

2396: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2397: raise FND_API.G_EXC_ERROR;
2398: END IF;
2399:
2400: IF g_bc_reqired = FND_API.G_TRUE THEN
2401: g_bc_reqired := 'Y';
2402: ELSE
2403: g_bc_reqired := 'N';
2404: END IF;

Line 2448: WHEN FND_API.G_EXC_ERROR THEN

2444: Put_Debug_Msg( l_full_path,l_api_name||' Successfully completed');
2445: END IF;
2446:
2447: EXCEPTION
2448: WHEN FND_API.G_EXC_ERROR THEN
2449: x_return_status := FND_API.G_RET_STS_ERROR;
2450: --Bug 3199488
2451: IF ( g_excep_level >= g_debug_level ) THEN
2452: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

Line 2449: x_return_status := FND_API.G_RET_STS_ERROR;

2445: END IF;
2446:
2447: EXCEPTION
2448: WHEN FND_API.G_EXC_ERROR THEN
2449: x_return_status := FND_API.G_RET_STS_ERROR;
2450: --Bug 3199488
2451: IF ( g_excep_level >= g_debug_level ) THEN
2452: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
2453: END IF;

Line 2452: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

2448: WHEN FND_API.G_EXC_ERROR THEN
2449: x_return_status := FND_API.G_RET_STS_ERROR;
2450: --Bug 3199488
2451: IF ( g_excep_level >= g_debug_level ) THEN
2452: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
2453: END IF;
2454: --Bug 3199488
2455:
2456: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2456: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2452: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
2453: END IF;
2454: --Bug 3199488
2455:
2456: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2457: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2458: --Bug 3199488
2459: IF ( g_excep_level >= g_debug_level ) THEN
2460: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

Line 2457: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2453: END IF;
2454: --Bug 3199488
2455:
2456: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2457: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2458: --Bug 3199488
2459: IF ( g_excep_level >= g_debug_level ) THEN
2460: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
2461: END IF;

Line 2460: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

2456: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2457: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2458: --Bug 3199488
2459: IF ( g_excep_level >= g_debug_level ) THEN
2460: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
2461: END IF;
2462: --Bug 3199488
2463:
2464: WHEN OTHERS THEN

Line 2467: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2463:
2464: WHEN OTHERS THEN
2465: Put_Debug_Msg( l_full_path,l_api_name||' raised unhandled exception');
2466:
2467: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2468:
2469: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) THEN
2470: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
2471: END IF;

Line 2496: x_return_status := FND_API.G_RET_STS_SUCCESS ;

2492:
2493: l_full_path VARCHAR2(500) := g_path || 'Create_History_Record';
2494: BEGIN
2495:
2496: x_return_status := FND_API.G_RET_STS_SUCCESS ;
2497: IF g_debug_mode = 'Y'
2498: THEN
2499: Put_Debug_Msg( l_full_path,l_api_name||' started');
2500: END IF;

Line 2522: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2518: p_creation_date => sysdate,
2519: p_created_by => fnd_global.user_id
2520: );
2521:
2522: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2523: IF g_debug_mode = 'Y'
2524: THEN
2525: Put_Debug_Msg( l_full_path,'Error during history record insertion');
2526: END IF;

Line 2527: raise FND_API.G_EXC_ERROR;

2523: IF g_debug_mode = 'Y'
2524: THEN
2525: Put_Debug_Msg( l_full_path,'Error during history record insertion');
2526: END IF;
2527: raise FND_API.G_EXC_ERROR;
2528: END IF;
2529:
2530: IF g_debug_mode = 'Y'
2531: THEN

Line 2537: WHEN FND_API.G_EXC_ERROR THEN

2533: END IF;
2534:
2535:
2536: EXCEPTION
2537: WHEN FND_API.G_EXC_ERROR THEN
2538: x_return_status := FND_API.G_RET_STS_ERROR;
2539: --Bug 3199488
2540: IF ( g_excep_level >= g_debug_level ) THEN
2541: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

Line 2538: x_return_status := FND_API.G_RET_STS_ERROR;

2534:
2535:
2536: EXCEPTION
2537: WHEN FND_API.G_EXC_ERROR THEN
2538: x_return_status := FND_API.G_RET_STS_ERROR;
2539: --Bug 3199488
2540: IF ( g_excep_level >= g_debug_level ) THEN
2541: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
2542: END IF;

Line 2541: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

2537: WHEN FND_API.G_EXC_ERROR THEN
2538: x_return_status := FND_API.G_RET_STS_ERROR;
2539: --Bug 3199488
2540: IF ( g_excep_level >= g_debug_level ) THEN
2541: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
2542: END IF;
2543: --Bug 3199488
2544:
2545: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2545: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2541: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
2542: END IF;
2543: --Bug 3199488
2544:
2545: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2546: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2547: --Bug 3199488
2548: IF ( g_excep_level >= g_debug_level ) THEN
2549: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

Line 2546: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2542: END IF;
2543: --Bug 3199488
2544:
2545: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2546: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2547: --Bug 3199488
2548: IF ( g_excep_level >= g_debug_level ) THEN
2549: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
2550: END IF;

Line 2549: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

2545: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2546: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2547: --Bug 3199488
2548: IF ( g_excep_level >= g_debug_level ) THEN
2549: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
2550: END IF;
2551: --Bug 3199488
2552:
2553: WHEN OTHERS THEN

Line 2556: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2552:
2553: WHEN OTHERS THEN
2554: Put_Debug_Msg( l_full_path,l_api_name||' raised unhandled exception');
2555:
2556: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2557:
2558: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) THEN
2559: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
2560: END IF;

Line 2595: x_return_status := FND_API.G_RET_STS_SUCCESS ;

2591: l_full_path VARCHAR2(500) := g_path || 'Update_CC';
2592:
2593: BEGIN
2594:
2595: x_return_status := FND_API.G_RET_STS_SUCCESS ;
2596: IF g_debug_mode = 'Y'
2597: THEN
2598: Put_Debug_Msg( l_full_path,l_api_name||' started');
2599: END IF;

Line 2613: RAISE FND_API.G_EXC_ERROR;

2609: WHERE CURRENT OF c_update_cc;
2610: IF SQL%ROWCOUNT <>1 THEN
2611: message_token ('CC_HEADER_ID', g_cc_header_id);
2612: add_message ('IGC', 'IGC_CC_NOT_FOUND');
2613: RAISE FND_API.G_EXC_ERROR;
2614: END IF;
2615: END LOOP;
2616:
2617: IF g_restore_enc THEN

Line 2633: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2629: p_cc_header_id => g_cc_header_id,
2630: p_encumbrance_status_code => 'P');
2631:
2632:
2633: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2634: IF g_debug_mode = 'Y'
2635: THEN
2636: Put_Debug_Msg( l_full_path,'IGC_CC_BUDGETARY_CTRL_PKG.Set_Encumbrance_Status returned error ');
2637: END IF;

Line 2638: raise FND_API.G_EXC_ERROR;

2634: IF g_debug_mode = 'Y'
2635: THEN
2636: Put_Debug_Msg( l_full_path,'IGC_CC_BUDGETARY_CTRL_PKG.Set_Encumbrance_Status returned error ');
2637: END IF;
2638: raise FND_API.G_EXC_ERROR;
2639: END IF;
2640:
2641: END IF;
2642:

Line 2649: WHEN FND_API.G_EXC_ERROR THEN

2645: Put_Debug_Msg( l_full_path,l_api_name||'Successfully completed');
2646: END IF;
2647:
2648: EXCEPTION
2649: WHEN FND_API.G_EXC_ERROR THEN
2650: x_return_status := FND_API.G_RET_STS_ERROR;
2651: --Bug 3199488
2652: IF ( g_excep_level >= g_debug_level ) THEN
2653: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

Line 2650: x_return_status := FND_API.G_RET_STS_ERROR;

2646: END IF;
2647:
2648: EXCEPTION
2649: WHEN FND_API.G_EXC_ERROR THEN
2650: x_return_status := FND_API.G_RET_STS_ERROR;
2651: --Bug 3199488
2652: IF ( g_excep_level >= g_debug_level ) THEN
2653: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
2654: END IF;

Line 2653: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

2649: WHEN FND_API.G_EXC_ERROR THEN
2650: x_return_status := FND_API.G_RET_STS_ERROR;
2651: --Bug 3199488
2652: IF ( g_excep_level >= g_debug_level ) THEN
2653: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
2654: END IF;
2655: --Bug 3199488
2656:
2657: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2657: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2653: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
2654: END IF;
2655: --Bug 3199488
2656:
2657: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2658: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2659: --Bug 3199488
2660: IF ( g_excep_level >= g_debug_level ) THEN
2661: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

Line 2658: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2654: END IF;
2655: --Bug 3199488
2656:
2657: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2658: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2659: --Bug 3199488
2660: IF ( g_excep_level >= g_debug_level ) THEN
2661: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
2662: END IF;

Line 2661: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

2657: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2658: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2659: --Bug 3199488
2660: IF ( g_excep_level >= g_debug_level ) THEN
2661: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
2662: END IF;
2663: --Bug 3199488
2664:
2665: WHEN OTHERS THEN

Line 2668: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2664:
2665: WHEN OTHERS THEN
2666: Put_Debug_Msg( l_full_path,l_api_name||' raised unhandled exception');
2667:
2668: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2669:
2670: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) THEN
2671: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
2672: END IF;

Line 2722: x_return_status := FND_API.G_RET_STS_SUCCESS ;

2718: BETWEEN NVL(date_from,sysdate) AND NVL(date_to,sysdate);
2719:
2720: BEGIN
2721:
2722: x_return_status := FND_API.G_RET_STS_SUCCESS ;
2723: IF g_debug_mode = 'Y'
2724: THEN
2725: Put_Debug_Msg( l_full_path,l_api_name||' started');
2726: END IF;

Line 2754: RAISE FND_API.G_EXC_ERROR;

2750: -- hierarchy has been assigned to this document type
2751: message_token('CC_TYPE',g_cc_type);
2752: message_token('CC_STATE',g_cc_state);
2753: add_message('IGC','IGC_NO_POS_HIER');
2754: RAISE FND_API.G_EXC_ERROR;
2755: END IF;
2756:
2757: END IF;
2758: -- CBC CC Bug 2111529 07-Feb-2001 S Brewer End(4)

Line 2767: WHEN FND_API.G_EXC_ERROR THEN

2763: Put_Debug_Msg( l_full_path,l_api_name||' Successfully completed');
2764: END IF;
2765:
2766: EXCEPTION
2767: WHEN FND_API.G_EXC_ERROR THEN
2768: x_return_status := FND_API.G_RET_STS_ERROR;
2769: --Bug 3199488
2770: IF ( g_excep_level >= g_debug_level ) THEN
2771: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

Line 2768: x_return_status := FND_API.G_RET_STS_ERROR;

2764: END IF;
2765:
2766: EXCEPTION
2767: WHEN FND_API.G_EXC_ERROR THEN
2768: x_return_status := FND_API.G_RET_STS_ERROR;
2769: --Bug 3199488
2770: IF ( g_excep_level >= g_debug_level ) THEN
2771: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
2772: END IF;

Line 2771: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

2767: WHEN FND_API.G_EXC_ERROR THEN
2768: x_return_status := FND_API.G_RET_STS_ERROR;
2769: --Bug 3199488
2770: IF ( g_excep_level >= g_debug_level ) THEN
2771: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
2772: END IF;
2773: --Bug 3199488
2774:
2775: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2775: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2771: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
2772: END IF;
2773: --Bug 3199488
2774:
2775: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2776: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2777: --Bug 3199488
2778: IF ( g_excep_level >= g_debug_level ) THEN
2779: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

Line 2776: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2772: END IF;
2773: --Bug 3199488
2774:
2775: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2776: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2777: --Bug 3199488
2778: IF ( g_excep_level >= g_debug_level ) THEN
2779: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
2780: END IF;

Line 2779: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

2775: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2776: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2777: --Bug 3199488
2778: IF ( g_excep_level >= g_debug_level ) THEN
2779: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
2780: END IF;
2781: --Bug 3199488
2782:
2783: WHEN OTHERS THEN

Line 2786: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2782:
2783: WHEN OTHERS THEN
2784: Put_Debug_Msg( l_full_path,l_api_name||' raised unhandled exception');
2785:
2786: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2787:
2788: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) THEN
2789: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
2790: END IF;

Line 2867: x_return_status := FND_API.G_RET_STS_SUCCESS ;

2863: AND pos_structure_version_id =g_pos_structure_version_id;
2864:
2865: BEGIN
2866:
2867: x_return_status := FND_API.G_RET_STS_SUCCESS ;
2868: IF g_debug_mode = 'Y'
2869: THEN
2870: Put_Debug_Msg( l_full_path,l_api_name||' started');
2871: END IF;

Line 2875: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2871: END IF;
2872:
2873: Get_Business_group(x_return_status =>l_return_status );
2874:
2875: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2876: raise FND_API.G_EXC_ERROR;
2877: END IF;
2878:
2879: --Looking for positions for current approver

Line 2876: raise FND_API.G_EXC_ERROR;

2872:
2873: Get_Business_group(x_return_status =>l_return_status );
2874:
2875: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2876: raise FND_API.G_EXC_ERROR;
2877: END IF;
2878:
2879: --Looking for positions for current approver
2880:

Line 2891: RAISE FND_API.G_EXC_ERROR;

2887: message_token ('PERSON_ID', g_approver_id);
2888: message_token ('GROUP_ID', g_business_group_id);
2889: message_token ('DATE', sysdate);
2890: add_message ('IGC', 'IGC_ASSIGNMENT_NOT_FOUND');
2891: RAISE FND_API.G_EXC_ERROR;
2892: END IF;
2893:
2894: IF g_debug_mode = 'Y'
2895: THEN

Line 2932: RAISE FND_API.G_EXC_ERROR;

2928: message_token ('POSITION_ID', l_pos_id);
2929: message_token ('STRUCTURE_ID', g_pos_structure_version_id);
2930: message_token ('GROUP_ID', g_business_group_id);
2931: add_message ('IGC', 'IGC_PARENT_POS_NOT_FOUND');
2932: RAISE FND_API.G_EXC_ERROR;
2933: END IF;
2934:
2935: CLOSE c_sub_pos_id;
2936:

Line 2960: RAISE FND_API.G_EXC_ERROR;

2956: message_token ('APPROVER_ID', g_approver_id);
2957: message_token ('STRUCTURE_ID', g_pos_structure_version_id);
2958: message_token ('GROUP_ID', g_business_group_id);
2959: add_message ('IGC', 'IGC_POS_STRUCTURE_NOT_FOUND');
2960: RAISE FND_API.G_EXC_ERROR;
2961: ELSE
2962:
2963: -- CBC CC Bug 2111529 07-Feb-2001 S Brewer Start(6)
2964: -- The option 'Use Approval Hierarchies' has been chosen, but no

Line 2969: RAISE FND_API.G_EXC_ERROR;

2965: -- position hierarchy has been assigned to this document type
2966: message_token('CC_TYPE',g_cc_type);
2967: message_token('CC_STATE',g_cc_state);
2968: add_message('IGC','IGC_NO_POS_HIER');
2969: RAISE FND_API.G_EXC_ERROR;
2970: END IF;
2971:
2972: ELSIF (g_use_approval_hier = 'N') THEN
2973:

Line 2984: RAISE FND_API.G_EXC_ERROR;

2980: IF l_supervisor_id IS NULL THEN --Problem - no position, no supervisor
2981: message_token ('APPROVER_ID', g_approver_id);
2982: message_token ('GROUP_ID', g_business_group_id);
2983: add_message ('IGC', 'IGC_SUPERVISOR_NOT_FOUND');
2984: RAISE FND_API.G_EXC_ERROR;
2985: END IF;
2986: l_cur_approver_id:= l_supervisor_id;
2987: IF g_debug_mode = 'Y'
2988: THEN

Line 3008: WHEN FND_API.G_EXC_ERROR THEN

3004: Put_Debug_Msg( l_full_path,l_api_name||' Successfully completed');
3005: END IF;
3006:
3007: EXCEPTION
3008: WHEN FND_API.G_EXC_ERROR THEN
3009: x_return_status := FND_API.G_RET_STS_ERROR;
3010: --Bug 3199488
3011: IF ( g_excep_level >= g_debug_level ) THEN
3012: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

Line 3009: x_return_status := FND_API.G_RET_STS_ERROR;

3005: END IF;
3006:
3007: EXCEPTION
3008: WHEN FND_API.G_EXC_ERROR THEN
3009: x_return_status := FND_API.G_RET_STS_ERROR;
3010: --Bug 3199488
3011: IF ( g_excep_level >= g_debug_level ) THEN
3012: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
3013: END IF;

Line 3012: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

3008: WHEN FND_API.G_EXC_ERROR THEN
3009: x_return_status := FND_API.G_RET_STS_ERROR;
3010: --Bug 3199488
3011: IF ( g_excep_level >= g_debug_level ) THEN
3012: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
3013: END IF;
3014: --Bug 3199488
3015:
3016: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 3016: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

3012: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
3013: END IF;
3014: --Bug 3199488
3015:
3016: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3017: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3018: --Bug 3199488
3019: IF ( g_excep_level >= g_debug_level ) THEN
3020: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

Line 3017: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3013: END IF;
3014: --Bug 3199488
3015:
3016: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3017: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3018: --Bug 3199488
3019: IF ( g_excep_level >= g_debug_level ) THEN
3020: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
3021: END IF;

Line 3020: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

3016: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3017: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3018: --Bug 3199488
3019: IF ( g_excep_level >= g_debug_level ) THEN
3020: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
3021: END IF;
3022: --Bug 3199488
3023:
3024: WHEN OTHERS THEN

Line 3027: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3023:
3024: WHEN OTHERS THEN
3025: Put_Debug_Msg( l_full_path,l_api_name||' raised unhandled exception');
3026:
3027: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3028:
3029: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) THEN
3030: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
3031: END IF;

Line 3248: x_return_status := FND_API.G_RET_STS_SUCCESS ;

3244:
3245:
3246: BEGIN
3247:
3248: x_return_status := FND_API.G_RET_STS_SUCCESS ;
3249: IF g_debug_mode = 'Y'
3250: THEN
3251: Put_Debug_Msg( l_full_path,l_api_name||' started');
3252: END IF;

Line 3258: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

3254: p_result:='N';
3255:
3256: Get_Business_group(x_return_status =>l_return_status );
3257:
3258: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3259: raise FND_API.G_EXC_ERROR;
3260: END IF;
3261:
3262: --Looking for position/job for current approver

Line 3259: raise FND_API.G_EXC_ERROR;

3255:
3256: Get_Business_group(x_return_status =>l_return_status );
3257:
3258: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3259: raise FND_API.G_EXC_ERROR;
3260: END IF;
3261:
3262: --Looking for position/job for current approver
3263:

Line 3278: RAISE FND_API.G_EXC_ERROR;

3274: message_token ('PERSON_ID', g_approver_id);
3275: message_token ('GROUP_ID', g_business_group_id);
3276: message_token ('ACTIVE_DATE', sysdate);
3277: add_message ('IGC', 'IGC_ASSIGNMENT_NOT_FOUND');
3278: RAISE FND_API.G_EXC_ERROR;
3279: END IF;
3280:
3281: CLOSE c_user_pos_id;
3282:

Line 3349: RAISE FND_API.G_EXC_ERROR;

3345: IF c_control_group_info%NOTFOUND THEN
3346: CLOSE c_control_group_info;
3347: message_token ('CONTROL_GROUP_ID', l_control_group_id);
3348: add_message ('IGC', 'IGC_CONTROL_GROUP_NOT_FOUND');
3349: RAISE FND_API.G_EXC_ERROR;
3350: END IF;
3351:
3352: CLOSE c_control_group_info;
3353:

Line 3721: WHEN FND_API.G_EXC_ERROR THEN

3717: Put_Debug_Msg( l_full_path,l_api_name||' Successfully completed, return Y');
3718: END IF;
3719:
3720: EXCEPTION
3721: WHEN FND_API.G_EXC_ERROR THEN
3722: x_return_status := FND_API.G_RET_STS_ERROR;
3723: --Bug 3199488
3724: IF ( g_excep_level >= g_debug_level ) THEN
3725: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

Line 3722: x_return_status := FND_API.G_RET_STS_ERROR;

3718: END IF;
3719:
3720: EXCEPTION
3721: WHEN FND_API.G_EXC_ERROR THEN
3722: x_return_status := FND_API.G_RET_STS_ERROR;
3723: --Bug 3199488
3724: IF ( g_excep_level >= g_debug_level ) THEN
3725: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
3726: END IF;

Line 3725: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

3721: WHEN FND_API.G_EXC_ERROR THEN
3722: x_return_status := FND_API.G_RET_STS_ERROR;
3723: --Bug 3199488
3724: IF ( g_excep_level >= g_debug_level ) THEN
3725: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
3726: END IF;
3727: --Bug 3199488
3728:
3729: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 3729: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

3725: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
3726: END IF;
3727: --Bug 3199488
3728:
3729: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3730: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3731: --Bug 3199488
3732: IF ( g_excep_level >= g_debug_level ) THEN
3733: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

Line 3730: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3726: END IF;
3727: --Bug 3199488
3728:
3729: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3730: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3731: --Bug 3199488
3732: IF ( g_excep_level >= g_debug_level ) THEN
3733: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
3734: END IF;

Line 3733: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

3729: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3730: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3731: --Bug 3199488
3732: IF ( g_excep_level >= g_debug_level ) THEN
3733: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
3734: END IF;
3735: --Bug 3199488
3736:
3737: WHEN OTHERS THEN

Line 3740: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3736:
3737: WHEN OTHERS THEN
3738: Put_Debug_Msg( l_full_path,l_api_name||' raised unhandled exception');
3739:
3740: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3741:
3742: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) THEN
3743: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
3744: END IF;

Line 3786: Put_Debug_Msg( l_full_path,'Raising an execution exception: '||fnd_msg_pub.get(1,FND_API.G_FALSE));

3782: IGC_MSGS_PKG.add_message (p_appname => appname,
3783: p_msgname => msgname);
3784: IF g_debug_mode = 'Y'
3785: THEN
3786: Put_Debug_Msg( l_full_path,'Raising an execution exception: '||fnd_msg_pub.get(1,FND_API.G_FALSE));
3787: END IF;
3788:
3789: END add_message;
3790:

Line 3804: -- FND_API.G_TRUE

3800:
3801: BEGIN
3802:
3803: -- IF g_debug_init IS NULL THEN --Need to init debug
3804: -- FND_API.G_TRUE
3805: -- IF wf_engine.GetItemAttrText(g_itemtype,g_itemkey,'DEBUG_MODE') = 'T'
3806: -- THEN
3807: -- IGC_MSGS_PKG.g_debug_mode := TRUE;
3808: -- ELSE

Line 3821: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN

3817: p_sub_comp => NULL,
3818: p_filename_val => g_itemtype||'_'||g_itemkey||'.dbg',
3819: x_Return_Status => l_return_status
3820: );
3821: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
3822: raise FND_API.G_EXC_ERROR;
3823: END IF;*/
3824:
3825: --Bug 3199488

Line 3822: raise FND_API.G_EXC_ERROR;

3818: p_filename_val => g_itemtype||'_'||g_itemkey||'.dbg',
3819: x_Return_Status => l_return_status
3820: );
3821: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
3822: raise FND_API.G_EXC_ERROR;
3823: END IF;*/
3824:
3825: --Bug 3199488
3826: IF(g_state_level >= g_debug_level) THEN

Line 3837: /*WHEN FND_API.G_EXC_ERROR THEN

3833: -- Exception handler section for the Put_Debug_Msg procedure.
3834: -- --------------------------------------------------------------------
3835: EXCEPTION
3836:
3837: /*WHEN FND_API.G_EXC_ERROR THEN
3838: RETURN;*/
3839:
3840: WHEN OTHERS THEN
3841: /*IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) THEN

Line 3871: g_error_text := g_error_text||' Mes No'||l_cur||' '||FND_MSG_PUB.GET(l_cur,FND_API.G_FALSE);

3867: IF l_msg_count >0 THEN
3868: g_error_text :='';
3869:
3870: FOR l_cur IN 1..l_msg_count LOOP
3871: g_error_text := g_error_text||' Mes No'||l_cur||' '||FND_MSG_PUB.GET(l_cur,FND_API.G_FALSE);
3872: --Bug 3199488
3873: IF(g_excep_level >= g_debug_level) THEN
3874: FND_LOG.STRING(g_excep_level, l_full_path,g_error_text);
3875: END IF;

Line 3930: RAISE FND_API.G_EXC_ERROR;

3926: CLOSE c_app_status;
3927:
3928: message_token ('CC_NUMBER', g_cc_number);
3929: add_message ('IGC', 'IGC_PREV_STATE_NOT_FOUND');
3930: RAISE FND_API.G_EXC_ERROR;
3931:
3932: END IF;
3933:
3934: CLOSE c_app_status;

Line 3965: x_return_status := FND_API.G_RET_STS_SUCCESS ;

3961:
3962: l_full_path VARCHAR2(500):= g_path || 'Check_Supplier';
3963: BEGIN
3964:
3965: x_return_status := FND_API.G_RET_STS_SUCCESS ;
3966: IF g_debug_mode = 'Y'
3967: THEN
3968: Put_Debug_Msg( l_full_path,l_api_name||' started');
3969: END IF;

Line 3991: RAISE FND_API.G_EXC_ERROR;

3987:
3988: IF NVL(l_vendor_flag,'N') ='Y' AND g_cc_state IN ('PR','CM') THEN
3989:
3990: add_message ('IGC', 'IGC_CC_SUPPLIER_ON_HOLD_NO_APP');
3991: RAISE FND_API.G_EXC_ERROR;
3992:
3993: END IF;
3994:
3995: IF g_debug_mode = 'Y'

Line 4008: WHEN FND_API.G_EXC_ERROR THEN

4004: Put_Debug_Msg( l_full_path,l_api_name||' Successfully completed');
4005: END IF;
4006:
4007: EXCEPTION
4008: WHEN FND_API.G_EXC_ERROR THEN
4009: x_return_status := FND_API.G_RET_STS_ERROR;
4010: --Bug 3199488
4011: IF ( g_excep_level >= g_debug_level ) THEN
4012: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

Line 4009: x_return_status := FND_API.G_RET_STS_ERROR;

4005: END IF;
4006:
4007: EXCEPTION
4008: WHEN FND_API.G_EXC_ERROR THEN
4009: x_return_status := FND_API.G_RET_STS_ERROR;
4010: --Bug 3199488
4011: IF ( g_excep_level >= g_debug_level ) THEN
4012: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
4013: END IF;

Line 4012: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

4008: WHEN FND_API.G_EXC_ERROR THEN
4009: x_return_status := FND_API.G_RET_STS_ERROR;
4010: --Bug 3199488
4011: IF ( g_excep_level >= g_debug_level ) THEN
4012: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
4013: END IF;
4014: --Bug 3199488
4015:
4016: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 4016: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

4012: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
4013: END IF;
4014: --Bug 3199488
4015:
4016: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4017: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4018: --Bug 3199488
4019: IF ( g_excep_level >= g_debug_level ) THEN
4020: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

Line 4017: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4013: END IF;
4014: --Bug 3199488
4015:
4016: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4017: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4018: --Bug 3199488
4019: IF ( g_excep_level >= g_debug_level ) THEN
4020: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
4021: END IF;

Line 4020: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

4016: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4017: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4018: --Bug 3199488
4019: IF ( g_excep_level >= g_debug_level ) THEN
4020: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
4021: END IF;
4022: --Bug 3199488
4023:
4024: WHEN OTHERS THEN

Line 4027: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4023:
4024: WHEN OTHERS THEN
4025: Put_Debug_Msg( l_full_path,l_api_name||' raised unhandled exception');
4026:
4027: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4028:
4029: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) THEN
4030: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
4031: END IF;