DBA Data[Home] [Help]

APPS.PA_FP_SPREAD_AMTS_PKG dependencies on PA_DEBUG

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

1: PACKAGE BODY PA_FP_SPREAD_AMTS_PKG AS
2: --$Header: PAFPSCPB.pls 120.11 2010/09/13 09:35:45 bifernan ship $
3:
4: g_module_name VARCHAR2(100) := 'pa.plsql.PA_FP_SPREAD_AMTS_PKG';
5: P_PA_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
6: G_rate_based_flag Varchar2(10) := NULL;
7: G_Curr_code Varchar2(80) := NULL;
8: G_User_Id Number:= fnd_global.user_id;
9: G_Login_Id Number:= fnd_global.login_id;

Line 164: --IF P_PA_DEBUG_MODE = 'Y' Then

160: procedure calc_log(p_msg varchar2) IS
161:
162: pragma autonomous_transaction ;
163: BEGIN
164: --IF P_PA_DEBUG_MODE = 'Y' Then
165: NULL;
166: INSERT INTO PA_FP_CALCULATE_LOG
167: (SESSIONID
168: ,SEQ_NUMBER

Line 184: IF P_PA_DEBUG_MODE = 'Y' Then

180: procedure PRINT_MSG(P_MSG VARCHAR2) is
181:
182: BEGIN
183: --calc_log(P_MSG);
184: IF P_PA_DEBUG_MODE = 'Y' Then
185: pa_debug.g_err_stage := substr('LOG:'||p_msg,1,240);
186: PA_DEBUG.write
187: (x_Module => g_module_name
188: ,x_Msg => pa_debug.g_err_stage

Line 185: pa_debug.g_err_stage := substr('LOG:'||p_msg,1,240);

181:
182: BEGIN
183: --calc_log(P_MSG);
184: IF P_PA_DEBUG_MODE = 'Y' Then
185: pa_debug.g_err_stage := substr('LOG:'||p_msg,1,240);
186: PA_DEBUG.write
187: (x_Module => g_module_name
188: ,x_Msg => pa_debug.g_err_stage
189: ,x_Log_Level => 3);

Line 186: PA_DEBUG.write

182: BEGIN
183: --calc_log(P_MSG);
184: IF P_PA_DEBUG_MODE = 'Y' Then
185: pa_debug.g_err_stage := substr('LOG:'||p_msg,1,240);
186: PA_DEBUG.write
187: (x_Module => g_module_name
188: ,x_Msg => pa_debug.g_err_stage
189: ,x_Log_Level => 3);
190: null;

Line 188: ,x_Msg => pa_debug.g_err_stage

184: IF P_PA_DEBUG_MODE = 'Y' Then
185: pa_debug.g_err_stage := substr('LOG:'||p_msg,1,240);
186: PA_DEBUG.write
187: (x_Module => g_module_name
188: ,x_Msg => pa_debug.g_err_stage
189: ,x_Log_Level => 3);
190: null;
191: END IF;
192: END PRINT_MSG;

Line 288: If p_pa_debug_mode = 'Y' Then

284: print_msg('Unexpected error in Process_Rounding_Diff ['||sqlcode||sqlerrm||']');
285: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
286: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FP_SPREAD_AMTS_PKG',
287: p_procedure_name => 'Process_Rounding_Diff'||l_stage);
288: If p_pa_debug_mode = 'Y' Then
289: pa_debug.reset_err_stack;
290: End If;
291: raise FND_API.G_EXC_UNEXPECTED_ERROR;
292:

Line 289: pa_debug.reset_err_stack;

285: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
286: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FP_SPREAD_AMTS_PKG',
287: p_procedure_name => 'Process_Rounding_Diff'||l_stage);
288: If p_pa_debug_mode = 'Y' Then
289: pa_debug.reset_err_stack;
290: End If;
291: raise FND_API.G_EXC_UNEXPECTED_ERROR;
292:
293: END Process_Rounding_Diff;

Line 430: If p_pa_debug_mode = 'Y' Then

426: print_msg('Unexpected error in blkInsertBudgetLines['||sqlcode||sqlerrm||']');
427: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
428: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FP_SPREAD_AMTS_PKG',
429: p_procedure_name => 'blkInsertBudgetLines'||l_stage);
430: If p_pa_debug_mode = 'Y' Then
431: pa_debug.reset_err_stack;
432: End If;
433: raise FND_API.G_EXC_UNEXPECTED_ERROR;
434: END blkInsertBudgetLines;

Line 431: pa_debug.reset_err_stack;

427: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
428: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FP_SPREAD_AMTS_PKG',
429: p_procedure_name => 'blkInsertBudgetLines'||l_stage);
430: If p_pa_debug_mode = 'Y' Then
431: pa_debug.reset_err_stack;
432: End If;
433: raise FND_API.G_EXC_UNEXPECTED_ERROR;
434: END blkInsertBudgetLines;
435:

Line 509: If p_pa_debug_mode = 'Y' Then

505: print_msg('Unexpected error in blkInsertFpLines['||sqlcode||sqlerrm||']');
506: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
507: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FP_SPREAD_AMTS_PKG',
508: p_procedure_name => 'blkInsertFpLines'||l_stage);
509: If p_pa_debug_mode = 'Y' Then
510: pa_debug.reset_err_stack;
511: End If;
512: raise FND_API.G_EXC_UNEXPECTED_ERROR;
513:

Line 510: pa_debug.reset_err_stack;

506: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
507: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FP_SPREAD_AMTS_PKG',
508: p_procedure_name => 'blkInsertFpLines'||l_stage);
509: If p_pa_debug_mode = 'Y' Then
510: pa_debug.reset_err_stack;
511: End If;
512: raise FND_API.G_EXC_UNEXPECTED_ERROR;
513:
514: END blkInsertFpLines;

Line 808: If p_pa_debug_mode = 'Y' Then

804: print_msg('Unexpected error in blkInsertBlFpLines['||sqlcode||sqlerrm||']');
805: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
806: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FP_SPREAD_AMTS_PKG',
807: p_procedure_name => 'blkInsertBlFpLines'||l_stage);
808: If p_pa_debug_mode = 'Y' Then
809: pa_debug.reset_err_stack;
810: End If;
811: raise FND_API.G_EXC_UNEXPECTED_ERROR;
812:

Line 809: pa_debug.reset_err_stack;

805: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
806: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FP_SPREAD_AMTS_PKG',
807: p_procedure_name => 'blkInsertBlFpLines'||l_stage);
808: If p_pa_debug_mode = 'Y' Then
809: pa_debug.reset_err_stack;
810: End If;
811: raise FND_API.G_EXC_UNEXPECTED_ERROR;
812:
813: END blkInsertBlFpLines;

Line 866: If p_pa_debug_mode = 'Y' Then

