[Home] [Help]
276:
277: -- Now that we have checked all of the input parameters,
278: -- raise an error if any of the parameters was invalid.
279: IF l_parameters_valid_flag = 'N' THEN
280: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
281: END IF;
282:
283: -- Step 1: Handle Deletion
284: IF p_delete_flag = 'Y' THEN
305: P_CALLED_MODE => p_called_mode,
306: P_MODULE_NAME => l_module_name);
307: END IF;
308: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
309: raise PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
310: END IF;
311:
312: IF P_PA_DEBUG_MODE = 'Y' THEN
313: PA_DEBUG.RESET_CURR_FUNCTION;
390: p_module_name => l_module_name,
391: p_log_level => l_log_level );
392: END LOOP;
393: END IF; -- debug mode logic
394: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
395: END IF; -- duplicate record check
396:
397: -- 0.3. Raise an error if any records with null resource_assignment_id are found.
398: SELECT count(*)
411: p_log_level => l_log_level );
412: END IF;
413: --PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA',
414: -- p_msg_name => 'PA_RBC_RA_ID_NULL_ERR' );
415: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
416: END IF; -- IF l_null_record_count > 0 THEN
417:
418: -- 0.4. Whenever copy_flag <> 'Y', txn_currency_code should not be null.
419: -- Raise an error if any records with null resource_assignment_id are found.
434: p_log_level => l_log_level );
435: END IF;
436: --PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA',
437: -- p_msg_name => 'PA_RBC_TXN_CUR_NULL_ERR' );
438: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
439: END IF; -- IF l_null_record_count > 0 THEN
440: END IF; --IF p_copy_flag = 'Y' THEN
441:
442: END IF; -- additional Table Mode validation
469: P_CALLED_MODE => p_called_mode,
470: P_MODULE_NAME => l_module_name);
471: END IF;
472: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
473: raise PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
474: END IF;
475:
476: IF P_PA_DEBUG_MODE = 'Y' THEN
477: PA_DEBUG.RESET_CURR_FUNCTION;
507: P_CALLED_MODE => p_called_mode,
508: P_MODULE_NAME => l_module_name);
509: END IF;
510: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
511: raise PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
512: END IF;
513:
514: -- Step 4: Handle Rollup of Amounts
515: ELSIF p_rollup_flag = 'Y' THEN
537: P_CALLED_MODE => p_called_mode,
538: P_MODULE_NAME => l_module_name);
539: END IF;
540: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
541: raise PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
542: END IF;
543:
544: END IF; -- p_rollup_flag = 'Y'
545:
548: PA_DEBUG.RESET_CURR_FUNCTION;
549: END IF;
550:
551: EXCEPTION
552: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
553:
554: l_msg_count := FND_MSG_PUB.count_msg;
555: IF l_msg_count = 1 THEN
556: PA_INTERFACE_UTILS_PUB.get_messages
845: IF P_PA_DEBUG_MODE = 'Y' THEN
846: PA_DEBUG.RESET_CURR_FUNCTION;
847: END IF;
848: EXCEPTION
849: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
850:
851: l_msg_count := FND_MSG_PUB.count_msg;
852: IF l_msg_count = 1 THEN
853: PA_INTERFACE_UTILS_PUB.get_messages
1100: P_CALLED_MODE => p_called_mode,
1101: P_MODULE_NAME => l_module_name,
1102: P_LOG_LEVEL => l_log_level );
1103: END IF;
1104: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
1105: END;
1106:
1107: -- Step 1: Select rates and amounts from the appropriate cursor.
1108:
1173: P_CALLED_MODE => p_called_mode,
1174: P_MODULE_NAME => l_module_name,
1175: P_LOG_LEVEL => l_log_level );
1176: END IF;
1177: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
1178: ELSIF p_copy_mode = G_COPY_OVERRIDES THEN
1179: OPEN tbl_mode_copy_overrides_csr
1180: (p_src_version_id,
1181: p_fp_cols_rec.x_budget_version_id);
1319: P_MODULE_NAME => l_module_name,
1320: P_LOG_LEVEL => l_log_level );
1321: END IF;
1322: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1323: raise PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
1324: END IF;
1325:
1326: -- Step 4: Insert records into the PA_RESOURCE_ASGN_CURR table.
1327:
1446: IF P_PA_DEBUG_MODE = 'Y' THEN
1447: PA_DEBUG.RESET_CURR_FUNCTION;
1448: END IF;
1449: EXCEPTION
1450: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
1451:
1452: l_msg_count := FND_MSG_PUB.count_msg;
1453: IF l_msg_count = 1 THEN
1454: PA_INTERFACE_UTILS_PUB.get_messages
1629: P_MODULE_NAME => l_module_name,
1630: P_LOG_LEVEL => l_log_level );
1631: END IF;
1632: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1633: raise PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
1634: END IF;
1635:
1636: INSERT INTO pa_resource_asgn_curr
1637: ( RA_TXN_ID,
1671: IF P_PA_DEBUG_MODE = 'Y' THEN
1672: PA_DEBUG.RESET_CURR_FUNCTION;
1673: END IF;
1674: EXCEPTION
1675: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
1676:
1677: l_msg_count := FND_MSG_PUB.count_msg;
1678: IF l_msg_count = 1 THEN
1679: PA_INTERFACE_UTILS_PUB.get_messages
2113: P_CALLED_MODE => p_called_mode,
2114: P_MODULE_NAME => l_module_name,
2115: P_LOG_LEVEL => l_log_level );
2116: END IF;
2117: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2118: END;
2119:
2120:
2121: -- Step 1: Select rates and amounts from the appropriate cursor.
2301: P_MODULE_NAME => l_module_name,
2302: P_LOG_LEVEL => l_log_level );
2303: END IF;
2304: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2305: raise PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2306: END IF;
2307:
2308: -- Step 4: Insert records into the PA_RESOURCE_ASGN_CURR table.
2309:
2471: IF P_PA_DEBUG_MODE = 'Y' THEN
2472: PA_DEBUG.RESET_CURR_FUNCTION;
2473: END IF;
2474: EXCEPTION
2475: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
2476:
2477: l_msg_count := FND_MSG_PUB.count_msg;
2478: IF l_msg_count = 1 THEN
2479: PA_INTERFACE_UTILS_PUB.get_messages