[Home] [Help]
732: END delete_event;
733: --
734: -- Procedure to create custom ADRs based on their existing PAY-GL flex map
735: -- Creates a rule (in xla_rules_t) per Chart of Accounts Segment
736: -- Creates a rule detail (in xla_rule_details_t) for each Payroll Segment
737: -- mapped to this COA Segment
738: -- Creats 1 condition (in xla_conditions_t) for each rule detail
739: -- specifying the Payroll name
740: --
767: l_acc_segment xla_rules_t.flexfield_segment_code%type;
768: l_pay_segment xla_rules_t.flexfield_segment_code%type;
769: l_prev_payroll_id pay_all_payrolls_f.payroll_id%type := -1;
770: l_payroll_name pay_all_payrolls_f.payroll_name%type;
771: l_rule_det_seq xla_rule_details_t.user_sequence%type;
772: --
773: BEGIN
774: --
775: hr_utility.set_location('pay_sla_pkg.create_custom_adrs',10);
829: -- Create the rule detail if it doesn't exist
830:
831: select count(*)
832: into l_rule_det_seq
833: from xla_rule_details_t
834: where application_id = 801
835: and segment_rule_code = l_segment_rule_code;
836:
837: insert into xla_rule_details_t (
833: from xla_rule_details_t
834: where application_id = 801
835: and segment_rule_code = l_segment_rule_code;
836:
837: insert into xla_rule_details_t (
838: application_id,
839: amb_context_code,
840: segment_rule_type_code,
841: segment_rule_code,
861: 0
862: from dual
863: where not exists
864: (select 1
865: from xla_rule_details_t xrd,
866: xla_conditions_t xc
867: where xrd.application_id = 801
868: and xrd.segment_rule_code = l_segment_rule_code
869: and xrd.value_source_code = l_pay_segment
902: 0
903: from dual
904: where not exists
905: (select 1
906: from xla_rule_details_t xrd,
907: xla_conditions_t xc
908: where xrd.application_id = 801
909: and xrd.segment_rule_code = l_segment_rule_code
910: and xrd.value_source_code = l_pay_segment