eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.OZF_FUND_RECONCILE_PVT dependencies on OZF_UTILITY_PVT

Line 313: ozf_utility_pvt.debug_message ( l_full_name

309: l_object_end_date := FND_DATE.CANONICAL_TO_DATE(p_object_end_date);
310: END IF;
311:
312: IF G_DEBUG THEN
313: ozf_utility_pvt.debug_message ( l_full_name
314: || ': '
315: || l_grace_date);
316: END IF;
317:

Line 320: ozf_utility_pvt.debug_message ( 'object type: ' || p_object_type

316: END IF;
317:
318:
319: IF G_DEBUG THEN
320: ozf_utility_pvt.debug_message ( 'object type: ' || p_object_type
321: || 'object status: ' ||p_object_status
322: || 'object code: ' || p_object_code
323: || 'end date: ' || l_object_end_date
324: || 'recon paid: ' || l_util_paid);

Line 490: ozf_utility_pvt.debug_message ('table count: ' || l_object_tbl.count);

486:
487: END IF;
488:
489: IF G_DEBUG THEN
490: ozf_utility_pvt.debug_message ('table count: ' || l_object_tbl.count);
491: END IF;
492:
493: FOR k IN NVL (l_object_tbl.FIRST, 1) .. NVL (l_object_tbl.LAST, 0)
494: LOOP

Line 497: ozf_utility_pvt.debug_message ( l_full_name

493: FOR k IN NVL (l_object_tbl.FIRST, 1) .. NVL (l_object_tbl.LAST, 0)
494: LOOP
495: SAVEPOINT release_fund_conc;
496: IF G_DEBUG THEN
497: ozf_utility_pvt.debug_message ( l_full_name
498: || ': start loop');
499: END IF;
500:
501: -- call release fund for the respective offers

Line 517: ozf_utility_pvt.write_conc_log('ERROR: Could not perform reconcile for Object: '||l_object_type||' : '||l_object_tbl (k).object_id);

513: IF NOT (l_return_status = fnd_api.g_ret_sts_success) THEN
514: ROLLBACK TO release_fund_conc;
515: -- x_retcode := 1;
516: --x_errbuf := l_msg_data;
517: ozf_utility_pvt.write_conc_log('ERROR: Could not perform reconcile for Object: '||l_object_type||' : '||l_object_tbl (k).object_id);
518:
519: /* fnd_msg_pub.count_and_get (
520: p_encoded=> fnd_api.g_false
521: ,p_count=> x_msg_count

Line 580: ozf_utility_pvt.write_conc_log (l_msg_data);

576:
577:
578: END LOOP;
579:
580: ozf_utility_pvt.write_conc_log (l_msg_data);
581: /* fnd_msg_pub.count_and_get (
582: p_encoded=> fnd_api.g_false
583: ,p_count=> x_msg_count
584: ,p_data=> x_msg_data

Line 607: ozf_utility_pvt.write_conc_log (x_errbuf);

603: WHEN OTHERS THEN
604: ROLLBACK TO release_fund_conc;
605: x_retcode := 1;
606: x_errbuf := l_msg_data;
607: ozf_utility_pvt.write_conc_log (x_errbuf);
608:
609: END release_fund_conc;
610:
611: /*****************************************************************************************/

Line 730: ozf_utility_pvt.debug_message (': before parent source cursor ');

726: BEGIN
727: SAVEPOINT reconcile_budget_line;
728: x_return_status := fnd_api.g_ret_sts_success;
729: IF G_DEBUG THEN
730: ozf_utility_pvt.debug_message (': before parent source cursor ');
731: END IF;
732:
733: IF fnd_api.to_boolean (p_init_msg_list) THEN
734: fnd_msg_pub.initialize;

Line 807: ozf_utility_pvt.debug_message (': in loop of soucing from budgets.');

803: FETCH c_parent_source_fund INTO l_parent_source_rec;
804: EXIT WHEN c_parent_source_fund%NOTFOUND;
805: EXIT WHEN l_parent_source_rec.parent_source_id IS NULL;
806: IF G_DEBUG THEN
807: ozf_utility_pvt.debug_message (': in loop of soucing from budgets.');
808: END IF;
809: l_act_budgets_rec :=NULL;
810:
811: l_act_budgets_rec.act_budget_used_by_id := l_parent_source_rec.parent_source_id;

Line 823: ozf_utility_pvt.get_default_user_status (

819: l_act_budgets_rec.request_currency := l_parent_source_rec.parent_curr;
820: l_act_budgets_rec.request_date := SYSDATE;
821: l_act_budgets_rec.status_code := 'APPROVED';
822: l_act_budgets_rec.user_status_id :=
823: ozf_utility_pvt.get_default_user_status (
824: 'OZF_BUDGETSOURCE_STATUS'
825: ,l_act_budgets_rec.status_code
826: );
827: l_act_budgets_rec.approved_amount := NVL (l_parent_source_rec.total_amount, 0); -- in arc_Act_used_by currency

Line 838: /* ozf_utility_pvt.convert_currency (

834: CLOSE c_exchange_rate_date;
835: --skip the conversion, and use the amounts stored in object currency,
836: --so as to avoid the rounding by gl APi.
837: --For bug 7425189
838: /* ozf_utility_pvt.convert_currency (
839: x_return_status=> l_return_status
840: ,p_from_currency=> l_parent_source_rec.parent_curr
841: ,p_to_currency=> p_object_currency
842: ,p_conv_date=> l_act_budgets_rec.exchange_rate_date --nirma

Line 857: l_act_budgets_rec.approver_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);

853: END IF;
854:
855:
856: l_act_budgets_rec.approval_date := SYSDATE;
857: l_act_budgets_rec.approver_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);
858: l_act_budgets_rec.requester_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);
859: l_act_budgets_rec.justification :=
860: fnd_message.get_string ('OZF', 'OZF_FUND_RECONCILE');
861: -- nepanda : fix for bug # 14062938 - Converting the amount to be transferred from offer currency to budget currency

Line 858: l_act_budgets_rec.requester_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);

854:
855:
856: l_act_budgets_rec.approval_date := SYSDATE;
857: l_act_budgets_rec.approver_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);
858: l_act_budgets_rec.requester_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);
859: l_act_budgets_rec.justification :=
860: fnd_message.get_string ('OZF', 'OZF_FUND_RECONCILE');
861: -- nepanda : fix for bug # 14062938 - Converting the amount to be transferred from offer currency to budget currency
862: ozf_utility_pvt.convert_currency (

Line 862: ozf_utility_pvt.convert_currency (

858: l_act_budgets_rec.requester_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);
859: l_act_budgets_rec.justification :=
860: fnd_message.get_string ('OZF', 'OZF_FUND_RECONCILE');
861: -- nepanda : fix for bug # 14062938 - Converting the amount to be transferred from offer currency to budget currency
862: ozf_utility_pvt.convert_currency (
863: x_return_status=> l_return_status
864: ,p_from_currency=> p_object_currency
865: ,p_to_currency=> l_parent_source_rec.parent_curr
866: ,p_conv_date=> l_act_budgets_rec.exchange_rate_date --nirma

Line 898: ozf_utility_pvt.debug_message (': soucing from parent - l_parent_amount: ' || l_parent_amount);

894:
895: --LOOP
896: FETCH c_parent_source_obj INTO l_parent_amount;
897: IF G_DEBUG THEN
898: ozf_utility_pvt.debug_message (': soucing from parent - l_parent_amount: ' || l_parent_amount);
899: END IF;
900: l_act_budgets_rec.act_budget_used_by_id := l_parent_id;
901: l_act_budgets_rec.arc_act_budget_used_by := l_parent_type;
902: l_act_budgets_rec.budget_source_type := p_budget_used_by_type;

Line 917: ozf_utility_pvt.convert_currency (

913: IF l_currency_code = p_object_currency THEN
914: l_act_budgets_rec.request_amount := l_parent_amount; -- in arc_Act_used_by currency
915: ELSE
916: --nirprasa for bug 7425189, pass exchange_rate_date for conversion
917: ozf_utility_pvt.convert_currency (
918: x_return_status=> l_return_status
919: ,p_from_currency=> p_object_currency
920: ,p_to_currency=> l_currency_code
921: ,p_conv_date=> l_act_budgets_rec.exchange_rate_date --nirma

Line 937: ozf_utility_pvt.get_default_user_status (

933:
934: l_act_budgets_rec.request_date := SYSDATE;
935: l_act_budgets_rec.status_code := 'APPROVED';
936: l_act_budgets_rec.user_status_id :=
937: ozf_utility_pvt.get_default_user_status (
938: 'OZF_BUDGETSOURCE_STATUS'
939: ,l_act_budgets_rec.status_code
940: );
941: l_act_budgets_rec.approved_amount := l_act_budgets_rec.request_amount; -- in arc_Act_used_by currency

Line 945: l_act_budgets_rec.approver_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);

941: l_act_budgets_rec.approved_amount := l_act_budgets_rec.request_amount; -- in arc_Act_used_by currency
942: l_act_budgets_rec.approved_in_currency := p_object_currency;
943: l_act_budgets_rec.approved_original_amount := l_parent_amount;
944: l_act_budgets_rec.approval_date := SYSDATE;
945: l_act_budgets_rec.approver_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);
946: l_act_budgets_rec.requester_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);
947: l_act_budgets_rec.justification :=
948: fnd_message.get_string ('OZF', 'OZF_FUND_RECONCILE');
949:

Line 946: l_act_budgets_rec.requester_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);

942: l_act_budgets_rec.approved_in_currency := p_object_currency;
943: l_act_budgets_rec.approved_original_amount := l_parent_amount;
944: l_act_budgets_rec.approval_date := SYSDATE;
945: l_act_budgets_rec.approver_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);
946: l_act_budgets_rec.requester_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);
947: l_act_budgets_rec.justification :=
948: fnd_message.get_string ('OZF', 'OZF_FUND_RECONCILE');
949:
950:

Line 973: ozf_utility_pvt.debug_message ( l_api_name || ': end');

969: CLOSE c_parent_source_obj;
970: END IF;
971:
972: IF G_DEBUG THEN
973: ozf_utility_pvt.debug_message ( l_api_name || ': end');
974: END IF;
975:
976: fnd_msg_pub.count_and_get (
977: p_count=> x_msg_count

Line 1191: ozf_utility_pvt.debug_message ( 'Private API: '

1187: -- Standard Start of API savepoint
1188: SAVEPOINT recal_comm_fund_conc;
1189: -- Debug Message
1190: IF G_DEBUG THEN
1191: ozf_utility_pvt.debug_message ( 'Private API: '
1192: || l_api_name
1193: || 'start');
1194: END IF;
1195:

Line 1200: ozf_utility_pvt.debug_message ( 'Recalculating flag: '|| l_recal_flag || ' l_parent_flag: ' || l_parent_flag ) ;

1196: -- get recalculating flag from profile
1197: l_recal_flag := NVL (fnd_profile.VALUE ('OZF_BUDGET_ADJ_ALLOW_RECAL'), 'N');
1198:
1199: IF G_DEBUG THEN
1200: ozf_utility_pvt.debug_message ( 'Recalculating flag: '|| l_recal_flag || ' l_parent_flag: ' || l_parent_flag ) ;
1201: END IF;
1202:
1203: IF l_recal_flag = 'Y' AND l_parent_flag = 'N' THEN
1204: OPEN l_offer_csr;

Line 1213: ozf_utility_pvt.debug_message ( 'l_listHeaderIdTbl count: '|| l_listHeaderIdTbl.COUNT ) ;

1209: l_endDateTbl,
1210: l_lastRecalDateTbl
1211: LIMIT g_bulk_limit;
1212: IF G_DEBUG THEN
1213: ozf_utility_pvt.debug_message ( 'l_listHeaderIdTbl count: '|| l_listHeaderIdTbl.COUNT ) ;
1214: END IF;
1215:
1216: FOR i IN NVL(l_listHeaderIdTbl.FIRST, 1) .. NVL(l_listHeaderIdTbl.LAST, 0) LOOP
1217:

Line 1265: ozf_utility_pvt.debug_message ( 'forecast count:' || l_count);

1261: END IF;
1262: END IF;
1263:
1264: IF G_DEBUG THEN
1265: ozf_utility_pvt.debug_message ( 'forecast count:' || l_count);
1266: ozf_utility_pvt.debug_message ( 'Start Period: '|| l_period_start_date);
1267: ozf_utility_pvt.debug_message ( 'End Period: ' || l_period_end_date);
1268: ozf_utility_pvt.debug_message ( 'Offer ID: ' || l_listHeaderIdTbl(i));
1269: END IF;

Line 1266: ozf_utility_pvt.debug_message ( 'Start Period: '|| l_period_start_date);

1262: END IF;
1263:
1264: IF G_DEBUG THEN
1265: ozf_utility_pvt.debug_message ( 'forecast count:' || l_count);
1266: ozf_utility_pvt.debug_message ( 'Start Period: '|| l_period_start_date);
1267: ozf_utility_pvt.debug_message ( 'End Period: ' || l_period_end_date);
1268: ozf_utility_pvt.debug_message ( 'Offer ID: ' || l_listHeaderIdTbl(i));
1269: END IF;
1270:

Line 1267: ozf_utility_pvt.debug_message ( 'End Period: ' || l_period_end_date);

1263:
1264: IF G_DEBUG THEN
1265: ozf_utility_pvt.debug_message ( 'forecast count:' || l_count);
1266: ozf_utility_pvt.debug_message ( 'Start Period: '|| l_period_start_date);
1267: ozf_utility_pvt.debug_message ( 'End Period: ' || l_period_end_date);
1268: ozf_utility_pvt.debug_message ( 'Offer ID: ' || l_listHeaderIdTbl(i));
1269: END IF;
1270:
1271: -- check end period is less than sysdate.

Line 1268: ozf_utility_pvt.debug_message ( 'Offer ID: ' || l_listHeaderIdTbl(i));

1264: IF G_DEBUG THEN
1265: ozf_utility_pvt.debug_message ( 'forecast count:' || l_count);
1266: ozf_utility_pvt.debug_message ( 'Start Period: '|| l_period_start_date);
1267: ozf_utility_pvt.debug_message ( 'End Period: ' || l_period_end_date);
1268: ozf_utility_pvt.debug_message ( 'Offer ID: ' || l_listHeaderIdTbl(i));
1269: END IF;
1270:
1271: -- check end period is less than sysdate.
1272: WHILE l_period_end_date >=l_period_start_date AND l_period_end_date < TRUNC(SYSDATE) AND

Line 1282: l_committed_amt :=ozf_utility_pvt.currround(l_committed_amt ,l_transCurrCodeTbl(i));

1278: -- budget amount multipled by forcast percent.
1279: IF l_last_flag = FALSE THEN
1280: IF l_forecast_tbl.COUNT > 0 THEN
1281: l_committed_amt := budget_rec.total_amt * l_forecast_tbl(l_count).forecast_value/100;
1282: l_committed_amt :=ozf_utility_pvt.currround(l_committed_amt ,l_transCurrCodeTbl(i));
1283: ELSE --for offer without forcast. committed amount in this period is equal to
1284: -- daily amount multipled by period days.
1285: l_committed_amt :=budget_rec.total_amt * ( (l_period_end_date - l_period_start_date + 1) / (TRUNC(l_endDateTbl(i)) - TRUNC(l_startDateTbl(i)) + 1) ) ;
1286: l_committed_amt :=ozf_utility_pvt.currround(l_committed_amt ,l_transCurrCodeTbl(i));

Line 1286: l_committed_amt :=ozf_utility_pvt.currround(l_committed_amt ,l_transCurrCodeTbl(i));

1282: l_committed_amt :=ozf_utility_pvt.currround(l_committed_amt ,l_transCurrCodeTbl(i));
1283: ELSE --for offer without forcast. committed amount in this period is equal to
1284: -- daily amount multipled by period days.
1285: l_committed_amt :=budget_rec.total_amt * ( (l_period_end_date - l_period_start_date + 1) / (TRUNC(l_endDateTbl(i)) - TRUNC(l_startDateTbl(i)) + 1) ) ;
1286: l_committed_amt :=ozf_utility_pvt.currround(l_committed_amt ,l_transCurrCodeTbl(i));
1287: END IF; -- end of l_forecast_tbl.COUNT > 0
1288:
1289: OPEN l_utilized_csr (
1290: l_listHeaderIdTbl(i)

Line 1310: l_remaining_amt :=ozf_utility_pvt.currround(l_remaining_amt ,l_transCurrCodeTbl(i));

1306: CLOSE l_last_util_csr;
1307: END IF;
1308:
1309: IF l_remaining_amt > 0 THEN
1310: l_remaining_amt :=ozf_utility_pvt.currround(l_remaining_amt ,l_transCurrCodeTbl(i));
1311: END IF;
1312:
1313: IF G_DEBUG THEN
1314: ozf_utility_pvt.debug_message ( 'budget_rec.total_amt: '|| budget_rec.total_amt);

Line 1314: ozf_utility_pvt.debug_message ( 'budget_rec.total_amt: '|| budget_rec.total_amt);

1310: l_remaining_amt :=ozf_utility_pvt.currround(l_remaining_amt ,l_transCurrCodeTbl(i));
1311: END IF;
1312:
1313: IF G_DEBUG THEN
1314: ozf_utility_pvt.debug_message ( 'budget_rec.total_amt: '|| budget_rec.total_amt);
1315: ozf_utility_pvt.debug_message ( 'offer_rec.transaction_currency_code: '|| l_transCurrCodeTbl(i));
1316: ozf_utility_pvt.debug_message ( 'committed amount: '|| l_committed_amt);
1317: ozf_utility_pvt.debug_message ( 'Utilized amount: '|| l_utilized_amt);
1318: ozf_utility_pvt.debug_message ( 'l_remaining_amt: '|| l_remaining_amt);

Line 1315: ozf_utility_pvt.debug_message ( 'offer_rec.transaction_currency_code: '|| l_transCurrCodeTbl(i));

1311: END IF;
1312:
1313: IF G_DEBUG THEN
1314: ozf_utility_pvt.debug_message ( 'budget_rec.total_amt: '|| budget_rec.total_amt);
1315: ozf_utility_pvt.debug_message ( 'offer_rec.transaction_currency_code: '|| l_transCurrCodeTbl(i));
1316: ozf_utility_pvt.debug_message ( 'committed amount: '|| l_committed_amt);
1317: ozf_utility_pvt.debug_message ( 'Utilized amount: '|| l_utilized_amt);
1318: ozf_utility_pvt.debug_message ( 'l_remaining_amt: '|| l_remaining_amt);
1319: END IF;

Line 1316: ozf_utility_pvt.debug_message ( 'committed amount: '|| l_committed_amt);

1312:
1313: IF G_DEBUG THEN
1314: ozf_utility_pvt.debug_message ( 'budget_rec.total_amt: '|| budget_rec.total_amt);
1315: ozf_utility_pvt.debug_message ( 'offer_rec.transaction_currency_code: '|| l_transCurrCodeTbl(i));
1316: ozf_utility_pvt.debug_message ( 'committed amount: '|| l_committed_amt);
1317: ozf_utility_pvt.debug_message ( 'Utilized amount: '|| l_utilized_amt);
1318: ozf_utility_pvt.debug_message ( 'l_remaining_amt: '|| l_remaining_amt);
1319: END IF;
1320: -- if committed budget is not equal to utilized budget, then go on with recalculating commitment.

Line 1317: ozf_utility_pvt.debug_message ( 'Utilized amount: '|| l_utilized_amt);

1313: IF G_DEBUG THEN
1314: ozf_utility_pvt.debug_message ( 'budget_rec.total_amt: '|| budget_rec.total_amt);
1315: ozf_utility_pvt.debug_message ( 'offer_rec.transaction_currency_code: '|| l_transCurrCodeTbl(i));
1316: ozf_utility_pvt.debug_message ( 'committed amount: '|| l_committed_amt);
1317: ozf_utility_pvt.debug_message ( 'Utilized amount: '|| l_utilized_amt);
1318: ozf_utility_pvt.debug_message ( 'l_remaining_amt: '|| l_remaining_amt);
1319: END IF;
1320: -- if committed budget is not equal to utilized budget, then go on with recalculating commitment.
1321: IF l_remaining_amt <> 0 THEN

Line 1318: ozf_utility_pvt.debug_message ( 'l_remaining_amt: '|| l_remaining_amt);

1314: ozf_utility_pvt.debug_message ( 'budget_rec.total_amt: '|| budget_rec.total_amt);
1315: ozf_utility_pvt.debug_message ( 'offer_rec.transaction_currency_code: '|| l_transCurrCodeTbl(i));
1316: ozf_utility_pvt.debug_message ( 'committed amount: '|| l_committed_amt);
1317: ozf_utility_pvt.debug_message ( 'Utilized amount: '|| l_utilized_amt);
1318: ozf_utility_pvt.debug_message ( 'l_remaining_amt: '|| l_remaining_amt);
1319: END IF;
1320: -- if committed budget is not equal to utilized budget, then go on with recalculating commitment.
1321: IF l_remaining_amt <> 0 THEN
1322: l_act_budgets_rec :=NULL;

Line 1349: ozf_utility_pvt.convert_currency (

1345: IF l_budget_currency_code = l_transCurrCodeTbl(i) THEN
1346: l_act_budgets_rec.approved_original_amount := l_act_budgets_rec.request_amount;
1347: ELSE
1348: -- call the currency conversion since request amount is in object currency.
1349: ozf_utility_pvt.convert_currency (
1350: x_return_status=> l_return_status
1351: ,p_from_currency=> l_transCurrCodeTbl(i)
1352: ,p_to_currency=> l_budget_currency_code
1353: ,p_from_amount=> l_act_budgets_rec.request_amount

Line 1385: ozf_utility_pvt.convert_currency (

1381: IF l_budget_currency_code = l_transCurrCodeTbl(i) THEN
1382: l_act_budgets_rec.request_amount := l_act_budgets_rec.approved_original_amount;
1383: ELSE
1384: -- call the currency conversion wrapper
1385: ozf_utility_pvt.convert_currency (
1386: x_return_status=> l_return_status
1387: ,p_from_currency=> l_transCurrCodeTbl(i) -- source curr
1388: ,p_to_currency=> l_budget_currency_code -- from budget curr
1389: ,p_from_amount=> l_act_budgets_rec.approved_original_amount -- in offer curr

Line 1407: ozf_utility_pvt.get_default_user_status (

1403: l_act_budgets_rec.status_code := 'APPROVED';
1404: l_act_budgets_rec.recal_flag := 'Y';
1405: l_act_budgets_rec.request_date := SYSDATE;
1406: l_act_budgets_rec.user_status_id :=
1407: ozf_utility_pvt.get_default_user_status (
1408: 'OZF_BUDGETSOURCE_STATUS'
1409: ,l_act_budgets_rec.status_code
1410: );
1411: IF G_DEBUG THEN

Line 1412: ozf_utility_pvt.debug_message ('Recalculated amount: '

1408: 'OZF_BUDGETSOURCE_STATUS'
1409: ,l_act_budgets_rec.status_code
1410: );
1411: IF G_DEBUG THEN
1412: ozf_utility_pvt.debug_message ('Recalculated amount: '
1413: || l_act_budgets_rec.request_amount
1414: );
1415: END IF;
1416: l_act_budgets_rec.approval_date := SYSDATE;

Line 1417: l_act_budgets_rec.approver_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);

1413: || l_act_budgets_rec.request_amount
1414: );
1415: END IF;
1416: l_act_budgets_rec.approval_date := SYSDATE;
1417: l_act_budgets_rec.approver_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);
1418: l_act_budgets_rec.requester_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);
1419: l_act_budgets_rec.justification :=
1420: fnd_message.get_string ('OZF', 'OZF_ACT_BUDGET_RECAL_COMM');
1421: IF G_DEBUG THEN

Line 1418: l_act_budgets_rec.requester_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);

1414: );
1415: END IF;
1416: l_act_budgets_rec.approval_date := SYSDATE;
1417: l_act_budgets_rec.approver_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);
1418: l_act_budgets_rec.requester_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);
1419: l_act_budgets_rec.justification :=
1420: fnd_message.get_string ('OZF', 'OZF_ACT_BUDGET_RECAL_COMM');
1421: IF G_DEBUG THEN
1422: ozf_utility_pvt.debug_message ('Allow exceed: '|| l_exceed_flag);

Line 1422: ozf_utility_pvt.debug_message ('Allow exceed: '|| l_exceed_flag);

1418: l_act_budgets_rec.requester_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);
1419: l_act_budgets_rec.justification :=
1420: fnd_message.get_string ('OZF', 'OZF_ACT_BUDGET_RECAL_COMM');
1421: IF G_DEBUG THEN
1422: ozf_utility_pvt.debug_message ('Allow exceed: '|| l_exceed_flag);
1423: END IF;
1424:
1425: -- check if it allows committed amount exceed total budget in budget currency.
1426: IF ( NVL (l_tot_recal_comm_amt, 0)

Line 1432: ozf_utility_pvt.debug_message ('Create act budget: ');

1428: )
1429: OR l_exceed_flag = 'Y' THEN
1430:
1431: IF G_DEBUG THEN
1432: ozf_utility_pvt.debug_message ('Create act budget: ');
1433: END IF;
1434:
1435: IF l_act_budgets_rec.request_amount > 0 THEN
1436: ozf_actbudgets_pvt.create_act_budgets (

Line 1492: ozf_utility_pvt.write_conc_log('ERROR: Could not perform recalculated committed for Offer: '|| l_listHeaderIdTbl(i));

1488: IF (l_commit) THEN -- commit separately for each offer in the loop.
1489: x_retcode := 0;
1490: COMMIT;
1491: ELSE
1492: ozf_utility_pvt.write_conc_log('ERROR: Could not perform recalculated committed for Offer: '|| l_listHeaderIdTbl(i));
1493: ROLLBACK TO offer_loop_savepoint; --rollback for the current offer if error occured.
1494: END IF;
1495:
1496: END;

Line 1506: ozf_utility_pvt.debug_message ( 'Private API: '

1502:
1503: END IF; -- End of if for allow recalculating profile.
1504:
1505: IF G_DEBUG THEN
1506: ozf_utility_pvt.debug_message ( 'Private API: '
1507: || l_api_name
1508: || ' end');
1509: END IF;
1510:

Line 1511: ozf_utility_pvt.write_conc_log(l_msg_data);

1507: || l_api_name
1508: || ' end');
1509: END IF;
1510:
1511: ozf_utility_pvt.write_conc_log(l_msg_data);
1512:
1513: EXCEPTION
1514: WHEN OTHERS THEN
1515: ROLLBACK TO recal_comm_fund_conc;

Line 1516: ozf_utility_pvt.write_conc_log (l_msg_data);

1512:
1513: EXCEPTION
1514: WHEN OTHERS THEN
1515: ROLLBACK TO recal_comm_fund_conc;
1516: ozf_utility_pvt.write_conc_log (l_msg_data);
1517: x_retcode := 1;
1518: x_errbuf := l_msg_data;
1519: END recal_comm_fund_conc;
1520: ---------------------------------------------------------------------

Line 1579: ozf_utility_pvt.debug_message (': begin ' || l_full_name);

1575:
1576: BEGIN
1577: SAVEPOINT post_utilized_budget_conc;
1578: IF G_DEBUG THEN
1579: ozf_utility_pvt.debug_message (': begin ' || l_full_name);
1580: END IF;
1581: -- x_return_status := fnd_api.g_ret_sts_success;
1582:
1583: /* IF fnd_api.to_boolean (p_init_msg_list) THEN

Line 1612: ozf_utility_pvt.debug_message ('Error out offer: ' || l_off_budget_rec.offer_id);

1608: COMMIT;
1609: x_retcode := 0;
1610: ELSE
1611: IF G_DEBUG THEN
1612: ozf_utility_pvt.debug_message ('Error out offer: ' || l_off_budget_rec.offer_id);
1613: END IF;
1614:
1615: ROLLBACK TO offer_budget;
1616: END IF;

Line 1625: ozf_utility_pvt.debug_message ( l_full_name || ': end');

1621: ,p_count=> x_msg_count
1622: ,p_data=> x_msg_data
1623: );
1624: IF G_DEBUG THEN
1625: ozf_utility_pvt.debug_message ( l_full_name || ': end');
1626: END IF;
1627: EXCEPTION
1628: WHEN fnd_api.g_exc_error THEN
1629: ROLLBACK TO Post_utilized_budget_conc;

Line 1659: ozf_utility_pvt.write_conc_log (l_msg_data);

1655: ,p_encoded=> fnd_api.g_false
1656: ); */
1657: -- COMMIT;
1658: -- x_retcode := 0;
1659: ozf_utility_pvt.write_conc_log (l_msg_data);
1660:
1661: EXCEPTION
1662: WHEN OTHERS THEN
1663: ROLLBACK TO post_utilized_budget_conc;

Line 1666: ozf_utility_pvt.write_conc_log (x_errbuf);

1662: WHEN OTHERS THEN
1663: ROLLBACK TO post_utilized_budget_conc;
1664: x_retcode := 1;
1665: x_errbuf := l_msg_data;
1666: ozf_utility_pvt.write_conc_log (x_errbuf);
1667:
1668: END post_utilized_budget_conc;
1669:
1670: ---------------------------------------------------------------------

Line 1746: ozf_utility_pvt.debug_message (': before parent source cursor ');

1742: BEGIN
1743: SAVEPOINT reconcile_budget_utilized;
1744: x_return_status := fnd_api.g_ret_sts_success;
1745: IF G_DEBUG THEN
1746: ozf_utility_pvt.debug_message (': before parent source cursor ');
1747: END IF;
1748:
1749: IF fnd_api.to_boolean (p_init_msg_list) THEN
1750: fnd_msg_pub.initialize;

Line 1765: ozf_utility_pvt.debug_message (': in loop ');

1761: EXIT WHEN c_parent_source_fund%NOTFOUND;
1762: EXIT WHEN l_parent_source_rec.parent_source_id IS NULL;
1763: l_act_budgets_rec :=NULL;
1764: IF G_DEBUG THEN
1765: ozf_utility_pvt.debug_message (': in loop ');
1766: END IF;
1767: l_act_budgets_rec.act_budget_used_by_id := p_budget_used_by_id;
1768: l_act_budgets_rec.arc_act_budget_used_by := p_budget_used_by_type;
1769: l_act_budgets_rec.budget_source_type := p_budget_used_by_type;

Line 1778: ozf_utility_pvt.get_default_user_status (

1774: l_act_budgets_rec.request_currency := l_parent_source_rec.plan_currency_code; --parent_curr;
1775: l_act_budgets_rec.request_date := SYSDATE;
1776: l_act_budgets_rec.status_code := 'APPROVED';
1777: l_act_budgets_rec.user_status_id :=
1778: ozf_utility_pvt.get_default_user_status (
1779: 'OZF_BUDGETSOURCE_STATUS'
1780: ,l_act_budgets_rec.status_code
1781: );
1782: l_act_budgets_rec.approved_amount := NVL (l_parent_source_rec.amount, 0); -- in arc_Act_used_by currency

Line 1786: ozf_utility_pvt.debug_message ('l_object_currency: '||l_object_currency);

1782: l_act_budgets_rec.approved_amount := NVL (l_parent_source_rec.amount, 0); -- in arc_Act_used_by currency
1783: l_act_budgets_rec.approved_in_currency := l_parent_source_rec.plan_currency_code; --p_object_currency;
1784:
1785: IF G_DEBUG THEN
1786: ozf_utility_pvt.debug_message ('l_object_currency: '||l_object_currency);
1787: END IF;
1788:
1789: IF l_object_currency <> l_parent_source_rec.plan_currency_code THEN
1790: l_object_currency := l_parent_source_rec.plan_currency_code;

Line 1794: ozf_utility_pvt.debug_message ('l_object_currency: '||l_object_currency);

1790: l_object_currency := l_parent_source_rec.plan_currency_code;
1791: END IF;
1792:
1793: IF G_DEBUG THEN
1794: ozf_utility_pvt.debug_message ('l_object_currency: '||l_object_currency);
1795: ozf_utility_pvt.debug_message ('fund_request_currency_code: '||l_parent_source_rec.fund_request_currency_code);
1796: ozf_utility_pvt.debug_message ('parent_curr '||l_parent_source_rec.parent_curr);
1797: ozf_utility_pvt.debug_message ('l_parent_source_rec.amount '|| l_parent_source_rec.amount);
1798: END IF;

Line 1795: ozf_utility_pvt.debug_message ('fund_request_currency_code: '||l_parent_source_rec.fund_request_currency_code);

1791: END IF;
1792:
1793: IF G_DEBUG THEN
1794: ozf_utility_pvt.debug_message ('l_object_currency: '||l_object_currency);
1795: ozf_utility_pvt.debug_message ('fund_request_currency_code: '||l_parent_source_rec.fund_request_currency_code);
1796: ozf_utility_pvt.debug_message ('parent_curr '||l_parent_source_rec.parent_curr);
1797: ozf_utility_pvt.debug_message ('l_parent_source_rec.amount '|| l_parent_source_rec.amount);
1798: END IF;
1799:

Line 1796: ozf_utility_pvt.debug_message ('parent_curr '||l_parent_source_rec.parent_curr);

1792:
1793: IF G_DEBUG THEN
1794: ozf_utility_pvt.debug_message ('l_object_currency: '||l_object_currency);
1795: ozf_utility_pvt.debug_message ('fund_request_currency_code: '||l_parent_source_rec.fund_request_currency_code);
1796: ozf_utility_pvt.debug_message ('parent_curr '||l_parent_source_rec.parent_curr);
1797: ozf_utility_pvt.debug_message ('l_parent_source_rec.amount '|| l_parent_source_rec.amount);
1798: END IF;
1799:
1800: IF l_parent_source_rec.parent_curr = l_object_currency THEN

Line 1797: ozf_utility_pvt.debug_message ('l_parent_source_rec.amount '|| l_parent_source_rec.amount);

1793: IF G_DEBUG THEN
1794: ozf_utility_pvt.debug_message ('l_object_currency: '||l_object_currency);
1795: ozf_utility_pvt.debug_message ('fund_request_currency_code: '||l_parent_source_rec.fund_request_currency_code);
1796: ozf_utility_pvt.debug_message ('parent_curr '||l_parent_source_rec.parent_curr);
1797: ozf_utility_pvt.debug_message ('l_parent_source_rec.amount '|| l_parent_source_rec.amount);
1798: END IF;
1799:
1800: IF l_parent_source_rec.parent_curr = l_object_currency THEN
1801: l_converted_amt := l_parent_source_rec.amount;

Line 1806: ozf_utility_pvt.convert_currency (

1802: ELSE
1803: --Added for bug 7030415, this is for returning unpaid amount to the budget, so
1804: --we need to pass the conv_type. here transfer_type='UTILIZED'
1805:
1806: ozf_utility_pvt.convert_currency (
1807: x_return_status=> l_return_status
1808: ,p_from_currency=> l_object_currency
1809: ,p_to_currency=> l_parent_source_rec.parent_curr
1810: ,p_conv_type=>l_parent_source_rec.exchange_rate_type --Added for bug 7030415

Line 1819: ozf_utility_pvt.debug_message ('l_converted_amt '|| l_converted_amt);

1815: );
1816: END IF;
1817:
1818: IF G_DEBUG THEN
1819: ozf_utility_pvt.debug_message ('l_converted_amt '|| l_converted_amt);
1820: END IF;
1821:
1822: IF l_return_status = fnd_api.g_ret_sts_error THEN
1823: RAISE fnd_api.g_exc_error;

Line 1828: l_act_budgets_rec.approver_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);

1824: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
1825: RAISE fnd_api.g_exc_unexpected_error;
1826: END IF;
1827: l_act_budgets_rec.approval_date := SYSDATE;
1828: l_act_budgets_rec.approver_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);
1829: l_act_budgets_rec.justification := fnd_message.get_string ('OZF', 'OZF_ACT_BUDG_CST_UTIL');
1830: l_act_budgets_rec.parent_source_id := l_parent_source_rec.parent_source_id;
1831: l_act_budgets_rec.parent_src_curr := l_parent_source_rec.parent_curr;
1832: l_act_budgets_rec.parent_src_apprvd_amt := - l_converted_amt; -- in budget currency.

Line 1879: ozf_utility_pvt.debug_message ( l_full_name || ': end');

1875: ,p_count=> x_msg_count
1876: ,p_data=> x_msg_data
1877: );
1878: IF G_DEBUG THEN
1879: ozf_utility_pvt.debug_message ( l_full_name || ': end');
1880: END IF;
1881:
1882: EXCEPTION
1883: WHEN fnd_api.g_exc_error THEN

Line 1952: ozf_utility_pvt.debug_message (': begin ' || l_full_name);

1948:
1949: BEGIN
1950: SAVEPOINT reconcile_line;
1951: IF G_DEBUG THEN
1952: ozf_utility_pvt.debug_message (': begin ' || l_full_name);
1953: END IF;
1954: x_return_status := fnd_api.g_ret_sts_success;
1955:
1956: IF fnd_api.to_boolean (p_init_msg_list) THEN

Line 2007: ozf_utility_pvt.debug_message ( l_full_name || ': end');

2003: ,p_data=> x_msg_data
2004: );
2005:
2006: IF G_DEBUG THEN
2007: ozf_utility_pvt.debug_message ( l_full_name || ': end');
2008: END IF;
2009: EXCEPTION
2010: WHEN fnd_api.g_exc_error THEN
2011: ROLLBACK TO reconcile_line;

Line 2073: ozf_utility_pvt.write_conc_log(l_full_name || ': start');

2069: 'baseQueryType','baseQueryType','1'), DECODE(PARAMETER_CONDITION,'CONS','LIKE',PARAMETER_CONDITION),PARAMETER_VALUE
2070: FROM JTF_PERZ_QUERY_PARAM WHERE QUERY_ID = l_query_id AND PARAMETER_TYPE = 'condition';
2071: BEGIN
2072: IF G_DEBUG THEN
2073: ozf_utility_pvt.write_conc_log(l_full_name || ': start');
2074: END IF;
2075: l_str_query := 'SELECT fund_id FROM ozf_fund_details_v, ams_act_access_denorm accd WHERE ';
2076:
2077: IF l_query_id IS NOT NULL THEN

Line 2120: l_resource_id := ozf_utility_pvt.get_resource_id(p_user_id => fnd_global.user_id);

2116: END IF;
2117: END LOOP;
2118: CLOSE c_query_parameters;
2119: END IF;
2120: l_resource_id := ozf_utility_pvt.get_resource_id(p_user_id => fnd_global.user_id);
2121: IF G_DEBUG THEN
2122: ozf_utility_pvt.write_conc_log(l_full_name || ': The resource Id ' || l_resource_id);
2123: END IF;
2124: l_str_query := l_str_query || 'fund_id = accd.object_id '|| ' AND ';

Line 2122: ozf_utility_pvt.write_conc_log(l_full_name || ': The resource Id ' || l_resource_id);

2118: CLOSE c_query_parameters;
2119: END IF;
2120: l_resource_id := ozf_utility_pvt.get_resource_id(p_user_id => fnd_global.user_id);
2121: IF G_DEBUG THEN
2122: ozf_utility_pvt.write_conc_log(l_full_name || ': The resource Id ' || l_resource_id);
2123: END IF;
2124: l_str_query := l_str_query || 'fund_id = accd.object_id '|| ' AND ';
2125: l_str_query := l_str_query || 'accd.object_Type= ''FUND'' ' || ' AND ';
2126: l_str_query := l_str_query || 'accd.edit_metrics_yn = ''Y'' ';

Line 2231: ozf_utility_pvt.write_conc_log(l_full_name || ': start');

2227: l_old_fund_obj c_get_old_fund_obj%ROWTYPE;
2228:
2229: BEGIN
2230: IF G_DEBUG THEN
2231: ozf_utility_pvt.write_conc_log(l_full_name || ': start');
2232: END IF;
2233: OPEN c_get_fund_details;
2234: -- LOOP
2235: FETCH c_get_fund_details into

Line 2250: ozf_utility_pvt.write_conc_log('l_profile_value: ' || l_profile_value);

2246: IF NVL(l_original_budget,0) > (NVL(l_committed_amt,0) - NVL(l_earned_amt,0)) OR
2247: l_profile_value = 'Y' THEN
2248:
2249: IF G_DEBUG THEN
2250: ozf_utility_pvt.write_conc_log('l_profile_value: ' || l_profile_value);
2251: END IF;
2252:
2253: OPEN c_get_old_fund_obj(l_prev_year_fund_id);
2254: LOOP

Line 2306: ozf_utility_pvt.get_default_user_status (

2302: l_act_budgets_rec.request_currency := l_old_fund_obj.fund_currency;
2303: l_act_budgets_rec.request_date := SYSDATE;
2304: l_act_budgets_rec.status_code := 'APPROVED';
2305: l_act_budgets_rec.user_status_id :=
2306: ozf_utility_pvt.get_default_user_status (
2307: 'OZF_BUDGETSOURCE_STATUS'
2308: ,l_act_budgets_rec.status_code
2309: );
2310:

Line 2316: ozf_utility_pvt.convert_currency (

2312: /* l_object_currency := ozf_actbudgets_pvt.get_object_currency(
2313: l_old_fund_obj.object_type
2314: ,l_old_fund_obj.object_id
2315: ,x_return_status);
2316: ozf_utility_pvt.convert_currency (
2317: x_return_status=> x_return_status
2318: ,p_from_currency=> p_fund_currency
2319: ,p_to_currency=> l_object_currency
2320: ,p_from_amount=> l_old_fund_obj.total_amount

Line 2334: l_act_budgets_rec.approver_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);

2330:
2331: l_act_budgets_rec.approved_in_currency := l_old_fund_obj.object_currency;
2332: l_act_budgets_rec.approved_original_amount := l_old_fund_obj.plan_curr_amount;
2333: l_act_budgets_rec.approval_date := SYSDATE;
2334: l_act_budgets_rec.approver_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);
2335: l_act_budgets_rec.requester_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);
2336: l_act_budgets_rec.justification := fnd_message.get_string ('OZF', 'OZF_FUND_RECONCILE');
2337:
2338: IF G_DEBUG THEN

Line 2335: l_act_budgets_rec.requester_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);

2331: l_act_budgets_rec.approved_in_currency := l_old_fund_obj.object_currency;
2332: l_act_budgets_rec.approved_original_amount := l_old_fund_obj.plan_curr_amount;
2333: l_act_budgets_rec.approval_date := SYSDATE;
2334: l_act_budgets_rec.approver_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);
2335: l_act_budgets_rec.requester_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);
2336: l_act_budgets_rec.justification := fnd_message.get_string ('OZF', 'OZF_FUND_RECONCILE');
2337:
2338: IF G_DEBUG THEN
2339: ozf_utility_pvt.write_conc_log('Create transfer record for original budget: ' || l_old_fund_obj.amount);

Line 2339: ozf_utility_pvt.write_conc_log('Create transfer record for original budget: ' || l_old_fund_obj.amount);

2335: l_act_budgets_rec.requester_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);
2336: l_act_budgets_rec.justification := fnd_message.get_string ('OZF', 'OZF_FUND_RECONCILE');
2337:
2338: IF G_DEBUG THEN
2339: ozf_utility_pvt.write_conc_log('Create transfer record for original budget: ' || l_old_fund_obj.amount);
2340: END IF;
2341:
2342: ozf_actbudgets_pvt.create_act_budgets (
2343: p_api_version=> l_api_version

Line 2358: ozf_utility_pvt.write_conc_log(l_full_name || ' New entries created for unutilized committed amount for old budget, fund_id '

2354: RAISE fnd_api.g_exc_unexpected_error;
2355: END IF;
2356:
2357: IF G_DEBUG THEN
2358: ozf_utility_pvt.write_conc_log(l_full_name || ' New entries created for unutilized committed amount for old budget, fund_id '
2359: || l_prev_year_fund_id );
2360: END IF;
2361:
2362: ozf_utility_pvt.write_conc_log(l_full_name || ' l_old_fund_obj.object_id ' || l_old_fund_obj.object_id);

Line 2362: ozf_utility_pvt.write_conc_log(l_full_name || ' l_old_fund_obj.object_id ' || l_old_fund_obj.object_id);

2358: ozf_utility_pvt.write_conc_log(l_full_name || ' New entries created for unutilized committed amount for old budget, fund_id '
2359: || l_prev_year_fund_id );
2360: END IF;
2361:
2362: ozf_utility_pvt.write_conc_log(l_full_name || ' l_old_fund_obj.object_id ' || l_old_fund_obj.object_id);
2363:
2364: -- creation of new budget request for new budgets
2365: l_act_budgets_rec.act_budget_used_by_id := l_old_fund_obj.object_id;
2366: l_act_budgets_rec.arc_act_budget_used_by := l_old_fund_obj.object_type;

Line 2384: ozf_utility_pvt.write_conc_log( 'Create budget request for new budget: ' || l_old_fund_obj.plan_curr_amount);

2380: -- This would create the objects for new budgets also which
2381: -- were associated with the old budget ...
2382:
2383: IF G_DEBUG THEN
2384: ozf_utility_pvt.write_conc_log( 'Create budget request for new budget: ' || l_old_fund_obj.plan_curr_amount);
2385: END IF;
2386:
2387: ozf_actbudgets_pvt.create_act_budgets(
2388: p_api_version=> l_api_version

Line 2399: ozf_utility_pvt.write_conc_log( 'l_return_status for create_act_budgets: ' || l_return_status);

2395: ,p_approval_flag=> fnd_api.g_true
2396: );
2397:
2398: IF G_DEBUG THEN
2399: ozf_utility_pvt.write_conc_log( 'l_return_status for create_act_budgets: ' || l_return_status);
2400: END IF;
2401:
2402: IF l_return_status = fnd_api.g_ret_sts_error THEN
2403: RAISE fnd_api.g_exc_error;

Line 2409: ozf_utility_pvt.write_conc_log(l_full_name || ' New entries created for new budgets and unutilized committed amount is transferred '

2405: RAISE fnd_api.g_exc_unexpected_error;
2406: END IF;
2407:
2408: IF G_DEBUG THEN
2409: ozf_utility_pvt.write_conc_log(l_full_name || ' New entries created for new budgets and unutilized committed amount is transferred '
2410: || ' for the new budget ' || l_fund_id);
2411: ozf_utility_pvt.write_conc_log(l_full_name || ' The new object created with id ' || l_old_fund_obj.object_id
2412: || ' and of type ' || l_old_fund_obj.object_type);
2413: END IF;

Line 2411: ozf_utility_pvt.write_conc_log(l_full_name || ' The new object created with id ' || l_old_fund_obj.object_id

2407:
2408: IF G_DEBUG THEN
2409: ozf_utility_pvt.write_conc_log(l_full_name || ' New entries created for new budgets and unutilized committed amount is transferred '
2410: || ' for the new budget ' || l_fund_id);
2411: ozf_utility_pvt.write_conc_log(l_full_name || ' The new object created with id ' || l_old_fund_obj.object_id
2412: || ' and of type ' || l_old_fund_obj.object_type);
2413: END IF;
2414:
2415: END IF; --- NVL (l_old_fund_obj.total_amount, 0) > 0

Line 2423: ozf_utility_pvt.write_conc_log(l_message || l_fund_id);

2419:
2420: CLOSE c_get_old_fund_obj;
2421: ELSE
2422: l_message := fnd_message.get_string ('OZF', 'OZF_FUND_NO_MASS_TRANS') || fnd_global.local_chr(10);
2423: ozf_utility_pvt.write_conc_log(l_message || l_fund_id);
2424: END IF; -- The main IF loop
2425:
2426: x_return_status := fnd_api.g_ret_sts_success;
2427:

Line 2505: ozf_utility_pvt.write_conc_log(l_full_name || ': start');

2501:
2502: SAVEPOINT create_new_funds;
2503:
2504: IF G_DEBUG THEN
2505: ozf_utility_pvt.write_conc_log(l_full_name || ': start');
2506: END IF;
2507:
2508: IF fnd_api.to_boolean(p_init_msg_list) THEN
2509: fnd_msg_pub.initialize;

Line 2524: l_fund_rec_type.user_status_id := OZF_Utility_PVT.get_default_user_status

2520: l_fund_rec_type.original_budget := l_fund_rec.original_budget;
2521: l_fund_rec_type.prev_fund_id := l_fund_rec.fund_id;
2522: l_fund_rec_type.category_id := l_fund_rec.category_id;
2523: l_fund_rec_type.fund_type := l_fund_rec.fund_type;
2524: l_fund_rec_type.user_status_id := OZF_Utility_PVT.get_default_user_status
2525: (l_user_status_type,l_user_status_code);
2526: l_fund_rec_type.owner := l_fund_rec.owner;
2527: l_fund_rec_type.custom_setup_id := l_fund_rec.custom_setup_id;
2528: l_start_date_active := l_fund_rec.start_date_active;

Line 2547: ozf_utility_pvt.write_conc_log('l_fund_rec_type.parent_fund_id: ' || l_fund_rec_type.parent_fund_id);

2543: l_fund_rec_type.threshold_id := l_fund_rec.threshold_id;
2544:
2545:
2546: IF G_DEBUG THEN
2547: ozf_utility_pvt.write_conc_log('l_fund_rec_type.parent_fund_id: ' || l_fund_rec_type.parent_fund_id);
2548: ozf_utility_pvt.write_conc_log('l_fund_rec_type.prev_fund_id: ' || l_fund_rec_type.prev_fund_id);
2549: ozf_utility_pvt.write_conc_log('l_fund_rec_type.start_date_active: ' || l_fund_rec_type.start_date_active);
2550: ozf_utility_pvt.write_conc_log('l_fund_rec_type.end_date_active: ' || l_fund_rec_type.end_date_active);
2551: ozf_utility_pvt.write_conc_log('l_fund_rec_type.ledger_id: ' || l_fund_rec_type.ledger_id);

Line 2548: ozf_utility_pvt.write_conc_log('l_fund_rec_type.prev_fund_id: ' || l_fund_rec_type.prev_fund_id);

2544:
2545:
2546: IF G_DEBUG THEN
2547: ozf_utility_pvt.write_conc_log('l_fund_rec_type.parent_fund_id: ' || l_fund_rec_type.parent_fund_id);
2548: ozf_utility_pvt.write_conc_log('l_fund_rec_type.prev_fund_id: ' || l_fund_rec_type.prev_fund_id);
2549: ozf_utility_pvt.write_conc_log('l_fund_rec_type.start_date_active: ' || l_fund_rec_type.start_date_active);
2550: ozf_utility_pvt.write_conc_log('l_fund_rec_type.end_date_active: ' || l_fund_rec_type.end_date_active);
2551: ozf_utility_pvt.write_conc_log('l_fund_rec_type.ledger_id: ' || l_fund_rec_type.ledger_id);
2552: END IF;

Line 2549: ozf_utility_pvt.write_conc_log('l_fund_rec_type.start_date_active: ' || l_fund_rec_type.start_date_active);

2545:
2546: IF G_DEBUG THEN
2547: ozf_utility_pvt.write_conc_log('l_fund_rec_type.parent_fund_id: ' || l_fund_rec_type.parent_fund_id);
2548: ozf_utility_pvt.write_conc_log('l_fund_rec_type.prev_fund_id: ' || l_fund_rec_type.prev_fund_id);
2549: ozf_utility_pvt.write_conc_log('l_fund_rec_type.start_date_active: ' || l_fund_rec_type.start_date_active);
2550: ozf_utility_pvt.write_conc_log('l_fund_rec_type.end_date_active: ' || l_fund_rec_type.end_date_active);
2551: ozf_utility_pvt.write_conc_log('l_fund_rec_type.ledger_id: ' || l_fund_rec_type.ledger_id);
2552: END IF;
2553:

Line 2550: ozf_utility_pvt.write_conc_log('l_fund_rec_type.end_date_active: ' || l_fund_rec_type.end_date_active);

2546: IF G_DEBUG THEN
2547: ozf_utility_pvt.write_conc_log('l_fund_rec_type.parent_fund_id: ' || l_fund_rec_type.parent_fund_id);
2548: ozf_utility_pvt.write_conc_log('l_fund_rec_type.prev_fund_id: ' || l_fund_rec_type.prev_fund_id);
2549: ozf_utility_pvt.write_conc_log('l_fund_rec_type.start_date_active: ' || l_fund_rec_type.start_date_active);
2550: ozf_utility_pvt.write_conc_log('l_fund_rec_type.end_date_active: ' || l_fund_rec_type.end_date_active);
2551: ozf_utility_pvt.write_conc_log('l_fund_rec_type.ledger_id: ' || l_fund_rec_type.ledger_id);
2552: END IF;
2553:
2554: OZF_funds_pvt.create_fund(p_api_version => 1.0

Line 2551: ozf_utility_pvt.write_conc_log('l_fund_rec_type.ledger_id: ' || l_fund_rec_type.ledger_id);

2547: ozf_utility_pvt.write_conc_log('l_fund_rec_type.parent_fund_id: ' || l_fund_rec_type.parent_fund_id);
2548: ozf_utility_pvt.write_conc_log('l_fund_rec_type.prev_fund_id: ' || l_fund_rec_type.prev_fund_id);
2549: ozf_utility_pvt.write_conc_log('l_fund_rec_type.start_date_active: ' || l_fund_rec_type.start_date_active);
2550: ozf_utility_pvt.write_conc_log('l_fund_rec_type.end_date_active: ' || l_fund_rec_type.end_date_active);
2551: ozf_utility_pvt.write_conc_log('l_fund_rec_type.ledger_id: ' || l_fund_rec_type.ledger_id);
2552: END IF;
2553:
2554: OZF_funds_pvt.create_fund(p_api_version => 1.0
2555: ,p_init_msg_list => fnd_api.g_false

Line 2572: ozf_utility_pvt.write_conc_log('The new Fund Id created is ' || l_fund_id);

2568: RETURN;
2569: END IF;
2570:
2571: IF G_DEBUG THEN
2572: ozf_utility_pvt.write_conc_log('The new Fund Id created is ' || l_fund_id);
2573: END IF;
2574:
2575: l_errcode := NULL;
2576: l_errnum := 0;

Line 2613: ozf_utility_pvt.debug_message(l_full_name || ': end');

2609:
2610: x_new_fund_id := l_fund_id;
2611:
2612: IF G_DEBUG THEN
2613: ozf_utility_pvt.debug_message(l_full_name || ': end');
2614: END IF;
2615:
2616: END create_new_funds;
2617:

Line 2681: ozf_utility_pvt.write_conc_log(l_full_name || ' Getting the newly Created Budgets ');

2677: LOOP
2678: SAVEPOINT new_budget;
2679:
2680: IF G_DEBUG THEN
2681: ozf_utility_pvt.write_conc_log(l_full_name || ' Getting the newly Created Budgets ');
2682: END IF;
2683:
2684: FETCH c_get_new_funds INTO l_new_fund_rec;
2685:

Line 2695: ozf_utility_pvt.write_conc_log(l_full_name || ' The fund_id of newly created budget is ' || l_new_fund_rec.fund_id);

2691: FETCH c_prec_fund into l_end_date,l_object_version;
2692: CLOSE c_prec_fund;
2693:
2694: IF G_DEBUG THEN
2695: ozf_utility_pvt.write_conc_log(l_full_name || ' The fund_id of newly created budget is ' || l_new_fund_rec.fund_id);
2696: ozf_utility_pvt.write_conc_log(l_full_name || ' status code ' || l_new_fund_rec.status_code);
2697: END IF;
2698:
2699: IF l_end_date < TRUNC(SYSDATE) THEN

Line 2696: ozf_utility_pvt.write_conc_log(l_full_name || ' status code ' || l_new_fund_rec.status_code);

2692: CLOSE c_prec_fund;
2693:
2694: IF G_DEBUG THEN
2695: ozf_utility_pvt.write_conc_log(l_full_name || ' The fund_id of newly created budget is ' || l_new_fund_rec.fund_id);
2696: ozf_utility_pvt.write_conc_log(l_full_name || ' status code ' || l_new_fund_rec.status_code);
2697: END IF;
2698:
2699: IF l_end_date < TRUNC(SYSDATE) THEN
2700:

Line 2704: l_new_fund_rec_type.user_status_id := OZF_Utility_PVT.get_default_user_status

2700:
2701: -- activate budget if status is still in DRAFT and the end date for the previous budget passed sysdate.
2702: IF l_new_fund_rec.status_code = 'DRAFT' THEN
2703: l_new_fund_rec_type.fund_id := l_new_fund_rec.fund_id;
2704: l_new_fund_rec_type.user_status_id := OZF_Utility_PVT.get_default_user_status
2705: (l_new_user_status_type,l_new_user_status_code);
2706: l_new_fund_rec_type.original_budget := 0;
2707: l_new_fund_rec_type.status_code := 'ACTIVE';
2708: l_new_fund_rec_type.fund_usage := 'MTRAN';

Line 2713: ozf_utility_pvt.write_conc_log(l_full_name || ' update draft budget to active. ' || l_new_fund_rec_type.fund_id);

2709: l_new_fund_rec_type.object_version_number := l_new_fund_rec.object_version_number;
2710: l_new_fund_rec_type.prev_fund_id := l_new_fund_rec.prev_fund_id;
2711:
2712: IF G_DEBUG THEN
2713: ozf_utility_pvt.write_conc_log(l_full_name || ' update draft budget to active. ' || l_new_fund_rec_type.fund_id);
2714: END IF;
2715:
2716: OZF_funds_pvt.update_fund(p_api_version => 1.0
2717: ,p_init_msg_list => FND_API.G_FALSE

Line 2732: ozf_utility_pvt.write_conc_log(l_full_name || 'Status Updated for the fund ' || l_new_fund_rec.fund_id || ' without notifying workflow');

2728: GOTO end_loop;
2729: END IF;
2730:
2731: IF G_DEBUG THEN
2732: ozf_utility_pvt.write_conc_log(l_full_name || 'Status Updated for the fund ' || l_new_fund_rec.fund_id || ' without notifying workflow');
2733: END IF;
2734:
2735: END IF; --end of l_new_fund_rec.status_code = 'DRAFT'
2736:

Line 2738: ozf_utility_pvt.write_conc_log(l_full_name || ' Just Before invoking the transfer fund API ');

2734:
2735: END IF; --end of l_new_fund_rec.status_code = 'DRAFT'
2736:
2737: IF G_DEBUG THEN
2738: ozf_utility_pvt.write_conc_log(l_full_name || ' Just Before invoking the transfer fund API ');
2739: END IF;
2740:
2741: -- transfer untilized amount from precious budget to new budget when new budget is ACTIVE
2742: -- and and the end date for the previous budget passed sysdate.

Line 2760: ozf_utility_pvt.write_conc_log(' Transferring failed for the fund : '|| l_new_fund_rec.fund_id);

2756: ,p_fund_currency =>l_new_fund_rec.currency_code_tc
2757: );
2758:
2759: IF NOT (l_return_status = fnd_api.g_ret_sts_success) THEN
2760: ozf_utility_pvt.write_conc_log(' Transferring failed for the fund : '|| l_new_fund_rec.fund_id);
2761: ozf_utility_pvt.write_conc_log(l_msg_data);
2762: GOTO end_loop;
2763: END IF;
2764:

Line 2761: ozf_utility_pvt.write_conc_log(l_msg_data);

2757: );
2758:
2759: IF NOT (l_return_status = fnd_api.g_ret_sts_success) THEN
2760: ozf_utility_pvt.write_conc_log(' Transferring failed for the fund : '|| l_new_fund_rec.fund_id);
2761: ozf_utility_pvt.write_conc_log(l_msg_data);
2762: GOTO end_loop;
2763: END IF;
2764:
2765: IF G_DEBUG THEN

Line 2766: ozf_utility_pvt.write_conc_log(l_full_name || ' Transferring done for the fund ' || l_new_fund_rec.fund_id);

2762: GOTO end_loop;
2763: END IF;
2764:
2765: IF G_DEBUG THEN
2766: ozf_utility_pvt.write_conc_log(l_full_name || ' Transferring done for the fund ' || l_new_fund_rec.fund_id);
2767: END IF;
2768:
2769: END IF; -- l_new_fund_rec.original_budget <> 0.
2770:

Line 2777: ozf_utility_pvt.write_conc_log(l_full_name || ' l_object_version is ' || l_object_version);

2773: FETCH c_prec_fund into l_end_date,l_object_version;
2774: CLOSE c_prec_fund;
2775:
2776: IF G_DEBUG THEN
2777: ozf_utility_pvt.write_conc_log(l_full_name || ' l_object_version is ' || l_object_version);
2778: END IF;
2779:
2780: -- set transfered_flag for new budget to 'Y'.
2781: l_fund_rec.fund_id := l_new_fund_rec.fund_id;

Line 2801: ozf_utility_pvt.write_conc_log(l_full_name || ' The transferred flag set to Yes ');

2797: GOTO end_loop;
2798: END IF;
2799:
2800: IF G_DEBUG THEN
2801: ozf_utility_pvt.write_conc_log(l_full_name || ' The transferred flag set to Yes ');
2802: END IF;
2803:
2804: END IF; -- end of l_end_date.
2805:

Line 2822: ozf_utility_pvt.debug_message(l_full_name || ': end');

2818: ,p_count => x_msg_count
2819: ,p_data => x_msg_data);
2820:
2821: IF G_DEBUG THEN
2822: ozf_utility_pvt.debug_message(l_full_name || ': end');
2823: END IF;
2824:
2825: EXCEPTION
2826: WHEN fnd_api.g_exc_error THEN

Line 2944: ozf_utility_pvt.write_conc_log(l_full_name || ': start');

2940:
2941: BEGIN
2942:
2943: IF G_DEBUG THEN
2944: ozf_utility_pvt.write_conc_log(l_full_name || ': start');
2945: ozf_utility_pvt.write_conc_log(l_full_name || ': fund_id passed ' || l_fund_id);
2946: ozf_utility_pvt.write_conc_log(l_full_name || ': query_id passed ' || p_query_id);
2947: ozf_utility_pvt.write_conc_log(l_full_name || ': hierarchy_flag passed ' || p_hierarchy_flag);
2948: ozf_utility_pvt.write_conc_log(l_full_name || ': amount_flag passed ' || p_amount_flag);

Line 2945: ozf_utility_pvt.write_conc_log(l_full_name || ': fund_id passed ' || l_fund_id);

2941: BEGIN
2942:
2943: IF G_DEBUG THEN
2944: ozf_utility_pvt.write_conc_log(l_full_name || ': start');
2945: ozf_utility_pvt.write_conc_log(l_full_name || ': fund_id passed ' || l_fund_id);
2946: ozf_utility_pvt.write_conc_log(l_full_name || ': query_id passed ' || p_query_id);
2947: ozf_utility_pvt.write_conc_log(l_full_name || ': hierarchy_flag passed ' || p_hierarchy_flag);
2948: ozf_utility_pvt.write_conc_log(l_full_name || ': amount_flag passed ' || p_amount_flag);
2949: END IF;

Line 2946: ozf_utility_pvt.write_conc_log(l_full_name || ': query_id passed ' || p_query_id);

2942:
2943: IF G_DEBUG THEN
2944: ozf_utility_pvt.write_conc_log(l_full_name || ': start');
2945: ozf_utility_pvt.write_conc_log(l_full_name || ': fund_id passed ' || l_fund_id);
2946: ozf_utility_pvt.write_conc_log(l_full_name || ': query_id passed ' || p_query_id);
2947: ozf_utility_pvt.write_conc_log(l_full_name || ': hierarchy_flag passed ' || p_hierarchy_flag);
2948: ozf_utility_pvt.write_conc_log(l_full_name || ': amount_flag passed ' || p_amount_flag);
2949: END IF;
2950:

Line 2947: ozf_utility_pvt.write_conc_log(l_full_name || ': hierarchy_flag passed ' || p_hierarchy_flag);

2943: IF G_DEBUG THEN
2944: ozf_utility_pvt.write_conc_log(l_full_name || ': start');
2945: ozf_utility_pvt.write_conc_log(l_full_name || ': fund_id passed ' || l_fund_id);
2946: ozf_utility_pvt.write_conc_log(l_full_name || ': query_id passed ' || p_query_id);
2947: ozf_utility_pvt.write_conc_log(l_full_name || ': hierarchy_flag passed ' || p_hierarchy_flag);
2948: ozf_utility_pvt.write_conc_log(l_full_name || ': amount_flag passed ' || p_amount_flag);
2949: END IF;
2950:
2951: -- only create new budget in following case, otherwise this concurrent program only update and transfer unutilized for

Line 2948: ozf_utility_pvt.write_conc_log(l_full_name || ': amount_flag passed ' || p_amount_flag);

2944: ozf_utility_pvt.write_conc_log(l_full_name || ': start');
2945: ozf_utility_pvt.write_conc_log(l_full_name || ': fund_id passed ' || l_fund_id);
2946: ozf_utility_pvt.write_conc_log(l_full_name || ': query_id passed ' || p_query_id);
2947: ozf_utility_pvt.write_conc_log(l_full_name || ': hierarchy_flag passed ' || p_hierarchy_flag);
2948: ozf_utility_pvt.write_conc_log(l_full_name || ': amount_flag passed ' || p_amount_flag);
2949: END IF;
2950:
2951: -- only create new budget in following case, otherwise this concurrent program only update and transfer unutilized for
2952: -- budgets created through mass transfer.

Line 2981: ozf_utility_pvt.write_conc_log(l_full_name || ' The Final SQL Formed: ' || l_sql);

2977: OPEN c_get_fund_id FOR l_sql;
2978: END IF;
2979:
2980: IF G_DEBUG THEN
2981: ozf_utility_pvt.write_conc_log(l_full_name || ' The Final SQL Formed: ' || l_sql);
2982: END IF;
2983:
2984: -- Here getting the fund_id returned by the personalized Query
2985: LOOP

Line 3004: ozf_utility_pvt.write_conc_log(l_full_name || ' fund id: ' || l_root_fund_id);

3000: FETCH c_get_fund_details into l_fund_rec;
3001: CLOSE c_get_fund_details;
3002:
3003: IF G_DEBUG THEN
3004: ozf_utility_pvt.write_conc_log(l_full_name || ' fund id: ' || l_root_fund_id);
3005: END IF;
3006:
3007: IF l_fund_rec.fund_id is NOT NULL THEN
3008:

Line 3010: ozf_utility_pvt.write_conc_log(l_full_name || ' inside loop for creating new fund for fund id: ' || l_fund_rec.fund_id);

3006:
3007: IF l_fund_rec.fund_id is NOT NULL THEN
3008:
3009: IF G_DEBUG THEN
3010: ozf_utility_pvt.write_conc_log(l_full_name || ' inside loop for creating new fund for fund id: ' || l_fund_rec.fund_id);
3011: END IF;
3012:
3013: l_fund_rec.status_code := 'DRAFT';
3014: -- If the flag is false set amount to 0 else take the default one ....

Line 3031: ozf_utility_pvt.write_conc_log('Error in creating new fund for fund id ' || l_root_fund_id);

3027:
3028: IF l_par_fund_id IS NOT NULL THEN
3029: l_fund_rec.parent_fund_id := l_par_fund_id;
3030: ELSE
3031: ozf_utility_pvt.write_conc_log('Error in creating new fund for fund id ' || l_root_fund_id);
3032: ozf_utility_pvt.write_conc_log('----Next period budget doesn''t exist for parent fund id ' || l_fund_rec.parent_fund_id);
3033: l_return_status := fnd_api.g_ret_sts_error;
3034: GOTO end_loop;
3035: END IF;

Line 3032: ozf_utility_pvt.write_conc_log('----Next period budget doesn''t exist for parent fund id ' || l_fund_rec.parent_fund_id);

3028: IF l_par_fund_id IS NOT NULL THEN
3029: l_fund_rec.parent_fund_id := l_par_fund_id;
3030: ELSE
3031: ozf_utility_pvt.write_conc_log('Error in creating new fund for fund id ' || l_root_fund_id);
3032: ozf_utility_pvt.write_conc_log('----Next period budget doesn''t exist for parent fund id ' || l_fund_rec.parent_fund_id);
3033: l_return_status := fnd_api.g_ret_sts_error;
3034: GOTO end_loop;
3035: END IF;
3036: END IF;

Line 3051: ozf_utility_pvt.write_conc_log('Error in creating new fund for fund id ' || l_root_fund_id);

3047: ,x_new_fund_id => l_new_fund_id
3048: );
3049:
3050: IF NOT (l_return_status = fnd_api.g_ret_sts_success) THEN
3051: ozf_utility_pvt.write_conc_log('Error in creating new fund for fund id ' || l_root_fund_id);
3052: GOTO end_loop;
3053: END IF;
3054:
3055: ozf_utility_pvt.write_conc_log('New fund created for budget ' || l_root_fund_id || ' with fund_id ' || l_new_fund_id);

Line 3055: ozf_utility_pvt.write_conc_log('New fund created for budget ' || l_root_fund_id || ' with fund_id ' || l_new_fund_id);

3051: ozf_utility_pvt.write_conc_log('Error in creating new fund for fund id ' || l_root_fund_id);
3052: GOTO end_loop;
3053: END IF;
3054:
3055: ozf_utility_pvt.write_conc_log('New fund created for budget ' || l_root_fund_id || ' with fund_id ' || l_new_fund_id);
3056:
3057: END IF; -- end of l_fund_rec.fund_id is NOT NULL.
3058:
3059: IF l_hierarchy_flag = 'Y' THEN

Line 3067: ozf_utility_pvt.write_conc_log(l_full_name || ' child budget fund id: ' || l_child_fund_id);

3063: FETCH c_get_hierarchy_budgets INTO l_child_fund_id, l_parent_fund_id;
3064: EXIT WHEN c_get_hierarchy_budgets%NOTFOUND;
3065:
3066: IF G_DEBUG THEN
3067: ozf_utility_pvt.write_conc_log(l_full_name || ' child budget fund id: ' || l_child_fund_id);
3068: END IF;
3069:
3070: l_child_fund_rec := NULL;
3071:

Line 3086: ozf_utility_pvt.write_conc_log('Error in creating new fund for fund id ' || l_child_fund_id);

3082: FETCH c_get_parent_budget into l_child_fund_rec.parent_fund_id;
3083: CLOSE c_get_parent_budget;
3084:
3085: IF l_child_fund_rec.parent_fund_id IS NULL THEN
3086: ozf_utility_pvt.write_conc_log('Error in creating new fund for fund id ' || l_child_fund_id);
3087: ozf_utility_pvt.write_conc_log('----Next period budget doesn''t exist for parent fund id ' || l_parent_fund_id);
3088: l_return_status := fnd_api.g_ret_sts_error;
3089: GOTO end_loop;
3090: END IF;

Line 3087: ozf_utility_pvt.write_conc_log('----Next period budget doesn''t exist for parent fund id ' || l_parent_fund_id);

3083: CLOSE c_get_parent_budget;
3084:
3085: IF l_child_fund_rec.parent_fund_id IS NULL THEN
3086: ozf_utility_pvt.write_conc_log('Error in creating new fund for fund id ' || l_child_fund_id);
3087: ozf_utility_pvt.write_conc_log('----Next period budget doesn''t exist for parent fund id ' || l_parent_fund_id);
3088: l_return_status := fnd_api.g_ret_sts_error;
3089: GOTO end_loop;
3090: END IF;
3091:

Line 3098: ozf_utility_pvt.write_conc_log(l_full_name || ' parent_fund_id: ' || l_child_fund_rec.parent_fund_id);

3094: l_child_fund_rec.original_budget := 0;
3095: END IF;
3096:
3097: IF G_DEBUG THEN
3098: ozf_utility_pvt.write_conc_log(l_full_name || ' parent_fund_id: ' || l_child_fund_rec.parent_fund_id);
3099: END IF;
3100:
3101: -- create fund corresonding to this child budget
3102: create_new_funds(p_api_version => 1.0

Line 3114: ozf_utility_pvt.write_conc_log('Error in creating new fund for fund id ' || l_child_fund_id);

3110: ,x_new_fund_id => l_new_fund_id
3111: );
3112:
3113: IF NOT (l_return_status = fnd_api.g_ret_sts_success) THEN
3114: ozf_utility_pvt.write_conc_log('Error in creating new fund for fund id ' || l_child_fund_id);
3115: GOTO end_loop;
3116: END IF;
3117:
3118: ozf_utility_pvt.write_conc_log('New fund created for child budget ' || l_child_fund_id ||' with fund id ' || l_new_fund_id);

Line 3118: ozf_utility_pvt.write_conc_log('New fund created for child budget ' || l_child_fund_id ||' with fund id ' || l_new_fund_id);

3114: ozf_utility_pvt.write_conc_log('Error in creating new fund for fund id ' || l_child_fund_id);
3115: GOTO end_loop;
3116: END IF;
3117:
3118: ozf_utility_pvt.write_conc_log('New fund created for child budget ' || l_child_fund_id ||' with fund id ' || l_new_fund_id);
3119:
3120: ELSE
3121: IF G_DEBUG THEN
3122: ozf_utility_pvt.write_conc_log(l_full_name || ' this budget already has a next period budget');

Line 3122: ozf_utility_pvt.write_conc_log(l_full_name || ' this budget already has a next period budget');

3118: ozf_utility_pvt.write_conc_log('New fund created for child budget ' || l_child_fund_id ||' with fund id ' || l_new_fund_id);
3119:
3120: ELSE
3121: IF G_DEBUG THEN
3122: ozf_utility_pvt.write_conc_log(l_full_name || ' this budget already has a next period budget');
3123: END IF;
3124: END IF; -- end of l_child_fund_rec.fund_id is NOT NULL.
3125:
3126: END LOOP; -- end of loop for c_get_hierarchy_budgets.

Line 3141: ozf_utility_pvt.write_conc_log (x_msg_data);

3137: fnd_msg_pub.count_and_get(p_count => x_msg_count
3138: ,p_data => x_msg_data
3139: ,p_encoded => fnd_api.g_false
3140: );
3141: ozf_utility_pvt.write_conc_log (x_msg_data);
3142: END IF;
3143:
3144: END LOOP; -- end of c_get_fund_id.
3145: CLOSE c_get_fund_id;

Line 3166: ozf_utility_pvt.write_conc_log(l_full_name || ' :ends ');

3162: RAISE fnd_api.g_exc_error;
3163: END IF;
3164:
3165: IF G_DEBUG THEN
3166: ozf_utility_pvt.write_conc_log(l_full_name || ' :ends ');
3167: END IF;
3168:
3169: EXCEPTION
3170: WHEN fnd_api.g_exc_error THEN

Line 3178: ozf_utility_pvt.write_conc_log (x_errbuf);

3174: fnd_msg_pub.count_and_get(p_count => x_msg_count
3175: ,p_data => x_msg_data
3176: ,p_encoded => fnd_api.g_false
3177: );
3178: ozf_utility_pvt.write_conc_log (x_errbuf);
3179: WHEN fnd_api.g_exc_unexpected_error THEN
3180: ROLLBACK;
3181: x_retcode := 1;
3182: x_errbuf := x_msg_data;

Line 3187: ozf_utility_pvt.write_conc_log (x_errbuf);

3183: fnd_msg_pub.count_and_get(p_count => x_msg_count
3184: ,p_data => x_msg_data
3185: ,p_encoded => fnd_api.g_false
3186: );
3187: ozf_utility_pvt.write_conc_log (x_errbuf);
3188: WHEN OTHERS THEN
3189: ROLLBACK;
3190: x_retcode := 1;
3191: x_errbuf := x_msg_data;

Line 3196: ozf_utility_pvt.write_conc_log (x_errbuf);

3192: fnd_msg_pub.count_and_get(p_count => x_msg_count
3193: ,p_data => x_msg_data
3194: ,p_encoded => fnd_api.g_false
3195: );
3196: ozf_utility_pvt.write_conc_log (x_errbuf);
3197:
3198: END open_next_years_budget;
3199:
3200: END ozf_fund_reconcile_pvt;