862: print_msg(l_stage||sqlcode||sqlerrm);
863: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
864: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FP_SPREAD_AMTS_PKG',
865: p_procedure_name => 'insert_budget_line'||l_stage);
866: If p_pa_debug_mode = 'Y' Then
867: pa_debug.reset_err_stack;
868: End If;
869: raise FND_API.G_EXC_UNEXPECTED_ERROR;
870:

Line 867: pa_debug.reset_err_stack;

863: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
864: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FP_SPREAD_AMTS_PKG',
865: p_procedure_name => 'insert_budget_line'||l_stage);
866: If p_pa_debug_mode = 'Y' Then
867: pa_debug.reset_err_stack;
868: End If;
869: raise FND_API.G_EXC_UNEXPECTED_ERROR;
870:
871: END insert_budget_line;

Line 924: If p_pa_debug_mode = 'Y' Then

920:
921: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
922: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FP_SPREAD_AMTS_PKG',
923: p_procedure_name => 'insert_rollup_tmp()'||l_stage);
924: If p_pa_debug_mode = 'Y' Then
925: pa_debug.reset_err_stack;
926: End If;
927: raise FND_API.G_EXC_UNEXPECTED_ERROR;
928:

Line 925: pa_debug.reset_err_stack;

921: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
922: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FP_SPREAD_AMTS_PKG',
923: p_procedure_name => 'insert_rollup_tmp()'||l_stage);
924: If p_pa_debug_mode = 'Y' Then
925: pa_debug.reset_err_stack;
926: End If;
927: raise FND_API.G_EXC_UNEXPECTED_ERROR;
928:
929: END insert_rollup_tmp;

Line 983: If p_pa_debug_mode = 'Y' Then

979: WHEN OTHERS THEN
980: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
981: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FP_SPREAD_AMTS_PKG',
982: p_procedure_name => 'insert_rollup_tmp_with_bl()'||l_stage);
983: If p_pa_debug_mode = 'Y' Then
984: pa_debug.reset_err_stack;
985: End If;
986: raise FND_API.G_EXC_UNEXPECTED_ERROR;
987:

Line 984: pa_debug.reset_err_stack;

980: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
981: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FP_SPREAD_AMTS_PKG',
982: p_procedure_name => 'insert_rollup_tmp_with_bl()'||l_stage);
983: If p_pa_debug_mode = 'Y' Then
984: pa_debug.reset_err_stack;
985: End If;
986: raise FND_API.G_EXC_UNEXPECTED_ERROR;
987:
988: END insert_rollup_tmp_with_bl;

Line 1078: If p_pa_debug_mode = 'Y' Then

1074: BEGIN
1075: l_stage := 10;
1076: print_msg(' '||l_stage||' enter spread()');
1077: x_return_status := FND_API.G_RET_STS_SUCCESS;
1078: If p_pa_debug_mode = 'Y' Then
1079: pa_debug.init_err_stack('PA_FP_SPREAD_AMTS_PKG.spread');
1080: End If;
1081:
1082: fnd_profile.get('PA_DEBUG_MODE', l_debug_mode);

Line 1079: pa_debug.init_err_stack('PA_FP_SPREAD_AMTS_PKG.spread');

1075: l_stage := 10;
1076: print_msg(' '||l_stage||' enter spread()');
1077: x_return_status := FND_API.G_RET_STS_SUCCESS;
1078: If p_pa_debug_mode = 'Y' Then
1079: pa_debug.init_err_stack('PA_FP_SPREAD_AMTS_PKG.spread');
1080: End If;
1081:
1082: fnd_profile.get('PA_DEBUG_MODE', l_debug_mode);
1083: pa_debug.set_process('PLSQL', 'LOG', l_debug_mode);

Line 1082: fnd_profile.get('PA_DEBUG_MODE', l_debug_mode);

1078: If p_pa_debug_mode = 'Y' Then
1079: pa_debug.init_err_stack('PA_FP_SPREAD_AMTS_PKG.spread');
1080: End If;
1081:
1082: fnd_profile.get('PA_DEBUG_MODE', l_debug_mode);
1083: pa_debug.set_process('PLSQL', 'LOG', l_debug_mode);
1084:
1085: pa_debug.g_err_stage := 'Entered PA_FP_SPREAD_AMTS_PKG.spread';
1086: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 1083: pa_debug.set_process('PLSQL', 'LOG', l_debug_mode);

