DBA Data[Home] [Help]

APPS.PAY_ELE_SHD dependencies on PAY_ELE_SHD

Line 1: Package Body pay_ele_shd as

1: Package Body pay_ele_shd as
2: /* $Header: pyelerhi.pkb 120.1 2005/05/30 05:19:19 rajeesha noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |

Line 8: g_package varchar2(33) := ' pay_ele_shd.'; -- Global package name

4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' pay_ele_shd.'; -- Global package name
9: g_counter number;
10: --
11: -- ----------------------------------------------------------------------------
12: -- |------------------------< return_api_dml_status >-------------------------|

Line 178: pay_ele_shd.g_old_rec.element_entry_id and

174: --
175: l_fct_ret := false;
176: Else
177: If (p_element_entry_id =
178: pay_ele_shd.g_old_rec.element_entry_id and
179: p_object_version_number =
180: pay_ele_shd.g_old_rec.object_version_number) Then
181: --
182: -- The g_old_rec is current therefore we must

Line 180: pay_ele_shd.g_old_rec.object_version_number) Then

176: Else
177: If (p_element_entry_id =
178: pay_ele_shd.g_old_rec.element_entry_id and
179: p_object_version_number =
180: pay_ele_shd.g_old_rec.object_version_number) Then
181: --
182: -- The g_old_rec is current therefore we must
183: -- set the returning function to true
184: --

Line 191: Fetch C_Sel1 Into pay_ele_shd.g_old_rec;

187: --
188: -- Select the current row
189: --
190: Open C_Sel1;
191: Fetch C_Sel1 Into pay_ele_shd.g_old_rec;
192: If C_Sel1%notfound Then
193: Close C_Sel1;
194: --
195: -- The primary key is invalid therefore we must error

Line 206: <> pay_ele_shd.g_old_rec.object_version_number) Then

202: -- 11-NOV-03
203: -- Caching for Hard calls to DYT_PKG removed
204:
205: If (p_object_version_number
206: <> pay_ele_shd.g_old_rec.object_version_number) Then
207: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
208: fnd_message.raise_error;
209: End If;
210: l_fct_ret := true;

Line 420: pay_ele_shd.g_api_dml := true; -- Set the api dml status

416: ,p_base_key_value => p_base_key_value
417: );
418: --
419: hr_utility.set_location(l_proc, 10);
420: pay_ele_shd.g_api_dml := true; -- Set the api dml status
421: --
422: -- Update the specified datetrack row setting the effective
423: -- end date to the specified new effective end date.
424: --

Line 432: pay_ele_shd.g_api_dml := false; -- Unset the api dml status

428: where t.element_entry_id = p_base_key_value
429: and p_effective_date
430: between t.effective_start_date and t.effective_end_date;
431: --
432: pay_ele_shd.g_api_dml := false; -- Unset the api dml status
433: p_object_version_number := l_object_version_number;
434: hr_utility.set_location(' Leaving:'||l_proc, 15);
435: --
436: Exception

Line 438: pay_ele_shd.g_api_dml := false; -- Unset the api dml status

434: hr_utility.set_location(' Leaving:'||l_proc, 15);
435: --
436: Exception
437: When Others Then
438: pay_ele_shd.g_api_dml := false; -- Unset the api dml status
439: Raise;
440: --
441: End upd_effective_end_date;
442: --

Line 558: where hc.comment_id = pay_ele_shd.g_old_rec.comment_id;

554: --
555: Cursor C_Sel3 is
556: select hc.comment_text
557: from hr_comments hc
558: where hc.comment_id = pay_ele_shd.g_old_rec.comment_id;
559: --
560: -- Assignment locking cursor
561: --
562: cursor c_sel4 is

Line 565: where assignment_id = pay_ele_shd.g_old_rec.assignment_id

561: --
562: cursor c_sel4 is
563: select assignment_id
564: from per_all_assignments_f
565: where assignment_id = pay_ele_shd.g_old_rec.assignment_id
566: for update nowait;
567: --
568:
569: Begin

Line 605: Fetch C_Sel1 Into pay_ele_shd.g_old_rec;

601: --
602: -- We must select and lock the current row.
603: --
604: Open C_Sel1;
605: Fetch C_Sel1 Into pay_ele_shd.g_old_rec;
606: If C_Sel1%notfound then
607: Close C_Sel1;
608: --
609: -- The primary key is invalid therefore we must error

Line 618: <> pay_ele_shd.g_old_rec.object_version_number) Then

614: Close C_Sel1;
615: hr_utility.set_location('Entering ovn check:'||l_proc, 52);
616:
617: If (p_object_version_number
618: <> pay_ele_shd.g_old_rec.object_version_number) Then
619: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
620: fnd_message.raise_error;
621: End If;
622: --

Line 626: If ((pay_ele_shd.g_old_rec.comment_id is not null) and

622: --
623: -- Providing we are doing an update and a comment_id exists then
624: -- we select the comment text.
625: --
626: If ((pay_ele_shd.g_old_rec.comment_id is not null) and
627: (p_datetrack_mode = hr_api.g_update or
628: p_datetrack_mode = hr_api.g_correction or
629: p_datetrack_mode = hr_api.g_update_override or
630: p_datetrack_mode = hr_api.g_update_change_insert)) then

Line 632: Fetch C_Sel3 Into pay_ele_shd.g_old_rec.comments;

628: p_datetrack_mode = hr_api.g_correction or
629: p_datetrack_mode = hr_api.g_update_override or
630: p_datetrack_mode = hr_api.g_update_change_insert)) then
631: Open C_Sel3;
632: Fetch C_Sel3 Into pay_ele_shd.g_old_rec.comments;
633: If C_Sel3%notfound then
634: --
635: -- The comments for the specified comment_id does not exist.
636: -- We must error due to data integrity problems.

Line 673: ,p_parent_key_value1 => pay_ele_shd.g_old_rec.assignment_id

669: ,p_base_key_column => 'element_entry_id'
670: ,p_base_key_value => p_element_entry_id
671: ,p_parent_table_name1 => 'per_all_assignments_f'
672: ,p_parent_key_column1 => 'assignment_id'
673: ,p_parent_key_value1 => pay_ele_shd.g_old_rec.assignment_id
674: ,p_parent_table_name2 => 'pay_element_links_f'
675: ,p_parent_key_column2 => 'element_link_id'
676: ,p_parent_key_value2 => pay_ele_shd.g_old_rec.element_link_id
677: ,p_enforce_foreign_locking => false

Line 676: ,p_parent_key_value2 => pay_ele_shd.g_old_rec.element_link_id

672: ,p_parent_key_column1 => 'assignment_id'
673: ,p_parent_key_value1 => pay_ele_shd.g_old_rec.assignment_id
674: ,p_parent_table_name2 => 'pay_element_links_f'
675: ,p_parent_key_column2 => 'element_link_id'
676: ,p_parent_key_value2 => pay_ele_shd.g_old_rec.element_link_id
677: ,p_enforce_foreign_locking => false
678: ,p_validation_start_date => l_validation_start_date
679: ,p_validation_end_date => l_validation_end_date
680: );

Line 909: end pay_ele_shd;

905: Return(l_rec);
906: --
907: End convert_args;
908: --
909: end pay_ele_shd;