DBA Data[Home] [Help]

APPS.OTA_LPS_SHD dependencies on OTA_LPS_SHD

Line 1: Package Body ota_lps_shd as

1: Package Body ota_lps_shd as
2: /* $Header: otlpsrhi.pkb 120.0 2005/05/29 07:24:04 appldev noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |

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

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

Line 117: = ota_lps_shd.g_old_rec.learning_path_id and

113: --
114: l_fct_ret := false;
115: Else
116: If (p_learning_path_id
117: = ota_lps_shd.g_old_rec.learning_path_id and
118: p_object_version_number
119: = ota_lps_shd.g_old_rec.object_version_number
120: ) Then
121: --

Line 119: = ota_lps_shd.g_old_rec.object_version_number

115: Else
116: If (p_learning_path_id
117: = ota_lps_shd.g_old_rec.learning_path_id and
118: p_object_version_number
119: = ota_lps_shd.g_old_rec.object_version_number
120: ) Then
121: --
122: -- The g_old_rec is current therefore we must
123: -- set the returning function to true

Line 131: Fetch C_Sel1 Into ota_lps_shd.g_old_rec;

127: --
128: -- Select the current row into g_old_rec
129: --
130: Open C_Sel1;
131: Fetch C_Sel1 Into ota_lps_shd.g_old_rec;
132: If C_Sel1%notfound Then
133: Close C_Sel1;
134: --
135: -- The primary key is invalid therefore we must error

Line 142: <> ota_lps_shd.g_old_rec.object_version_number) Then

138: fnd_message.raise_error;
139: End If;
140: Close C_Sel1;
141: If (p_object_version_number
142: <> ota_lps_shd.g_old_rec.object_version_number) Then
143: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
144: fnd_message.raise_error;
145: End If;
146: l_fct_ret := true;

Line 225: Fetch C_Sel1 Into ota_lps_shd.g_old_rec;

221: ,p_argument_value => p_object_version_number
222: );
223: --
224: Open C_Sel1;
225: Fetch C_Sel1 Into ota_lps_shd.g_old_rec;
226: If C_Sel1%notfound then
227: Close C_Sel1;
228: --
229: -- The primary key is invalid therefore we must error

Line 236: <> ota_lps_shd.g_old_rec.object_version_number) Then

232: fnd_message.raise_error;
233: End If;
234: Close C_Sel1;
235: If (p_object_version_number
236: <> ota_lps_shd.g_old_rec.object_version_number) Then
237: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
238: fnd_message.raise_error;
239: End If;
240: --

Line 352: end ota_lps_shd;

348: Return(l_rec);
349: --
350: End convert_args;
351: --
352: end ota_lps_shd;