APPS.PER_WBI_SHD dependencies on PER_WBI_SHD

Line 1: Package Body per_wbi_shd as

1: Package Body per_wbi_shd as
2: /* $Header: pewbirhi.pkb 115.0 2003/07/03 05:55:25 kavenkat noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |

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

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

Line 74: = per_wbi_shd.g_old_rec.workbench_item_code and

70: --
71: l_fct_ret := false;
72: Else
73: If (p_workbench_item_code
74: = per_wbi_shd.g_old_rec.workbench_item_code and
75: p_object_version_number
76: = per_wbi_shd.g_old_rec.object_version_number
77: ) Then
78: --

Line 76: = per_wbi_shd.g_old_rec.object_version_number

72: Else
73: If (p_workbench_item_code
74: = per_wbi_shd.g_old_rec.workbench_item_code and
75: p_object_version_number
76: = per_wbi_shd.g_old_rec.object_version_number
77: ) Then
78: --
79: -- The g_old_rec is current therefore we must
80: -- set the returning function to true

Line 88: Fetch C_Sel1 Into per_wbi_shd.g_old_rec;

84: --
85: -- Select the current row into g_old_rec
86: --
87: Open C_Sel1;
88: Fetch C_Sel1 Into per_wbi_shd.g_old_rec;
89: If C_Sel1%notfound Then
90: Close C_Sel1;
91: --
92: -- The primary key is invalid therefore we must error

Line 99: <> per_wbi_shd.g_old_rec.object_version_number) Then

95: fnd_message.raise_error;
96: End If;
97: Close C_Sel1;
98: If (p_object_version_number
99: <> per_wbi_shd.g_old_rec.object_version_number) Then
100: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
101: fnd_message.raise_error;
102: End If;
103: l_fct_ret := true;

Line 151: Fetch C_Sel1 Into per_wbi_shd.g_old_rec;

147: ,p_argument_value => p_object_version_number
148: );
149: --
150: Open C_Sel1;
151: Fetch C_Sel1 Into per_wbi_shd.g_old_rec;
152: If C_Sel1%notfound then
153: Close C_Sel1;
154: --
155: -- The primary key is invalid therefore we must error

Line 162: <> per_wbi_shd.g_old_rec.object_version_number) Then

158: fnd_message.raise_error;
159: End If;
160: Close C_Sel1;
161: If (p_object_version_number
162: <> per_wbi_shd.g_old_rec.object_version_number) Then
163: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
164: fnd_message.raise_error;
165: End If;
166: --

Line 216: end per_wbi_shd;

212: Return(l_rec);
213: --
214: End convert_args;
215: --
216: end per_wbi_shd;