DBA Data[Home] [Help]

APPS.PER_OSV_SHD dependencies on PER_OSV_SHD

Line 1: Package Body per_osv_shd as

1: Package Body per_osv_shd as
2: /* $Header: peosvrhi.pkb 120.0 2005/05/31 12:37:30 appldev noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |

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

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

Line 100: = per_osv_shd.g_old_rec.org_structure_version_id and

96: --
97: l_fct_ret := false;
98: Else
99: If (p_org_structure_version_id
100: = per_osv_shd.g_old_rec.org_structure_version_id and
101: p_object_version_number
102: = per_osv_shd.g_old_rec.object_version_number
103: ) Then
104: --

Line 102: = per_osv_shd.g_old_rec.object_version_number

98: Else
99: If (p_org_structure_version_id
100: = per_osv_shd.g_old_rec.org_structure_version_id and
101: p_object_version_number
102: = per_osv_shd.g_old_rec.object_version_number
103: ) Then
104: --
105: -- The g_old_rec is current therefore we must
106: -- set the returning function to true

Line 114: Fetch C_Sel1 Into per_osv_shd.g_old_rec;

110: --
111: -- Select the current row into g_old_rec
112: --
113: Open C_Sel1;
114: Fetch C_Sel1 Into per_osv_shd.g_old_rec;
115: If C_Sel1%notfound Then
116: Close C_Sel1;
117: --
118: -- The primary key is invalid therefore we must error

Line 125: <> per_osv_shd.g_old_rec.object_version_number) Then

121: fnd_message.raise_error;
122: End If;
123: Close C_Sel1;
124: If (p_object_version_number
125: <> per_osv_shd.g_old_rec.object_version_number) Then
126: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
127: fnd_message.raise_error;
128: End If;
129: l_fct_ret := true;

Line 183: Fetch C_Sel1 Into per_osv_shd.g_old_rec;

179: ,p_argument_value => p_object_version_number
180: );
181: --
182: Open C_Sel1;
183: Fetch C_Sel1 Into per_osv_shd.g_old_rec;
184: If C_Sel1%notfound then
185: Close C_Sel1;
186: --
187: -- The primary key is invalid therefore we must error

Line 194: <> per_osv_shd.g_old_rec.object_version_number) Then

190: fnd_message.raise_error;
191: End If;
192: Close C_Sel1;
193: If (p_object_version_number
194: <> per_osv_shd.g_old_rec.object_version_number) Then
195: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
196: fnd_message.raise_error;
197: End If;
198: --

Line 260: end per_osv_shd;

256: Return(l_rec);
257: --
258: End convert_args;
259: --
260: end per_osv_shd;