[Home] [Help]
331:
332: BEGIN
333: SELECT 1
334: INTO l_reference
335: FROM dual WHERE EXISTS (SELECT NULL FROM pay_element_classifications
336: WHERE nvl(legislation_code,'X') = 'ZZ'
337: AND business_group_id IS NULL);
338:
339: EXCEPTION
687: legislation_subgroup,costable_flag,default_high_priority,default_low_priority,
688: default_priority,distributable_over_flag,non_payments_flag,costing_debit_or_credit,
689: parent_classification_id,create_by_default_flag,last_update_date,last_updated_by,
690: last_update_login,created_by,creation_date,balance_initialization_flag,object_version_number
691: FROM pay_element_classifications
692: WHERE nvl(legislation_code,'X') = 'ZZ'
693: AND business_group_id IS NULL;
694:
695: CURSOR get_balance_type_csr IS
809: SELECT ao.key_name
810: ,ao.product_name
811: ,ao.key_value
812: FROM hr_application_ownerships ao
813: ,pay_element_classifications pec
814: WHERE pec.legislation_code = 'ZZ'
815: AND ao.key_name = 'CLASSIFICATION_ID'
816: AND TO_NUMBER(ao.key_value) = pec.classification_id
817: UNION ALL
1989:
1990: CURSOR get_classid_btable_csr IS
1991: SELECT b.classification_id bid , b.classification_name bname,
1992: t.language, t.classification_name tname, t.description, t.source_lang
1993: FROM pay_element_classifications_tl t, pay_element_classifications b
1994: WHERE b.classification_id = t.classification_id
1995: AND b.legislation_code = 'ZZ'
1996: AND b.business_group_id IS NULL;
1997:
1997:
1998:
1999: CURSOR get_classid_tltable_csr(l_legislation_code VARCHAR2 , l_name VARCHAR2 , l_language VARCHAR2) IS
2000: SELECT t.classification_id tlid
2001: FROM pay_element_classifications_tl t, pay_element_classifications b
2002: WHERE b.classification_name = l_name
2003: AND b.legislation_code = l_legislation_code
2004: AND b.business_group_id is NULL
2005: AND t.classification_id = b.classification_id
2017: fetch get_classid_tltable_csr INTO rec_tltable_csr ;
2018:
2019: if get_classid_tltable_csr%found then
2020:
2021: UPDATE pay_element_classifications_tl
2022: SET classification_name = l_record.tname,
2023: description = l_record.description,
2024: source_lang = l_record.source_lang
2025: WHERE classification_id = rec_tltable_csr.tlid
3494: write_log('LOG',NULL,NULL,NULL);
3495: write_log('LOG','PAY_34017_IP_UPD_TL_TABLE',NULL,NULL);
3496:
3497: hr_utility.set_location('pay_ip_startup_util.setup',90);
3498: write_log('LOG','PAY_34015_IP_UPD_TABLE','PAY_ELEMENT_CLASSIFICATIONS_TL',NULL);
3499: update_ele_class_tl(p_legislation_code);
3500:
3501: hr_utility.set_location('pay_ip_startup_util.setup',100);
3502: write_log('LOG','PAY_34015_IP_UPD_TABLE','PAY_BALANCE_TYPES_TL',NULL);