[Home] [Help]
1709: -- foreign keys that comprise the true key.
1710:
1711: l_null_return varchar2(1); -- For 'select null' statements
1712: l_new_surrogate_key number(15); -- New surrogate key for the delivery row
1713: l_bal_class_id pay_balance_classifications.balance_classification_id%type;
1714:
1715: CURSOR stu -- Selects all rows from startup entity
1716: IS
1717:
1746: from hr_s_balance_classifications hsbc
1747: where balance_type_id = bal_type_id
1748: and not exists
1749: ( select 1
1750: from pay_balance_classifications pbc
1751: where nvl(hsbc.business_group_id, -1) = nvl(pbc.business_group_id, -1)
1752: and hsbc.legislation_code = pbc.legislation_code
1753: and hsbc.balance_type_id = pbc.balance_type_id
1754: and hsbc.classification_id = pbc.classification_id
2428:
2429: IF v_payroll_install_status = 'I' THEN
2430:
2431:
2432: delete from pay_balance_classifications pbc
2433: where balance_type_id = stu_rec.c_surrogate_key
2434: and not exists
2435: ( select 1
2436: from hr_s_balance_classifications hsbc
2462:
2463: END;
2464:
2465: BEGIN
2466: insert into pay_balance_classifications
2467: (BALANCE_CLASSIFICATION_ID
2468: ,BUSINESS_GROUP_ID
2469: ,LEGISLATION_CODE
2470: ,BALANCE_TYPE_ID
2475: ,LAST_UPDATED_BY
2476: ,LAST_UPDATE_LOGIN
2477: ,CREATED_BY
2478: ,CREATION_DATE)
2479: select pay_balance_classifications_s.nextval
2480: , bal_classes.business_group_id
2481: , bal_classes.legislation_code
2482: , bal_classes.balance_type_id
2483: , bal_classes.classification_id
2509: --
2510: -- need to insert balance feeds to those existing elements that have the
2511: -- same classification as the balance classification just inserted.
2512: --
2513: select pay_balance_classifications_s.currval
2514: into l_bal_class_id
2515: from dual;
2516: --
2517: hr_balance_feeds.ins_bf_bal_class