1079: pa_debug.init_err_stack('PA_FP_SPREAD_AMTS_PKG.spread');
1080: End If;
1081:
1082: fnd_profile.get('PA_DEBUG_MODE', l_debug_mode);
1083: pa_debug.set_process('PLSQL', 'LOG', l_debug_mode);
1084:
1085: pa_debug.g_err_stage := 'Entered PA_FP_SPREAD_AMTS_PKG.spread';
1086: IF P_PA_DEBUG_MODE = 'Y' THEN
1087: pa_debug.write('spread: '||g_module_name,

Line 1085: pa_debug.g_err_stage := 'Entered PA_FP_SPREAD_AMTS_PKG.spread';

1081:
1082: fnd_profile.get('PA_DEBUG_MODE', l_debug_mode);
1083: pa_debug.set_process('PLSQL', 'LOG', l_debug_mode);
1084:
1085: pa_debug.g_err_stage := 'Entered PA_FP_SPREAD_AMTS_PKG.spread';
1086: IF P_PA_DEBUG_MODE = 'Y' THEN
1087: pa_debug.write('spread: '||g_module_name,
1088: pa_debug.g_err_stage,
1089: 3);

Line 1086: IF P_PA_DEBUG_MODE = 'Y' THEN

1082: fnd_profile.get('PA_DEBUG_MODE', l_debug_mode);
1083: pa_debug.set_process('PLSQL', 'LOG', l_debug_mode);
1084:
1085: pa_debug.g_err_stage := 'Entered PA_FP_SPREAD_AMTS_PKG.spread';
1086: IF P_PA_DEBUG_MODE = 'Y' THEN
1087: pa_debug.write('spread: '||g_module_name,
1088: pa_debug.g_err_stage,
1089: 3);
1090: END IF;

Line 1087: pa_debug.write('spread: '||g_module_name,

1083: pa_debug.set_process('PLSQL', 'LOG', l_debug_mode);
1084:
1085: pa_debug.g_err_stage := 'Entered PA_FP_SPREAD_AMTS_PKG.spread';
1086: IF P_PA_DEBUG_MODE = 'Y' THEN
1087: pa_debug.write('spread: '||g_module_name,
1088: pa_debug.g_err_stage,
1089: 3);
1090: END IF;
1091:

Line 1088: pa_debug.g_err_stage,

1084:
1085: pa_debug.g_err_stage := 'Entered PA_FP_SPREAD_AMTS_PKG.spread';
1086: IF P_PA_DEBUG_MODE = 'Y' THEN
1087: pa_debug.write('spread: '||g_module_name,
1088: pa_debug.g_err_stage,
1089: 3);
1090: END IF;
1091:
1092: l_stage := 20;

Line 1136: If p_pa_debug_mode = 'Y' Then

1132: IF NOT p_number_of_amounts BETWEEN 1 AND 10 THEN
1133:
1134: x_return_status := FND_API.G_RET_STS_ERROR;
1135: x_msg_data := 'PA_FP_NUM_OF_AMTS_OVERFLOW';
1136: If p_pa_debug_mode = 'Y' Then
1137: pa_debug.reset_err_stack;
1138: End If;
1139: RETURN;
1140: END IF;

Line 1137: pa_debug.reset_err_stack;

1133:
1134: x_return_status := FND_API.G_RET_STS_ERROR;
1135: x_msg_data := 'PA_FP_NUM_OF_AMTS_OVERFLOW';
1136: If p_pa_debug_mode = 'Y' Then
1137: pa_debug.reset_err_stack;
1138: End If;
1139: RETURN;
1140: END IF;
1141:

Line 1150: If p_pa_debug_mode = 'Y' Then

1146: -- and they cannot overlap each other.
1147: IF p_start_end_date IS NULL THEN
1148: x_return_status := FND_API.G_RET_STS_ERROR;
1149: x_msg_data := 'PA_FP_PLAN_START_END_DATE_NULL';
1150: If p_pa_debug_mode = 'Y' Then
1151: pa_debug.reset_err_stack;
1152: End If;
1153: RETURN;
1154: END IF;

Line 1151: pa_debug.reset_err_stack;

1147: IF p_start_end_date IS NULL THEN
1148: x_return_status := FND_API.G_RET_STS_ERROR;
1149: x_msg_data := 'PA_FP_PLAN_START_END_DATE_NULL';
1150: If p_pa_debug_mode = 'Y' Then
1151: pa_debug.reset_err_stack;
1152: End If;
1153: RETURN;
1154: END IF;
1155: FOR k IN 1 .. p_start_end_date.COUNT()

Line 1168: If p_pa_debug_mode = 'Y' Then

1164: p_start_end_date(k).end_date THEN
1165:
1166: x_return_status := FND_API.G_RET_STS_ERROR;
1167: x_msg_data := 'PA_FP_START_END_DATE_OVERLAP';
1168: If p_pa_debug_mode = 'Y' Then
1169: pa_debug.reset_err_stack;
1170: End If;
1171: RETURN;
1172: END IF;

Line 1169: pa_debug.reset_err_stack;

1165:
1166: x_return_status := FND_API.G_RET_STS_ERROR;
1167: x_msg_data := 'PA_FP_START_END_DATE_OVERLAP';
1168: If p_pa_debug_mode = 'Y' Then
1169: pa_debug.reset_err_stack;
1170: End If;
1171: RETURN;
1172: END IF;
1173: END LOOP;

Line 1193: If p_pa_debug_mode = 'Y' Then

1189: IF (x_spread_amounts IS NULL OR x_spread_amounts.COUNT() = 0 ) THEN
1190: x_return_status := FND_API.G_RET_STS_ERROR;
1191: x_msg_data := 'PA_FP_PERIODS_IS_NULL';
1192: print_msg('x_msg_data['||x_msg_data||']');
1193: If p_pa_debug_mode = 'Y' Then
1194: pa_debug.reset_err_stack;
1195: End If;
1196: RETURN;
1197: END IF;

Line 1194: pa_debug.reset_err_stack;

1190: x_return_status := FND_API.G_RET_STS_ERROR;
1191: x_msg_data := 'PA_FP_PERIODS_IS_NULL';
1192: print_msg('x_msg_data['||x_msg_data||']');
1193: If p_pa_debug_mode = 'Y' Then
1194: pa_debug.reset_err_stack;
1195: End If;
1196: RETURN;
1197: END IF;
1198: --print_msg('Count of x_spread_amounts.COUNT()['||x_spread_amounts.COUNT()||']');

Line 1212: If p_pa_debug_mode = 'Y' Then

1208: x_spread_amounts(k).end_date THEN
1209:
1210: x_return_status := FND_API.G_RET_STS_ERROR;
1211: x_msg_data := 'PA_FP_START_END_DATE_NOT_MATCH';
1212: If p_pa_debug_mode = 'Y' Then
1213: pa_debug.reset_err_stack;
1214: End If;
1215: --print_msg('x_msg_data['||x_msg_data||']');
1216: RETURN;

Line 1213: pa_debug.reset_err_stack;

1209:
1210: x_return_status := FND_API.G_RET_STS_ERROR;
1211: x_msg_data := 'PA_FP_START_END_DATE_NOT_MATCH';
1212: If p_pa_debug_mode = 'Y' Then
1213: pa_debug.reset_err_stack;
1214: End If;
1215: --print_msg('x_msg_data['||x_msg_data||']');
1216: RETURN;
1217: END IF;

Line 1227: If p_pa_debug_mode = 'Y' Then

1223:
1224: x_return_status := FND_API.G_RET_STS_ERROR;
1225: x_msg_data := 'PA_FP_START_END_DATE_NOT_MATCH';
1226: --print_msg('x_msg_data['||x_msg_data||']');
1227: If p_pa_debug_mode = 'Y' Then
1228: pa_debug.reset_err_stack;
1229: End If;
1230: RETURN;
1231: END IF;

Line 1228: pa_debug.reset_err_stack;

1224: x_return_status := FND_API.G_RET_STS_ERROR;
1225: x_msg_data := 'PA_FP_START_END_DATE_NOT_MATCH';
1226: --print_msg('x_msg_data['||x_msg_data||']');
1227: If p_pa_debug_mode = 'Y' Then
1228: pa_debug.reset_err_stack;
1229: End If;
1230: RETURN;
1231: END IF;
1232:

Line 1251: If p_pa_debug_mode = 'Y' Then

1247:
1248: x_return_status := FND_API.G_RET_STS_ERROR;
1249: x_msg_data := 'PA_FP_PERIOD_NO_MATCH';
1250: print_msg('x_msg_data['||x_msg_data||']');
1251: If p_pa_debug_mode = 'Y' Then
1252: pa_debug.reset_err_stack;
1253: End If;
1254: RETURN;
1255: END IF;

Line 1252: pa_debug.reset_err_stack;

1248: x_return_status := FND_API.G_RET_STS_ERROR;
1249: x_msg_data := 'PA_FP_PERIOD_NO_MATCH';
1250: print_msg('x_msg_data['||x_msg_data||']');
1251: If p_pa_debug_mode = 'Y' Then
1252: pa_debug.reset_err_stack;
1253: End If;
1254: RETURN;
1255: END IF;
1256: l_start_period := p_start_period;

Line 1888: pa_debug.g_err_stage := 'Leaving PA_FP_SPREAD_AMTS_PKG.spread';

1884: END IF;
1885:
1886: END LOOP;
1887:
1888: pa_debug.g_err_stage := 'Leaving PA_FP_SPREAD_AMTS_PKG.spread';
1889: IF P_PA_DEBUG_MODE = 'Y' THEN
1890: pa_debug.write('spread: '||g_module_name,
1891: pa_debug.g_err_stage,
1892: 3);

Line 1889: IF P_PA_DEBUG_MODE = 'Y' THEN

1885:
1886: END LOOP;
1887:
1888: pa_debug.g_err_stage := 'Leaving PA_FP_SPREAD_AMTS_PKG.spread';
1889: IF P_PA_DEBUG_MODE = 'Y' THEN
1890: pa_debug.write('spread: '||g_module_name,
1891: pa_debug.g_err_stage,
1892: 3);
1893: END IF;

Line 1890: pa_debug.write('spread: '||g_module_name,

1886: END LOOP;
1887:
1888: pa_debug.g_err_stage := 'Leaving PA_FP_SPREAD_AMTS_PKG.spread';
1889: IF P_PA_DEBUG_MODE = 'Y' THEN
1890: pa_debug.write('spread: '||g_module_name,
1891: pa_debug.g_err_stage,
1892: 3);
1893: END IF;
1894: If p_pa_debug_mode = 'Y' Then

Line 1891: pa_debug.g_err_stage,

1887:
1888: pa_debug.g_err_stage := 'Leaving PA_FP_SPREAD_AMTS_PKG.spread';
1889: IF P_PA_DEBUG_MODE = 'Y' THEN
1890: pa_debug.write('spread: '||g_module_name,
1891: pa_debug.g_err_stage,
1892: 3);
1893: END IF;
1894: If p_pa_debug_mode = 'Y' Then
1895: pa_debug.reset_err_stack;

Line 1894: If p_pa_debug_mode = 'Y' Then

1890: pa_debug.write('spread: '||g_module_name,
1891: pa_debug.g_err_stage,
1892: 3);
1893: END IF;
1894: If p_pa_debug_mode = 'Y' Then
1895: pa_debug.reset_err_stack;
1896: End If;
1897: l_stage := 140;
1898: print_msg(' '||l_stage||' leave spread()');

Line 1895: pa_debug.reset_err_stack;

1891: pa_debug.g_err_stage,
1892: 3);
1893: END IF;
1894: If p_pa_debug_mode = 'Y' Then
1895: pa_debug.reset_err_stack;
1896: End If;
1897: l_stage := 140;
1898: print_msg(' '||l_stage||' leave spread()');
1899:

Line 1907: If p_pa_debug_mode = 'Y' Then

1903: print_msg('Unexpected error in Spread['||sqlcode||sqlerrm||']');
1904: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1905: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FP_SPREAD_AMTS_PKG',
1906: p_procedure_name => 'spread');
1907: If p_pa_debug_mode = 'Y' Then
1908: pa_debug.reset_err_stack;
1909: End If;
1910: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1911: END spread;

Line 1908: pa_debug.reset_err_stack;

1904: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1905: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FP_SPREAD_AMTS_PKG',
1906: p_procedure_name => 'spread');
1907: If p_pa_debug_mode = 'Y' Then
1908: pa_debug.reset_err_stack;
1909: End If;
1910: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1911: END spread;
1912:

