APPS.HXC_HAS_SHD dependencies on HXC_HAS_SHD

Line 1: Package Body hxc_has_shd as

1: Package Body hxc_has_shd as
2: /* $Header: hxchasrhi.pkb 120.5 2006/06/11 12:53:42 gsirigin noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |

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

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

Line 87: = hxc_has_shd.g_old_rec.approval_style_id and

83: --
84: l_fct_ret := false;
85: Else
86: If (p_approval_style_id
87: = hxc_has_shd.g_old_rec.approval_style_id and
88: p_object_version_number
89: = hxc_has_shd.g_old_rec.object_version_number
90: ) Then
91: --

Line 89: = hxc_has_shd.g_old_rec.object_version_number

85: Else
86: If (p_approval_style_id
87: = hxc_has_shd.g_old_rec.approval_style_id and
88: p_object_version_number
89: = hxc_has_shd.g_old_rec.object_version_number
90: ) Then
91: --
92: -- The g_old_rec is current therefore we must
93: -- set the returning function to true

Line 101: Fetch C_Sel1 Into hxc_has_shd.g_old_rec;

97: --
98: -- Select the current row into g_old_rec
99: --
100: Open C_Sel1;
101: Fetch C_Sel1 Into hxc_has_shd.g_old_rec;
102: If C_Sel1%notfound Then
103: Close C_Sel1;
104: --
105: -- The primary key is invalid therefore we must error

Line 112: <> hxc_has_shd.g_old_rec.object_version_number) Then

108: fnd_message.raise_error;
109: End If;
110: Close C_Sel1;
111: If (p_object_version_number
112: <> hxc_has_shd.g_old_rec.object_version_number) Then
113: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
114: fnd_message.raise_error;
115: End If;
116: l_fct_ret := true;

Line 164: Fetch C_Sel1 Into hxc_has_shd.g_old_rec;

160: ,p_argument_value => p_approval_style_id
161: );
162: --
163: Open C_Sel1;
164: Fetch C_Sel1 Into hxc_has_shd.g_old_rec;
165: If C_Sel1%notfound then
166: Close C_Sel1;
167: --
168: -- The primary key is invalid therefore we must error

Line 175: <> hxc_has_shd.g_old_rec.object_version_number) Then

171: fnd_message.raise_error;
172: End If;
173: Close C_Sel1;
174: If (p_object_version_number
175: <> hxc_has_shd.g_old_rec.object_version_number) Then
176: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
177: fnd_message.raise_error;
178: End If;
179: --

Line 236: end hxc_has_shd;

232: Return(l_rec);
233: --
234: End convert_args;
235: --
236: end hxc_has_shd;