DBA Data[Home] [Help]

APPS.AME_STV_SHD dependencies on AME_STV_SHD

Line 1: Package Body ame_stv_shd as

1: Package Body ame_stv_shd as
2: /* $Header: amstvrhi.pkb 120.2 2005/11/22 03:20 santosin noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |

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

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

Line 77: ame_stv_shd.g_old_rec.condition_id and

73: --
74: l_fct_ret := false;
75: Else
76: If (p_condition_id =
77: ame_stv_shd.g_old_rec.condition_id and
78: p_object_version_number =
79: ame_stv_shd.g_old_rec.object_version_number) Then
80: --
81: -- The g_old_rec is current therefore we must

Line 79: ame_stv_shd.g_old_rec.object_version_number) Then

75: Else
76: If (p_condition_id =
77: ame_stv_shd.g_old_rec.condition_id and
78: p_object_version_number =
79: ame_stv_shd.g_old_rec.object_version_number) Then
80: --
81: -- The g_old_rec is current therefore we must
82: -- set the returning function to true
83: --

Line 90: Fetch C_Sel1 Into ame_stv_shd.g_old_rec;

86: --
87: -- Select the current row
88: --
89: Open C_Sel1;
90: Fetch C_Sel1 Into ame_stv_shd.g_old_rec;
91: If C_Sel1%notfound Then
92: Close C_Sel1;
93: --
94: -- The primary key is invalid therefore we must error

Line 101: <> ame_stv_shd.g_old_rec.object_version_number) Then

97: fnd_message.raise_error;
98: End If;
99: Close C_Sel1;
100: If (p_object_version_number
101: <> ame_stv_shd.g_old_rec.object_version_number) Then
102: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
103: fnd_message.raise_error;
104: End If;
105: l_fct_ret := true;

Line 136: ame_stv_shd.get_object_version_number

132: -- Because we are updating a row we must get the next object
133: -- version number.
134: --
135: l_object_version_number :=
136: ame_stv_shd.get_object_version_number
137: (p_condition_id => p_condition_id
138: ,p_string_value => p_string_value
139: );
140: --

Line 244: Fetch C_Sel1 Into ame_stv_shd.g_old_rec;

240: --
241: -- We must select and lock the current row.
242: --
243: Open C_Sel1;
244: Fetch C_Sel1 Into ame_stv_shd.g_old_rec;
245: If C_Sel1%notfound then
246: Close C_Sel1;
247: --
248: -- The primary key is invalid therefore we must error

Line 255: <> ame_stv_shd.g_old_rec.object_version_number) Then

251: fnd_message.raise_error;
252: End If;
253: Close C_Sel1;
254: If (p_object_version_number
255: <> ame_stv_shd.g_old_rec.object_version_number) Then
256: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
257: fnd_message.raise_error;
258: End If;
259: --

Line 278: p_validation_end_date := ame_stv_shd.g_old_rec.end_date;

274: -- Set the validation start and end date OUT arguments
275: --
276: if (p_datetrack_mode = hr_api.g_update) then
277: p_validation_start_date := p_effective_date;
278: p_validation_end_date := ame_stv_shd.g_old_rec.end_date;
279: elsif (p_datetrack_mode = hr_api.g_delete) then
280: --
281: -- Issue a lock on the parents.
282: --

Line 370: end ame_stv_shd;

366: --
367: End get_object_version_number;
368: --
369: --
370: end ame_stv_shd;