[Home] [Help]
853:
854: l_proc varchar2(72) := g_package||'populate_period_details';
855: l_budget_periods_rec pqh_budget_periods%ROWTYPE;
856: l_dflt_budget_sets_rec pqh_dflt_budget_sets%ROWTYPE;
857: l_dflt_budget_elements_rec pqh_dflt_budget_elements%ROWTYPE;
858: l_dflt_fund_srcs pqh_dflt_fund_srcs%ROWTYPE;
859: l_budget_set_id pqh_budget_sets.budget_set_id%TYPE;
860: l_budget_element_id pqh_budget_elements.budget_element_id%TYPE;
861: l_budget_fund_src_id pqh_budget_fund_srcs.budget_fund_src_id%TYPE;
870: SELECT *
871: FROM pqh_dflt_budget_sets
872: WHERE dflt_budget_set_name = p_budget_set_name;
873:
874: CURSOR pqh_dflt_budget_elements_cur (p_dflt_budget_set_id IN pqh_dflt_budget_elements.dflt_budget_set_id%TYPE) IS
875: SELECT *
876: FROM pqh_dflt_budget_elements
877: WHERE dflt_budget_set_id = p_dflt_budget_set_id;
878:
872: WHERE dflt_budget_set_name = p_budget_set_name;
873:
874: CURSOR pqh_dflt_budget_elements_cur (p_dflt_budget_set_id IN pqh_dflt_budget_elements.dflt_budget_set_id%TYPE) IS
875: SELECT *
876: FROM pqh_dflt_budget_elements
877: WHERE dflt_budget_set_id = p_dflt_budget_set_id;
878:
879: CURSOR pqh_dflt_fund_srcs_cur (p_dflt_budget_element_id IN pqh_dflt_fund_srcs.dflt_budget_element_id%TYPE) IS
880: SELECT *
906: );
907:
908:
909: -- open budget elements cursor
910: OPEN pqh_dflt_budget_elements_cur(p_dflt_budget_set_id => l_dflt_budget_sets_rec.dflt_budget_set_id);
911: LOOP -- loop 2
912: FETCH pqh_dflt_budget_elements_cur INTO l_dflt_budget_elements_rec;
913: EXIT WHEN pqh_dflt_budget_elements_cur%NOTFOUND;
914: -- create records in pqh_budget_elements
908:
909: -- open budget elements cursor
910: OPEN pqh_dflt_budget_elements_cur(p_dflt_budget_set_id => l_dflt_budget_sets_rec.dflt_budget_set_id);
911: LOOP -- loop 2
912: FETCH pqh_dflt_budget_elements_cur INTO l_dflt_budget_elements_rec;
913: EXIT WHEN pqh_dflt_budget_elements_cur%NOTFOUND;
914: -- create records in pqh_budget_elements
915: populate_budget_elements
916: (
909: -- open budget elements cursor
910: OPEN pqh_dflt_budget_elements_cur(p_dflt_budget_set_id => l_dflt_budget_sets_rec.dflt_budget_set_id);
911: LOOP -- loop 2
912: FETCH pqh_dflt_budget_elements_cur INTO l_dflt_budget_elements_rec;
913: EXIT WHEN pqh_dflt_budget_elements_cur%NOTFOUND;
914: -- create records in pqh_budget_elements
915: populate_budget_elements
916: (
917: p_dflt_budget_elements_rec => l_dflt_budget_elements_rec,
938: CLOSE pqh_dflt_fund_srcs_cur;
939:
940:
941: END LOOP; -- loop 2
942: CLOSE pqh_dflt_budget_elements_cur;
943:
944: END LOOP; -- loop 1
945: CLOSE pqh_dflt_budget_sets_cur;
946:
968:
969: l_proc varchar2(72) := g_package||'populate_budget_sets';
970: l_object_version_number pqh_budget_periods.object_version_number%TYPE;
971: l_budget_periods_rec pqh_budget_periods%ROWTYPE;
972: l_percent_sum pqh_dflt_budget_elements.dflt_dist_percentage%TYPE;
973: l_budget_unit1_available pqh_budget_periods.budget_unit1_available%TYPE;
974:
975: CURSOR budget_periods_csr IS
976: SELECT *
978: WHERE budget_period_id = p_budget_period_id;
979:
980: CURSOR budget_set_percent_csr IS
981: SELECT SUM(dflt_dist_percentage)
982: FROM pqh_dflt_budget_elements
983: WHERE dflt_budget_set_id = p_dflt_budget_sets_rec.dflt_budget_set_id;
984:
985:
986: BEGIN
1039:
1040: --------------------------------------------------------------------------------------------------------------
1041: PROCEDURE populate_budget_elements
1042: (
1043: p_dflt_budget_elements_rec IN pqh_dflt_budget_elements%ROWTYPE,
1044: p_budget_set_id IN pqh_budget_sets.budget_set_id%TYPE,
1045: p_budget_element_id_o OUT NOCOPY pqh_budget_elements.budget_element_id%TYPE
1046: )
1047: IS
1167: OPEN csr_table_route (p_table_alias => 'DST');
1168: FETCH csr_table_route INTO g_table_route_id_dst;
1169: CLOSE csr_table_route;
1170:
1171: -- table_route_id for pqh_dflt_budget_elements
1172: OPEN csr_table_route (p_table_alias => 'DEL');
1173: FETCH csr_table_route INTO g_table_route_id_del;
1174: CLOSE csr_table_route;
1175: