APPS.PER_SEU_SHD dependencies on PER_SEU_SHD

Line 1: Package Body per_seu_shd as

1: Package Body per_seu_shd as
2: /* $Header: peseurhi.pkb 120.4 2005/11/09 13:59:48 vbanner noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |

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

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

Line 72: = per_seu_shd.g_old_rec.security_user_id and

68: --
69: l_fct_ret := false;
70: Else
71: If (p_security_user_id
72: = per_seu_shd.g_old_rec.security_user_id and
73: p_object_version_number
74: = per_seu_shd.g_old_rec.object_version_number
75: ) Then
76: --

Line 74: = per_seu_shd.g_old_rec.object_version_number

70: Else
71: If (p_security_user_id
72: = per_seu_shd.g_old_rec.security_user_id and
73: p_object_version_number
74: = per_seu_shd.g_old_rec.object_version_number
75: ) Then
76: --
77: -- The g_old_rec is current therefore we must
78: -- set the returning function to true

Line 86: Fetch C_Sel1 Into per_seu_shd.g_old_rec;

82: --
83: -- Select the current row into g_old_rec
84: --
85: Open C_Sel1;
86: Fetch C_Sel1 Into per_seu_shd.g_old_rec;
87: If C_Sel1%notfound Then
88: Close C_Sel1;
89: --
90: -- The primary key is invalid therefore we must error

Line 97: <> per_seu_shd.g_old_rec.object_version_number) Then

93: fnd_message.raise_error;
94: End If;
95: Close C_Sel1;
96: If (p_object_version_number
97: <> per_seu_shd.g_old_rec.object_version_number) Then
98: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
99: fnd_message.raise_error;
100: End If;
101: l_fct_ret := true;

Line 147: Fetch C_Sel1 Into per_seu_shd.g_old_rec;

143: ,p_argument_value => p_object_version_number
144: );
145: --
146: Open C_Sel1;
147: Fetch C_Sel1 Into per_seu_shd.g_old_rec;
148: If C_Sel1%notfound then
149: Close C_Sel1;
150: --
151: -- The primary key is invalid therefore we must error

Line 158: <> per_seu_shd.g_old_rec.object_version_number) Then

154: fnd_message.raise_error;
155: End If;
156: Close C_Sel1;
157: If (p_object_version_number
158: <> per_seu_shd.g_old_rec.object_version_number) Then
159: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
160: fnd_message.raise_error;
161: End If;
162: --

Line 208: end per_seu_shd;

204: Return(l_rec);
205: --
206: End convert_args;
207: --
208: end per_seu_shd;