[Home] [Help]
15:
16: --
17:
18: --Variables for ATG Central logging
19: g_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
20: g_state_level NUMBER := FND_LOG.LEVEL_STATEMENT;
21: g_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
22: g_event_level NUMBER := FND_LOG.LEVEL_EVENT;
23: g_excep_level NUMBER := FND_LOG.LEVEL_EXCEPTION;
16: --
17:
18: --Variables for ATG Central logging
19: g_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
20: g_state_level NUMBER := FND_LOG.LEVEL_STATEMENT;
21: g_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
22: g_event_level NUMBER := FND_LOG.LEVEL_EVENT;
23: g_excep_level NUMBER := FND_LOG.LEVEL_EXCEPTION;
24: g_error_level NUMBER := FND_LOG.LEVEL_ERROR;
17:
18: --Variables for ATG Central logging
19: g_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
20: g_state_level NUMBER := FND_LOG.LEVEL_STATEMENT;
21: g_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
22: g_event_level NUMBER := FND_LOG.LEVEL_EVENT;
23: g_excep_level NUMBER := FND_LOG.LEVEL_EXCEPTION;
24: g_error_level NUMBER := FND_LOG.LEVEL_ERROR;
25: g_unexp_level NUMBER := FND_LOG.LEVEL_UNEXPECTED;
18: --Variables for ATG Central logging
19: g_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
20: g_state_level NUMBER := FND_LOG.LEVEL_STATEMENT;
21: g_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
22: g_event_level NUMBER := FND_LOG.LEVEL_EVENT;
23: g_excep_level NUMBER := FND_LOG.LEVEL_EXCEPTION;
24: g_error_level NUMBER := FND_LOG.LEVEL_ERROR;
25: g_unexp_level NUMBER := FND_LOG.LEVEL_UNEXPECTED;
26: g_path VARCHAR2(255) := 'IGC.PLSQL.IGCCBCLB.IGC_CC_BUDGETARY_CTRL_PKG.';
19: g_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
20: g_state_level NUMBER := FND_LOG.LEVEL_STATEMENT;
21: g_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
22: g_event_level NUMBER := FND_LOG.LEVEL_EVENT;
23: g_excep_level NUMBER := FND_LOG.LEVEL_EXCEPTION;
24: g_error_level NUMBER := FND_LOG.LEVEL_ERROR;
25: g_unexp_level NUMBER := FND_LOG.LEVEL_UNEXPECTED;
26: g_path VARCHAR2(255) := 'IGC.PLSQL.IGCCBCLB.IGC_CC_BUDGETARY_CTRL_PKG.';
27:
20: g_state_level NUMBER := FND_LOG.LEVEL_STATEMENT;
21: g_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
22: g_event_level NUMBER := FND_LOG.LEVEL_EVENT;
23: g_excep_level NUMBER := FND_LOG.LEVEL_EXCEPTION;
24: g_error_level NUMBER := FND_LOG.LEVEL_ERROR;
25: g_unexp_level NUMBER := FND_LOG.LEVEL_UNEXPECTED;
26: g_path VARCHAR2(255) := 'IGC.PLSQL.IGCCBCLB.IGC_CC_BUDGETARY_CTRL_PKG.';
27:
28: -- Generic Procedure for putting out debug information
21: g_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
22: g_event_level NUMBER := FND_LOG.LEVEL_EVENT;
23: g_excep_level NUMBER := FND_LOG.LEVEL_EXCEPTION;
24: g_error_level NUMBER := FND_LOG.LEVEL_ERROR;
25: g_unexp_level NUMBER := FND_LOG.LEVEL_UNEXPECTED;
26: g_path VARCHAR2(255) := 'IGC.PLSQL.IGCCBCLB.IGC_CC_BUDGETARY_CTRL_PKG.';
27:
28: -- Generic Procedure for putting out debug information
29: --
106: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
107: raise FND_API.G_EXC_ERROR;
108: END IF;*/
109: IF(g_state_level >= g_debug_level) THEN
110: FND_LOG.STRING(g_state_level, p_path, p_debug_msg);
111: END IF;
112:
113: RETURN;
114:
245: IF ( g_unexp_level >= g_debug_level ) THEN
246: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
247: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
248: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
249: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
250: END IF;
251: RETURN;
252:
253: END Account_Line_Wrapper;
355: IF ( g_unexp_level >= g_debug_level ) THEN
356: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
357: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
358: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
359: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
360: END IF;
361: RETURN;
362:
363: END Det_Pf_Wrapper;
481: IF ( g_unexp_level >= g_debug_level ) THEN
482: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
483: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
484: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
485: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
486: END IF;
487: RETURN;
488:
489: END Header_Wrapper;
868: fnd_message.set_name('IGC', 'IGC_INVALID_CC_HEADER_STATE');
869: fnd_message.set_token('HEADER_STATE', l_cc_headers_rec.cc_state);
870: fnd_message.set_token('CC_NUM_VAL', l_cc_headers_rec.cc_num);
871: IF(g_error_level >= g_debug_level) THEN
872: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
873: END IF;
874: fnd_msg_pub.add;
875: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
876:
1077: fnd_message.set_name('IGC', 'IGC_INVALID_CC_HEADER_STATE');
1078: fnd_message.set_token('HEADER_STATE', l_cc_headers_rec.cc_state);
1079: fnd_message.set_token('CC_NUM_VAL', l_cc_headers_rec.cc_num);
1080: IF(g_error_level >= g_debug_level) THEN
1081: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
1082: END IF;
1083: fnd_msg_pub.add;
1084: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1085:
1147: fnd_message.set_name('IGC', 'IGC_INVALID_CC_HEADER_STATE');
1148: fnd_message.set_token('HEADER_STATE', l_cc_headers_rec.cc_state);
1149: fnd_message.set_token('CC_NUM_VAL', l_cc_headers_rec.cc_num);
1150: IF(g_error_level >= g_debug_level) THEN
1151: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
1152: END IF;
1153: fnd_msg_pub.add;
1154: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1155:
1226:
1227: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1228: p_data => x_msg_data );
1229: IF (g_excep_level >= g_debug_level ) THEN
1230: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
1231: END IF;
1232:
1233: WHEN FND_API.G_EXC_UNEXPECTED_ERROR
1234: THEN
1249: END IF;
1250: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1251: p_data => x_msg_data );
1252: IF (g_excep_level >= g_debug_level ) THEN
1253: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
1254: END IF;
1255:
1256: WHEN OTHERS
1257: THEN
1282: IF ( g_unexp_level >= g_debug_level ) THEN
1283: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
1284: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
1285: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
1286: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
1287: END IF;
1288:
1289: END Execute_Rel_Budgetary_Ctrl;
1290:
1417: IF ( g_unexp_level >= g_debug_level ) THEN
1418: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
1419: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
1420: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
1421: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
1422: END IF;
1423:
1424: END Insert_Interface_Row;
1425:
2035: p_data => x_msg_data );
2036:
2037: RETURN;
2038: IF (g_excep_level >= g_debug_level ) THEN
2039: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
2040: END IF;
2041:
2042: WHEN OTHERS
2043: THEN
2055: IF ( g_unexp_level >= g_debug_level ) THEN
2056: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
2057: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
2058: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
2059: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
2060: END IF;
2061: RETURN;
2062:
2063: END Process_Interface_Row;
2382: THEN
2383: fnd_message.set_name('IGC', 'IGC_CC_INVALID_MODE');
2384: fnd_message.set_token('MODE', p_mode,TRUE);
2385: IF(g_error_level >= g_debug_level) THEN
2386: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
2387: END IF;
2388: fnd_msg_pub.add;
2389: RAISE E_INVALID_MODE;
2390: END IF;
2402: THEN
2403: fnd_message.set_name('IGC', 'IGC_CC_NOT_FOUND');
2404: fnd_message.set_token('CC_NUM', to_char(p_cc_header_id),TRUE);
2405: IF(g_error_level >= g_debug_level) THEN
2406: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
2407: END IF;
2408: fnd_msg_pub.add;
2409: RAISE E_CC_NOT_FOUND;
2410:
2463: IF ( g_unexp_level >= g_debug_level ) THEN
2464: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
2465: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
2466: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
2467: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
2468: END IF;
2469: RAISE E_DELETE;
2470: END;
2471: END IF;
2518: WHEN NO_DATA_FOUND
2519: THEN
2520: fnd_message.set_name('IGC', 'IGC_CC_INVALID_GL_DATA');
2521: IF(g_error_level >= g_debug_level) THEN
2522: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
2523: END IF;
2524: fnd_msg_pub.add;
2525: RAISE E_CC_INVALID_SET_UP;
2526: END;
2601: WHEN OTHERS THEN
2602: fnd_message.set_name('IGC', 'IGC_CC_NOT_FOUND');
2603: fnd_message.set_token('CC_NUM', to_char(p_cc_header_id),TRUE);
2604: IF(g_error_level >= g_debug_level) THEN
2605: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
2606: END IF;
2607: fnd_msg_pub.add;
2608: RAISE E_CC_NOT_FOUND;
2609: END;
3410: IF ( g_unexp_level >= g_debug_level ) THEN
3411: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
3412: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
3413: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
3414: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
3415: END IF;
3416:
3417: RAISE E_UPDATE_CC_TABLES;
3418: END;
3698: IF (l_batch_result_code = 'HXX')
3699: THEN
3700: fnd_message.set_name('IGC', 'IGC_CC_CBC_RESULT_CODE_INVALID');
3701: IF(g_state_level >= g_debug_level) THEN
3702: FND_LOG.MESSAGE(g_state_level, l_full_path, FALSE);
3703: END IF;
3704: fnd_msg_pub.add;
3705: ELSE
3706: fnd_message.set_name('IGC', 'IGC_CC_CBC_RESULT_CODE_'||l_batch_result_code);
3704: fnd_msg_pub.add;
3705: ELSE
3706: fnd_message.set_name('IGC', 'IGC_CC_CBC_RESULT_CODE_'||l_batch_result_code);
3707: IF(g_state_level >= g_debug_level) THEN
3708: FND_LOG.MESSAGE(g_state_level, l_full_path, FALSE);
3709: END IF;
3710: fnd_msg_pub.add;
3711: END IF;
3712:
3750:
3751: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3752: p_data => x_msg_data );
3753: IF (g_excep_level >= g_debug_level ) THEN
3754: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR OR E_CC_NOT_FOUND OR E_INVALID_MODE OR E_UPDATE OR E_DELETE Exception Raised');
3755: END IF;
3756:
3757: WHEN E_PROCESS_ROW
3758: THEN
3813:
3814: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3815: p_data => x_msg_data );
3816: IF (g_excep_level >= g_debug_level ) THEN
3817: FND_LOG.STRING (g_excep_level,l_full_path,'E_PROCESS_ROW Exception Raised');
3818: END IF;
3819:
3820: WHEN E_CC_INVALID_SET_UP OR E_NO_BUDGETARY_CONTROL
3821: OR E_SBC_DATA OR E_SBC_DATA1 OR E_CBC_DATA OR E_CBC_DATA1 OR E_CHECK_BUDG_CTRL
3878:
3879: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3880: p_data => x_msg_data );
3881: IF (g_excep_level >= g_debug_level ) THEN
3882: FND_LOG.STRING (g_excep_level,l_full_path,
3883: 'E_CC_INVALID_SET_UP OR E_NO_BUDGETARY_CONTROLOR E_SBC_DATA OR E_SBC_DATA1 OR E_CBC_DATA OR E_CBC_DATA1 OR E_CHECK_BUDG_CTRL');
3884: END IF;
3885:
3886: WHEN E_BC_EXECUTION /*OR E_UPDATE_CC_TABLES */
3947:
3948: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3949: p_data => x_msg_data );
3950: IF (g_excep_level >= g_debug_level ) THEN
3951: FND_LOG.STRING (g_excep_level,l_full_path,'E_BC_EXECUTION Exception Raised');
3952: END IF;
3953:
3954: WHEN OTHERS
3955: THEN
4020: IF ( g_unexp_level >= g_debug_level ) THEN
4021: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
4022: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
4023: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
4024: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
4025: END IF;
4026:
4027: END Execute_Budgetary_Ctrl;
4028:
4083: IF (p_org_id IS NULL)
4084: THEN
4085: fnd_message.set_name('IGC', 'IGC_CC_NO_ORG_ID');
4086: IF(g_error_level >= g_debug_level) THEN
4087: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
4088: END IF;
4089: fnd_msg_pub.add;
4090: RAISE E_NULL_PARAMETER;
4091: END IF;
4093: IF (p_sob_id IS NULL)
4094: THEN
4095: fnd_message.set_name('IGC', 'IGC_CC_NO_SOB_ID');
4096: IF(g_error_level >= g_debug_level) THEN
4097: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
4098: END IF;
4099: fnd_msg_pub.add;
4100: RAISE E_NULL_PARAMETER;
4101: END IF;
4103: IF (p_cc_state IS NULL)
4104: THEN
4105: fnd_message.set_name('IGC', 'IGC_CC_NO_CC_STATE');
4106: IF(g_error_level >= g_debug_level) THEN
4107: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
4108: END IF;
4109: fnd_msg_pub.add;
4110: RAISE E_NULL_PARAMETER;
4111: END IF;
4124: WHEN NO_DATA_FOUND
4125: THEN
4126: fnd_message.set_name('IGC', 'IGC_CC_INVALID_GL_DATA');
4127: IF(g_error_level >= g_debug_level) THEN
4128: FND_LOG.MESSAGE(g_error_level, l_full_path || 'Msg4', FALSE);
4129: END IF;
4130: fnd_msg_pub.add;
4131: RAISE E_CC_INVALID_SET_UP;
4132: END;
4190: x_encumbrance_on := FND_API.G_FALSE;
4191: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
4192: p_data => x_msg_data );
4193: IF (g_excep_level >= g_debug_level ) THEN
4194: FND_LOG.STRING (g_excep_level,l_full_path,'E_CC_NOT_FOUND OR E_CC_INVALID_SET_UP OR E_GL_DATA OR E_NULL_PARAMETER Exception Raised');
4195: END IF;
4196:
4197: WHEN FND_API.G_EXC_UNEXPECTED_ERROR
4198: THEN
4201:
4202: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
4203: p_data => x_msg_data );
4204: IF (g_excep_level >= g_debug_level ) THEN
4205: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
4206: END IF;
4207:
4208: WHEN OTHERS
4209: THEN
4221: IF ( g_unexp_level >= g_debug_level ) THEN
4222: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
4223: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
4224: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
4225: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
4226: END IF;
4227:
4228: END Check_Budgetary_Ctrl_On;
4229:
4446: THEN
4447: fnd_message.set_name('IGC', 'IGC_CC_INVALID_STATUS_CODE');
4448: fnd_message.set_token('CODE', p_encumbrance_status_code,TRUE);
4449: IF(g_error_level >= g_debug_level) THEN
4450: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
4451: END IF;
4452: fnd_msg_pub.add;
4453: RAISE E_INVALID_STATUS_CODE;
4454:
4467: THEN
4468: fnd_message.set_name('IGC', 'IGC_CC_NOT_FOUND');
4469: fnd_message.set_token('CC_NUM', to_char(p_cc_header_id),TRUE);
4470: IF(g_excep_level >= g_debug_level) THEN
4471: FND_LOG.MESSAGE(g_excep_level, l_full_path, FALSE);
4472: END IF;
4473: fnd_msg_pub.add;
4474: RAISE E_CC_NOT_FOUND;
4475:
4645: END IF;
4646: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
4647: p_data => x_msg_data );
4648: IF (g_excep_level >= g_debug_level ) THEN
4649: FND_LOG.STRING (g_excep_level,l_full_path,'E_CC_NOT_FOUND OR E_INVALID_STATUS_CODE Exception Raised');
4650: END IF;
4651:
4652: WHEN FND_API.G_EXC_UNEXPECTED_ERROR
4653: THEN
4667: END IF;
4668: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
4669: p_data => x_msg_data );
4670: IF (g_excep_level >= g_debug_level ) THEN
4671: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
4672: END IF;
4673:
4674: WHEN OTHERS
4675: THEN
4699: IF ( g_unexp_level >= g_debug_level ) THEN
4700: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
4701: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
4702: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
4703: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
4704: END IF;
4705:
4706: END Set_Encumbrance_Status;
4707:
4944: x_valid_cc := FND_API.G_FALSE;
4945: x_return_status := FND_API.G_RET_STS_ERROR;
4946: fnd_message.set_name('IGC', 'IGC_CC_INVALID_GL_DATA');
4947: IF(g_error_level >= g_debug_level) THEN
4948: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
4949: END IF;
4950: fnd_msg_pub.add;
4951: RAISE E_CC_INVALID_SET_UP;
4952: END;
5015: x_return_status := FND_API.G_RET_STS_ERROR;
5016: fnd_message.set_name('IGC', 'IGC_CC_EFFECTIVE_START_DATE');
5017: fnd_message.set_token('STARTDATE',FND_DATE.DATE_TO_CHARDATE (P_START_DATE),FALSE);
5018: IF(g_state_level >= g_debug_level) THEN
5019: FND_LOG.MESSAGE(g_state_level, l_full_path, FALSE);
5020: END IF;
5021: fnd_msg_pub.add;
5022: END IF;
5023: END IF;
5052: x_return_status := FND_API.G_RET_STS_ERROR;
5053: fnd_message.set_name('IGC', 'IGC_CC_EFF_CCPER_START_DATE');
5054: fnd_message.set_token('STARTDATE', FND_DATE.DATE_TO_CHARDATE (P_START_DATE),FALSE);
5055: IF(g_state_level >= g_debug_level) THEN
5056: FND_LOG.MESSAGE(g_state_level, l_full_path, FALSE);
5057: END IF;
5058: fnd_msg_pub.add;
5059: END IF;
5060:
5092: IF ( g_unexp_level >= g_debug_level ) THEN
5093: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
5094: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
5095: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
5096: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
5097: END IF;
5098: END;
5099:
5100: IF (NVL(l_COUNT,0) = 0) THEN
5102: x_return_status := FND_API.G_RET_STS_ERROR;
5103: fnd_message.set_name('IGC', 'IGC_CC_EFF_CCGLPER_START_DATE');
5104: fnd_message.set_token('STARTDATE',FND_DATE.DATE_TO_CHARDATE(p_start_date),FALSE);
5105: IF(g_error_level >= g_debug_level) THEN
5106: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
5107: END IF;
5108: fnd_msg_pub.add;
5109: END IF;
5110:
5130: x_return_status := FND_API.G_RET_STS_ERROR;
5131: fnd_message.set_name('IGC', 'IGC_CC_EFF_COVER_START_DATE');
5132: fnd_message.set_token('STARTDATE',FND_DATE.DATE_TO_CHARDATE(P_START_DATE),FALSE);
5133: IF(g_error_level >= g_debug_level) THEN
5134: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
5135: END IF;
5136: fnd_msg_pub.add;
5137: END IF;
5138: END IF; -- Commitment Type is Cover
5156: x_return_status := FND_API.G_RET_STS_ERROR;
5157: fnd_message.set_name('IGC', 'IGC_CC_EFF_REL_START_DATE');
5158: fnd_message.set_token('STARTDATE',FND_DATE.DATE_TO_CHARDATE (P_START_DATE),FALSE);
5159: IF(g_error_level >= g_debug_level) THEN
5160: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
5161: END IF;
5162: fnd_msg_pub.add;
5163: END IF;
5164: END IF; -- Commitment Type is Release.
5167: x_valid_cc := FND_API.G_FALSE;
5168: x_return_status := FND_API.G_RET_STS_ERROR;
5169: fnd_message.set_name('IGC', 'IGC_CC_NO_START_DATE');
5170: IF(g_error_level >= g_debug_level) THEN
5171: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
5172: END IF;
5173: fnd_msg_pub.add;
5174:
5175: END IF; -- Start Date is Not Null. Start Date Validations ends here.
5184: fnd_message.set_name('IGC', 'IGC_CC_EFFECTIVE_END_DATE');
5185: fnd_message.set_token('STARTDATE',FND_DATE.DATE_TO_CHARDATE (P_START_DATE),FALSE);
5186: fnd_message.set_token('ENDDATE',FND_DATE.DATE_TO_CHARDATE (P_END_DATE),FALSE);
5187: IF(g_error_level >= g_debug_level) THEN
5188: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
5189: END IF;
5190: fnd_msg_pub.add;
5191: END IF;
5192:
5208: x_valid_cc := FND_API.G_FALSE;
5209: x_return_status := FND_API.G_RET_STS_ERROR;
5210: fnd_message.set_name('IGC', 'IGC_CC_EFF_COVER_END_DATE');
5211: IF(g_error_level >= g_debug_level) THEN
5212: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
5213: END IF;
5214: fnd_msg_pub.add;
5215: END IF;
5216: END IF; -- Commitment Type is Cover
5232: x_valid_cc := FND_API.G_FALSE;
5233: x_return_status := FND_API.G_RET_STS_ERROR;
5234: fnd_message.set_name('IGC', 'IGC_CC_EFF_REL_END_DATE');
5235: IF(g_error_level >= g_debug_level) THEN
5236: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
5237: END IF;
5238: fnd_msg_pub.add;
5239: END IF;
5240: END IF; -- Commitment Type is Release
5252: x_return_status := FND_API.G_RET_STS_ERROR;
5253: fnd_message.set_name('IGC', 'IGC_CC_DET_PF_START_DATE');
5254: fnd_message.set_token('PFDATE',FND_DATE.DATE_TO_CHARDATE(p_cc_det_pf_date),FALSE);
5255: IF(g_error_level >= g_debug_level) THEN
5256: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
5257: END IF;
5258: fnd_msg_pub.add;
5259: END IF;
5260: IF ( (p_cc_det_pf_date > p_end_date) AND
5264: x_return_status := FND_API.G_RET_STS_ERROR;
5265: fnd_message.set_name('IGC', 'IGC_CC_DET_PF_END_DATE');
5266: fnd_message.set_token('PFDATE',FND_DATE.DATE_TO_CHARDATE(p_cc_det_pf_date),FALSE);
5267: IF(g_error_level >= g_debug_level) THEN
5268: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
5269: END IF;
5270: fnd_msg_pub.add;
5271: END IF;
5272:
5297: IF ( g_unexp_level >= g_debug_level ) THEN
5298: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
5299: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
5300: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
5301: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
5302: END IF;
5303: END;
5304: IF NVL(l_COUNT,0) = 0 THEN
5305: x_valid_cc := FND_API.G_FALSE;
5305: x_valid_cc := FND_API.G_FALSE;
5306: x_return_status := FND_API.G_RET_STS_ERROR;
5307: fnd_message.set_name('IGC', 'IGC_CC_DET_PF_DATE');
5308: IF(g_error_level >= g_debug_level) THEN
5309: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
5310: END IF;
5311: fnd_msg_pub.add;
5312: END IF;
5313: END IF; -- Budgetary Control turned on.
5334: fnd_message.set_token('ACCTDATE',FND_DATE.DATE_TO_CHARDATE(P_ACCT_DATE),FALSE);
5335: fnd_message.set_token('STARTDATE',FND_DATE.DATE_TO_CHARDATE(P_START_DATE),FALSE);
5336: fnd_message.set_token('ENDDATE',FND_DATE.DATE_TO_CHARDATE(P_END_DATE),FALSE);
5337: IF(g_error_level >= g_debug_level) THEN
5338: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
5339: END IF;
5340: fnd_msg_pub.add;
5341: END IF;
5342:
5353: fnd_message.set_name('IGC', 'IGC_CC_ACCT_DATE_CL_CT');
5354: fnd_message.set_token('ACCTDATE',FND_DATE.DATE_TO_CHARDATE(P_ACCT_DATE),FALSE);
5355: fnd_message.set_token('PREV_ACCTDATE',FND_DATE.DATE_TO_CHARDATE(P_PREV_ACCT_DATE),FALSE);
5356: IF(g_error_level >= g_debug_level) THEN
5357: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
5358: END IF;
5359: fnd_msg_pub.add;
5360: END IF;
5361: END IF;
5402: IF ( g_unexp_level >= g_debug_level ) THEN
5403: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
5404: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
5405: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
5406: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
5407: END IF;
5408:
5409: END;
5410: IF NVL(l_COUNT,0) = 0 THEN
5411: x_valid_cc := FND_API.G_FALSE;
5412: x_return_status := FND_API.G_RET_STS_ERROR;
5413: fnd_message.set_name('IGC', 'IGC_CC_ACCT_DATE_OF');
5414: IF(g_error_level >= g_debug_level) THEN
5415: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
5416: END IF;
5417: fnd_msg_pub.add;
5418: END IF;
5419:
5484: x_return_status := FND_API.G_RET_STS_ERROR;
5485: fnd_message.set_name('IGC', 'IGC_CC_ACCT_FISCAL_YRS_NE');
5486: fnd_message.set_TOKEN('PREVACTDATE',FND_DATE.DATE_TO_CHARDATE (p_prev_acct_date),FALSE);
5487: IF(g_error_level >= g_debug_level) THEN
5488: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
5489: END IF;
5490: fnd_msg_pub.add;
5491: END IF; -- Fiscal Year Mismatch valdn ends here.
5492: END IF; -- If Previously been encumbered. Bug # 1619201.
5517: IF ( g_unexp_level >= g_debug_level ) THEN
5518: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
5519: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
5520: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
5521: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
5522: END IF;
5523: END;
5524: IF NVL(l_COUNT,0) = 0 THEN
5525: x_valid_cc := FND_API.G_FALSE;
5525: x_valid_cc := FND_API.G_FALSE;
5526: x_return_status := FND_API.G_RET_STS_ERROR;
5527: fnd_message.set_name('IGC', 'IGC_CC_ACCT_DATE_O');
5528: IF(g_error_level >= g_debug_level) THEN
5529: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
5530: END IF;
5531: fnd_msg_pub.add;
5532: END IF;
5533: END IF;
5555: fnd_message.set_token('ACCTDATE',FND_DATE.DATE_TO_CHARDATE(P_ACCT_DATE),FALSE);
5556: fnd_message.set_token('STARTDATE',FND_DATE.DATE_TO_CHARDATE(P_START_DATE),FALSE);
5557: fnd_message.set_token('ENDDATE',FND_DATE.DATE_TO_CHARDATE(P_END_DATE),FALSE);
5558: IF(g_error_level >= g_debug_level) THEN
5559: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
5560: END IF;
5561: fnd_msg_pub.add;
5562: END IF;
5563:
5574: fnd_message.set_name('IGC', 'IGC_CC_ACCT_DATE_CL_CT');
5575: fnd_message.set_token('ACCTDATE',FND_DATE.DATE_TO_CHARDATE(P_ACCT_DATE),FALSE);
5576: fnd_message.set_token('PREV_ACCTDATE',FND_DATE.DATE_TO_CHARDATE(P_PREV_ACCT_DATE),FALSE);
5577: IF(g_error_level >= g_debug_level) THEN
5578: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
5579: END IF;
5580: fnd_msg_pub.add;
5581: END IF;
5582: END IF;
5623: IF ( g_unexp_level >= g_debug_level ) THEN
5624: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
5625: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
5626: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
5627: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
5628: END IF;
5629: END;
5630: IF NVL(l_COUNT,0) = 0 THEN
5631: x_valid_cc := FND_API.G_FALSE;
5631: x_valid_cc := FND_API.G_FALSE;
5632: x_return_status := FND_API.G_RET_STS_ERROR;
5633: fnd_message.set_name('IGC', 'IGC_CC_ACCT_DATE_OF');
5634: IF(g_error_level >= g_debug_level) THEN
5635: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
5636: END IF;
5637: fnd_msg_pub.add;
5638: END IF;
5639:
5704: x_return_status := FND_API.G_RET_STS_ERROR;
5705: fnd_message.set_name('IGC', 'IGC_CC_ACCT_FISCAL_YRS_NE');
5706: fnd_message.set_TOKEN('PREVACTDATE',FND_DATE.DATE_TO_CHARDATE (p_prev_acct_date),FALSE);
5707: IF(g_error_level >= g_debug_level) THEN
5708: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
5709: END IF;
5710: fnd_msg_pub.add;
5711: END IF; -- Fiscal Year Mismatch valdn ends here.
5712: END IF; -- If Previously been encumbered. Bug # 1619201.
5737: IF ( g_unexp_level >= g_debug_level ) THEN
5738: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
5739: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
5740: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
5741: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
5742: END IF;
5743: END;
5744: IF NVL(l_COUNT,0) = 0 THEN
5745: x_valid_cc := FND_API.G_FALSE;
5745: x_valid_cc := FND_API.G_FALSE;
5746: x_return_status := FND_API.G_RET_STS_ERROR;
5747: fnd_message.set_name('IGC', 'IGC_CC_ACCT_DATE_O');
5748: IF(g_error_level >= g_debug_level) THEN
5749: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
5750: END IF;
5751: fnd_msg_pub.add;
5752: END IF;
5753: END IF;
5769: x_return_status := FND_API.G_RET_STS_ERROR;
5770: fnd_message.set_name('IGC', 'IGC_CC_NOT_FOUND');
5771: fnd_message.set_token('CC_NUM', to_char(p_cc_header_id),TRUE);
5772: IF(g_error_level >= g_debug_level) THEN
5773: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
5774: END IF;
5775: l_error_message := fnd_message.get;
5776: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name, l_error_message);
5777: RAISE E_CC_NOT_FOUND;
5826: x_return_status := FND_API.G_RET_STS_ERROR;
5827: fnd_message.set_name('IGC', 'IGC_CC_NO_PF');
5828: fnd_message.set_token('ACCT_NUM', to_char(l_cc_acct_lines_rec.cc_acct_line_num),TRUE);
5829: IF(g_error_level >= g_debug_level) THEN
5830: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
5831: END IF;
5832: fnd_msg_pub.add;
5833: ELSIF (NVL(l_cc_det_pf_cnt,0) > 0) THEN
5834:
5848: fnd_message.set_name('IGC', 'IGC_CC_DET_PF_ACCT_DATE');
5849: fnd_message.set_TOKEN('PFDATE',FND_DATE.DATE_TO_CHARDATE (l_cc_det_pf_lines_rec.cc_det_pf_date),FALSE);
5850: fnd_message.set_TOKEN('ACCTDATE',FND_DATE.DATE_TO_CHARDATE (p_acct_date),FALSE);
5851: IF(g_error_level >= g_debug_level) THEN
5852: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
5853: END IF;
5854: fnd_msg_pub.add;
5855: END IF;
5856:
5870: x_return_status := FND_API.G_RET_STS_ERROR;
5871: fnd_message.set_name('IGC', 'IGC_CC_NO_ACCT_LINES');
5872: fnd_message.set_token('CC_NUM', l_cc_headers_rec.cc_num,TRUE);
5873: IF(g_error_level >= g_debug_level) THEN
5874: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
5875: END IF;
5876: fnd_msg_pub.add;
5877: END IF;
5878: END IF;
5893: x_return_status := FND_API.G_RET_STS_ERROR;
5894: fnd_message.set_name('IGC', 'IGC_CC_NOT_FOUND');
5895: fnd_message.set_token('CC_NUM', to_char(p_cc_header_id),TRUE);
5896: IF(g_error_level >= g_debug_level) THEN
5897: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
5898: END IF;
5899: l_error_message := fnd_message.get;
5900: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name, l_error_message);
5901: RAISE E_CC_NOT_FOUND;
5943: x_return_status := FND_API.G_RET_STS_ERROR;
5944: fnd_message.set_name('IGC', 'IGC_CC_NO_PF');
5945: fnd_message.set_token('ACCT_NUM', to_char(l_cc_acct_lines_rec.cc_acct_line_num),TRUE);
5946: IF(g_error_level >= g_debug_level) THEN
5947: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
5948: END IF;
5949: fnd_msg_pub.add;
5950: ELSIF (NVL(l_cc_det_pf_cnt,0) > 0) THEN
5951:
5964: x_return_status := FND_API.G_RET_STS_ERROR;
5965: fnd_message.set_name('IGC', 'IGC_CC_DET_PF_START_DATE');
5966: fnd_message.set_TOKEN('PFDATE',FND_DATE.DATE_TO_CHARDATE (l_cc_det_pf_lines_rec.cc_det_pf_date),FALSE);
5967: IF (g_error_level >= g_debug_level) THEN
5968: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
5969: END IF;
5970: fnd_msg_pub.add;
5971: END IF;
5972:
5979: x_return_status := FND_API.G_RET_STS_ERROR;
5980: fnd_message.set_name('IGC', 'IGC_CC_DET_PF_END_DATE');
5981: fnd_message.set_TOKEN('PFDATE',FND_DATE.DATE_TO_CHARDATE (l_cc_det_pf_lines_rec.cc_det_pf_date),FALSE);
5982: IF(g_error_level >= g_debug_level) THEN
5983: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
5984: END IF;
5985: fnd_msg_pub.add;
5986: END IF;
5987:
6022: IF ( g_unexp_level >= g_debug_level ) THEN
6023: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
6024: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
6025: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
6026: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
6027: END IF;
6028: END;
6029: IF NVL(l_COUNT,0) = 0 THEN
6030: x_valid_cc := FND_API.G_FALSE;
6030: x_valid_cc := FND_API.G_FALSE;
6031: x_return_status := FND_API.G_RET_STS_ERROR;
6032: fnd_message.set_name('IGC', 'IGC_CC_DET_PF_DATE');
6033: IF(g_error_level >= g_debug_level) THEN
6034: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
6035: END IF;
6036: fnd_msg_pub.add;
6037: END IF;
6038: END IF; -- ending the If Condition added for bug 9366764
6093: x_return_status := FND_API.G_RET_STS_ERROR;
6094: fnd_message.set_name('IGC','IGC_CC_DET_PF_DATE_NO_UPDATE');
6095: fnd_message.set_TOKEN('ENCMBRNCDATE',FND_DATE.DATE_TO_CHARDATE (l_cc_det_pf_lines_rec.cc_det_pf_encmbrnc_date),FALSE);
6096: IF(g_error_level >= g_debug_level) THEN
6097: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
6098: END IF;
6099: fnd_msg_pub.add;
6100: END IF;
6101: END IF;
6168: x_return_status := FND_API.G_RET_STS_ERROR;
6169: fnd_message.set_name('IGC', 'IGC_CC_FISCAL_YRS_NE');
6170: fnd_message.set_TOKEN('ENCMBRNCDATE',FND_DATE.DATE_TO_CHARDATE (l_cc_det_pf_lines_rec.cc_det_pf_encmbrnc_date),FALSE);
6171: IF(g_error_level >= g_debug_level) THEN
6172: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
6173: END IF;
6174: fnd_msg_pub.add;
6175: END IF; -- Fiscal Year Mismatch valdn ends here.
6176: END IF; -- Encumbrance Amt is greater than zero ends here.
6199: x_return_status := FND_API.G_RET_STS_ERROR;
6200: fnd_message.set_name('IGC', 'IGC_CC_AMT_MISMATCH');
6201: fnd_message.set_token('ACCT_NUM',to_char(l_cc_acct_lines_rec.cc_acct_line_num),TRUE);
6202: IF(g_error_level >= g_debug_level) THEN
6203: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
6204: END IF;
6205: fnd_msg_pub.add;
6206: END IF;
6207:
6214: x_return_status := FND_API.G_RET_STS_ERROR;
6215: fnd_message.set_name('IGC', 'IGC_CC_NO_ACCT_LINES');
6216: fnd_message.set_token('CC_NUM', l_cc_headers_rec.cc_num,TRUE);
6217: IF(g_error_level >= g_debug_level) THEN
6218: FND_LOG.MESSAGE(g_error_level, g_debug_level, FALSE);
6219: END IF;
6220: fnd_msg_pub.add;
6221: END IF;
6222: END IF;
6240: x_return_status := FND_API.G_RET_STS_ERROR;
6241: fnd_message.set_name('IGC', 'IGC_CC_NOT_FOUND');
6242: fnd_message.set_token('CC_NUM', to_char(p_cc_header_id),TRUE);
6243: IF(g_error_level >= g_debug_level) THEN
6244: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
6245: END IF;
6246: l_error_message := fnd_message.get;
6247: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name, l_error_message);
6248: RAISE E_CC_NOT_FOUND;
6281: IF ( g_unexp_level >= g_debug_level ) THEN
6282: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
6283: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
6284: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
6285: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
6286: END IF;
6287: END;
6288: IF (NVL(l_cc_det_pf_cnt ,0) = 0)
6289: AND l_cc_acct_lines_rec.cc_ent_withheld_amt <> l_cc_acct_lines_rec.cc_acct_entered_amt
6295: x_return_status := FND_API.G_RET_STS_ERROR;
6296: fnd_message.set_name('IGC', 'IGC_CC_NO_PF');
6297: fnd_message.set_token('ACCT_NUM', to_char(l_cc_acct_lines_rec.cc_acct_line_num),TRUE);
6298: IF(g_error_level >= g_debug_level) THEN
6299: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
6300: END IF;
6301: fnd_msg_pub.add;
6302: ELSIF (NVL(l_cc_det_pf_cnt,0) > 0) THEN
6303:
6316: x_return_status := FND_API.G_RET_STS_ERROR;
6317: fnd_message.set_name('IGC', 'IGC_CC_DET_PF_START_DATE');
6318: fnd_message.set_TOKEN('PFDATE',FND_DATE.DATE_TO_CHARDATE (l_cc_det_pf_lines_rec.cc_det_pf_date),FALSE);
6319: IF(g_error_level >= g_debug_level) THEN
6320: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
6321: END IF;
6322: fnd_msg_pub.add;
6323: END IF;
6324:
6331: x_return_status := FND_API.G_RET_STS_ERROR;
6332: fnd_message.set_name('IGC', 'IGC_CC_DET_PF_END_DATE');
6333: fnd_message.set_TOKEN('PFDATE',FND_DATE.DATE_TO_CHARDATE (l_cc_det_pf_lines_rec.cc_det_pf_date),FALSE);
6334: IF(g_error_level >= g_debug_level) THEN
6335: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
6336: END IF;
6337: fnd_msg_pub.add;
6338: END IF;
6339:
6374: IF ( g_unexp_level >= g_debug_level ) THEN
6375: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
6376: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
6377: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
6378: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
6379: END IF;
6380: END;
6381: IF NVL(l_COUNT,0) = 0 THEN
6382: x_valid_cc := FND_API.G_FALSE;
6382: x_valid_cc := FND_API.G_FALSE;
6383: x_return_status := FND_API.G_RET_STS_ERROR;
6384: fnd_message.set_name('IGC', 'IGC_CC_DET_PF_DATE');
6385: IF(g_error_level >= g_debug_level) THEN
6386: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
6387: END IF;
6388: fnd_msg_pub.add;
6389: END IF;
6390: END IF; -- End of the If condition added for bug 9366764
6445: fnd_message.set_name('IGC',
6446: 'IGC_CC_DET_PF_DATE_NO_UPDATE');
6447: fnd_message.set_TOKEN('ENCMBRNCDATE',FND_DATE.DATE_TO_CHARDATE (l_cc_det_pf_lines_rec.cc_det_pf_encmbrnc_date),FALSE);
6448: IF(g_error_level >= g_debug_level) THEN
6449: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
6450: END IF;
6451: fnd_msg_pub.add;
6452: END IF;
6453: END IF;
6520: x_return_status := FND_API.G_RET_STS_ERROR;
6521: fnd_message.set_name('IGC', 'IGC_CC_FISCAL_YRS_NE');
6522: fnd_message.set_TOKEN('ENCMBRNCDATE',FND_DATE.DATE_TO_CHARDATE (l_cc_det_pf_lines_rec.cc_det_pf_encmbrnc_date),FALSE);
6523: IF(g_error_level >= g_debug_level) THEN
6524: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
6525: END IF;
6526: fnd_msg_pub.add;
6527: END IF; -- Fiscal Year Mismatch valdn ends here.
6528: END IF; -- Encumbrance Amt is greater than zero ends here.
6550: x_return_status := FND_API.G_RET_STS_ERROR;
6551: fnd_message.set_name('IGC', 'IGC_CC_AMT_MISMATCH');
6552: fnd_message.set_token('ACCT_NUM',to_char(l_cc_acct_lines_rec.cc_acct_line_num),TRUE);
6553: IF(g_error_level >= g_debug_level) THEN
6554: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
6555: END IF;
6556: fnd_msg_pub.add;
6557: END IF;
6558:
6565: x_return_status := FND_API.G_RET_STS_ERROR;
6566: fnd_message.set_name('IGC', 'IGC_CC_NO_ACCT_LINES');
6567: fnd_message.set_token('CC_NUM', l_cc_headers_rec.cc_num,TRUE);
6568: IF(g_error_level >= g_debug_level) THEN
6569: FND_LOG.MESSAGE(g_error_level, l_full_path, FALSE);
6570: END IF;
6571: fnd_msg_pub.add;
6572: END IF;
6573:
6584: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
6585: p_data => x_msg_data );
6586: CLOSE c_account_lines;
6587: IF (g_excep_level >= g_debug_level ) THEN
6588: FND_LOG.STRING (g_excep_level,l_full_path,'E_CC_NOT_FOUND OR E_CC_INVALID_SET_UP Exception Raised');
6589: END IF;
6590:
6591: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6592: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6594: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
6595: p_data => x_msg_data );
6596: CLOSE c_account_lines;
6597: IF (g_excep_level >= g_debug_level ) THEN
6598: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
6599: END IF;
6600:
6601: WHEN OTHERS THEN
6602: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6614: IF ( g_unexp_level >= g_debug_level ) THEN
6615: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
6616: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
6617: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
6618: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
6619: END IF;
6620:
6621: END Validate_CC;
6622:
6688: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6689: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
6690: p_data => x_msg_data );
6691: IF (g_excep_level >= g_debug_level ) THEN
6692: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
6693: END IF;
6694:
6695: WHEN OTHERS THEN
6696: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6706: IF ( g_unexp_level >= g_debug_level ) THEN
6707: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
6708: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
6709: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
6710: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
6711: END IF;
6712:
6713: END calculate_nonrec_tax;
6714: