486: --
487:
488: CURSOR csr_get_udt_id IS
489: SELECT user_table_id
490: FROM pay_user_tables
491: WHERE user_table_name = p_udt_name
492: AND (business_group_id = p_bg_id OR
493: business_group_id IS NULL);
494:
492: AND (business_group_id = p_bg_id OR
493: business_group_id IS NULL);
494:
495: l_proc_name VARCHAR2(72) := g_proc_name || 'get_user_table_id';
496: l_user_table_id pay_user_tables.user_table_id%TYPE;
497:
498: --
499: BEGIN
500: --
527: SELECT pay_user_rows_s.NEXTVAL
528: FROM dual;
529:
530: l_proc_name VARCHAR2(72) := g_proc_name || 'create_udt';
531: l_user_table_id pay_user_tables.user_table_id%TYPE;
532: l_user_column_id pay_user_columns.user_column_id%TYPE;
533: l_user_row_id pay_user_rows_f.user_row_id%TYPE;
534: l_udt_rowid rowid ;
535: l_udt_cols_rowid rowid;
545: -- Create the UDT
546:
547: hr_utility.set_location (l_proc_name, 20);
548:
549: pay_user_tables_pkg.insert_row
550: (p_rowid => l_udt_rowid
551: ,p_user_table_id => l_user_table_id
552: ,p_business_group_id => p_bg_id
553: ,p_legislation_code => NULL
1639: l_template_id NUMBER(9);
1640: l_proc_name varchar2(72) := g_proc_name || 'delete_user_template';
1641: l_eei_info_id number;
1642: l_ovn_eei number;
1643: l_entudt_id pay_user_tables.user_table_id%TYPE;
1644: l_caludt_id pay_user_tables.user_table_id%TYPE;
1645: l_lookup_type fnd_lookup_types_vl.lookup_type%TYPE;
1646: l_lookup_code fnd_lookup_values_vl.lookup_code%TYPE;
1647: l_exists VARCHAR2(1);
1640: l_proc_name varchar2(72) := g_proc_name || 'delete_user_template';
1641: l_eei_info_id number;
1642: l_ovn_eei number;
1643: l_entudt_id pay_user_tables.user_table_id%TYPE;
1644: l_caludt_id pay_user_tables.user_table_id%TYPE;
1645: l_lookup_type fnd_lookup_types_vl.lookup_type%TYPE;
1646: l_lookup_code fnd_lookup_values_vl.lookup_code%TYPE;
1647: l_exists VARCHAR2(1);
1648: l_element_type_id pay_element_types_f.element_type_id%TYPE;
1974: PROCEDURE delete_udt (p_udt_id IN NUMBER) IS
1975:
1976: CURSOR csr_get_usr_table_id IS
1977: SELECT rowid
1978: FROM pay_user_tables
1979: WHERE user_table_id = p_udt_id
1980: AND business_group_id = p_business_group_id;
1981:
1982: CURSOR csr_get_usr_col_id IS
2001: --
2002: hr_utility.set_location ('Entering '||l_proc_name, 10);
2003: --
2004:
2005: -- Get user_table_id from pay_user_tables
2006: OPEN csr_get_usr_table_id;
2007: FETCH csr_get_usr_table_id INTO l_rowid;
2008:
2009: IF csr_get_usr_table_id%FOUND THEN
2051: END LOOP;
2052: CLOSE csr_get_usr_row_id;
2053:
2054:
2055: -- Delete pay_user_tables for this table id
2056: hr_utility.set_location (l_proc_name, 60);
2057: pay_user_tables_pkg.delete_row
2058: (p_rowid => l_rowid
2059: ,p_user_table_id => p_udt_id
2053:
2054:
2055: -- Delete pay_user_tables for this table id
2056: hr_utility.set_location (l_proc_name, 60);
2057: pay_user_tables_pkg.delete_row
2058: (p_rowid => l_rowid
2059: ,p_user_table_id => p_udt_id
2060: );
2061: