DBA Data[Home] [Help]

APPS.PAY_PEL_SHD dependencies on PAY_PEL_SHD

Line 1: Package Body pay_pel_shd as

1: Package Body pay_pel_shd as
2: /* $Header: pypelrhi.pkb 120.7.12010000.3 2008/10/03 08:41:56 ankagarw ship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |

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

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

Line 203: pay_pel_shd.g_old_rec.element_link_id and

199: --
200: l_fct_ret := false;
201: Else
202: If (p_element_link_id =
203: pay_pel_shd.g_old_rec.element_link_id and
204: p_object_version_number =
205: pay_pel_shd.g_old_rec.object_version_number
206: ) Then
207: --

Line 205: pay_pel_shd.g_old_rec.object_version_number

201: Else
202: If (p_element_link_id =
203: pay_pel_shd.g_old_rec.element_link_id and
204: p_object_version_number =
205: pay_pel_shd.g_old_rec.object_version_number
206: ) Then
207: --
208: -- The g_old_rec is current therefore we must
209: -- set the returning function to true

Line 217: Fetch C_Sel1 Into pay_pel_shd.g_old_rec;

213: --
214: -- Select the current row
215: --
216: Open C_Sel1;
217: Fetch C_Sel1 Into pay_pel_shd.g_old_rec;
218: If C_Sel1%notfound Then
219: Close C_Sel1;
220: --
221: -- The primary key is invalid therefore we must error

Line 228: <> pay_pel_shd.g_old_rec.object_version_number) Then

224: fnd_message.raise_error;
225: End If;
226: Close C_Sel1;
227: If (p_object_version_number
228: <> pay_pel_shd.g_old_rec.object_version_number) Then
229: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
230: fnd_message.raise_error;
231: End If;
232: l_fct_ret := true;

Line 364: pay_pel_shd.g_api_dml := true; -- Set the api dml status

360: ,p_base_key_value => p_base_key_value
361: );
362: --
363: hr_utility.set_location(l_proc, 10);
364: pay_pel_shd.g_api_dml := true; -- Set the api dml status
365: --
366: -- Update the specified datetrack row setting the effective
367: -- end date to the specified new effective end date.
368: --

Line 376: pay_pel_shd.g_api_dml := false; -- Unset the api dml status

372: where t.element_link_id = p_base_key_value
373: and p_effective_date
374: between t.effective_start_date and t.effective_end_date;
375: --
376: pay_pel_shd.g_api_dml := false; -- Unset the api dml status
377: p_object_version_number := l_object_version_number;
378: hr_utility.set_location(' Leaving:'||l_proc, 15);
379: --
380: Exception

Line 382: pay_pel_shd.g_api_dml := false; -- Unset the api dml status

378: hr_utility.set_location(' Leaving:'||l_proc, 15);
379: --
380: Exception
381: When Others Then
382: pay_pel_shd.g_api_dml := false; -- Unset the api dml status
383: Raise;
384: --
385: End upd_effective_end_date;
386: --

Line 470: where hc.comment_id = pay_pel_shd.g_old_rec.comment_id;

466: --
467: Cursor C_Sel3 is
468: select hc.comment_text
469: from hr_comments hc
470: where hc.comment_id = pay_pel_shd.g_old_rec.comment_id;
471: --
472: Begin
473: hr_utility.set_location('Entering:'||l_proc, 5);
474: --

Line 504: Fetch C_Sel1 Into pay_pel_shd.g_old_rec;

500: --
501: -- We must select and lock the current row.
502: --
503: Open C_Sel1;
504: Fetch C_Sel1 Into pay_pel_shd.g_old_rec;
505: If C_Sel1%notfound then
506: Close C_Sel1;
507: --
508: -- The primary key is invalid therefore we must error

Line 515: <> pay_pel_shd.g_old_rec.object_version_number) Then

511: fnd_message.raise_error;
512: End If;
513: Close C_Sel1;
514: If (p_object_version_number
515: <> pay_pel_shd.g_old_rec.object_version_number) Then
516: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
517: fnd_message.raise_error;
518: End If;
519: --

Line 523: If ((pay_pel_shd.g_old_rec.comment_id is not null) and

519: --
520: -- Providing we are doing an update and a comment_id exists then
521: -- we select the comment text.
522: --
523: If ((pay_pel_shd.g_old_rec.comment_id is not null) and
524: (p_datetrack_mode = hr_api.g_update or
525: p_datetrack_mode = hr_api.g_correction or
526: p_datetrack_mode = hr_api.g_update_override or
527: p_datetrack_mode = hr_api.g_update_change_insert)) then

Line 529: Fetch C_Sel3 Into pay_pel_shd.g_old_rec.comments;

525: p_datetrack_mode = hr_api.g_correction or
526: p_datetrack_mode = hr_api.g_update_override or
527: p_datetrack_mode = hr_api.g_update_change_insert)) then
528: Open C_Sel3;
529: Fetch C_Sel3 Into pay_pel_shd.g_old_rec.comments;
530: If C_Sel3%notfound then
531: --
532: -- The comments for the specified comment_id does not exist.
533: -- We must error due to data integrity problems.

Line 553: ,p_parent_key_value1 => pay_pel_shd.g_old_rec.payroll_id

549: ,p_base_key_column => 'element_link_id'
550: ,p_base_key_value => p_element_link_id
551: ,p_parent_table_name1 => 'pay_all_payrolls_f'
552: ,p_parent_key_column1 => 'payroll_id'
553: ,p_parent_key_value1 => pay_pel_shd.g_old_rec.payroll_id
554: ,p_parent_table_name2 => 'pay_element_types_f'
555: ,p_parent_key_column2 => 'element_type_id'
556: ,p_parent_key_value2 => pay_pel_shd.g_old_rec.element_type_id
557: ,p_child_table_name1 => 'pay_link_input_values_f'

Line 556: ,p_parent_key_value2 => pay_pel_shd.g_old_rec.element_type_id

552: ,p_parent_key_column1 => 'payroll_id'
553: ,p_parent_key_value1 => pay_pel_shd.g_old_rec.payroll_id
554: ,p_parent_table_name2 => 'pay_element_types_f'
555: ,p_parent_key_column2 => 'element_type_id'
556: ,p_parent_key_value2 => pay_pel_shd.g_old_rec.element_type_id
557: ,p_child_table_name1 => 'pay_link_input_values_f'
558: ,p_child_key_column1 => 'link_input_value_id'
559: ,p_child_alt_base_key_column1 => null
560: ,p_child_table_name2 => 'pay_element_entries_f'

Line 717: end pay_pel_shd;

713: Return(l_rec);
714: --
715: End convert_args;
716: --
717: end pay_pel_shd;