Line 1963: If p_pa_debug_mode = 'Y' Then

1959: BEGIN
1960: l_stage := 10.1;
1961: print_msg(' '||l_stage||' enter spread_daily_level()');
1962: x_return_status := FND_API.G_RET_STS_SUCCESS;
1963: If p_pa_debug_mode = 'Y' Then
1964: pa_debug.init_err_stack('PA_FP_SPREAD_AMTS_PKG.spread_daily_level');
1965: End If;
1966:
1967: fnd_profile.get('PA_DEBUG_MODE', l_debug_mode);

Line 1964: pa_debug.init_err_stack('PA_FP_SPREAD_AMTS_PKG.spread_daily_level');

1960: l_stage := 10.1;
1961: print_msg(' '||l_stage||' enter spread_daily_level()');
1962: x_return_status := FND_API.G_RET_STS_SUCCESS;
1963: If p_pa_debug_mode = 'Y' Then
1964: pa_debug.init_err_stack('PA_FP_SPREAD_AMTS_PKG.spread_daily_level');
1965: End If;
1966:
1967: fnd_profile.get('PA_DEBUG_MODE', l_debug_mode);
1968: pa_debug.set_process('PLSQL', 'LOG', l_debug_mode);

Line 1967: fnd_profile.get('PA_DEBUG_MODE', l_debug_mode);

1963: If p_pa_debug_mode = 'Y' Then
1964: pa_debug.init_err_stack('PA_FP_SPREAD_AMTS_PKG.spread_daily_level');
1965: End If;
1966:
1967: fnd_profile.get('PA_DEBUG_MODE', l_debug_mode);
1968: pa_debug.set_process('PLSQL', 'LOG', l_debug_mode);
1969:
1970: pa_debug.g_err_stage := 'Entered PA_FP_SPREAD_AMTS_PKG.spread_daily_level';
1971: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 1968: pa_debug.set_process('PLSQL', 'LOG', l_debug_mode);

