[Home] [Help]
154: cursor ba_use_cur is
155: select ba.group_id, bau.org_id, bau.legal_entity_id, bau.source_application_id,
156: bau.ce_upgrade_id, to_char(ba.creation_date,'DD/MM/YYYY'),
157: pay_use_enable_flag, payroll_bank_account_id
158: from ce_upg_bank_accounts ba, ce_upg_ba_uses_all bau
159: where ba.ce_upgrade_id = bau.parent_upgrade_id
160: and bau.group_id is null
161: order by ba.group_id, bau.org_id, bau.legal_entity_id,
162: decode(bau.source_application_id, 200, 1, 185, 2, 801, 3),
1763: -- 6) Grouping account use records
1764: -- 6.1 Set primary account records
1765: c := '128';
1766: forall i in c_upg_id.first..c_upg_id.last
1767: update ce_upg_ba_uses_all bau
1768: set group_id = c_upg_id(i),
1769: primary_acct_use_flag = 'Y',
1770: secondary_acct_use_flag = 'N',
1771: last_update_date = sysdate,
1772: last_updated_by = nvl(FND_GLOBAL.user_id,-1)
1773: where ce_upgrade_id = c_upg_id(i)
1774: and not exists
1775: (select null
1776: from ce_upg_bank_accounts ba, ce_upg_ba_uses_all bau2
1777: where ba.ce_upgrade_id = bau2.parent_upgrade_id
1778: and ba.group_id = c_group_id(i)
1779: and nvl(bau2.org_id, -1) = nvl(bau.org_id, -1)
1780: and nvl(bau2.legal_entity_id, -1) = nvl(bau.legal_entity_id, -1)
1782: and bau2.primary_acct_use_flag = 'Y');
1783:
1784: -- 6.2 Set secondary account records (dummy Payroll only)
1785: forall i in c_upg_id.first..c_upg_id.last
1786: update ce_upg_ba_uses_all bau
1787: set group_id =
1788: (select bau2.group_id
1789: from ce_upg_bank_accounts ba, ce_upg_ba_uses_all bau2
1790: where ba.ce_upgrade_id = bau2.parent_upgrade_id
1785: forall i in c_upg_id.first..c_upg_id.last
1786: update ce_upg_ba_uses_all bau
1787: set group_id =
1788: (select bau2.group_id
1789: from ce_upg_bank_accounts ba, ce_upg_ba_uses_all bau2
1790: where ba.ce_upgrade_id = bau2.parent_upgrade_id
1791: and ba.group_id = c_group_id(i)
1792: and bau2.org_id = bau.org_id
1793: and bau2.source_application_id = 200
1800: and group_id is null
1801: and source_application_id = 801
1802: and not exists
1803: (select null
1804: from ce_upg_bank_accounts ba, ce_upg_ba_uses_all bau2
1805: where ba.ce_upgrade_id = bau2.parent_upgrade_id
1806: and ba.group_id = c_group_id(i)
1807: and bau2.org_id = bau.org_id
1808: and bau2.source_application_id = bau.source_application_id
1808: and bau2.source_application_id = bau.source_application_id
1809: and bau2.group_id is not null)
1810: and exists
1811: (select null
1812: from ce_upg_bank_accounts ba, ce_upg_ba_uses_all bau2
1813: where ba.ce_upgrade_id = bau2.parent_upgrade_id
1814: and ba.group_id = c_group_id(i)
1815: and bau2.org_id = bau.org_id
1816: and bau2.primary_acct_use_flag = 'Y');
1817:
1818: -- 6.3 Group all other bank account use records
1819: c := '129';
1820: forall i in c_upg_id.first..c_upg_id.last
1821: update ce_upg_ba_uses_all bau
1822: set group_id =
1823: (select bau2.group_id
1824: from ce_upg_bank_accounts ba, ce_upg_ba_uses_all bau2
1825: where ba.group_id = c_group_id(i)
1820: forall i in c_upg_id.first..c_upg_id.last
1821: update ce_upg_ba_uses_all bau
1822: set group_id =
1823: (select bau2.group_id
1824: from ce_upg_bank_accounts ba, ce_upg_ba_uses_all bau2
1825: where ba.group_id = c_group_id(i)
1826: and ba.ce_upgrade_id = bau2.parent_upgrade_id
1827: and bau2.org_id = bau.org_id
1828: and bau2.source_application_id =
1838:
1839: c := '130';
1840: -- 6.4 Populate secondary attributes to primary records
1841: forall i in c_upg_id.first..c_upg_id.last
1842: update ce_upg_ba_uses_all bau
1843: set pay_use_enable_flag = c_pay_flag(i),
1844: payroll_bank_account_id = c_pay_ba_id(i),
1845: last_update_date = sysdate,
1846: last_updated_by = nvl(FND_GLOBAL.user_id,-1)
1847: where source_application_id = 200
1848: and primary_acct_use_flag = 'Y'
1849: and exists
1850: (select null
1851: from ce_upg_ba_uses_all bau2
1852: where bau2.group_id = bau.ce_upgrade_id
1853: and bau2.ce_upgrade_id = c_upg_id(i)
1854: and bau2.source_application_id = 801
1855: and bau2.secondary_acct_use_flag = 'Y');