APPS.PQH_TJR_SHD dependencies on PQH_TJR_SHD

Line 1: Package Body pqh_tjr_shd as

1: Package Body pqh_tjr_shd as
2: /* $Header: pqtjrrhi.pkb 115.3 2002/12/12 21:47:19 rpasapul noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |

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

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

Line 127: = pqh_tjr_shd.g_old_rec.txn_job_requirement_id and

123: --
124: l_fct_ret := false;
125: Else
126: If (p_txn_job_requirement_id
127: = pqh_tjr_shd.g_old_rec.txn_job_requirement_id and
128: p_object_version_number
129: = pqh_tjr_shd.g_old_rec.object_version_number
130: ) Then
131: --

Line 129: = pqh_tjr_shd.g_old_rec.object_version_number

125: Else
126: If (p_txn_job_requirement_id
127: = pqh_tjr_shd.g_old_rec.txn_job_requirement_id and
128: p_object_version_number
129: = pqh_tjr_shd.g_old_rec.object_version_number
130: ) Then
131: --
132: -- The g_old_rec is current therefore we must
133: -- set the returning function to true

Line 141: Fetch C_Sel1 Into pqh_tjr_shd.g_old_rec;

137: --
138: -- Select the current row into g_old_rec
139: --
140: Open C_Sel1;
141: Fetch C_Sel1 Into pqh_tjr_shd.g_old_rec;
142: If C_Sel1%notfound Then
143: Close C_Sel1;
144: --
145: -- The primary key is invalid therefore we must error

Line 152: <> pqh_tjr_shd.g_old_rec.object_version_number) Then

148: fnd_message.raise_error;
149: End If;
150: Close C_Sel1;
151: If (p_object_version_number
152: <> pqh_tjr_shd.g_old_rec.object_version_number) Then
153: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
154: fnd_message.raise_error;
155: End If;
156: l_fct_ret := true;

Line 233: Fetch C_Sel1 Into pqh_tjr_shd.g_old_rec;

229: ,p_argument_value => p_object_version_number
230: );
231: --
232: Open C_Sel1;
233: Fetch C_Sel1 Into pqh_tjr_shd.g_old_rec;
234: If C_Sel1%notfound then
235: Close C_Sel1;
236: --
237: -- The primary key is invalid therefore we must error

Line 244: <> pqh_tjr_shd.g_old_rec.object_version_number) Then

240: fnd_message.raise_error;
241: End If;
242: Close C_Sel1;
243: If (p_object_version_number
244: <> pqh_tjr_shd.g_old_rec.object_version_number) Then
245: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
246: fnd_message.raise_error;
247: End If;
248: --

Line 356: end pqh_tjr_shd;

352: Return(l_rec);
353: --
354: End convert_args;
355: --
356: end pqh_tjr_shd;