1964: pa_debug.init_err_stack('PA_FP_SPREAD_AMTS_PKG.spread_daily_level');
1965: End If;
1966:
1967: fnd_profile.get('PA_DEBUG_MODE', l_debug_mode);
1968: pa_debug.set_process('PLSQL', 'LOG', l_debug_mode);
1969:
1970: pa_debug.g_err_stage := 'Entered PA_FP_SPREAD_AMTS_PKG.spread_daily_level';
1971: IF P_PA_DEBUG_MODE = 'Y' THEN
1972: pa_debug.write('spread: '||g_module_name,

Line 1970: pa_debug.g_err_stage := 'Entered PA_FP_SPREAD_AMTS_PKG.spread_daily_level';

1966:
1967: fnd_profile.get('PA_DEBUG_MODE', l_debug_mode);
1968: pa_debug.set_process('PLSQL', 'LOG', l_debug_mode);
1969:
1970: pa_debug.g_err_stage := 'Entered PA_FP_SPREAD_AMTS_PKG.spread_daily_level';
1971: IF P_PA_DEBUG_MODE = 'Y' THEN
1972: pa_debug.write('spread: '||g_module_name,
1973: pa_debug.g_err_stage,
1974: 3);

Line 1971: IF P_PA_DEBUG_MODE = 'Y' THEN

1967: fnd_profile.get('PA_DEBUG_MODE', l_debug_mode);
1968: pa_debug.set_process('PLSQL', 'LOG', l_debug_mode);
1969:
1970: pa_debug.g_err_stage := 'Entered PA_FP_SPREAD_AMTS_PKG.spread_daily_level';
1971: IF P_PA_DEBUG_MODE = 'Y' THEN
1972: pa_debug.write('spread: '||g_module_name,
1973: pa_debug.g_err_stage,
1974: 3);
1975: END IF;

Line 1972: pa_debug.write('spread: '||g_module_name,

1968: pa_debug.set_process('PLSQL', 'LOG', l_debug_mode);
1969:
1970: pa_debug.g_err_stage := 'Entered PA_FP_SPREAD_AMTS_PKG.spread_daily_level';
1971: IF P_PA_DEBUG_MODE = 'Y' THEN
1972: pa_debug.write('spread: '||g_module_name,
1973: pa_debug.g_err_stage,
1974: 3);
1975: END IF;
1976:

Line 1973: pa_debug.g_err_stage,

1969:
1970: pa_debug.g_err_stage := 'Entered PA_FP_SPREAD_AMTS_PKG.spread_daily_level';
1971: IF P_PA_DEBUG_MODE = 'Y' THEN
1972: pa_debug.write('spread: '||g_module_name,
1973: pa_debug.g_err_stage,
1974: 3);
1975: END IF;
1976:
1977: l_stage := 20.1;

Line 2000: If p_pa_debug_mode = 'Y' Then

1996: IF NOT p_number_of_amounts BETWEEN 1 AND 10 THEN
1997:
1998: x_return_status := FND_API.G_RET_STS_ERROR;
1999: x_msg_data := 'PA_FP_NUM_OF_AMTS_OVERFLOW';
2000: If p_pa_debug_mode = 'Y' Then
2001: pa_debug.reset_err_stack;
2002: End If;
2003: RETURN;
2004: END IF;

Line 2001: pa_debug.reset_err_stack;

1997:
1998: x_return_status := FND_API.G_RET_STS_ERROR;
1999: x_msg_data := 'PA_FP_NUM_OF_AMTS_OVERFLOW';
2000: If p_pa_debug_mode = 'Y' Then
2001: pa_debug.reset_err_stack;
2002: End If;
2003: RETURN;
2004: END IF;
2005:

Line 2014: If p_pa_debug_mode = 'Y' Then

2010: -- and they cannot overlap each other.
2011: IF p_start_end_date IS NULL THEN
2012: x_return_status := FND_API.G_RET_STS_ERROR;
2013: x_msg_data := 'PA_FP_PLAN_START_END_DATE_NULL';
2014: If p_pa_debug_mode = 'Y' Then
2015: pa_debug.reset_err_stack;
2016: End If;
2017: RETURN;
2018: END IF;

Line 2015: pa_debug.reset_err_stack;

2011: IF p_start_end_date IS NULL THEN
2012: x_return_status := FND_API.G_RET_STS_ERROR;
2013: x_msg_data := 'PA_FP_PLAN_START_END_DATE_NULL';
2014: If p_pa_debug_mode = 'Y' Then
2015: pa_debug.reset_err_stack;
2016: End If;
2017: RETURN;
2018: END IF;
2019: FOR k IN 1 .. p_start_end_date.COUNT()

Line 2032: If p_pa_debug_mode = 'Y' Then

2028: p_start_end_date(k).end_date THEN
2029:
2030: x_return_status := FND_API.G_RET_STS_ERROR;
2031: x_msg_data := 'PA_FP_START_END_DATE_OVERLAP';
2032: If p_pa_debug_mode = 'Y' Then
2033: pa_debug.reset_err_stack;
2034: End If;
2035: RETURN;
2036: END IF;

Line 2033: pa_debug.reset_err_stack;

2029:
2030: x_return_status := FND_API.G_RET_STS_ERROR;
2031: x_msg_data := 'PA_FP_START_END_DATE_OVERLAP';
2032: If p_pa_debug_mode = 'Y' Then
2033: pa_debug.reset_err_stack;
2034: End If;
2035: RETURN;
2036: END IF;
2037: END LOOP;

Line 2047: If p_pa_debug_mode = 'Y' Then

2043: IF (x_spread_amounts IS NULL OR x_spread_amounts.COUNT() = 0 ) THEN
2044: x_return_status := FND_API.G_RET_STS_ERROR;
2045: x_msg_data := 'PA_FP_PERIODS_IS_NULL';
2046: print_msg('x_msg_data['||x_msg_data||']');
2047: If p_pa_debug_mode = 'Y' Then
2048: pa_debug.reset_err_stack;
2049: End If;
2050: RETURN;
2051: END IF;

Line 2048: pa_debug.reset_err_stack;

2044: x_return_status := FND_API.G_RET_STS_ERROR;
2045: x_msg_data := 'PA_FP_PERIODS_IS_NULL';
2046: print_msg('x_msg_data['||x_msg_data||']');
2047: If p_pa_debug_mode = 'Y' Then
2048: pa_debug.reset_err_stack;
2049: End If;
2050: RETURN;
2051: END IF;
2052: --print_msg('Count of x_spread_amounts.COUNT()['||x_spread_amounts.COUNT()||']');

Line 2066: If p_pa_debug_mode = 'Y' Then

2062: x_spread_amounts(k).end_date THEN
2063:
2064: x_return_status := FND_API.G_RET_STS_ERROR;
2065: x_msg_data := 'PA_FP_START_END_DATE_NOT_MATCH';
2066: If p_pa_debug_mode = 'Y' Then
2067: pa_debug.reset_err_stack;
2068: End If;
2069: --print_msg('x_msg_data['||x_msg_data||']');
2070: RETURN;

Line 2067: pa_debug.reset_err_stack;

2063:
2064: x_return_status := FND_API.G_RET_STS_ERROR;
2065: x_msg_data := 'PA_FP_START_END_DATE_NOT_MATCH';
2066: If p_pa_debug_mode = 'Y' Then
2067: pa_debug.reset_err_stack;
2068: End If;
2069: --print_msg('x_msg_data['||x_msg_data||']');
2070: RETURN;
2071: END IF;

Line 2081: If p_pa_debug_mode = 'Y' Then

2077:
2078: x_return_status := FND_API.G_RET_STS_ERROR;
2079: x_msg_data := 'PA_FP_START_END_DATE_NOT_MATCH';
2080: --print_msg('x_msg_data['||x_msg_data||']');
2081: If p_pa_debug_mode = 'Y' Then
2082: pa_debug.reset_err_stack;
2083: End If;
2084: RETURN;
2085: END IF;

Line 2082: pa_debug.reset_err_stack;

2078: x_return_status := FND_API.G_RET_STS_ERROR;
2079: x_msg_data := 'PA_FP_START_END_DATE_NOT_MATCH';
2080: --print_msg('x_msg_data['||x_msg_data||']');
2081: If p_pa_debug_mode = 'Y' Then
2082: pa_debug.reset_err_stack;
2083: End If;
2084: RETURN;
2085: END IF;
2086:

Line 2098: If p_pa_debug_mode = 'Y' Then

2094:
2095: x_return_status := FND_API.G_RET_STS_ERROR;
2096: x_msg_data := 'PA_FP_PERIOD_NO_MATCH';
2097: print_msg('x_msg_data['||x_msg_data||']');
2098: If p_pa_debug_mode = 'Y' Then
2099: pa_debug.reset_err_stack;
2100: End If;
2101: RETURN;
2102: END IF;

Line 2099: pa_debug.reset_err_stack;

2095: x_return_status := FND_API.G_RET_STS_ERROR;
2096: x_msg_data := 'PA_FP_PERIOD_NO_MATCH';
2097: print_msg('x_msg_data['||x_msg_data||']');
2098: If p_pa_debug_mode = 'Y' Then
2099: pa_debug.reset_err_stack;
2100: End If;
2101: RETURN;
2102: END IF;
2103: l_start_period := p_start_period;

Line 2702: If p_pa_debug_mode = 'Y' Then

2698: l_stage := 200;
2699: print_msg(' '||l_stage||' enter get_options()');
2700:
2701: x_return_status := FND_API.G_RET_STS_SUCCESS;
2702: If p_pa_debug_mode = 'Y' Then
2703: pa_debug.init_err_stack( 'PA_FP_SPREAD_AMTS_PKG.get_options');
2704: pa_debug.set_process('PLSQL', 'LOG', p_pa_debug_mode);
2705: End If;
2706:

Line 2703: pa_debug.init_err_stack( 'PA_FP_SPREAD_AMTS_PKG.get_options');

2699: print_msg(' '||l_stage||' enter get_options()');
2700:
2701: x_return_status := FND_API.G_RET_STS_SUCCESS;
2702: If p_pa_debug_mode = 'Y' Then
2703: pa_debug.init_err_stack( 'PA_FP_SPREAD_AMTS_PKG.get_options');
2704: pa_debug.set_process('PLSQL', 'LOG', p_pa_debug_mode);
2705: End If;
2706:
2707: l_stage := 205;

Line 2704: pa_debug.set_process('PLSQL', 'LOG', p_pa_debug_mode);

2700:
2701: x_return_status := FND_API.G_RET_STS_SUCCESS;
2702: If p_pa_debug_mode = 'Y' Then
2703: pa_debug.init_err_stack( 'PA_FP_SPREAD_AMTS_PKG.get_options');
2704: pa_debug.set_process('PLSQL', 'LOG', p_pa_debug_mode);
2705: End If;
2706:
2707: l_stage := 205;
2708: print_msg(l_stage||'input parameters:p_budget_version_id=> '||p_budget_version_id);

Line 2722: If p_pa_debug_mode = 'Y' Then

2718: CLOSE get_name_and_type_csr;
2719:
2720: x_return_status := FND_API.G_RET_STS_ERROR;
2721: x_msg_data := 'PA_FP_CANNOT_GET_TIME_PHASE';
2722: If p_pa_debug_mode = 'Y' Then
2723: pa_debug.reset_err_stack;
2724: End If;
2725: l_stage := 206;
2726: print_msg(' '||'cannot found name type');

Line 2723: pa_debug.reset_err_stack;

2719:
2720: x_return_status := FND_API.G_RET_STS_ERROR;
2721: x_msg_data := 'PA_FP_CANNOT_GET_TIME_PHASE';
2722: If p_pa_debug_mode = 'Y' Then
2723: pa_debug.reset_err_stack;
2724: End If;
2725: l_stage := 206;
2726: print_msg(' '||'cannot found name type');
2727: RETURN;

Line 2741: If p_pa_debug_mode = 'Y' Then

2737: get_name_and_type_rec.pa_period_type;
2738: x_time_phase_code :=
2739: get_name_and_type_rec.time_phase_code;
2740: l_stage := 230;
2741: If p_pa_debug_mode = 'Y' Then
2742: print_msg(' '||l_stage||' after get set name,period type,time phase');
2743: print_msg(' '||'period_set_name => '||get_name_and_type_rec.period_set_name);
2744: print_msg(' '||'accounted_period_type => '||get_name_and_type_rec.accounted_period_type);
2745: print_msg(' '||'pa_period_type => '||get_name_and_type_rec.pa_period_type);

Line 2750: If p_pa_debug_mode = 'Y' Then

2746: print_msg(' '||'time_phase_code => '||get_name_and_type_rec.time_phase_code);
2747: End If;
2748:
2749: /* reset error stack */
2750: If p_pa_debug_mode = 'Y' Then
2751: pa_debug.reset_err_stack;
2752: End If;
2753: l_stage := 240;
2754: print_msg(' '||l_stage||' leave get options');

Line 2751: pa_debug.reset_err_stack;

2747: End If;
2748:
2749: /* reset error stack */
2750: If p_pa_debug_mode = 'Y' Then
2751: pa_debug.reset_err_stack;
2752: End If;
2753: l_stage := 240;
2754: print_msg(' '||l_stage||' leave get options');
2755:

Line 2763: If p_pa_debug_mode = 'Y' Then

2759:
2760: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2761: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FP_SPREAD_AMTS_PKG',
2762: p_procedure_name => 'get_options');
2763: If p_pa_debug_mode = 'Y' Then
2764: pa_debug.reset_err_stack;
2765: End If;
2766: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2767:

Line 2764: pa_debug.reset_err_stack;

2760: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2761: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FP_SPREAD_AMTS_PKG',
2762: p_procedure_name => 'get_options');
2763: If p_pa_debug_mode = 'Y' Then
2764: pa_debug.reset_err_stack;
2765: End If;
2766: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2767:
2768: END get_options;

