APPS.PAY_EVC_SHD dependencies on PAY_EVC_SHD

Line 1: Package Body pay_evc_shd as

1: Package Body pay_evc_shd as
2: /* $Header: pyevcrhi.pkb 115.6 2003/05/27 17:21:31 jford noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |

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

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

Line 81: pay_evc_shd.g_old_rec.event_value_change_id and

77: --
78: l_fct_ret := false;
79: Else
80: If (p_event_value_change_id =
81: pay_evc_shd.g_old_rec.event_value_change_id and
82: p_object_version_number =
83: pay_evc_shd.g_old_rec.object_version_number
84: ) Then
85: --

Line 83: pay_evc_shd.g_old_rec.object_version_number

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

Line 95: Fetch C_Sel1 Into pay_evc_shd.g_old_rec;

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

Line 106: <> pay_evc_shd.g_old_rec.object_version_number) Then

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

Line 330: Fetch C_Sel1 Into pay_evc_shd.g_old_rec;

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

Line 341: <> pay_evc_shd.g_old_rec.object_version_number) Then

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

Line 358: ,p_parent_key_value1 => pay_evc_shd.g_old_rec.event_qualifier_id

354: ,p_base_key_column => 'event_value_change_id'
355: ,p_base_key_value => p_event_value_change_id
356: ,p_parent_table_name1 => 'pay_event_qualifiers_f'
357: ,p_parent_key_column1 => 'event_qualifier_id'
358: ,p_parent_key_value1 => pay_evc_shd.g_old_rec.event_qualifier_id
359: ,p_enforce_foreign_locking => true
360: ,p_validation_start_date => l_validation_start_date
361: ,p_validation_end_date => l_validation_end_date
362: );

Line 443: end pay_evc_shd;

439: Return(l_rec);
440: --
441: End convert_args;
442: --
443: end pay_evc_shd;