[Home] [Help]
1: Package Body pay_apm_shd as
2: /* $Header: pyapmrhi.pkb 120.0.12000000.1 2007/01/17 15:34:53 appldev noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
93: --
94: l_fct_ret := false;
95: Else
96: If (p_process_module_id
97: = pay_apm_shd.g_old_rec.process_module_id and
98: p_object_version_number
99: = pay_apm_shd.g_old_rec.object_version_number
100: ) Then
101: --
95: Else
96: If (p_process_module_id
97: = pay_apm_shd.g_old_rec.process_module_id and
98: p_object_version_number
99: = pay_apm_shd.g_old_rec.object_version_number
100: ) Then
101: --
102: -- The g_old_rec is current therefore we must
103: -- set the returning function to true
107: --
108: -- Select the current row into g_old_rec
109: --
110: Open C_Sel1;
111: Fetch C_Sel1 Into pay_apm_shd.g_old_rec;
112: If C_Sel1%notfound Then
113: Close C_Sel1;
114: --
115: -- The primary key is invalid therefore we must error
118: fnd_message.raise_error;
119: End If;
120: Close C_Sel1;
121: If (p_object_version_number
122: <> pay_apm_shd.g_old_rec.object_version_number) Then
123: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
124: fnd_message.raise_error;
125: End If;
126: l_fct_ret := true;
171: ,p_argument_value => p_object_version_number
172: );
173: --
174: Open C_Sel1;
175: Fetch C_Sel1 Into pay_apm_shd.g_old_rec;
176: If C_Sel1%notfound then
177: Close C_Sel1;
178: --
179: -- The primary key is invalid therefore we must error
182: fnd_message.raise_error;
183: End If;
184: Close C_Sel1;
185: If (p_object_version_number
186: <> pay_apm_shd.g_old_rec.object_version_number) Then
187: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
188: fnd_message.raise_error;
189: End If;
190: --
235: --
236: End convert_args;
237: --
238: begin
239: g_package := ' pay_apm_shd.'; -- Global package name
240: end pay_apm_shd;
236: End convert_args;
237: --
238: begin
239: g_package := ' pay_apm_shd.'; -- Global package name
240: end pay_apm_shd;