Line 2872: If p_pa_debug_mode = 'Y' Then

2868: l_stage := 250;
2869: print_msg(' '||l_stage||' enter get_periods()');
2870:
2871: x_return_status := FND_API.G_RET_STS_SUCCESS;
2872: If p_pa_debug_mode = 'Y' Then
2873: pa_debug.init_err_stack('PA_FP_SPREAD_AMTS_PKG.get_periods');
2874: pa_debug.set_process('PLSQL', 'LOG', p_pa_debug_mode);
2875: End If;
2876:

Line 2873: pa_debug.init_err_stack('PA_FP_SPREAD_AMTS_PKG.get_periods');

2869: print_msg(' '||l_stage||' enter get_periods()');
2870:
2871: x_return_status := FND_API.G_RET_STS_SUCCESS;
2872: If p_pa_debug_mode = 'Y' Then
2873: pa_debug.init_err_stack('PA_FP_SPREAD_AMTS_PKG.get_periods');
2874: pa_debug.set_process('PLSQL', 'LOG', p_pa_debug_mode);
2875: End If;
2876:
2877: l_stage := 255;

Line 2874: pa_debug.set_process('PLSQL', 'LOG', p_pa_debug_mode);

2870:
2871: x_return_status := FND_API.G_RET_STS_SUCCESS;
2872: If p_pa_debug_mode = 'Y' Then
2873: pa_debug.init_err_stack('PA_FP_SPREAD_AMTS_PKG.get_periods');
2874: pa_debug.set_process('PLSQL', 'LOG', p_pa_debug_mode);
2875: End If;
2876:
2877: l_stage := 255;
2878: print_msg(' '||'input parameters:');

