[Home] [Help]
1: PACKAGE BODY pay_sla_pkg AS
2: /* $Header: pysla.pkb 120.17 2011/05/17 13:08:31 nchinnam ship $ */
3: --
4: /*
5: * ***************************************************************************
9: PRODUCT
10: Oracle*Payroll
11: --
12: NAME
13: PAY_SLA_PKG - Payroll support for SLA (Sub Ledger Accounting)
14: --
15: --
16: DESCRIPTION
17: --
110: l_event_source_info xla_events_pub_pkg.t_event_source_info;
111: l_security_context xla_events_pub_pkg.t_security;
112: BEGIN
113: --
114: hr_utility.set_location('pay_sla_pkg.trans_asg_costs',10);
115: --
116: SELECT pa.payroll_action_id,
117: pa1.assignment_id,
118: pa1.assignment_action_id,
155: SELECT pa2.assignment_action_id,
156: ppa2.payroll_action_id,
157: ppa2.action_type,
158: pap.gl_set_of_books_id,
159: pay_sla_pkg.get_accounting_date
160: (ppa2.action_type, c_effective_date,
161: ppa2.effective_date, ppa2.date_earned)
162: INTO r_assignment_action_id,
163: r_payroll_action_id,
241: -- Estimate Costing : event class ESTIMATE_COSTS
242: --
243: hr_utility.set_location('pytrgl.trans_ass_costs',30);
244: --
245: SELECT pay_sla_pkg.get_ecost_accounting_date
246: (pera.payroll_id, c_effective_date),
247: pap.gl_set_of_books_id
248: INTO l_rev_accounting_date,
249: l_ledger_id
381: AND PAYE.event_status <> 'C';
382:
383: BEGIN
384: --
385: hr_utility.set_location('pay_sla_pkg.post_process_event',10);
386: --
387: IF (p_application_id <> 801) THEN
388: RETURN;
389: END IF;
396: END IF;
397: --
398: for xlarec in xla_events_cur loop
399: --
400: hr_utility.set_location('pay_sla_pkg.post_process_event',10);
401: --
402: --
403: -- Mark the Events as complete
404: --
423: l_user_currency_type VARCHAR2(30);
424: l_currency_type VARCHAR2(30);
425: BEGIN
426: --
427: hr_utility.set_location('Entering pay_sla_pkg.get_conversion_type',10);
428: --
429: if (g_business_group_id is not null) and
430: (i_business_group_id = g_business_group_id) and
431: (i_conversion_date = g_conversion_date) then
437: l_user_currency_type := hruserdt.get_table_value(i_business_group_id,
438: 'EXCHANGE_RATE_TYPES', 'Conversion Rate Type',
439: 'PAY',i_conversion_date);
440:
441: hr_utility.set_location('In pay_sla_pkg.get_conversion_type l_user_currency_type '||l_user_currency_type,15);
442: /*Begin Bug 7283055 USER_CONVERSION_TYPE was getting returned need to return Conversion Type */
443: open get_conv_type(l_user_currency_type);
444: fetch get_conv_type into l_currency_type;
445: close get_conv_type;
448: g_business_group_id := i_business_group_id;
449: g_conversion_date := i_conversion_date;
450: --
451: end if;
452: hr_utility.set_location('In pay_sla_pkg.get_conversion_type l_currency_type '||l_currency_type,20);
453: hr_utility.set_location('In pay_sla_pkg.get_conversion_type g_currency_type '||g_currency_type,30);
454: hr_utility.set_location('Leaving pay_sla_pkg.get_conversion_type',40);
455: --
456: return(l_currency_type);
449: g_conversion_date := i_conversion_date;
450: --
451: end if;
452: hr_utility.set_location('In pay_sla_pkg.get_conversion_type l_currency_type '||l_currency_type,20);
453: hr_utility.set_location('In pay_sla_pkg.get_conversion_type g_currency_type '||g_currency_type,30);
454: hr_utility.set_location('Leaving pay_sla_pkg.get_conversion_type',40);
455: --
456: return(l_currency_type);
457: --
450: --
451: end if;
452: hr_utility.set_location('In pay_sla_pkg.get_conversion_type l_currency_type '||l_currency_type,20);
453: hr_utility.set_location('In pay_sla_pkg.get_conversion_type g_currency_type '||g_currency_type,30);
454: hr_utility.set_location('Leaving pay_sla_pkg.get_conversion_type',40);
455: --
456: return(l_currency_type);
457: --
458: END get_conversion_type;
465: RETURN DATE IS
466: l_accounting_date DATE;
467: BEGIN
468: --
469: hr_utility.set_location('pay_sla_pkg.get_accounting_date',10);
470: --
471: if (run_action_type in ('B', 'V')) then
472: --
473: -- For Reversals and Balance Adjustments
526: RETURN DATE IS
527: l_accounting_date DATE;
528: BEGIN
529: --
530: hr_utility.set_location('pay_sla_pkg.get_ecost_accounting_date',10);
531: --
532: --
533: -- For Estimate Costs
534: -- negation deltas at end of payroll period only
595: p_report_request_id NUMBER)
596: IS
597: BEGIN
598: --
599: hr_utility.set_location('pay_sla_pkg.preaccounting',10);
600: --
601: END preaccounting;
602: --
603: -- Stub for XLA postaccounting hook
618: p_report_request_id NUMBER)
619: IS
620: BEGIN
621: --
622: hr_utility.set_location('pay_sla_pkg.postaccounting',10);
623: --
624: END postaccounting;
625: --
626: --
631: p_accounting_mode VARCHAR2)
632: IS
633: BEGIN
634: --
635: hr_utility.set_location('pay_sla_pkg.extract',10);
636: --
637: END extract;
638: --
639: -- Delet_event : called form rollback code
653: l_security_context xla_events_pub_pkg.t_security;
654:
655: BEGIN
656: --
657: hr_utility.set_location('pay_sla_pkg.delete_event',10);
658: --
659: -- Confirm no Completed events for this action
660: --
661: SELECT count(*)
790: l_rule_det_seq xla_rule_details_t.user_sequence%type;
791: --
792: BEGIN
793: --
794: hr_utility.set_location('pay_sla_pkg.create_custom_adrs',10);
795: --
796: for segmap in segmaps loop
797:
798: l_acc_segment := segmap.gl_account_segment;
939: xla_adr_interface_pkg.upload_rules;
940: --
941: END create_custom_adrs;
942: --
943: END pay_sla_pkg;