[Home] [Help]
1: package body SSP_SAP_PKG as
2: /*$Header: spsapapi.pkb 120.1.12000000.3 2007/08/02 06:44:58 pbalu noship $
3: +==============================================================================+
4: | Copyright (c) 1994 Oracle Corporation |
5: | Redwood Shores, California, USA |
42: 02-AUG-07 P Balu 6271407 Changed the To_Date function to fnd_date.canonical_to_date
43: function in the cursor csr_existing_entries.
44: */
45: --------------------------------------------------------------------------------
46: g_package varchar2(33) := ' ssp_sap_pkg.'; -- Global package name
47: --
48:
49: cursor csr_absence_details (p_maternity_id in number) is
50: --
67: -- Get details of the maternal woman
68: --
69: select maternity.person_id,
70: maternity.due_date,
71: ssp_sap_pkg.MATCHING_WEEK_OF_ADOPTION (MATCHING_DATE) MW,
72: MATCHING_DATE MATCHING_DATE,
73: PLACEMENT_DATE PLACEMENT_DATE,
74: DISRUPTED_PLACEMENT_DATE DISRUPTED_PLACEMENT_DATE,
75: maternity.maternity_id,
477: --
478: select 1
479: from per_periods_of_service
480: where person_id = person.person_id
481: and date_start <= ssp_sap_pkg.continuous_employment_date
482: (person.matching_date)
483: and nvl (actual_termination_date, hr_general.end_of_time)
484: >= person.MW;
485: --
924: p_reason => 'Late absence notification');
925: */
926: end if;
927: --
928: hr_utility.set_location ('ssp_sap_pkg.entitled_to_SaP',3);
929: --
930: -- Check for any work done during the APP.
931: --
932: if
1158: l_high_rate RATE,
1159: --BUG 6271407 begin
1160: /* to_date (ssp_smp_support_pkg.value
1161: (entry.element_entry_id,
1162: ssp_sap_pkg.c_week_commencing_name),
1163: 'DD-MON-YYYY') WEEK_COMMENCING,*/
1164: fnd_date.canonical_to_date(ssp_smp_support_pkg.value
1165: (entry.element_entry_id,
1166: ssp_sap_pkg.c_week_commencing_name)) WEEK_COMMENCING,
1162: ssp_sap_pkg.c_week_commencing_name),
1163: 'DD-MON-YYYY') WEEK_COMMENCING,*/
1164: fnd_date.canonical_to_date(ssp_smp_support_pkg.value
1165: (entry.element_entry_id,
1166: ssp_sap_pkg.c_week_commencing_name)) WEEK_COMMENCING,
1167: --BUG 6271407 end
1168: to_number(ssp_smp_support_pkg.value (entry.element_entry_id,
1169: ssp_sap_pkg.c_amount_name)) AMOUNT,
1170: to_number(ssp_smp_support_pkg.value (entry.element_entry_id,
1165: (entry.element_entry_id,
1166: ssp_sap_pkg.c_week_commencing_name)) WEEK_COMMENCING,
1167: --BUG 6271407 end
1168: to_number(ssp_smp_support_pkg.value (entry.element_entry_id,
1169: ssp_sap_pkg.c_amount_name)) AMOUNT,
1170: to_number(ssp_smp_support_pkg.value (entry.element_entry_id,
1171: ssp_sap_pkg.c_recoverable_amount_name)) RECOVERABLE_AMOUNT
1172: from pay_element_entries_f ENTRY,
1173: per_all_assignments_f asg
1167: --BUG 6271407 end
1168: to_number(ssp_smp_support_pkg.value (entry.element_entry_id,
1169: ssp_sap_pkg.c_amount_name)) AMOUNT,
1170: to_number(ssp_smp_support_pkg.value (entry.element_entry_id,
1171: ssp_sap_pkg.c_recoverable_amount_name)) RECOVERABLE_AMOUNT
1172: from pay_element_entries_f ENTRY,
1173: per_all_assignments_f asg
1174: where creator_type = c_SAP_creator_type
1175: and creator_id = p_maternity_id
1506: -- we are and finding the offset from the start date.
1507: --
1508: begin
1509: --
1510: hr_utility.set_location ('Entering: ssp_sap_pkg.derive_SAP_week',1);
1511: hr_utility.trace ('Entry number = '||to_char (p_week_number));
1512: --
1513: hypothetical_entry.week_commencing (p_week_number)
1514: := (person.APP_start_date + ((p_week_number -1) * 7));
1520: --
1521: hr_utility.trace ('week_commencing = '
1522: ||to_char (hypothetical_entry.week_commencing (p_week_number)));
1523: --
1524: hr_utility.set_location ('Leaving : ssp_sap_pkg.derive_SAP_week',100);
1525: --
1526: end derive_SAP_week;
1527: --
1528: procedure Check_SAP_stoppages (p_week_number in integer) is
1557: l_dummy integer (1);
1558: --
1559: begin
1560: --
1561: hr_utility.set_location ('ssp_sap_pkg.Check_SAP_stoppages',1);
1562: --
1563: hypothetical_entry.stopped (p_week_number) := 'FALSE';
1564: --
1565: open csr_stoppages (
1585: end if;
1586: --
1587: close csr_stoppages;
1588: --
1589: hr_utility.set_location ('ssp_sap_pkg.Check_SAP_stoppages',10);
1590: --
1591: end Check_SAP_stoppages;
1592: --
1593: procedure Calculate_correct_SAP_rate (p_week_number in number) is
1603: and lookup_code = p_rate_band;
1604: --
1605: begin
1606: --
1607: hr_utility.set_location ('ssp_sap_pkg.Calculate_correct_SAP_rate',1);
1608: --
1609: if l_high_rate is null then
1610: --
1611: -- Get the meanings for the rate bands
1636: --
1637: hr_utility.trace ('SAP Rate = '
1638: ||hypothetical_entry.rate (p_week_number));
1639: --
1640: hr_utility.set_location ('ssp_sap_pkg.Calculate_correct_SAP_rate',10);
1641: --
1642: end Calculate_correct_SaP_rate;
1643: --
1644: procedure Calculate_SAP_amounts (p_week_number in integer, p_APP_start_date in date) is
1644: procedure Calculate_SAP_amounts (p_week_number in integer, p_APP_start_date in date) is
1645: --
1646: begin
1647: --
1648: hr_utility.set_location('Entering: ssp_sAp_pkg.Calculate_SaP_amounts',1);
1649: --
1650: -- Get the SAP element for each week in case the SAP rate has changed
1651: --
1652: get_SAP_element (hypothetical_entry.week_commencing (p_week_number));
1665: ||to_char (hypothetical_entry.amount (p_week_number)));
1666: hr_utility.trace ('Recoverable amount = '
1667: ||to_char (hypothetical_entry.recoverable_amount (p_week_number)));
1668: --
1669: hr_utility.set_location('Leaving : ssp_sap_pkg.Calculate_SAP_amounts',100);
1670: --
1671: end calculate_SAP_amounts;
1672: --
1673: procedure check_parameters is
1680: end check_parameters;
1681: --
1682: begin
1683: --
1684: hr_utility.set_location ('ssp_sap_pkg.generate_payments',1);
1685: --
1686: check_parameters;
1687: --
1688: <
1851: return l_due_date;
1852: end if;
1853: end;
1854: --------------------------------------------------------------------------------
1855: end ssp_SAP_pkg;