[Home] [Help]
70: ins_3p_element_link
71: upd_3p_element_links
72: del_3p_element_links
73: 17-Feb-93 J.S.Hobbs 30.10 Altered insert_alu and
74: create_standard_entries_el.
75: 03-Mar-1993 J.S.Hobbs 30.11 Removed get_termination_date,
76: get_entry_start_date_qc and
77: create_rec_element_entry.
78: They all exist in hrentmnt
85: _s.
86: 29-Apr-1993 30.14 Change made to chk_element_links
87: to calculate end date.
88: 07-Jun-1993 J.S.Hobbs 30.23 Corrected
89: create_standard_entries_el.
90: 21-Jun-1993 M Dyer 30.24 changes made to chk_mutual
91: exclusivity to return end date
92: of link. Now called from
93: chk_element_link.
113: to cope with two new
114: criteria ie. PAY_BASIS_ID and
115: EMPLOYMENT_CATEGORY.
116: -Removed
117: create_standard_entries_el
118: and recoded in hrentmnt with
119: a new prcoedure called
120: maintain_entries_el.
121: -Changed insert_alu so that
125: to restrict element links
126: checked to the user's
127: business group. G525
128: 17-Feb-94 N Simpson Added procedure link_flag_updated and modified upd_3p_element_link
129: to allow update of standard
130: link flag from No to Yes, thus
131: allowing changes to be made to
132: the input value defaults before
133: the creation of standard entries
129: to allow update of standard
130: link flag from No to Yes, thus
131: allowing changes to be made to
132: the input value defaults before
133: the creation of standard entries
134: 1 Mar 94 N Simpson B400 -- Added check that all
135: mandatory input values have
136: defaults, before creating
137: standard entries.
133: the creation of standard entries
134: 1 Mar 94 N Simpson B400 -- Added check that all
135: mandatory input values have
136: defaults, before creating
137: standard entries.
138: --
139: 4 May 95 N Simpson B280150 Included location check in
140: chk_mutual_exclusivity. The
141: flag had been set but was not
636: NAME
637: ins_3p_element_link
638: DESCRIPTION
639: This procedure inserts link input values when an element link is
640: created. It will also insert Assignment link usages and Standard
641: recurring entries.
642: */
643: --
644: procedure ins_3p_element_link
646: p_element_link_id in number,
647: p_element_type_id in number,
648: p_val_start_date in date,
649: p_val_end_date in date,
650: p_standard_link_flag in varchar2,
651: p_payroll_id in number,
652: p_link_to_all_payrolls_flag in varchar2,
653: p_job_id in number,
654: p_grade_id in number,
667: p_business_group_id in number,
668: p_legislation_code in varchar2
669: ) is
670: --
671: -- Cursor returns a row if a mandatory input value for a standard link has no
672: -- default value
673: --
674: cursor csr_link_defaults is
675: select 1
677: pay_input_values_f TYPE
678: where link.element_link_id = p_element_link_id
679: and link.input_value_id = type.input_value_id
680: and type.mandatory_flag = 'Y'
681: and p_standard_link_flag = 'Y'
682: and ((link.default_value is null and type.hot_default_flag = 'N')
683: or (type.default_value is null and link.default_value is null
684: and type.hot_default_flag = 'Y'));
685: --
720: --
721: --
722: hr_utility.set_location('hr_element_links.ins_3p_element_link', 3);
723: --
724: -- Error if standard link has a mandatory input value with no default.
725: --
726: open csr_link_defaults;
727: fetch csr_link_defaults into v_dummy;
728: if csr_link_defaults%found then
732: close csr_link_defaults;
733: --
734: hr_utility.set_location('hr_element_links.ins_3p_element_link', 4);
735: --
736: -- Create standard entries
737: --
738: if p_standard_link_flag = 'Y' then
739: hrentmnt.maintain_entries_el
740: (p_business_group_id,
734: hr_utility.set_location('hr_element_links.ins_3p_element_link', 4);
735: --
736: -- Create standard entries
737: --
738: if p_standard_link_flag = 'Y' then
739: hrentmnt.maintain_entries_el
740: (p_business_group_id,
741: p_element_link_id,
742: p_element_type_id,
822: end if;
823: --
824: hr_utility.set_location('hr_element_links.upd_3p_element_link', 2);
825: --
826: -- Create standard entries if standard link flag is updated to 'Y'
827: --
828: if p_old_link_flag = 'N' and p_link_flag = 'Y' then
829: hr_element_links.link_flag_updated (p_element_link_id);
830: hrentmnt.maintain_entries_el