DBA Data[Home] [Help]

APPS.PA_RES_ASG_CURRENCY_PUB dependencies on PA_DEBUG

Line 3: P_PA_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');

1: PACKAGE body PA_RES_ASG_CURRENCY_PUB as
2: /* $Header: PAFPRBCB.pls 120.7.12020000.5 2013/05/17 10:17:13 bpottipa ship $ */
3: P_PA_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
4:
5: -- Private P_CALLING_MODULE values
6: G_PVT_MAINTAIN CONSTANT VARCHAR2(30) := 'MAINTAIN_DATA';
7: G_PVT_DELETE CONSTANT VARCHAR2(30) := 'DELETE_TABLE_RECORDS';

Line 156: IF p_pa_debug_mode = 'Y' THEN

152: l_duplicate_count_tab PA_PLSQL_DATATYPES.IdTabTyp;
153: l_null_record_count NUMBER;
154:
155: BEGIN
156: IF p_pa_debug_mode = 'Y' THEN
157: pa_debug.set_curr_function
158: ( p_function => 'MAINTAIN_DATA',
159: p_debug_mode => p_pa_debug_mode );
160: END IF;

Line 157: pa_debug.set_curr_function

153: l_null_record_count NUMBER;
154:
155: BEGIN
156: IF p_pa_debug_mode = 'Y' THEN
157: pa_debug.set_curr_function
158: ( p_function => 'MAINTAIN_DATA',
159: p_debug_mode => p_pa_debug_mode );
160: END IF;
161:

Line 159: p_debug_mode => p_pa_debug_mode );

