[Home] [Help]
100: l_object_version_number NUMBER;
101: -- Record variables for creating the fund request.
102: l_source_fund_rec ozf_funds_pvt.fund_rec_type; -- source fund record
103: l_target_fund_rec ozf_funds_pvt.fund_rec_type; -- target fund record
104: l_act_budget_rec ozf_actbudgets_pvt.act_budgets_rec_type; -- fund request record
105:
106: -- Cursor to find source fund details
107: CURSOR c_fund_detail(
108: cv_fund_id IN NUMBER)
348: END IF;
349:
350: CLOSE c_act_budget_detail;
351: --- update th erequest stauts to approved
352: ozf_actbudgets_pvt.init_act_budgets_rec(l_act_budget_rec);
353: l_act_budget_rec.activity_budget_id := p_act_budget_id;
354: l_act_budget_rec.object_version_number := l_act_budget_obj_num;
355: -- this will set the status to approved
356: l_act_budget_rec.status_code := 'APPROVED'; -- Approved amount
359: ozf_utility_pvt.get_default_user_status(
360: g_budget_source_status
361: ,l_act_budget_rec.status_code);
362: -- Fund request record
363: ozf_actbudgets_pvt.update_act_budgets(
364: p_api_version => l_api_version
365: ,p_init_msg_list => fnd_api.g_false
366: ,p_commit => fnd_api.g_false
367: ,x_return_status => l_return_status
417: RAISE fnd_api.g_exc_error;
418: END IF;
419:
420: CLOSE c_act_budget_detail;
421: ozf_actbudgets_pvt.init_act_budgets_rec(l_act_budget_rec);
422: l_act_budget_rec.activity_budget_id := p_act_budget_id;
423: l_act_budget_rec.object_version_number := l_act_budget_obj_num;
424: l_act_budget_rec.approver_id := p_approver_id;
425: l_act_budget_rec.approved_in_currency := l_source_rec.source_currency_code;
430: ozf_utility_pvt.get_default_user_status(
431: g_budget_source_status
432: ,l_act_budget_rec.status_code);
433: -- Fund request record
434: ozf_actbudgets_pvt.update_act_budgets(
435: p_api_version => l_api_version
436: ,p_init_msg_list => fnd_api.g_false
437: ,p_commit => fnd_api.g_false
438: ,x_return_status => l_return_status
549: l_msg_data VARCHAR2(4000);
550: l_object_version_number NUMBER;
551: -- Record variables for creating the fund request.
552: l_target_fund_rec ozf_funds_pvt.fund_rec_type; -- target fund record
553: l_act_budget_rec ozf_actbudgets_pvt.act_budgets_rec_type; -- fund request record
554: l_act_budget_obj_num NUMBER;
555:
556: -- Cursor records
557: CURSOR c_target_fund_detail(
683: END IF;
684:
685: CLOSE c_act_budget_detail;
686: --- update th erequest stauts to pending before submitting
687: ozf_actbudgets_pvt.init_act_budgets_rec(l_act_budget_rec);
688: l_act_budget_rec.activity_budget_id := p_act_budget_id;
689: l_act_budget_rec.object_version_number := l_act_budget_obj_num;
690: -- this will set the status to pending
691: l_act_budget_rec.status_code := 'APPROVED'; -- Approved amount
693: ozf_utility_pvt.get_default_user_status(
694: g_budget_source_status
695: ,l_act_budget_rec.status_code);
696: -- Fund request record
697: ozf_actbudgets_pvt.update_act_budgets(
698: p_api_version => l_api_version
699: ,p_init_msg_list => fnd_api.g_false
700: ,p_commit => fnd_api.g_false
701: ,x_return_status => l_return_status
747: RAISE fnd_api.g_exc_error;
748: END IF;
749:
750: CLOSE c_act_budget_detail;
751: ozf_actbudgets_pvt.init_act_budgets_rec(l_act_budget_rec);
752: l_act_budget_rec.activity_budget_id := p_act_budget_id;
753: l_act_budget_rec.object_version_number := l_act_budget_obj_num;
754: -- l_act_budget_rec.approved_amount := p_approved_amount; -- Approved amount
755: -- l_act_budget_rec.approver_id := p_approver_id; -- Approved amount
760: g_budget_source_status
761: ,l_act_budget_rec.status_code);
762: l_act_budget_rec.comment := p_note;
763: -- Fund request record
764: ozf_actbudgets_pvt.update_act_budgets(
765: p_api_version => l_api_version
766: ,p_init_msg_list => fnd_api.g_false
767: ,p_commit => fnd_api.g_false
768: ,x_return_status => l_return_status
891: := 'Create_Fund_Request';
892: l_full_name CONSTANT VARCHAR2(60)
893: := g_pkg_name || '.' || l_api_name;
894: -- Record variables for creating the fund request.
895: l_act_budget_rec ozf_actbudgets_pvt.act_budgets_rec_type;
896: l_target_fund_rec ozf_funds_pvt.fund_rec_type;
897: l_object_version_number NUMBER;
898: l_to_currency VARCHAR2(30);
899: l_rate NUMBER;
973: l_act_budget_rec.transfer_type := p_transfer_type;
974: l_act_budget_rec.transaction_type := 'CREDIT';
975: --l_act_budget_rec.date_required_by := p_needbydate;
976: -- Create_transfer record
977: ozf_actbudgets_pvt.create_act_budgets(
978: p_api_version => l_api_version
979: ,x_return_status => l_return_status
980: ,x_msg_count => l_msg_count
981: ,x_msg_data => l_msg_data
1115: -- transfer would become approved directly
1116: IF G_DEBUG THEN
1117: ozf_utility_pvt.debug_message(l_full_name || ': beforing updating child approval to pending');
1118: END IF;
1119: ozf_actbudgets_pvt.init_act_budgets_rec(l_act_budget_rec);
1120: l_act_budget_rec.activity_budget_id := l_act_budget_id;
1121: l_act_budget_rec.object_version_number := l_act_budget_appr_rec.object_version_number;
1122: l_act_budget_rec.status_code := 'APPROVED'; -- Approved amount
1123: l_act_budget_rec.user_status_id :=
1124: ozf_utility_pvt.get_default_user_status(
1125: g_budget_source_status
1126: ,l_act_budget_rec.status_code);
1127: -- Fund request record
1128: ozf_actbudgets_pvt.update_act_budgets(
1129: p_api_version => l_api_version
1130: ,p_init_msg_list => fnd_api.g_false
1131: ,p_commit => fnd_api.g_false
1132: ,x_return_status => l_return_status
3049: := fnd_api.g_ret_sts_success;
3050: l_object_version_number NUMBER;
3051: -- Record variables for creating the fund request.
3052: l_fund_rec ozf_funds_pvt.fund_rec_type; -- transaction fund record
3053: l_act_budget_rec ozf_actbudgets_pvt.act_budgets_rec_type; -- fund request record
3054:
3055: -- Cursor to find fund details
3056: -- sql repository 14894880
3057: CURSOR c_fund_detail(