Line 2890: If p_pa_debug_mode = 'Y' Then

2886: IF p_start_date > p_end_date THEN
2887:
2888: x_return_status := FND_API.G_RET_STS_ERROR;
2889: x_msg_data := 'PA_FP_START_END_DATE_OVERLAP';
2890: If p_pa_debug_mode = 'Y' Then
2891: pa_debug.reset_err_stack;
2892: End If;
2893: RETURN;
2894: END IF;

Line 2891: pa_debug.reset_err_stack;

2887:
2888: x_return_status := FND_API.G_RET_STS_ERROR;
2889: x_msg_data := 'PA_FP_START_END_DATE_OVERLAP';
2890: If p_pa_debug_mode = 'Y' Then
2891: pa_debug.reset_err_stack;
2892: End If;
2893: RETURN;
2894: END IF;
2895: l_stage := 270;

Line 2904: If p_pa_debug_mode = 'Y' Then

2900: l_accounted_period_type := p_accounted_period_type;
2901: l_pa_period_type := p_pa_period_type;
2902: l_time_phase_code := p_time_phase_code;
2903: l_stage := 280;
2904: If p_pa_debug_mode = 'Y' Then
2905: print_msg(' '||l_stage||' after assign set name,period type,time phase');
2906: print_msg(' '||'period_set_name => '||l_period_set_name);
2907: print_msg(' '||'accounted_period_type => '||l_accounted_period_type);
2908: print_msg(' '||'pa_period_type => '||l_pa_period_type);

Line 2934: If p_pa_debug_mode = 'Y' Then

2930:
2931: IF n = 0 AND (l_time_phase_code = 'G' OR l_time_phase_code = 'P') THEN
2932: x_return_status := FND_API.G_RET_STS_ERROR;
2933: x_msg_data := 'PA_FP_PERIODS_IS_NULL';
2934: If p_pa_debug_mode = 'Y' Then
2935: pa_debug.reset_err_stack;
2936: End If;
2937: RETURN;
2938: END IF;

Line 2935: pa_debug.reset_err_stack;

2931: IF n = 0 AND (l_time_phase_code = 'G' OR l_time_phase_code = 'P') THEN
2932: x_return_status := FND_API.G_RET_STS_ERROR;
2933: x_msg_data := 'PA_FP_PERIODS_IS_NULL';
2934: If p_pa_debug_mode = 'Y' Then
2935: pa_debug.reset_err_stack;
2936: End If;
2937: RETURN;
2938: END IF;
2939: If p_pa_debug_mode = 'Y' Then

Line 2939: If p_pa_debug_mode = 'Y' Then

2935: pa_debug.reset_err_stack;
2936: End If;
2937: RETURN;
2938: END IF;
2939: If p_pa_debug_mode = 'Y' Then
2940: pa_debug.reset_err_stack;
2941: End If;
2942: l_stage := 290;
2943: print_msg(' '||l_stage||' leave get period');

Line 2940: pa_debug.reset_err_stack;

2936: End If;
2937: RETURN;
2938: END IF;
2939: If p_pa_debug_mode = 'Y' Then
2940: pa_debug.reset_err_stack;
2941: End If;
2942: l_stage := 290;
2943: print_msg(' '||l_stage||' leave get period');
2944:

Line 2952: If p_pa_debug_mode = 'Y' Then

2948:
2949: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2950: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FP_SPREAD_AMTS_PKG',
2951: p_procedure_name => 'get_periods');
2952: If p_pa_debug_mode = 'Y' Then
2953: pa_debug.reset_err_stack;
2954: End If;
2955: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2956:

Line 2953: pa_debug.reset_err_stack;

2949: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2950: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FP_SPREAD_AMTS_PKG',
2951: p_procedure_name => 'get_periods');
2952: If p_pa_debug_mode = 'Y' Then
2953: pa_debug.reset_err_stack;
2954: End If;
2955: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2956:
2957: END get_periods;

Line 3274: If p_pa_debug_mode = 'Y' Then

3270: l_stage := 800;
3271: print_msg(l_stage||' *** ENTERED SPREAD AMOUNTS API***');
3272: x_return_status := 'S';
3273: L_FINAL_RETURN_STATUS := 'S';
3274: If p_pa_debug_mode = 'Y' Then
3275: pa_debug.init_err_stack('PA_FP_SPREAD_AMTS_PKG.spread_amounts');
3276: End If;
3277: /* Bug fix: 4078623 Both set_curr_fun and Init_err_stack are similar, since reset_curr_function is not called
3278: * This might have been causing the plsql numeric or value error. Not sure because of this. Just to avoid

Line 3275: pa_debug.init_err_stack('PA_FP_SPREAD_AMTS_PKG.spread_amounts');

3271: print_msg(l_stage||' *** ENTERED SPREAD AMOUNTS API***');
3272: x_return_status := 'S';
3273: L_FINAL_RETURN_STATUS := 'S';
3274: If p_pa_debug_mode = 'Y' Then
3275: pa_debug.init_err_stack('PA_FP_SPREAD_AMTS_PKG.spread_amounts');
3276: End If;
3277: /* Bug fix: 4078623 Both set_curr_fun and Init_err_stack are similar, since reset_curr_function is not called
3278: * This might have been causing the plsql numeric or value error. Not sure because of this. Just to avoid
3279: * confusions commenting out this call

Line 3280: * PA_DEBUG.Set_Curr_Function( p_function => 'PA_FP_SPREAD_AMTS_PKG.spread_amounts' ,p_debug_mode => 'Y');

3276: End If;
3277: /* Bug fix: 4078623 Both set_curr_fun and Init_err_stack are similar, since reset_curr_function is not called
3278: * This might have been causing the plsql numeric or value error. Not sure because of this. Just to avoid
3279: * confusions commenting out this call
3280: * PA_DEBUG.Set_Curr_Function( p_function => 'PA_FP_SPREAD_AMTS_PKG.spread_amounts' ,p_debug_mode => 'Y');
3281: */
3282:
3283: -- validation
3284: IF ( p_budget_version_id IS NULL ) THEN

Line 3378: If p_pa_debug_mode = 'Y' Then