155: BEGIN
156: IF p_pa_debug_mode = 'Y' THEN
157: pa_debug.set_curr_function
158: ( p_function => 'MAINTAIN_DATA',
159: p_debug_mode => p_pa_debug_mode );
160: END IF;
161:
162: PA_RES_ASG_CURRENCY_PUB.PRINT_INPUT_PARAMS
163: ( P_CALLING_API => G_PVT_MAINTAIN,

Line 182: IF p_pa_debug_mode = 'Y' THEN

178:
179: l_parameters_valid_flag := 'Y';
180:
181: IF p_fp_cols_rec.x_budget_version_id IS NULL THEN
182: IF p_pa_debug_mode = 'Y' THEN
183: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
184: ( P_MSG => 'P_fp_cols_rec.x_budget_version_id should not be null.',
185: P_CALLED_MODE => p_called_mode,
186: P_MODULE_NAME => l_module_name,

Line 193: IF p_pa_debug_mode = 'Y' THEN

189: l_parameters_valid_flag := 'N';
190: END IF; -- minimum p_fp_cols_rec validation
191:
192: IF NOT is_public_calling_module(p_calling_module) THEN
193: IF p_pa_debug_mode = 'Y' THEN
194: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
195: ( P_MSG => 'Invalid p_calling_module value: '
196: || p_calling_module,
197: P_CALLED_MODE => p_called_mode,

Line 205: IF p_pa_debug_mode = 'Y' THEN

201: l_parameters_valid_flag := 'N';
202: END IF; -- p_calling_module validation
203:
204: IF NOT is_valid_flag(p_delete_flag) THEN
205: IF p_pa_debug_mode = 'Y' THEN
206: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
207: ( P_MSG => 'Invalid p_delete_flag value: '
208: || p_delete_flag,
209: P_CALLED_MODE => p_called_mode,

Line 217: IF p_pa_debug_mode = 'Y' THEN

213: l_parameters_valid_flag := 'N';
214: END IF; -- p_delete_flag validation
215:
216: IF NOT is_valid_flag(p_copy_flag) THEN
217: IF p_pa_debug_mode = 'Y' THEN
218: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
219: ( P_MSG => 'Invalid p_copy_flag value: '
220: || p_copy_flag,
221: P_CALLED_MODE => p_called_mode,

Line 230: IF p_pa_debug_mode = 'Y' THEN

226: END IF; -- p_copy_flag validation
227:
228: IF p_copy_flag = 'Y' AND
229: p_src_version_id IS NULL THEN
230: IF p_pa_debug_mode = 'Y' THEN
231: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
232: ( P_MSG => 'Since p_copy_flag is Y, p_src_version_id cannot be Null',
233: P_CALLED_MODE => p_called_mode,
234: P_MODULE_NAME => l_module_name,

Line 242: IF p_pa_debug_mode = 'Y' THEN

238: END IF; -- p_src_version_id validation
239:
240: IF p_copy_flag = 'Y' AND
241: NOT IS_VALID_COPY_MODE(p_copy_mode) THEN
242: IF p_pa_debug_mode = 'Y' THEN
243: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
244: ( P_MSG => 'Since p_copy_flag is Y, invalid p_copy_mode value: '
245: || p_copy_mode,
246: P_CALLED_MODE => p_called_mode,

Line 254: IF p_pa_debug_mode = 'Y' THEN

250: l_parameters_valid_flag := 'N';
251: END IF; -- p_copy_flag validation
252:
253: IF NOT is_valid_flag(p_rollup_flag) THEN
254: IF p_pa_debug_mode = 'Y' THEN
255: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
256: ( P_MSG => 'Invalid p_rollup_flag value: '
257: || p_rollup_flag,
258: P_CALLED_MODE => p_called_mode,

Line 266: IF p_pa_debug_mode = 'Y' THEN

262: l_parameters_valid_flag := 'N';
263: END IF; -- p_rollup_flag validation
264:
265: IF NOT is_valid_flag(p_version_level_flag) THEN
266: IF p_pa_debug_mode = 'Y' THEN
267: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
268: ( P_MSG => 'Invalid p_version_level_flag value: '
269: || p_version_level_flag,
270: P_CALLED_MODE => p_called_mode,

Line 286: IF p_pa_debug_mode = 'Y' THEN

282:
283: -- Step 1: Handle Deletion
284: IF p_delete_flag = 'Y' THEN
285:
286: IF p_pa_debug_mode = 'Y' THEN
287: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
288: P_MSG => 'Before calling PA_RES_ASG_CURRENCY_PUB.' ||
289: 'DELETE_TABLE_RECORDS',
290: P_CALLED_MODE => p_called_mode,

Line 301: IF p_pa_debug_mode = 'Y' THEN

297: P_CALLED_MODE => p_called_mode,
298: X_RETURN_STATUS => x_return_status,
299: X_MSG_COUNT => x_msg_count,
300: X_MSG_DATA => x_msg_data );
301: IF p_pa_debug_mode = 'Y' THEN
302: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
303: P_MSG => 'After calling PA_RES_ASG_CURRENCY_PUB.' ||
304: 'DELETE_TABLE_RECORDS: '||x_return_status,
305: P_CALLED_MODE => p_called_mode,

Line 312: IF P_PA_DEBUG_MODE = 'Y' THEN

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;
314: END IF;
315:
316: -- Return control to caller.

Line 313: PA_DEBUG.RESET_CURR_FUNCTION;

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;
314: END IF;
315:
316: -- Return control to caller.
317: RETURN;

Line 375: IF p_pa_debug_mode = 'Y' THEN

371: END IF; -- IF p_copy_flag = 'Y' THEN
372:
373: -- Raise an error if duplicates are found.
374: IF l_ra_id_tab.count > 0 THEN
375: IF p_pa_debug_mode = 'Y' THEN
376: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
377: ( p_msg => 'Duplicate records found in '
378: || 'PA_RESOURCE_ASGN_CURR_TMP '
379: || '(count='||l_ra_id_tab.count||'):',

Line 404: IF p_pa_debug_mode = 'Y' THEN

400: FROM pa_resource_asgn_curr_tmp
401: WHERE resource_assignment_id IS NULL;
402:
403: IF l_null_record_count > 0 THEN
404: IF p_pa_debug_mode = 'Y' THEN
405: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
406: ( p_msg => 'Records with null resource_assignment_id found in '
407: || 'PA_RESOURCE_ASGN_CURR_TMP '
408: || '(count='||l_null_record_count||'):',

Line 427: IF p_pa_debug_mode = 'Y' THEN

423: FROM pa_resource_asgn_curr_tmp
424: WHERE txn_currency_code IS NULL;
425:
426: IF l_null_record_count > 0 THEN
427: IF p_pa_debug_mode = 'Y' THEN
428: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
429: ( p_msg => 'Records with null txn_currency_code found in '
430: || 'PA_RESOURCE_ASGN_CURR_TMP '
431: || '(count='||l_null_record_count||'):',

Line 448: IF p_pa_debug_mode = 'Y' THEN

444:
445: -- Step 2: Handle Copy
446: IF p_copy_flag = 'Y' THEN
447:
448: IF p_pa_debug_mode = 'Y' THEN
449: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
450: P_MSG => 'Before calling PA_RES_ASG_CURRENCY_PUB.' ||
451: 'COPY_TABLE_RECORDS',
452: P_CALLED_MODE => p_called_mode,

Line 465: IF p_pa_debug_mode = 'Y' THEN

461: P_CALLED_MODE => p_called_mode,
462: X_RETURN_STATUS => x_return_status,
463: X_MSG_COUNT => x_msg_count,
464: X_MSG_DATA => x_msg_data );
465: IF p_pa_debug_mode = 'Y' THEN
466: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
467: P_MSG => 'After calling PA_RES_ASG_CURRENCY_PUB.' ||
468: 'COPY_TABLE_RECORDS: '||x_return_status,
469: P_CALLED_MODE => p_called_mode,

Line 476: IF P_PA_DEBUG_MODE = 'Y' THEN

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;
478: END IF;
479:
480: -- Return control to caller.

Line 477: PA_DEBUG.RESET_CURR_FUNCTION;

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;
478: END IF;
479:
480: -- Return control to caller.
481: RETURN;

Line 488: IF p_pa_debug_mode = 'Y' THEN

484:
485: -- Step 3: Handle Insertion
486: IF p_rollup_flag = 'N' THEN
487:
488: IF p_pa_debug_mode = 'Y' THEN
489: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
490: P_MSG => 'Before calling PA_RES_ASG_CURRENCY_PUB.' ||
491: 'INSERT_TABLE_RECORDS',
492: P_CALLED_MODE => p_called_mode,

Line 503: IF p_pa_debug_mode = 'Y' THEN

499: P_CALLED_MODE => p_called_mode,
500: X_RETURN_STATUS => x_return_status,
501: X_MSG_COUNT => x_msg_count,
502: X_MSG_DATA => x_msg_data );
503: IF p_pa_debug_mode = 'Y' THEN
504: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
505: P_MSG => 'After calling PA_RES_ASG_CURRENCY_PUB.' ||
506: 'INSERT_TABLE_RECORDS: '||x_return_status,
507: P_CALLED_MODE => p_called_mode,

Line 517: IF p_pa_debug_mode = 'Y' THEN

513:
514: -- Step 4: Handle Rollup of Amounts
515: ELSIF p_rollup_flag = 'Y' THEN
516:
517: IF p_pa_debug_mode = 'Y' THEN
518: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
519: P_MSG => 'Before calling PA_RES_ASG_CURRENCY_PUB.' ||
520: 'ROLLUP_AMOUNTS',
521: P_CALLED_MODE => p_called_mode,

Line 533: IF p_pa_debug_mode = 'Y' THEN

529: P_CALLED_MODE => p_called_mode,
530: X_RETURN_STATUS => x_return_status,
531: X_MSG_COUNT => x_msg_count,
532: X_MSG_DATA => x_msg_data );
533: IF p_pa_debug_mode = 'Y' THEN
534: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
535: P_MSG => 'After calling PA_RES_ASG_CURRENCY_PUB.' ||
536: 'ROLLUP_AMOUNTS: '||x_return_status,
537: P_CALLED_MODE => p_called_mode,

Line 547: IF P_PA_DEBUG_MODE = 'Y' THEN

543:
544: END IF; -- p_rollup_flag = 'Y'
545:
546:
547: IF P_PA_DEBUG_MODE = 'Y' THEN
548: PA_DEBUG.RESET_CURR_FUNCTION;
549: END IF;
550:
551: EXCEPTION

Line 548: PA_DEBUG.RESET_CURR_FUNCTION;

544: END IF; -- p_rollup_flag = 'Y'
545:
546:
547: IF P_PA_DEBUG_MODE = 'Y' THEN
548: PA_DEBUG.RESET_CURR_FUNCTION;
549: END IF;
550:
551: EXCEPTION
552: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 573: IF P_PA_DEBUG_MODE = 'Y' THEN

569: -- Removed ROLLBACK statement.
570:
571: x_return_status := FND_API.G_RET_STS_ERROR;
572:
573: IF P_PA_DEBUG_MODE = 'Y' THEN
574: pa_fp_gen_amount_utils.fp_debug
575: ( p_msg => 'Invalid Arguments Passed',
576: p_called_mode => p_called_mode,
577: p_module_name => l_module_name,

Line 579: PA_DEBUG.RESET_CURR_FUNCTION;

575: ( p_msg => 'Invalid Arguments Passed',
576: p_called_mode => p_called_mode,
577: p_module_name => l_module_name,
578: p_log_level => l_log_level );
579: PA_DEBUG.RESET_CURR_FUNCTION;
580: END IF;
581:
582: -- Removed RAISE statement.
583:

Line 594: IF P_PA_DEBUG_MODE = 'Y' THEN

590: FND_MSG_PUB.add_exc_msg
591: ( p_pkg_name => 'PA_RES_ASG_CURRENCY_PUB',
592: p_procedure_name => 'MAINTAIN_DATA',
593: p_error_text => substr(sqlerrm,1,240));
594: IF P_PA_DEBUG_MODE = 'Y' THEN
595: pa_fp_gen_amount_utils.fp_debug
596: ( p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
597: p_called_mode => p_called_mode,
598: p_module_name => l_module_name,

Line 600: PA_DEBUG.RESET_CURR_FUNCTION;

596: ( p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
597: p_called_mode => p_called_mode,
598: p_module_name => l_module_name,
599: p_log_level => l_log_level);
600: PA_DEBUG.RESET_CURR_FUNCTION;
601: END IF;
602: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
603:
604: END MAINTAIN_DATA;

Line 626: IF p_pa_debug_mode = 'N' THEN

622: IS
623: l_module_name VARCHAR2(100) := 'pa.plsql.PA_RES_ASG_CURRENCY_PUB.PRINT_INPUT_PARAMS';
624: l_log_level NUMBER := 5;
625: BEGIN
626: IF p_pa_debug_mode = 'N' THEN
627: RETURN;
628: END IF; -- IF p_pa_debug_mode = 'N' THEN
629:
630: -- Print values of Input Parameters based on p_calling_module

Line 628: END IF; -- IF p_pa_debug_mode = 'N' THEN

624: l_log_level NUMBER := 5;
625: BEGIN
626: IF p_pa_debug_mode = 'N' THEN
627: RETURN;
628: END IF; -- IF p_pa_debug_mode = 'N' THEN
629:
630: -- Print values of Input Parameters based on p_calling_module
631: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
632: ( p_msg => 'Input Parameters to '

Line 775: IF p_pa_debug_mode = 'Y' THEN

771: l_msg_data VARCHAR2(2000);
772: l_msg_index_out NUMBER;
773:
774: BEGIN
775: IF p_pa_debug_mode = 'Y' THEN
776: PA_DEBUG.SET_CURR_FUNCTION
777: ( p_function => 'DELETE_TABLE_RECORDS',
778: p_debug_mode => p_pa_debug_mode );
779: END IF;

Line 776: PA_DEBUG.SET_CURR_FUNCTION

772: l_msg_index_out NUMBER;
773:
774: BEGIN
775: IF p_pa_debug_mode = 'Y' THEN
776: PA_DEBUG.SET_CURR_FUNCTION
777: ( p_function => 'DELETE_TABLE_RECORDS',
778: p_debug_mode => p_pa_debug_mode );
779: END IF;
780:

Line 778: p_debug_mode => p_pa_debug_mode );

774: BEGIN
775: IF p_pa_debug_mode = 'Y' THEN
776: PA_DEBUG.SET_CURR_FUNCTION
777: ( p_function => 'DELETE_TABLE_RECORDS',
778: p_debug_mode => p_pa_debug_mode );
779: END IF;
780:
781: PA_RES_ASG_CURRENCY_PUB.PRINT_INPUT_PARAMS
782: ( P_CALLING_API => G_PVT_DELETE,

Line 845: IF P_PA_DEBUG_MODE = 'Y' THEN

841: END IF; -- p_calling_module check
842:
843: END IF; -- p_version_level_flag check
844:
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

Line 846: PA_DEBUG.RESET_CURR_FUNCTION;

842:
843: END IF; -- p_version_level_flag check
844:
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:

Line 870: IF P_PA_DEBUG_MODE = 'Y' THEN

866: -- Removed ROLLBACK statement.
867:
868: x_return_status := FND_API.G_RET_STS_ERROR;
869:
870: IF P_PA_DEBUG_MODE = 'Y' THEN
871: pa_fp_gen_amount_utils.fp_debug
872: ( p_msg => 'Invalid Arguments Passed',
873: p_called_mode => p_called_mode,
874: p_module_name => l_module_name,

Line 876: PA_DEBUG.RESET_CURR_FUNCTION;

872: ( p_msg => 'Invalid Arguments Passed',
873: p_called_mode => p_called_mode,
874: p_module_name => l_module_name,
875: p_log_level => l_log_level );
876: PA_DEBUG.RESET_CURR_FUNCTION;
877: END IF;
878: -- Removed RAISE statement.
879:
880: WHEN OTHERS THEN

Line 890: IF P_PA_DEBUG_MODE = 'Y' THEN

886: FND_MSG_PUB.add_exc_msg
887: ( p_pkg_name => 'PA_RES_ASG_CURRENCY_PUB',
888: p_procedure_name => 'DELETE_TABLE_RECORDS',
889: p_error_text => substr(sqlerrm,1,240));
890: IF P_PA_DEBUG_MODE = 'Y' THEN
891: pa_fp_gen_amount_utils.fp_debug
892: ( p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
893: p_called_mode => p_called_mode,
894: p_module_name => l_module_name,

Line 896: PA_DEBUG.RESET_CURR_FUNCTION;

892: ( p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
893: p_called_mode => p_called_mode,
894: p_module_name => l_module_name,
895: p_log_level => l_log_level);
896: PA_DEBUG.RESET_CURR_FUNCTION;
897: END IF;
898: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
899:
900: END DELETE_TABLE_RECORDS;

Line 1071: IF p_pa_debug_mode = 'Y' THEN

1067: -- Indicates if the Target version is a Workplan.
1068: l_wp_version_flag PA_BUDGET_VERSIONS.WP_VERSION_FLAG%TYPE;
1069:
1070: BEGIN
1071: IF p_pa_debug_mode = 'Y' THEN
1072: PA_DEBUG.SET_CURR_FUNCTION
1073: ( p_function => 'COPY_TABLE_RECORDS',
1074: p_debug_mode => p_pa_debug_mode );
1075: END IF;

Line 1072: PA_DEBUG.SET_CURR_FUNCTION

1068: l_wp_version_flag PA_BUDGET_VERSIONS.WP_VERSION_FLAG%TYPE;
1069:
1070: BEGIN
1071: IF p_pa_debug_mode = 'Y' THEN
1072: PA_DEBUG.SET_CURR_FUNCTION
1073: ( p_function => 'COPY_TABLE_RECORDS',
1074: p_debug_mode => p_pa_debug_mode );
1075: END IF;
1076:

Line 1074: p_debug_mode => p_pa_debug_mode );

1070: BEGIN
1071: IF p_pa_debug_mode = 'Y' THEN
1072: PA_DEBUG.SET_CURR_FUNCTION
1073: ( p_function => 'COPY_TABLE_RECORDS',
1074: p_debug_mode => p_pa_debug_mode );
1075: END IF;
1076:
1077: PA_RES_ASG_CURRENCY_PUB.PRINT_INPUT_PARAMS
1078: ( P_CALLING_API => G_PVT_COPY,

Line 1095: IF p_pa_debug_mode = 'Y' THEN

1091: INTO l_wp_version_flag
1092: FROM pa_budget_versions
1093: WHERE budget_version_id = p_fp_cols_rec.x_budget_version_id;
1094: EXCEPTION WHEN NO_DATA_FOUND THEN
1095: IF p_pa_debug_mode = 'Y' THEN
1096: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
1097: ( P_MSG => 'Invalid p_fp_cols_rec.x_budget_version_id value: '
1098: || p_fp_cols_rec.x_budget_version_id
1099: || '. Budget version does not exist.',

Line 1168: IF p_pa_debug_mode = 'Y' THEN

1164: ELSIF p_version_level_flag = 'N' THEN
1165:
1166: IF p_copy_mode = G_COPY_ALL THEN
1167: -- This case is currently NOT supported.
1168: IF p_pa_debug_mode = 'Y' THEN
1169: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
1170: ( P_MSG => 'The '''||G_COPY_ALL||''' copy mode is not supported '
1171: || 'when p_version_level_flag is '
1172: || p_version_level_flag,

Line 1196: IF P_PA_DEBUG_MODE = 'Y' THEN

1192: END IF; -- p_version_level_flag check
1193:
1194: -- No further processing is required if there are no records to copy.
1195: IF l_ra_id_tab.count <= 0 THEN
1196: IF P_PA_DEBUG_MODE = 'Y' THEN
1197: PA_DEBUG.RESET_CURR_FUNCTION;
1198: END IF;
1199: RETURN;
1200: END IF;

Line 1197: PA_DEBUG.RESET_CURR_FUNCTION;

1193:
1194: -- No further processing is required if there are no records to copy.
1195: IF l_ra_id_tab.count <= 0 THEN
1196: IF P_PA_DEBUG_MODE = 'Y' THEN
1197: PA_DEBUG.RESET_CURR_FUNCTION;
1198: END IF;
1199: RETURN;
1200: END IF;
1201:

Line 1298: IF p_pa_debug_mode = 'Y' THEN

1294: VALUES (
1295: l_ra_id_tab(i),
1296: l_txn_currency_code_tab(i) );
1297:
1298: IF p_pa_debug_mode = 'Y' THEN
1299: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
1300: ( P_MSG => 'Before calling PA_RES_ASG_CURRENCY_PUB.'
1301: || 'DELETE_TABLE_RECORDS',
1302: P_CALLED_MODE => p_called_mode,

Line 1314: IF p_pa_debug_mode = 'Y' THEN

1310: P_CALLED_MODE => p_called_mode,
1311: X_RETURN_STATUS => x_return_status,
1312: X_MSG_COUNT => x_msg_count,
1313: X_MSG_DATA => x_msg_data );
1314: IF p_pa_debug_mode = 'Y' THEN
1315: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
1316: ( P_MSG => 'After calling PA_RES_ASG_CURRENCY_PUB.'
1317: || 'DELETE_TABLE_RECORDS: ' || x_return_status,
1318: P_CALLED_MODE => p_called_mode,

Line 1446: IF P_PA_DEBUG_MODE = 'Y' THEN

1442: END IF; -- p_copy_mode check
1443:
1444: --dbms_output.put_line('Reached Copy Records');
1445:
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

Line 1447: PA_DEBUG.RESET_CURR_FUNCTION;

1443:
1444: --dbms_output.put_line('Reached Copy Records');
1445:
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:

Line 1471: IF P_PA_DEBUG_MODE = 'Y' THEN

1467: -- Removed ROLLBACK statement.
1468:
1469: x_return_status := FND_API.G_RET_STS_ERROR;
1470:
1471: IF P_PA_DEBUG_MODE = 'Y' THEN
1472: pa_fp_gen_amount_utils.fp_debug
1473: ( p_msg => 'Invalid Arguments Passed',
1474: p_called_mode => p_called_mode,
1475: p_module_name => l_module_name,

Line 1477: PA_DEBUG.RESET_CURR_FUNCTION;

1473: ( p_msg => 'Invalid Arguments Passed',
1474: p_called_mode => p_called_mode,
1475: p_module_name => l_module_name,
1476: p_log_level => l_log_level );
1477: PA_DEBUG.RESET_CURR_FUNCTION;
1478: END IF;
1479: -- Removed RAISE statement.
1480:
1481: WHEN OTHERS THEN

Line 1491: IF P_PA_DEBUG_MODE = 'Y' THEN

1487: FND_MSG_PUB.add_exc_msg
1488: ( p_pkg_name => 'PA_RES_ASG_CURRENCY_PUB',
1489: p_procedure_name => 'COPY_TABLE_RECORDS',
1490: p_error_text => substr(sqlerrm,1,240));
1491: IF P_PA_DEBUG_MODE = 'Y' THEN
1492: pa_fp_gen_amount_utils.fp_debug
1493: ( p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
1494: p_called_mode => p_called_mode,
1495: p_module_name => l_module_name,

Line 1497: PA_DEBUG.RESET_CURR_FUNCTION;

1493: ( p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
1494: p_called_mode => p_called_mode,
1495: p_module_name => l_module_name,
1496: p_log_level => l_log_level);
1497: PA_DEBUG.RESET_CURR_FUNCTION;
1498: END IF;
1499: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1500:
1501: END COPY_TABLE_RECORDS;

Line 1534: IF p_pa_debug_mode = 'Y' THEN

1530: l_bill_rate_override_tab PA_PLSQL_DATATYPES.NumTabTyp;
1531:
1532: BEGIN
1533:
1534: IF p_pa_debug_mode = 'Y' THEN
1535: PA_DEBUG.SET_CURR_FUNCTION
1536: ( p_function => 'INSERT_TABLE_RECORDS',
1537: p_debug_mode => p_pa_debug_mode );
1538: END IF;

Line 1535: PA_DEBUG.SET_CURR_FUNCTION

1531:
1532: BEGIN
1533:
1534: IF p_pa_debug_mode = 'Y' THEN
1535: PA_DEBUG.SET_CURR_FUNCTION
1536: ( p_function => 'INSERT_TABLE_RECORDS',
1537: p_debug_mode => p_pa_debug_mode );
1538: END IF;
1539:

Line 1537: p_debug_mode => p_pa_debug_mode );

1533:
1534: IF p_pa_debug_mode = 'Y' THEN
1535: PA_DEBUG.SET_CURR_FUNCTION
1536: ( p_function => 'INSERT_TABLE_RECORDS',
1537: p_debug_mode => p_pa_debug_mode );
1538: END IF;
1539:
1540: PA_RES_ASG_CURRENCY_PUB.PRINT_INPUT_PARAMS
1541: ( P_CALLING_API => G_PVT_INSERT,

Line 1608: IF p_pa_debug_mode = 'Y' THEN

1604: -- TEMP TABLE Mode:
1605: -- Delete and then Insert the records specified by the temp table
1606: -- into the PA_RESOURCE_ASGN_CURR table.
1607:
1608: IF p_pa_debug_mode = 'Y' THEN
1609: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
1610: ( P_MSG => 'Before calling PA_RES_ASG_CURRENCY_PUB.'
1611: || 'DELETE_TABLE_RECORDS',
1612: P_CALLED_MODE => p_called_mode,

Line 1624: IF p_pa_debug_mode = 'Y' THEN

1620: P_CALLED_MODE => p_called_mode,
1621: X_RETURN_STATUS => x_return_status,
1622: X_MSG_COUNT => x_msg_count,
1623: X_MSG_DATA => x_msg_data );
1624: IF p_pa_debug_mode = 'Y' THEN
1625: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
1626: ( P_MSG => 'After calling PA_RES_ASG_CURRENCY_PUB.'
1627: || 'DELETE_TABLE_RECORDS: ' || x_return_status,
1628: P_CALLED_MODE => p_called_mode,

Line 1671: IF P_PA_DEBUG_MODE = 'Y' THEN

1667: END IF; -- p_version_level_flag check
1668:
1669: --dbms_output.put_line('Reached Insert Records');
1670:
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

Line 1672: PA_DEBUG.RESET_CURR_FUNCTION;

1668:
1669: --dbms_output.put_line('Reached Insert Records');
1670:
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:

Line 1696: IF P_PA_DEBUG_MODE = 'Y' THEN

1692: -- Removed ROLLBACK statement.
1693:
1694: x_return_status := FND_API.G_RET_STS_ERROR;
1695:
1696: IF P_PA_DEBUG_MODE = 'Y' THEN
1697: pa_fp_gen_amount_utils.fp_debug
1698: ( p_msg => 'Invalid Arguments Passed',
1699: p_called_mode => p_called_mode,
1700: p_module_name => l_module_name,

Line 1702: PA_DEBUG.RESET_CURR_FUNCTION;

1698: ( p_msg => 'Invalid Arguments Passed',
1699: p_called_mode => p_called_mode,
1700: p_module_name => l_module_name,
1701: p_log_level => l_log_level );
1702: PA_DEBUG.RESET_CURR_FUNCTION;
1703: END IF;
1704: -- Removed RAISE statement.
1705:
1706: WHEN OTHERS THEN

Line 1716: IF P_PA_DEBUG_MODE = 'Y' THEN

1712: FND_MSG_PUB.add_exc_msg
1713: ( p_pkg_name => 'PA_RES_ASG_CURRENCY_PUB',
1714: p_procedure_name => 'INSERT_TABLE_RECORDS',
1715: p_error_text => substr(sqlerrm,1,240));
1716: IF P_PA_DEBUG_MODE = 'Y' THEN
1717: pa_fp_gen_amount_utils.fp_debug
1718: ( p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
1719: p_called_mode => p_called_mode,
1720: p_module_name => l_module_name,

Line 1722: PA_DEBUG.RESET_CURR_FUNCTION;

1718: ( p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
1719: p_called_mode => p_called_mode,
1720: p_module_name => l_module_name,
1721: p_log_level => l_log_level);
1722: PA_DEBUG.RESET_CURR_FUNCTION;
1723: END IF;
1724: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1725:
1726: END INSERT_TABLE_RECORDS;

Line 2086: IF p_pa_debug_mode = 'Y' THEN

2082: l_wp_version_flag PA_BUDGET_VERSIONS.WP_VERSION_FLAG%TYPE;
2083:
2084: BEGIN
2085:
2086: IF p_pa_debug_mode = 'Y' THEN
2087: PA_DEBUG.SET_CURR_FUNCTION
2088: ( p_function => 'ROLLUP_AMOUNTS',
2089: p_debug_mode => p_pa_debug_mode );
2090: END IF;

Line 2087: PA_DEBUG.SET_CURR_FUNCTION

2083:
2084: BEGIN
2085:
2086: IF p_pa_debug_mode = 'Y' THEN
2087: PA_DEBUG.SET_CURR_FUNCTION
2088: ( p_function => 'ROLLUP_AMOUNTS',
2089: p_debug_mode => p_pa_debug_mode );
2090: END IF;
2091:

Line 2089: p_debug_mode => p_pa_debug_mode );

2085:
2086: IF p_pa_debug_mode = 'Y' THEN
2087: PA_DEBUG.SET_CURR_FUNCTION
2088: ( p_function => 'ROLLUP_AMOUNTS',
2089: p_debug_mode => p_pa_debug_mode );
2090: END IF;
2091:
2092: PA_RES_ASG_CURRENCY_PUB.PRINT_INPUT_PARAMS
2093: ( P_CALLING_API => G_PVT_ROLLUP,

Line 2108: IF p_pa_debug_mode = 'Y' THEN

2104: INTO l_wp_version_flag
2105: FROM pa_budget_versions
2106: WHERE budget_version_id = p_fp_cols_rec.x_budget_version_id;
2107: EXCEPTION WHEN NO_DATA_FOUND THEN
2108: IF p_pa_debug_mode = 'Y' THEN
2109: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
2110: ( P_MSG => 'Invalid p_fp_cols_rec.x_budget_version_id value: '
2111: || p_fp_cols_rec.x_budget_version_id
2112: || '. Budget version does not exist.',

Line 2207: IF P_PA_DEBUG_MODE = 'Y' THEN

2203: END IF; -- p_version_level_flag check
2204:
2205: -- No further processing is required if there are no records to rollup.
2206: IF l_ra_id_tab.count <= 0 THEN
2207: IF P_PA_DEBUG_MODE = 'Y' THEN
2208: PA_DEBUG.RESET_CURR_FUNCTION;
2209: END IF;
2210: RETURN;
2211: END IF;

Line 2208: PA_DEBUG.RESET_CURR_FUNCTION;

2204:
2205: -- No further processing is required if there are no records to rollup.
2206: IF l_ra_id_tab.count <= 0 THEN
2207: IF P_PA_DEBUG_MODE = 'Y' THEN
2208: PA_DEBUG.RESET_CURR_FUNCTION;
2209: END IF;
2210: RETURN;
2211: END IF;
2212:

Line 2280: IF p_pa_debug_mode = 'Y' THEN

2276: END IF;
2277:
2278: -- Step 3: Delete records from the PA_RESOURCE_ASGN_CURR table.
2279:
2280: IF p_pa_debug_mode = 'Y' THEN
2281: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
2282: ( P_MSG => 'Before calling PA_RES_ASG_CURRENCY_PUB.'
2283: || 'DELETE_TABLE_RECORDS',
2284: P_CALLED_MODE => p_called_mode,

Line 2296: IF p_pa_debug_mode = 'Y' THEN

2292: P_CALLED_MODE => p_called_mode,
2293: X_RETURN_STATUS => x_return_status,
2294: X_MSG_COUNT => x_msg_count,
2295: X_MSG_DATA => x_msg_data );
2296: IF p_pa_debug_mode = 'Y' THEN
2297: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
2298: ( P_MSG => 'After calling PA_RES_ASG_CURRENCY_PUB.'
2299: || 'DELETE_TABLE_RECORDS: ' || x_return_status,
2300: P_CALLED_MODE => p_called_mode,

Line 2471: IF P_PA_DEBUG_MODE = 'Y' THEN

2467: AND prac.total_display_quantity IS NULL
2468: ;
2469: -- end of bug#12865217
2470:
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

Line 2472: PA_DEBUG.RESET_CURR_FUNCTION;

2468: ;
2469: -- end of bug#12865217
2470:
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:

Line 2496: IF P_PA_DEBUG_MODE = 'Y' THEN

2492: -- Removed ROLLBACK statement.
2493:
2494: x_return_status := FND_API.G_RET_STS_ERROR;
2495:
2496: IF P_PA_DEBUG_MODE = 'Y' THEN
2497: pa_fp_gen_amount_utils.fp_debug
2498: ( p_msg => 'Invalid Arguments Passed',
2499: p_called_mode => p_called_mode,
2500: p_module_name => l_module_name,

Line 2502: PA_DEBUG.RESET_CURR_FUNCTION;

2498: ( p_msg => 'Invalid Arguments Passed',
2499: p_called_mode => p_called_mode,
2500: p_module_name => l_module_name,
2501: p_log_level => l_log_level );
2502: PA_DEBUG.RESET_CURR_FUNCTION;
2503: END IF;
2504: -- Removed RAISE statement.
2505:
2506: WHEN OTHERS THEN

Line 2516: IF P_PA_DEBUG_MODE = 'Y' THEN

2512: FND_MSG_PUB.add_exc_msg
2513: ( p_pkg_name => 'PA_RES_ASG_CURRENCY_PUB',
2514: p_procedure_name => 'ROLLUP_AMOUNTS',
2515: p_error_text => substr(sqlerrm,1,240));
2516: IF P_PA_DEBUG_MODE = 'Y' THEN
2517: pa_fp_gen_amount_utils.fp_debug
2518: ( p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
2519: p_called_mode => p_called_mode,
2520: p_module_name => l_module_name,

Line 2522: PA_DEBUG.RESET_CURR_FUNCTION;

2518: ( p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
2519: p_called_mode => p_called_mode,
2520: p_module_name => l_module_name,
2521: p_log_level => l_log_level);
2522: PA_DEBUG.RESET_CURR_FUNCTION;
2523: END IF;
2524: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2525:
2526: END ROLLUP_AMOUNTS;