1689:
1690: END delete_coa;
1691:
1692:
1693: PROCEDURE update_item_dist( p_coa_code IN igf_aw_cit_ld_ovrd_all.coa_code%TYPE,
1694: p_cal_type IN igf_aw_cit_ld_ovrd_all.ci_cal_type%TYPE,
1695: p_sequence_number IN igf_aw_cit_ld_ovrd_all.ci_sequence_number%TYPE,
1696: p_item_code IN igf_aw_cit_ld_ovrd_all.item_code%TYPE,
1697: p_upd_result OUT NOCOPY VARCHAR2)
1690: END delete_coa;
1691:
1692:
1693: PROCEDURE update_item_dist( p_coa_code IN igf_aw_cit_ld_ovrd_all.coa_code%TYPE,
1694: p_cal_type IN igf_aw_cit_ld_ovrd_all.ci_cal_type%TYPE,
1695: p_sequence_number IN igf_aw_cit_ld_ovrd_all.ci_sequence_number%TYPE,
1696: p_item_code IN igf_aw_cit_ld_ovrd_all.item_code%TYPE,
1697: p_upd_result OUT NOCOPY VARCHAR2)
1698:
1691:
1692:
1693: PROCEDURE update_item_dist( p_coa_code IN igf_aw_cit_ld_ovrd_all.coa_code%TYPE,
1694: p_cal_type IN igf_aw_cit_ld_ovrd_all.ci_cal_type%TYPE,
1695: p_sequence_number IN igf_aw_cit_ld_ovrd_all.ci_sequence_number%TYPE,
1696: p_item_code IN igf_aw_cit_ld_ovrd_all.item_code%TYPE,
1697: p_upd_result OUT NOCOPY VARCHAR2)
1698:
1699: IS
1692:
1693: PROCEDURE update_item_dist( p_coa_code IN igf_aw_cit_ld_ovrd_all.coa_code%TYPE,
1694: p_cal_type IN igf_aw_cit_ld_ovrd_all.ci_cal_type%TYPE,
1695: p_sequence_number IN igf_aw_cit_ld_ovrd_all.ci_sequence_number%TYPE,
1696: p_item_code IN igf_aw_cit_ld_ovrd_all.item_code%TYPE,
1697: p_upd_result OUT NOCOPY VARCHAR2)
1698:
1699: IS
1700:
1707: --
1708: -- Cursor to fetch the COA Items
1709: --
1710:
1711: CURSOR cur_coa_items ( p_coa_code igf_aw_cit_ld_ovrd_all.coa_code%TYPE,
1712: p_cal_type igf_aw_cit_ld_ovrd_all.ci_cal_type%TYPE,
1713: p_sequence_number igf_aw_cit_ld_ovrd_all.ci_sequence_number%TYPE,
1714: p_item_code igf_aw_cit_ld_ovrd_all.item_code%TYPE
1715: )
1708: -- Cursor to fetch the COA Items
1709: --
1710:
1711: CURSOR cur_coa_items ( p_coa_code igf_aw_cit_ld_ovrd_all.coa_code%TYPE,
1712: p_cal_type igf_aw_cit_ld_ovrd_all.ci_cal_type%TYPE,
1713: p_sequence_number igf_aw_cit_ld_ovrd_all.ci_sequence_number%TYPE,
1714: p_item_code igf_aw_cit_ld_ovrd_all.item_code%TYPE
1715: )
1716: IS
1709: --
1710:
1711: CURSOR cur_coa_items ( p_coa_code igf_aw_cit_ld_ovrd_all.coa_code%TYPE,
1712: p_cal_type igf_aw_cit_ld_ovrd_all.ci_cal_type%TYPE,
1713: p_sequence_number igf_aw_cit_ld_ovrd_all.ci_sequence_number%TYPE,
1714: p_item_code igf_aw_cit_ld_ovrd_all.item_code%TYPE
1715: )
1716: IS
1717: SELECT
1710:
1711: CURSOR cur_coa_items ( p_coa_code igf_aw_cit_ld_ovrd_all.coa_code%TYPE,
1712: p_cal_type igf_aw_cit_ld_ovrd_all.ci_cal_type%TYPE,
1713: p_sequence_number igf_aw_cit_ld_ovrd_all.ci_sequence_number%TYPE,
1714: p_item_code igf_aw_cit_ld_ovrd_all.item_code%TYPE
1715: )
1716: IS
1717: SELECT
1718: *
1728:
1729: --
1730: -- Cursor to fetch the Default COA Distribtuon
1731: --
1732: CURSOR cur_default_ld( p_coa_code igf_aw_cit_ld_ovrd_all.coa_code%TYPE,
1733: p_cal_type igf_aw_cit_ld_ovrd_all.ci_cal_type%TYPE,
1734: p_sequence_number igf_aw_cit_ld_ovrd_all.ci_sequence_number%TYPE
1735: )
1736: IS
1729: --
1730: -- Cursor to fetch the Default COA Distribtuon
1731: --
1732: CURSOR cur_default_ld( p_coa_code igf_aw_cit_ld_ovrd_all.coa_code%TYPE,
1733: p_cal_type igf_aw_cit_ld_ovrd_all.ci_cal_type%TYPE,
1734: p_sequence_number igf_aw_cit_ld_ovrd_all.ci_sequence_number%TYPE
1735: )
1736: IS
1737: SELECT
1730: -- Cursor to fetch the Default COA Distribtuon
1731: --
1732: CURSOR cur_default_ld( p_coa_code igf_aw_cit_ld_ovrd_all.coa_code%TYPE,
1733: p_cal_type igf_aw_cit_ld_ovrd_all.ci_cal_type%TYPE,
1734: p_sequence_number igf_aw_cit_ld_ovrd_all.ci_sequence_number%TYPE
1735: )
1736: IS
1737: SELECT
1738: ld_perct
1749:
1750: --
1751: -- Cursor to fetch the Overidden COA Distribtuon
1752: --
1753: CURSOR cur_overide_ld( p_coa_code igf_aw_cit_ld_ovrd_all.coa_code%TYPE,
1754: p_cal_type igf_aw_cit_ld_ovrd_all.ci_cal_type%TYPE,
1755: p_sequence_number igf_aw_cit_ld_ovrd_all.ci_sequence_number%TYPE,
1756: p_item_code igf_aw_cit_ld_ovrd_all.item_code%TYPE
1757: )
1750: --
1751: -- Cursor to fetch the Overidden COA Distribtuon
1752: --
1753: CURSOR cur_overide_ld( p_coa_code igf_aw_cit_ld_ovrd_all.coa_code%TYPE,
1754: p_cal_type igf_aw_cit_ld_ovrd_all.ci_cal_type%TYPE,
1755: p_sequence_number igf_aw_cit_ld_ovrd_all.ci_sequence_number%TYPE,
1756: p_item_code igf_aw_cit_ld_ovrd_all.item_code%TYPE
1757: )
1758: IS
1751: -- Cursor to fetch the Overidden COA Distribtuon
1752: --
1753: CURSOR cur_overide_ld( p_coa_code igf_aw_cit_ld_ovrd_all.coa_code%TYPE,
1754: p_cal_type igf_aw_cit_ld_ovrd_all.ci_cal_type%TYPE,
1755: p_sequence_number igf_aw_cit_ld_ovrd_all.ci_sequence_number%TYPE,
1756: p_item_code igf_aw_cit_ld_ovrd_all.item_code%TYPE
1757: )
1758: IS
1759: SELECT
1752: --
1753: CURSOR cur_overide_ld( p_coa_code igf_aw_cit_ld_ovrd_all.coa_code%TYPE,
1754: p_cal_type igf_aw_cit_ld_ovrd_all.ci_cal_type%TYPE,
1755: p_sequence_number igf_aw_cit_ld_ovrd_all.ci_sequence_number%TYPE,
1756: p_item_code igf_aw_cit_ld_ovrd_all.item_code%TYPE
1757: )
1758: IS
1759: SELECT
1760: ld_perct
1771: overide_ld_rec cur_overide_ld%ROWTYPE;
1772:
1773: lv_item_dist igf_aw_coa_grp_item_all.item_dist%TYPE;
1774:
1775: CURSOR cur_pct_total( p_coa_code igf_aw_cit_ld_ovrd_all.coa_code%TYPE,
1776: p_cal_type igf_aw_cit_ld_ovrd_all.ci_cal_type%TYPE,
1777: p_sequence_number igf_aw_cit_ld_ovrd_all.ci_sequence_number%TYPE,
1778: p_item_code igf_aw_cit_ld_ovrd_all.item_code%TYPE
1779: )
1772:
1773: lv_item_dist igf_aw_coa_grp_item_all.item_dist%TYPE;
1774:
1775: CURSOR cur_pct_total( p_coa_code igf_aw_cit_ld_ovrd_all.coa_code%TYPE,
1776: p_cal_type igf_aw_cit_ld_ovrd_all.ci_cal_type%TYPE,
1777: p_sequence_number igf_aw_cit_ld_ovrd_all.ci_sequence_number%TYPE,
1778: p_item_code igf_aw_cit_ld_ovrd_all.item_code%TYPE
1779: )
1780: IS
1773: lv_item_dist igf_aw_coa_grp_item_all.item_dist%TYPE;
1774:
1775: CURSOR cur_pct_total( p_coa_code igf_aw_cit_ld_ovrd_all.coa_code%TYPE,
1776: p_cal_type igf_aw_cit_ld_ovrd_all.ci_cal_type%TYPE,
1777: p_sequence_number igf_aw_cit_ld_ovrd_all.ci_sequence_number%TYPE,
1778: p_item_code igf_aw_cit_ld_ovrd_all.item_code%TYPE
1779: )
1780: IS
1781: SELECT
1774:
1775: CURSOR cur_pct_total( p_coa_code igf_aw_cit_ld_ovrd_all.coa_code%TYPE,
1776: p_cal_type igf_aw_cit_ld_ovrd_all.ci_cal_type%TYPE,
1777: p_sequence_number igf_aw_cit_ld_ovrd_all.ci_sequence_number%TYPE,
1778: p_item_code igf_aw_cit_ld_ovrd_all.item_code%TYPE
1779: )
1780: IS
1781: SELECT
1782: SUM(ld_perct)
2009:
2010: --
2011: -- Cursor to fetch the Overidden COA Items
2012: --
2013: CURSOR cur_overide_ld( p_coa_code igf_aw_cit_ld_ovrd_all.coa_code%TYPE,
2014: p_cal_type igf_aw_cit_ld_ovrd_all.ci_cal_type%TYPE,
2015: p_sequence_number igf_aw_cit_ld_ovrd_all.ci_sequence_number%TYPE
2016: )
2017: IS
2010: --
2011: -- Cursor to fetch the Overidden COA Items
2012: --
2013: CURSOR cur_overide_ld( p_coa_code igf_aw_cit_ld_ovrd_all.coa_code%TYPE,
2014: p_cal_type igf_aw_cit_ld_ovrd_all.ci_cal_type%TYPE,
2015: p_sequence_number igf_aw_cit_ld_ovrd_all.ci_sequence_number%TYPE
2016: )
2017: IS
2018: SELECT
2011: -- Cursor to fetch the Overidden COA Items
2012: --
2013: CURSOR cur_overide_ld( p_coa_code igf_aw_cit_ld_ovrd_all.coa_code%TYPE,
2014: p_cal_type igf_aw_cit_ld_ovrd_all.ci_cal_type%TYPE,
2015: p_sequence_number igf_aw_cit_ld_ovrd_all.ci_sequence_number%TYPE
2016: )
2017: IS
2018: SELECT
2019: ld_perct
2023: coa_code = p_coa_code AND
2024: ci_cal_type = p_cal_type AND
2025: ci_sequence_number = p_sequence_number;
2026:
2027: ln_perct igf_aw_cit_ld_ovrd_all.ld_perct%TYPE;
2028:
2029: BEGIN
2030:
2031:
2208: ld_sequence_number = p_ld_sequence_number;
2209:
2210: overide_rec cur_overide%ROWTYPE;
2211: default_ld_rec cur_default_ld%ROWTYPE;
2212: l_cldo_id igf_aw_cit_ld_ovrd_all.cldo_id%TYPE;
2213: lv_ld_rowid ROWID;
2214: ln_count NUMBER(10);
2215:
2216: BEGIN
2297:
2298: get_items_rec cur_get_items%ROWTYPE;
2299:
2300:
2301: l_cldo_id igf_aw_cit_ld_ovrd_all.cldo_id%TYPE;
2302: lv_ld_rowid ROWID;
2303:
2304: BEGIN
2305: