296: l_budget_set_id pqh_budget_sets.budget_set_id%TYPE;
297: l_pqh_worksheet_bdgt_elmnt_rec pqh_worksheet_bdgt_elmnts%ROWTYPE;
298: l_budget_element_id pqh_budget_elements.budget_element_id%TYPE;
299: l_pqh_worksheet_fund_srcs_rec pqh_worksheet_fund_srcs%ROWTYPE;
300: l_budget_fund_src_id pqh_budget_fund_srcs.budget_fund_src_id%TYPE;
301: l_curr_budget_version_id pqh_budget_versions.budget_version_id%TYPE;
302: l_log_context pqh_process_log.log_context%TYPE;
303:
304: BEGIN
1137: PROCEDURE populate_budget_fund_srcs
1138: (
1139: p_worksheet_fund_srcs_rec IN pqh_worksheet_fund_srcs%ROWTYPE,
1140: p_budget_element_id IN pqh_budget_elements.budget_element_id%TYPE,
1141: p_budget_fund_src_id_o OUT NOCOPY pqh_budget_fund_srcs.budget_fund_src_id%TYPE
1142: )
1143: IS
1144: -- local variables and cursors
1145:
1152:
1153: IF p_budget_element_id IS NOT NULL THEN
1154:
1155: -- call insert API
1156: pqh_budget_fund_srcs_api.create_budget_fund_src
1157: (
1158: p_validate => false
1159: ,p_budget_fund_src_id => p_budget_fund_src_id_o
1160: ,p_budget_element_id => p_budget_element_id
1223: SELECT *
1224: FROM pqh_budget_elements
1225: WHERE budget_set_id = p_budget_set_id;
1226:
1227: CURSOR pqh_budget_fund_srcs_cur (p_budget_element_id IN pqh_budget_elements.budget_element_id%TYPE) IS
1228: SELECT *
1229: FROM pqh_budget_fund_srcs
1230: WHERE budget_element_id = p_budget_element_id;
1231:
1225: WHERE budget_set_id = p_budget_set_id;
1226:
1227: CURSOR pqh_budget_fund_srcs_cur (p_budget_element_id IN pqh_budget_elements.budget_element_id%TYPE) IS
1228: SELECT *
1229: FROM pqh_budget_fund_srcs
1230: WHERE budget_element_id = p_budget_element_id;
1231:
1232: CURSOR current_version_cur (p_worksheet_id IN pqh_worksheets.worksheet_id%TYPE ) IS
1233: SELECT bvr.budget_version_id
1247: l_pqh_budget_sets_rec pqh_budget_sets%ROWTYPE;
1248: l_budget_set_id pqh_budget_sets.budget_set_id%TYPE;
1249: l_pqh_budget_elements_rec pqh_budget_elements%ROWTYPE;
1250: l_budget_element_id pqh_budget_elements.budget_element_id%TYPE;
1251: l_pqh_budget_fund_srcs_rec pqh_budget_fund_srcs%ROWTYPE;
1252: l_budget_fund_src_id pqh_budget_fund_srcs.budget_fund_src_id%TYPE;
1253: l_curr_budget_version_id pqh_budget_versions.budget_version_id%TYPE;
1254:
1255: BEGIN
1248: l_budget_set_id pqh_budget_sets.budget_set_id%TYPE;
1249: l_pqh_budget_elements_rec pqh_budget_elements%ROWTYPE;
1250: l_budget_element_id pqh_budget_elements.budget_element_id%TYPE;
1251: l_pqh_budget_fund_srcs_rec pqh_budget_fund_srcs%ROWTYPE;
1252: l_budget_fund_src_id pqh_budget_fund_srcs.budget_fund_src_id%TYPE;
1253: l_curr_budget_version_id pqh_budget_versions.budget_version_id%TYPE;
1254:
1255: BEGIN
1256:
1321: p_budget_set_id => l_budget_set_id,
1322: p_budget_element_id_o => l_budget_element_id
1323: );
1324:
1325: -- open pqh_budget_fund_srcs_cur
1326: OPEN pqh_budget_fund_srcs_cur(p_budget_element_id => l_pqh_budget_elements_rec.budget_element_id);
1327: LOOP -- loop 6
1328: FETCH pqh_budget_fund_srcs_cur INTO l_pqh_budget_fund_srcs_rec;
1329: EXIT WHEN pqh_budget_fund_srcs_cur%NOTFOUND;
1322: p_budget_element_id_o => l_budget_element_id
1323: );
1324:
1325: -- open pqh_budget_fund_srcs_cur
1326: OPEN pqh_budget_fund_srcs_cur(p_budget_element_id => l_pqh_budget_elements_rec.budget_element_id);
1327: LOOP -- loop 6
1328: FETCH pqh_budget_fund_srcs_cur INTO l_pqh_budget_fund_srcs_rec;
1329: EXIT WHEN pqh_budget_fund_srcs_cur%NOTFOUND;
1330: -- create records in pqh_budget_fund_srcs
1324:
1325: -- open pqh_budget_fund_srcs_cur
1326: OPEN pqh_budget_fund_srcs_cur(p_budget_element_id => l_pqh_budget_elements_rec.budget_element_id);
1327: LOOP -- loop 6
1328: FETCH pqh_budget_fund_srcs_cur INTO l_pqh_budget_fund_srcs_rec;
1329: EXIT WHEN pqh_budget_fund_srcs_cur%NOTFOUND;
1330: -- create records in pqh_budget_fund_srcs
1331: carry_forward_budget_fund_srcs
1332: (
1325: -- open pqh_budget_fund_srcs_cur
1326: OPEN pqh_budget_fund_srcs_cur(p_budget_element_id => l_pqh_budget_elements_rec.budget_element_id);
1327: LOOP -- loop 6
1328: FETCH pqh_budget_fund_srcs_cur INTO l_pqh_budget_fund_srcs_rec;
1329: EXIT WHEN pqh_budget_fund_srcs_cur%NOTFOUND;
1330: -- create records in pqh_budget_fund_srcs
1331: carry_forward_budget_fund_srcs
1332: (
1333: p_pqh_budget_fund_srcs_rec => l_pqh_budget_fund_srcs_rec,
1326: OPEN pqh_budget_fund_srcs_cur(p_budget_element_id => l_pqh_budget_elements_rec.budget_element_id);
1327: LOOP -- loop 6
1328: FETCH pqh_budget_fund_srcs_cur INTO l_pqh_budget_fund_srcs_rec;
1329: EXIT WHEN pqh_budget_fund_srcs_cur%NOTFOUND;
1330: -- create records in pqh_budget_fund_srcs
1331: carry_forward_budget_fund_srcs
1332: (
1333: p_pqh_budget_fund_srcs_rec => l_pqh_budget_fund_srcs_rec,
1334: p_budget_element_id => l_budget_element_id,
1329: EXIT WHEN pqh_budget_fund_srcs_cur%NOTFOUND;
1330: -- create records in pqh_budget_fund_srcs
1331: carry_forward_budget_fund_srcs
1332: (
1333: p_pqh_budget_fund_srcs_rec => l_pqh_budget_fund_srcs_rec,
1334: p_budget_element_id => l_budget_element_id,
1335: p_budget_fund_src_id_o => l_budget_fund_src_id
1336: );
1337:
1336: );
1337:
1338:
1339: END LOOP; -- loop 6
1340: CLOSE pqh_budget_fund_srcs_cur;
1341:
1342: END LOOP; -- loop 5
1343: CLOSE pqh_budget_elements_cur;
1344:
1572:
1573: --------------------------------------------------------------------------------------------------------------
1574: PROCEDURE carry_forward_budget_fund_srcs
1575: (
1576: p_pqh_budget_fund_srcs_rec IN pqh_budget_fund_srcs%ROWTYPE,
1577: p_budget_element_id IN pqh_budget_elements.budget_element_id%TYPE,
1578: p_budget_fund_src_id_o OUT NOCOPY pqh_budget_fund_srcs.budget_fund_src_id%TYPE
1579: )
1580: IS
1574: PROCEDURE carry_forward_budget_fund_srcs
1575: (
1576: p_pqh_budget_fund_srcs_rec IN pqh_budget_fund_srcs%ROWTYPE,
1577: p_budget_element_id IN pqh_budget_elements.budget_element_id%TYPE,
1578: p_budget_fund_src_id_o OUT NOCOPY pqh_budget_fund_srcs.budget_fund_src_id%TYPE
1579: )
1580: IS
1581: -- local variables and cursors
1582:
1589:
1590: IF p_budget_element_id IS NOT NULL THEN
1591:
1592: -- call insert API
1593: pqh_budget_fund_srcs_api.create_budget_fund_src
1594: (
1595: p_validate => false
1596: ,p_budget_fund_src_id => p_budget_fund_src_id_o
1597: ,p_budget_element_id => p_budget_element_id
1594: (
1595: p_validate => false
1596: ,p_budget_fund_src_id => p_budget_fund_src_id_o
1597: ,p_budget_element_id => p_budget_element_id
1598: ,p_cost_allocation_keyflex_id => p_pqh_budget_fund_srcs_rec.cost_allocation_keyflex_id
1599: ,p_project_id => p_pqh_budget_fund_srcs_rec.project_id
1600: ,p_award_id => p_pqh_budget_fund_srcs_rec.award_id
1601: ,p_task_id => p_pqh_budget_fund_srcs_rec.task_id
1602: ,p_expenditure_type => p_pqh_budget_fund_srcs_rec.expenditure_type
1595: p_validate => false
1596: ,p_budget_fund_src_id => p_budget_fund_src_id_o
1597: ,p_budget_element_id => p_budget_element_id
1598: ,p_cost_allocation_keyflex_id => p_pqh_budget_fund_srcs_rec.cost_allocation_keyflex_id
1599: ,p_project_id => p_pqh_budget_fund_srcs_rec.project_id
1600: ,p_award_id => p_pqh_budget_fund_srcs_rec.award_id
1601: ,p_task_id => p_pqh_budget_fund_srcs_rec.task_id
1602: ,p_expenditure_type => p_pqh_budget_fund_srcs_rec.expenditure_type
1603: ,p_organization_id => p_pqh_budget_fund_srcs_rec.organization_id
1596: ,p_budget_fund_src_id => p_budget_fund_src_id_o
1597: ,p_budget_element_id => p_budget_element_id
1598: ,p_cost_allocation_keyflex_id => p_pqh_budget_fund_srcs_rec.cost_allocation_keyflex_id
1599: ,p_project_id => p_pqh_budget_fund_srcs_rec.project_id
1600: ,p_award_id => p_pqh_budget_fund_srcs_rec.award_id
1601: ,p_task_id => p_pqh_budget_fund_srcs_rec.task_id
1602: ,p_expenditure_type => p_pqh_budget_fund_srcs_rec.expenditure_type
1603: ,p_organization_id => p_pqh_budget_fund_srcs_rec.organization_id
1604: ,p_distribution_percentage => p_pqh_budget_fund_srcs_rec.distribution_percentage
1597: ,p_budget_element_id => p_budget_element_id
1598: ,p_cost_allocation_keyflex_id => p_pqh_budget_fund_srcs_rec.cost_allocation_keyflex_id
1599: ,p_project_id => p_pqh_budget_fund_srcs_rec.project_id
1600: ,p_award_id => p_pqh_budget_fund_srcs_rec.award_id
1601: ,p_task_id => p_pqh_budget_fund_srcs_rec.task_id
1602: ,p_expenditure_type => p_pqh_budget_fund_srcs_rec.expenditure_type
1603: ,p_organization_id => p_pqh_budget_fund_srcs_rec.organization_id
1604: ,p_distribution_percentage => p_pqh_budget_fund_srcs_rec.distribution_percentage
1605: ,p_object_version_number => l_object_version_number
1598: ,p_cost_allocation_keyflex_id => p_pqh_budget_fund_srcs_rec.cost_allocation_keyflex_id
1599: ,p_project_id => p_pqh_budget_fund_srcs_rec.project_id
1600: ,p_award_id => p_pqh_budget_fund_srcs_rec.award_id
1601: ,p_task_id => p_pqh_budget_fund_srcs_rec.task_id
1602: ,p_expenditure_type => p_pqh_budget_fund_srcs_rec.expenditure_type
1603: ,p_organization_id => p_pqh_budget_fund_srcs_rec.organization_id
1604: ,p_distribution_percentage => p_pqh_budget_fund_srcs_rec.distribution_percentage
1605: ,p_object_version_number => l_object_version_number
1606: );
1599: ,p_project_id => p_pqh_budget_fund_srcs_rec.project_id
1600: ,p_award_id => p_pqh_budget_fund_srcs_rec.award_id
1601: ,p_task_id => p_pqh_budget_fund_srcs_rec.task_id
1602: ,p_expenditure_type => p_pqh_budget_fund_srcs_rec.expenditure_type
1603: ,p_organization_id => p_pqh_budget_fund_srcs_rec.organization_id
1604: ,p_distribution_percentage => p_pqh_budget_fund_srcs_rec.distribution_percentage
1605: ,p_object_version_number => l_object_version_number
1606: );
1607:
1600: ,p_award_id => p_pqh_budget_fund_srcs_rec.award_id
1601: ,p_task_id => p_pqh_budget_fund_srcs_rec.task_id
1602: ,p_expenditure_type => p_pqh_budget_fund_srcs_rec.expenditure_type
1603: ,p_organization_id => p_pqh_budget_fund_srcs_rec.organization_id
1604: ,p_distribution_percentage => p_pqh_budget_fund_srcs_rec.distribution_percentage
1605: ,p_object_version_number => l_object_version_number
1606: );
1607:
1608: END IF; -- p_budget_element_id is not null
1657: AND wks.worksheet_id = p_worksheet_id;
1658:
1659: CURSOR budget_fund_src_id_cur IS
1660: SELECT bfs.budget_fund_src_id
1661: FROM pqh_budget_fund_srcs bfs, pqh_budget_elements bel, pqh_budget_sets bst,
1662: pqh_budget_periods bpr,
1663: pqh_worksheet_details wdt , pqh_worksheets wks
1664: WHERE bfs.budget_element_id = bel.budget_element_id
1665: AND bel.budget_set_id = bst.budget_set_id
1672: l_proc varchar2(72) := g_package||'delete_child_rows';
1673: l_budget_period_id pqh_budget_periods.budget_period_id%TYPE;
1674: l_budget_set_id pqh_budget_sets.budget_set_id%TYPE;
1675: l_budget_element_id pqh_budget_elements.budget_element_id%TYPE;
1676: l_budget_fund_src_id pqh_budget_fund_srcs.budget_fund_src_id%TYPE;
1677:
1678:
1679: BEGIN
1680:
1679: BEGIN
1680:
1681: hr_utility.set_location('Entering: '||l_proc, 5);
1682:
1683: -- delete from pqh_budget_fund_srcs
1684:
1685: OPEN budget_fund_src_id_cur;
1686: LOOP
1687: FETCH budget_fund_src_id_cur INTO l_budget_fund_src_id;
1685: OPEN budget_fund_src_id_cur;
1686: LOOP
1687: FETCH budget_fund_src_id_cur INTO l_budget_fund_src_id;
1688: EXIT WHEN budget_fund_src_id_cur%NOTFOUND;
1689: DELETE from pqh_budget_fund_srcs
1690: WHERE budget_fund_src_id = l_budget_fund_src_id;
1691: END LOOP;
1692: CLOSE budget_fund_src_id_cur;
1693: