APPS.GHR_CAH_SHD dependencies on GHR_CAH_SHD

Line 1: Package Body ghr_cah_shd as

1: Package Body ghr_cah_shd as
2: /* $Header: ghcahrhi.pkb 115.1 2003/01/30 19:24:56 asubrahm noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |

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

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

Line 94: = ghr_cah_shd.g_old_rec.compl_ca_header_id and

90: --
91: l_fct_ret := false;
92: Else
93: If (p_compl_ca_header_id
94: = ghr_cah_shd.g_old_rec.compl_ca_header_id and
95: p_object_version_number
96: = ghr_cah_shd.g_old_rec.object_version_number
97: ) Then
98: --

Line 96: = ghr_cah_shd.g_old_rec.object_version_number

92: Else
93: If (p_compl_ca_header_id
94: = ghr_cah_shd.g_old_rec.compl_ca_header_id and
95: p_object_version_number
96: = ghr_cah_shd.g_old_rec.object_version_number
97: ) Then
98: --
99: -- The g_old_rec is current therefore we must
100: -- set the returning function to true

Line 108: Fetch C_Sel1 Into ghr_cah_shd.g_old_rec;

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

Line 119: <> ghr_cah_shd.g_old_rec.object_version_number) Then

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

Line 187: Fetch C_Sel1 Into ghr_cah_shd.g_old_rec;

183: ,p_argument_value => p_object_version_number
184: );
185: --
186: Open C_Sel1;
187: Fetch C_Sel1 Into ghr_cah_shd.g_old_rec;
188: If C_Sel1%notfound then
189: Close C_Sel1;
190: --
191: -- The primary key is invalid therefore we must error

Line 198: <> ghr_cah_shd.g_old_rec.object_version_number) Then

194: fnd_message.raise_error;
195: End If;
196: Close C_Sel1;
197: If (p_object_version_number
198: <> ghr_cah_shd.g_old_rec.object_version_number) Then
199: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
200: fnd_message.raise_error;
201: End If;
202: --

Line 284: end ghr_cah_shd;

280: Return(l_rec);
281: --
282: End convert_args;
283: --
284: end ghr_cah_shd;