APPS.PAY_ROM_SHD dependencies on PAY_ROM_SHD

Line 1: Package Body pay_rom_shd as

1: Package Body pay_rom_shd as
2: /* $Header: pyromrhi.pkb 115.3 2002/12/09 15:04:01 divicker noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |

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

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

Line 83: pay_rom_shd.g_old_rec.run_type_org_method_id and

79: --
80: l_fct_ret := false;
81: Else
82: If (p_run_type_org_method_id =
83: pay_rom_shd.g_old_rec.run_type_org_method_id and
84: p_object_version_number =
85: pay_rom_shd.g_old_rec.object_version_number) Then
86: --
87: -- The g_old_rec is current therefore we must

Line 85: pay_rom_shd.g_old_rec.object_version_number) Then

81: Else
82: If (p_run_type_org_method_id =
83: pay_rom_shd.g_old_rec.run_type_org_method_id and
84: p_object_version_number =
85: pay_rom_shd.g_old_rec.object_version_number) Then
86: --
87: -- The g_old_rec is current therefore we must
88: -- set the returning function to true
89: --

Line 96: Fetch C_Sel1 Into pay_rom_shd.g_old_rec;

92: --
93: -- Select the current row
94: --
95: Open C_Sel1;
96: Fetch C_Sel1 Into pay_rom_shd.g_old_rec;
97: If C_Sel1%notfound Then
98: Close C_Sel1;
99: --
100: -- The primary key is invalid therefore we must error

Line 107: <> pay_rom_shd.g_old_rec.object_version_number) Then

103: fnd_message.raise_error;
104: End If;
105: Close C_Sel1;
106: If (p_object_version_number
107: <> pay_rom_shd.g_old_rec.object_version_number) Then
108: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
109: fnd_message.raise_error;
110: End If;
111: l_fct_ret := true;

Line 334: Fetch C_Sel1 Into pay_rom_shd.g_old_rec;

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

Line 345: <> pay_rom_shd.g_old_rec.object_version_number) Then

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

Line 362: ,p_parent_key_value1 => pay_rom_shd.g_old_rec.org_payment_method_id

358: ,p_base_key_column => 'run_type_org_method_id'
359: ,p_base_key_value => p_run_type_org_method_id
360: ,p_parent_table_name1 => 'pay_org_payment_methods_f'
361: ,p_parent_key_column1 => 'org_payment_method_id'
362: ,p_parent_key_value1 => pay_rom_shd.g_old_rec.org_payment_method_id
363: ,p_parent_table_name2 => 'pay_run_types_f'
364: ,p_parent_key_column2 => 'run_type_id'
365: ,p_parent_key_value2 => pay_rom_shd.g_old_rec.run_type_id
366: ,p_enforce_foreign_locking => true

Line 365: ,p_parent_key_value2 => pay_rom_shd.g_old_rec.run_type_id

361: ,p_parent_key_column1 => 'org_payment_method_id'
362: ,p_parent_key_value1 => pay_rom_shd.g_old_rec.org_payment_method_id
363: ,p_parent_table_name2 => 'pay_run_types_f'
364: ,p_parent_key_column2 => 'run_type_id'
365: ,p_parent_key_value2 => pay_rom_shd.g_old_rec.run_type_id
366: ,p_enforce_foreign_locking => true
367: ,p_validation_start_date => l_validation_start_date
368: ,p_validation_end_date => l_validation_end_date
369: );

Line 444: end pay_rom_shd;

440: Return(l_rec);
441: --
442: End convert_args;
443: --
444: end pay_rom_shd;