DBA Data[Home] [Help]

APPS.PAY_PUC_SHD dependencies on PAY_PUC_SHD

Line 1: Package Body pay_puc_shd as

1: Package Body pay_puc_shd as
2: /* $Header: pypucrhi.pkb 115.1 2003/10/29 21:15 tvankayl noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |

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

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

Line 94: = pay_puc_shd.g_old_rec.user_column_id and

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

Line 96: = pay_puc_shd.g_old_rec.object_version_number

92: Else
93: If (p_user_column_id
94: = pay_puc_shd.g_old_rec.user_column_id and
95: p_object_version_number
96: = pay_puc_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 pay_puc_shd.g_old_rec;

104: --
105: -- Select the current row into g_old_rec
106: --
107: Open C_Sel1;
108: Fetch C_Sel1 Into pay_puc_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: <> pay_puc_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: <> pay_puc_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 171: Fetch C_Sel1 Into pay_puc_shd.g_old_rec;

167: ,p_argument_value => p_object_version_number
168: );
169: --
170: Open C_Sel1;
171: Fetch C_Sel1 Into pay_puc_shd.g_old_rec;
172: If C_Sel1%notfound then
173: Close C_Sel1;
174: --
175: -- The primary key is invalid therefore we must error

Line 182: <> pay_puc_shd.g_old_rec.object_version_number) Then

178: fnd_message.raise_error;
179: End If;
180: Close C_Sel1;
181: If (p_object_version_number
182: <> pay_puc_shd.g_old_rec.object_version_number) Then
183: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
184: fnd_message.raise_error;
185: End If;
186: --

Line 236: end pay_puc_shd;

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