APPS.PAY_RFM_SHD dependencies on PAY_RFM_SHD

Line 1: Package Body pay_rfm_shd as

1: Package Body pay_rfm_shd as
2: /* $Header: pyrfmrhi.pkb 120.0 2005/05/29 08:20 appldev noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |

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

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

Line 98: pay_rfm_shd.g_old_rec.report_format_mapping_id and

94: --
95: l_fct_ret := false;
96: Else
97: If (p_report_format_mapping_id =
98: pay_rfm_shd.g_old_rec.report_format_mapping_id and
99: p_object_version_number =
100: pay_rfm_shd.g_old_rec.object_version_number
101: ) Then
102: --

Line 100: pay_rfm_shd.g_old_rec.object_version_number

96: Else
97: If (p_report_format_mapping_id =
98: pay_rfm_shd.g_old_rec.report_format_mapping_id and
99: p_object_version_number =
100: pay_rfm_shd.g_old_rec.object_version_number
101: ) Then
102: --
103: -- The g_old_rec is current therefore we must
104: -- set the returning function to true

Line 112: Fetch C_Sel1 Into pay_rfm_shd.g_old_rec;

108: --
109: -- Select the current row
110: --
111: Open C_Sel1;
112: Fetch C_Sel1 Into pay_rfm_shd.g_old_rec;
113: If C_Sel1%notfound Then
114: Close C_Sel1;
115: --
116: -- The primary key is invalid therefore we must error

Line 123: <> pay_rfm_shd.g_old_rec.object_version_number) Then

119: fnd_message.raise_error;
120: End If;
121: Close C_Sel1;
122: If (p_object_version_number
123: <> pay_rfm_shd.g_old_rec.object_version_number) Then
124: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
125: fnd_message.raise_error;
126: End If;
127: l_fct_ret := true;

Line 230: pay_rfm_shd.g_api_dml := true; -- Set the api dml status

226: ,p_base_key_value => p_base_key_value
227: );
228: --
229: hr_utility.set_location(l_proc, 10);
230: pay_rfm_shd.g_api_dml := true; -- Set the api dml status
231: --
232: -- Update the specified datetrack row setting the effective
233: -- end date to the specified new effective end date.
234: --

Line 242: pay_rfm_shd.g_api_dml := false; -- Unset the api dml status

238: where t.report_format_mapping_id = p_base_key_value
239: and p_effective_date
240: between t.effective_start_date and t.effective_end_date;
241: --
242: pay_rfm_shd.g_api_dml := false; -- Unset the api dml status
243: p_object_version_number := l_object_version_number;
244: hr_utility.set_location(' Leaving:'||l_proc, 15);
245: --
246: Exception

Line 248: pay_rfm_shd.g_api_dml := false; -- Unset the api dml status

244: hr_utility.set_location(' Leaving:'||l_proc, 15);
245: --
246: Exception
247: When Others Then
248: pay_rfm_shd.g_api_dml := false; -- Unset the api dml status
249: Raise;
250: --
251: End upd_effective_end_date;
252: --

Line 335: Fetch C_Sel1 Into pay_rfm_shd.g_old_rec;

331: --
332: -- We must select and lock the current row.
333: --
334: Open C_Sel1;
335: Fetch C_Sel1 Into pay_rfm_shd.g_old_rec;
336: If C_Sel1%notfound then
337: Close C_Sel1;
338: --
339: -- The primary key is invalid therefore we must error

Line 346: <> pay_rfm_shd.g_old_rec.object_version_number) Then

342: fnd_message.raise_error;
343: End If;
344: Close C_Sel1;
345: If (p_object_version_number
346: <> pay_rfm_shd.g_old_rec.object_version_number) Then
347: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
348: fnd_message.raise_error;
349: End If;
350: --

Line 522: end pay_rfm_shd;

518:
519: --
520: End get_report_format_mapping_id;
521: --
522: end pay_rfm_shd;