DBA Data[Home] [Help]

APPS.PER_FDL_SHD dependencies on PER_FDL_SHD

Line 1: Package Body per_fdl_shd as

1: Package Body per_fdl_shd as
2: /* $Header: pefdlrhi.pkb 120.0.12020000.1 2013/02/27 12:35:26 shpatro noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |

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

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

Line 105: = per_fdl_shd.g_old_rec.fnd_doc_link_id and

101: --
102: l_fct_ret := false;
103: Else
104: If (p_fnd_doc_link_id
105: = per_fdl_shd.g_old_rec.fnd_doc_link_id and
106: p_object_version_number
107: = per_fdl_shd.g_old_rec.object_version_number
108: ) Then
109: --

Line 107: = per_fdl_shd.g_old_rec.object_version_number

103: Else
104: If (p_fnd_doc_link_id
105: = per_fdl_shd.g_old_rec.fnd_doc_link_id and
106: p_object_version_number
107: = per_fdl_shd.g_old_rec.object_version_number
108: ) Then
109: --
110: -- The g_old_rec is current therefore we must
111: -- set the returning function to true

Line 119: Fetch C_Sel1 Into per_fdl_shd.g_old_rec;

115: --
116: -- Select the current row into g_old_rec
117: --
118: Open C_Sel1;
119: Fetch C_Sel1 Into per_fdl_shd.g_old_rec;
120: If C_Sel1%notfound Then
121: Close C_Sel1;
122: --
123: -- The primary key is invalid therefore we must error

Line 130: <> per_fdl_shd.g_old_rec.object_version_number) Then

126: fnd_message.raise_error;
127: End If;
128: Close C_Sel1;
129: If (p_object_version_number
130: <> per_fdl_shd.g_old_rec.object_version_number) Then
131: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
132: fnd_message.raise_error;
133: End If;
134: l_fct_ret := true;

Line 203: Fetch C_Sel1 Into per_fdl_shd.g_old_rec;

199: );
200:
201: --
202: Open C_Sel1;
203: Fetch C_Sel1 Into per_fdl_shd.g_old_rec;
204: If C_Sel1%notfound then
205: Close C_Sel1;
206: --
207: -- The primary key is invalid therefore we must error

Line 214: <> per_fdl_shd.g_old_rec.object_version_number) Then

210: fnd_message.raise_error;
211: End If;
212: Close C_Sel1;
213: If (p_object_version_number
214: <> per_fdl_shd.g_old_rec.object_version_number) Then
215: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
216: fnd_message.raise_error;
217: End If;
218: --

Line 304: end per_fdl_shd;

300: --
301: End convert_args;
302:
303: --
304: end per_fdl_shd;