APPS.PAY_RTU_SHD dependencies on PAY_RTU_SHD

Line 1: Package Body pay_rtu_shd as

1: Package Body pay_rtu_shd as
2: /* $Header: pyrturhi.pkb 115.3 2002/12/09 15:08:35 divicker noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |

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

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

Line 81: pay_rtu_shd.g_old_rec.run_type_usage_id and

77: --
78: l_fct_ret := false;
79: Else
80: If (p_run_type_usage_id =
81: pay_rtu_shd.g_old_rec.run_type_usage_id and
82: p_object_version_number =
83: pay_rtu_shd.g_old_rec.object_version_number) Then
84: --
85: -- The g_old_rec is current therefore we must

Line 83: pay_rtu_shd.g_old_rec.object_version_number) Then

79: Else
80: If (p_run_type_usage_id =
81: pay_rtu_shd.g_old_rec.run_type_usage_id and
82: p_object_version_number =
83: pay_rtu_shd.g_old_rec.object_version_number) Then
84: --
85: -- The g_old_rec is current therefore we must
86: -- set the returning function to true
87: --

Line 94: Fetch C_Sel1 Into pay_rtu_shd.g_old_rec;

90: --
91: -- Select the current row
92: --
93: Open C_Sel1;
94: Fetch C_Sel1 Into pay_rtu_shd.g_old_rec;
95: If C_Sel1%notfound Then
96: Close C_Sel1;
97: --
98: -- The primary key is invalid therefore we must error

Line 105: <> pay_rtu_shd.g_old_rec.object_version_number) Then

101: fnd_message.raise_error;
102: End If;
103: Close C_Sel1;
104: If (p_object_version_number
105: <> pay_rtu_shd.g_old_rec.object_version_number) Then
106: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
107: fnd_message.raise_error;
108: End If;
109: l_fct_ret := true;

Line 332: Fetch C_Sel1 Into pay_rtu_shd.g_old_rec;

328: --
329: -- We must select and lock the current row.
330: --
331: Open C_Sel1;
332: Fetch C_Sel1 Into pay_rtu_shd.g_old_rec;
333: If C_Sel1%notfound then
334: Close C_Sel1;
335: --
336: -- The primary key is invalid therefore we must error

Line 343: <> pay_rtu_shd.g_old_rec.object_version_number) Then

339: fnd_message.raise_error;
340: End If;
341: Close C_Sel1;
342: If (p_object_version_number
343: <> pay_rtu_shd.g_old_rec.object_version_number) Then
344: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
345: fnd_message.raise_error;
346: End If;
347: --

Line 360: ,p_parent_key_value1 => pay_rtu_shd.g_old_rec.parent_run_type_id

356: ,p_base_key_column => 'run_type_usage_id'
357: ,p_base_key_value => p_run_type_usage_id
358: ,p_parent_table_name1 => 'pay_run_types_f'
359: ,p_parent_key_column1 => 'run_type_id'
360: ,p_parent_key_value1 => pay_rtu_shd.g_old_rec.parent_run_type_id
361: ,p_parent_table_name2 => 'pay_run_types_f'
362: ,p_parent_key_column2 => 'run_type_id'
363: ,p_parent_key_value2 => pay_rtu_shd.g_old_rec.child_run_type_id
364: ,p_enforce_foreign_locking => true

Line 363: ,p_parent_key_value2 => pay_rtu_shd.g_old_rec.child_run_type_id

359: ,p_parent_key_column1 => 'run_type_id'
360: ,p_parent_key_value1 => pay_rtu_shd.g_old_rec.parent_run_type_id
361: ,p_parent_table_name2 => 'pay_run_types_f'
362: ,p_parent_key_column2 => 'run_type_id'
363: ,p_parent_key_value2 => pay_rtu_shd.g_old_rec.child_run_type_id
364: ,p_enforce_foreign_locking => true
365: ,p_validation_start_date => l_validation_start_date
366: ,p_validation_end_date => l_validation_end_date
367: );

Line 438: end pay_rtu_shd;

434: Return(l_rec);
435: --
436: End convert_args;
437: --
438: end pay_rtu_shd;