APPS.PQH_RLS_SHD dependencies on PQH_RLS_SHD

Line 1: Package Body pqh_rls_shd as

1: Package Body pqh_rls_shd as
2: /* $Header: pqrlsrhi.pkb 120.0.12020000.2 2013/04/12 18:48:44 pathota ship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |

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

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

Line 112: = pqh_rls_shd.g_old_rec.role_id and p_object_version_number

108: l_fct_ret := false;
109: Else
110: If (
111: p_role_id
112: = pqh_rls_shd.g_old_rec.role_id and p_object_version_number
113: = pqh_rls_shd.g_old_rec.object_version_number
114: ) Then
115: --
116: -- The g_old_rec is current therefore we must

Line 113: = pqh_rls_shd.g_old_rec.object_version_number

109: Else
110: If (
111: p_role_id
112: = pqh_rls_shd.g_old_rec.role_id and p_object_version_number
113: = pqh_rls_shd.g_old_rec.object_version_number
114: ) Then
115: --
116: -- The g_old_rec is current therefore we must
117: -- set the returning function to true

Line 125: Fetch C_Sel1 Into pqh_rls_shd.g_old_rec;

121: --
122: -- Select the current row into g_old_rec
123: --
124: Open C_Sel1;
125: Fetch C_Sel1 Into pqh_rls_shd.g_old_rec;
126: If C_Sel1%notfound Then
127: Close C_Sel1;
128: --
129: -- The primary key is invalid therefore we must error

Line 136: <> pqh_rls_shd.g_old_rec.object_version_number) Then

132: fnd_message.raise_error;
133: End If;
134: Close C_Sel1;
135: If (p_object_version_number
136: <> pqh_rls_shd.g_old_rec.object_version_number) Then
137: fnd_message.set_name('PAY','HR_7155_OBJECT_INVALID');
138: fnd_message.raise_error;
139: End If;
140: l_fct_ret := true;

Line 215: Fetch C_Sel1 Into pqh_rls_shd.g_old_rec;

211: ,p_argument_value => p_role_id
212: );
213: --
214: Open C_Sel1;
215: Fetch C_Sel1 Into pqh_rls_shd.g_old_rec;
216: If C_Sel1%notfound then
217: Close C_Sel1;
218: --
219: -- The primary key is invalid therefore we must error

Line 226: <> pqh_rls_shd.g_old_rec.object_version_number) Then

222: fnd_message.raise_error;
223: End If;
224: Close C_Sel1;
225: If (p_object_version_number
226: <> pqh_rls_shd.g_old_rec.object_version_number) Then
227: fnd_message.set_name('PAY','HR_7155_OBJECT_INVALID');
228: fnd_message.raise_error;
229: End If;
230: --

Line 348: end pqh_rls_shd;

344: Return(l_rec);
345: --
346: End convert_args;
347: --
348: end pqh_rls_shd;