[Home] [Help]
943: is
944: --
945: cursor dtexists is
946: select dated_table_id, object_version_number
947: from pay_dated_tables pdt
948: where table_name = p_table_name;
949: --
950: found boolean;
951: l_dated_tables_id number;
990: found := TRUE;
991: end loop;
992: --
993: if (found = FALSE) then
994: pay_dated_tables_api.CREATE_DATED_TABLE(
995: p_table_name => p_table_name
996: , p_application_id => null
997: , p_surrogate_key_name => p_surr_key_name
998: , p_start_date_name => p_eff_str_name
1850: l_pkg_name := p_table_name;
1851:
1852: select pdt.dated_table_id
1853: into l_dated_table_id
1854: from pay_dated_tables pdt
1855: where pdt.table_name = p_table_name;
1856:
1857: -- >>> PHASE 1: Create the dyt_pkg name based on table_name
1858: --
1879:
1880: -- >>> PHASE 2: Set the dated table to have dyt in package
1881: --
1882:
1883: update pay_dated_tables pdt
1884: set application_id = l_app_id,
1885: dyn_trigger_type = 'P',
1886: dyn_trigger_package_name = l_pkg_name,
1887: dyn_trig_pkg_generated = 'N'
1944:
1945: BEGIN
1946: -- >>> PHASE 1: Set the dated table to have old-skool dyt
1947: --
1948: update pay_dated_tables pdt
1949: set dyn_trigger_type = 'T',
1950: dyn_trigger_package_name = null,
1951: dyn_trig_pkg_generated = null
1952: where pdt.table_name = p_table_name;
1955: --
1956: DELETE
1957: FROM pay_trigger_parameters ptp
1958: WHERE ptp.usage_id = (select dated_table_id
1959: from pay_dated_tables pdt
1960: where pdt.table_name = p_table_name)
1961: AND ptp.usage_type in ('PI','PU','PD');
1962:
1963: END DROP_DYT_PKG_BEHAVIOUR;
1982: cursor get_group_events(p_cca_date date, p_sysdate date) is
1983: select pdt.table_name,ppe.surrogate_key
1984: from pay_process_events ppe,
1985: pay_event_updates peu,
1986: pay_dated_tables pdt
1987: where ppe.assignment_id is null
1988: and ppe.creation_date between p_cca_date
1989: and p_sysdate
1990: AND ppe.change_type in ('DATE_PROCESSED', 'DATE_EARNED')
1998: run_counts number;
1999: l_update_cc_date boolean;
2000: new_cc_date date;
2001: old_cc_date date;
2002: l_table_name pay_dated_tables.table_name%type;
2003: l_surrogate_key pay_process_events.surrogate_key%type;
2004: l_grp_event_valid varchar2(5);
2005:
2006: begin