APPS.OTA_CMB_SHD dependencies on OTA_CMB_SHD

Line 1: Package Body ota_cmb_shd as

1: Package Body ota_cmb_shd as
2: /* $Header: otcmbrhi.pkb 120.5 2005/08/19 17:58 gdhutton noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |

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

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

Line 96: = ota_cmb_shd.g_old_rec.certification_member_id and

92: --
93: l_fct_ret := false;
94: Else
95: If (p_certification_member_id
96: = ota_cmb_shd.g_old_rec.certification_member_id and
97: p_object_version_number
98: = ota_cmb_shd.g_old_rec.object_version_number
99: ) Then
100: --

Line 98: = ota_cmb_shd.g_old_rec.object_version_number

94: Else
95: If (p_certification_member_id
96: = ota_cmb_shd.g_old_rec.certification_member_id and
97: p_object_version_number
98: = ota_cmb_shd.g_old_rec.object_version_number
99: ) Then
100: --
101: -- The g_old_rec is current therefore we must
102: -- set the returning function to true

Line 110: Fetch C_Sel1 Into ota_cmb_shd.g_old_rec;

106: --
107: -- Select the current row into g_old_rec
108: --
109: Open C_Sel1;
110: Fetch C_Sel1 Into ota_cmb_shd.g_old_rec;
111: If C_Sel1%notfound Then
112: Close C_Sel1;
113: --
114: -- The primary key is invalid therefore we must error

Line 121: <> ota_cmb_shd.g_old_rec.object_version_number) Then

117: fnd_message.raise_error;
118: End If;
119: Close C_Sel1;
120: If (p_object_version_number
121: <> ota_cmb_shd.g_old_rec.object_version_number) Then
122: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
123: fnd_message.raise_error;
124: End If;
125: l_fct_ret := true;

Line 196: Fetch C_Sel1 Into ota_cmb_shd.g_old_rec;

192: ,p_argument_value => p_object_version_number
193: );
194: --
195: Open C_Sel1;
196: Fetch C_Sel1 Into ota_cmb_shd.g_old_rec;
197: If C_Sel1%notfound then
198: Close C_Sel1;
199: --
200: -- The primary key is invalid therefore we must error

Line 207: <> ota_cmb_shd.g_old_rec.object_version_number) Then

203: fnd_message.raise_error;
204: End If;
205: Close C_Sel1;
206: If (p_object_version_number
207: <> ota_cmb_shd.g_old_rec.object_version_number) Then
208: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
209: fnd_message.raise_error;
210: End If;
211: --

Line 307: end ota_cmb_shd;

303: Return(l_rec);
304: --
305: End convert_args;
306: --
307: end ota_cmb_shd;