DBA Data[Home] [Help]

APPS.IRC_IAS_SHD dependencies on IRC_IAS_SHD

Line 1: Package Body irc_ias_shd as

1: Package Body irc_ias_shd as
2: /* $Header: iriasrhi.pkb 120.0.12010000.3 2008/08/05 10:48:01 ubhat ship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |

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

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

Line 83: = irc_ias_shd.g_old_rec.assignment_status_id and

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

Line 85: = irc_ias_shd.g_old_rec.object_version_number

81: Else
82: If (p_assignment_status_id
83: = irc_ias_shd.g_old_rec.assignment_status_id and
84: p_object_version_number
85: = irc_ias_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 irc_ias_shd.g_old_rec;

93: --
94: -- Select the current row into g_old_rec
95: --
96: Open C_Sel1;
97: Fetch C_Sel1 Into irc_ias_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: <> irc_ias_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: <> irc_ias_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 159: Fetch C_Sel1 Into irc_ias_shd.g_old_rec;

155: ,p_argument_value => p_object_version_number
156: );
157: --
158: Open C_Sel1;
159: Fetch C_Sel1 Into irc_ias_shd.g_old_rec;
160: If C_Sel1%notfound then
161: Close C_Sel1;
162: --
163: -- The primary key is invalid therefore we must error

Line 170: <> irc_ias_shd.g_old_rec.object_version_number) Then

166: fnd_message.raise_error;
167: End If;
168: Close C_Sel1;
169: If (p_object_version_number
170: <> irc_ias_shd.g_old_rec.object_version_number) Then
171: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
172: fnd_message.raise_error;
173: End If;
174: --

Line 222: end irc_ias_shd;

218: Return(l_rec);
219: --
220: End convert_args;
221: --
222: end irc_ias_shd;