3374: l_g_start_date := NULL;
3375: END IF;
3376:
3377: l_stage := 820;
3378: If p_pa_debug_mode = 'Y' Then
3379: print_msg(l_stage||' input data:');
3380: print_msg('ra_resource_assignment_id => '||resource_assignment_rec.resource_assignment_id);
3381: print_msg('ra_BUDGET_VERSION_ID => '||resource_assignment_rec.BUDGET_VERSION_ID);
3382: print_msg('ra_PLANNING_START/END_DATE => '||resource_assignment_rec.PLANNING_START_DATE||'/'||resource_assignment_rec.PLANNING_END_DATE);

Line 3476: IF p_pa_debug_mode = 'Y' Then

3472: l_err_msg := v_msg_data;
3473: RAISE SPREAD_AMOUNTS_EXCEPTION;
3474: END IF;
3475:
3476: IF p_pa_debug_mode = 'Y' Then
3477: IF ( v_spread_amounts.COUNT > 0
3478: AND l_time_phase_code IN ('P','G')) THEN
3479:
3480: FOR i IN v_spread_amounts.first.. v_spread_amounts.last LOOP

Line 3566: If p_pa_debug_mode = 'Y' Then

3562: WHEN NO_DATA_FOUND THEN
3563: null;
3564: END;
3565: l_stage := 530;
3566: If p_pa_debug_mode = 'Y' Then
3567: print_msg(l_stage||' Before spread Amts from Budget Line l_time_phase_code '||l_time_phase_code);
3568: print_msg(' l_sum_txn_quantity '||l_sum_txn_quantity||']l_sum_txn_raw_cost['||l_sum_txn_raw_cost||']');
3569: print_msg(' l_sum_txn_burdened_cost['||l_sum_txn_burdened_cost||']l_sum_txn_revenue['||l_sum_txn_revenue||']');
3570: End If;

Line 3689: If p_pa_debug_mode = 'Y' Then

3685: (10, 10, 10, 10, 10, 10, 10, 10, 10, 10);
3686: END IF;
3687: CLOSE spread_curve_csr;
3688: l_stage := 850;
3689: If p_pa_debug_mode = 'Y' Then
3690: print_msg(l_stage||' after get spread curve');
3691: print_msg(' '||'spread curve => '||v_spread_curve(1)||' '||v_spread_curve(2)||' '||v_spread_curve(3));
3692: print_msg(' '||v_spread_curve(4)||' '||v_spread_curve(5)||' '||v_spread_curve(6)||' '||v_spread_curve(7));
3693: print_msg(' '||v_spread_curve(8)||' '||v_spread_curve(9)||' '||v_spread_curve(10));

Line 3890: If p_pa_debug_mode = 'Y' Then

3886: l_sum_txn_burdened_cost := l_g_sum_txn_burdened_cost;
3887: l_sum_txn_revenue := l_g_sum_txn_revenue;
3888: END IF;
3889: l_stage := 970;
3890: If p_pa_debug_mode = 'Y' Then
3891: print_msg(l_stage||' get amounts addl plus etc');
3892: print_msg('l_txn_quantity_addl '||l_txn_quantity_addl||']l_txn_raw_cost_addl['||l_txn_raw_cost_addl||']');
3893: print_msg('l_txn_burdened_cost_addl '||l_txn_burdened_cost_addl||']l_txn_revenue_addl['||l_txn_revenue_addl||']');
3894: print_msg('l_sum_txn_quantity['||l_sum_txn_quantity||']l_sum_txn_raw_cost['||l_sum_txn_raw_cost||']');

Line 4013: If p_pa_debug_mode = 'Y' Then

4009: RAISE SPREAD_AMOUNTS_EXCEPTION;
4010: END IF;
4011:
4012: l_stage := 1000;
4013: If p_pa_debug_mode = 'Y' Then
4014: print_msg(l_stage||' after call spread()');
4015: FOR i IN 1 .. v_spread_amounts.COUNT() LOOP
4016: IF i = l_line_start OR i = l_line_end THEN
4017: NULL;

Line 4643: If p_pa_debug_mode = 'Y' Then

4639: print_msg('Error occured during the spread, set the return status to E');
4640: x_return_status := L_FINAL_RETURN_STATUS;
4641: END IF;
4642:
4643: If p_pa_debug_mode = 'Y' Then
4644: FOR i IN ( SELECT tmp.resource_assignment_id resAgnId
4645: ,tmp.txn_currency_code Currency
4646: ,sum(tmp.quantity) tmpqty
4647: ,sum(tmp.txn_raw_cost) tmprawcost

Line 4668: If p_pa_debug_mode = 'Y' Then

4664: l_stage := 1060;
4665: print_msg(l_stage||' **********leave spread_amounts() with retSts['||x_return_status||']');
4666:
4667: /* Reset the error stack */
4668: If p_pa_debug_mode = 'Y' Then
4669: pa_debug.reset_err_stack;
4670: End If;
4671:
4672: EXCEPTION

Line 4669: pa_debug.reset_err_stack;

4665: print_msg(l_stage||' **********leave spread_amounts() with retSts['||x_return_status||']');
4666:
4667: /* Reset the error stack */
4668: If p_pa_debug_mode = 'Y' Then
4669: pa_debug.reset_err_stack;
4670: End If;
4671:
4672: EXCEPTION
4673:

Line 4724: If p_pa_debug_mode = 'Y' Then

4720: x_msg_data := null;
4721: End if;
4722: print_msg('Final ReturnSts['||x_return_status||
4723: ']msgCt['||x_msg_count||']msgData['||x_msg_data||']');
4724: If p_pa_debug_mode = 'Y' Then
4725: pa_debug.reset_err_stack;
4726: End If;
4727: RETURN;
4728:

Line 4725: pa_debug.reset_err_stack;

4721: End if;
4722: print_msg('Final ReturnSts['||x_return_status||
4723: ']msgCt['||x_msg_count||']msgData['||x_msg_data||']');
4724: If p_pa_debug_mode = 'Y' Then
4725: pa_debug.reset_err_stack;
4726: End If;
4727: RETURN;
4728:
4729:

Line 4737: If p_pa_debug_mode = 'Y' Then

4733: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4734: L_FINAL_RETURN_STATUS := 'U';
4735: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FP_SPREAD_AMTS_PKG',
4736: p_procedure_name => 'spread_amounts');
4737: If p_pa_debug_mode = 'Y' Then
4738: pa_debug.reset_err_stack;
4739: End If;
4740: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4741:

Line 4738: pa_debug.reset_err_stack;

4734: L_FINAL_RETURN_STATUS := 'U';
4735: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FP_SPREAD_AMTS_PKG',
4736: p_procedure_name => 'spread_amounts');
4737: If p_pa_debug_mode = 'Y' Then
4738: pa_debug.reset_err_stack;
4739: End If;
4740: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4741:
4742: END spread_amounts;