APPS.PQH_GIN_SHD dependencies on PQH_GIN_SHD

Line 1: Package Body pqh_gin_shd as

1: Package Body pqh_gin_shd as
2: /* $Header: pqginrhi.pkb 115.7 2004/03/15 03:05 svorugan noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |

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

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

Line 83: pqh_gin_shd.g_old_rec.global_index_id and

79: --
80: l_fct_ret := false;
81: Else
82: If (p_global_index_id =
83: pqh_gin_shd.g_old_rec.global_index_id and
84: p_object_version_number =
85: pqh_gin_shd.g_old_rec.object_version_number
86: ) Then
87: --

Line 85: pqh_gin_shd.g_old_rec.object_version_number

81: Else
82: If (p_global_index_id =
83: pqh_gin_shd.g_old_rec.global_index_id and
84: p_object_version_number =
85: pqh_gin_shd.g_old_rec.object_version_number
86: ) Then
87: --
88: -- The g_old_rec is current therefore we must
89: -- set the returning function to true

Line 97: Fetch C_Sel1 Into pqh_gin_shd.g_old_rec;

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

Line 108: <> pqh_gin_shd.g_old_rec.object_version_number) Then

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

Line 311: Fetch C_Sel1 Into pqh_gin_shd.g_old_rec;

307: );
308: --
309:
310: Open C_Sel1;
311: Fetch C_Sel1 Into pqh_gin_shd.g_old_rec;
312: If C_Sel1%notfound then
313: Close C_Sel1;
314: --
315: -- The primary key is invalid therefore we must error

Line 322: If (pqh_gin_shd.g_old_rec.type_of_record = 'INM') then

318: fnd_message.raise_error;
319: End If;
320: Close C_Sel1;
321:
322: If (pqh_gin_shd.g_old_rec.type_of_record = 'INM') then
323: --
324: hr_api.mandatory_arg_error(p_api_name => l_proc
325: ,p_argument => 'currency_code'
326: ,p_argument_value => p_object_version_number

Line 339: Fetch C_Sel1 Into pqh_gin_shd.g_old_rec;

335: --
336: -- We must select and lock the current row.
337: --
338: Open C_Sel1;
339: Fetch C_Sel1 Into pqh_gin_shd.g_old_rec;
340: If C_Sel1%notfound then
341: Close C_Sel1;
342: --
343: -- The primary key is invalid therefore we must error

Line 350: <> pqh_gin_shd.g_old_rec.object_version_number) Then

346: fnd_message.raise_error;
347: End If;
348: Close C_Sel1;
349: If (p_object_version_number
350: <> pqh_gin_shd.g_old_rec.object_version_number) Then
351: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
352: fnd_message.raise_error;
353: End If;
354: --

Line 441: end pqh_gin_shd;

437: Return(l_rec);
438: --
439: End convert_args;
440: --
441: end pqh_gin_shd;