41: -- Internal Row Handler Use Only.
42: --
43: -- {End Of Comments}
44: -- ----------------------------------------------------------------------------
45: Procedure delete_dml(p_rec in pqh_wfs_shd.g_rec_type) is
46: --
47: l_proc varchar2(72) := g_package||'delete_dml';
48: --
49: Begin
60: --
61: Exception
62: When hr_api.child_integrity_violated then
63: -- Child integrity has been violated
64: pqh_wfs_shd.constraint_error
65: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
66: When Others Then
67: Raise;
68: End delete_dml;
98: -- Internal Row Handler Use Only.
99: --
100: -- {End Of Comments}
101: -- ----------------------------------------------------------------------------
102: Procedure pre_delete(p_rec in pqh_wfs_shd.g_rec_type) is
103: --
104: l_proc varchar2(72) := g_package||'pre_delete';
105: --
106: Begin
140: -- Internal table Handler Use Only.
141: --
142: -- {End Of Comments}
143: -- ----------------------------------------------------------------------------
144: Procedure post_delete(p_rec in pqh_wfs_shd.g_rec_type) is
145: --
146: l_proc varchar2(72) := g_package||'post_delete';
147: --
148: Begin
155: --
156: pqh_wfs_rkd.after_delete
157: (
158: p_worksheet_fund_src_id =>p_rec.worksheet_fund_src_id
159: ,p_worksheet_bdgt_elmnt_id_o =>pqh_wfs_shd.g_old_rec.worksheet_bdgt_elmnt_id
160: ,p_distribution_percentage_o =>pqh_wfs_shd.g_old_rec.distribution_percentage
161: ,p_cost_allocation_keyflex_id_o =>pqh_wfs_shd.g_old_rec.cost_allocation_keyflex_id
162: ,p_project_id_o =>pqh_wfs_shd.g_old_rec.project_id
163: ,p_award_id_o =>pqh_wfs_shd.g_old_rec.award_id
156: pqh_wfs_rkd.after_delete
157: (
158: p_worksheet_fund_src_id =>p_rec.worksheet_fund_src_id
159: ,p_worksheet_bdgt_elmnt_id_o =>pqh_wfs_shd.g_old_rec.worksheet_bdgt_elmnt_id
160: ,p_distribution_percentage_o =>pqh_wfs_shd.g_old_rec.distribution_percentage
161: ,p_cost_allocation_keyflex_id_o =>pqh_wfs_shd.g_old_rec.cost_allocation_keyflex_id
162: ,p_project_id_o =>pqh_wfs_shd.g_old_rec.project_id
163: ,p_award_id_o =>pqh_wfs_shd.g_old_rec.award_id
164: ,p_task_id_o =>pqh_wfs_shd.g_old_rec.task_id
157: (
158: p_worksheet_fund_src_id =>p_rec.worksheet_fund_src_id
159: ,p_worksheet_bdgt_elmnt_id_o =>pqh_wfs_shd.g_old_rec.worksheet_bdgt_elmnt_id
160: ,p_distribution_percentage_o =>pqh_wfs_shd.g_old_rec.distribution_percentage
161: ,p_cost_allocation_keyflex_id_o =>pqh_wfs_shd.g_old_rec.cost_allocation_keyflex_id
162: ,p_project_id_o =>pqh_wfs_shd.g_old_rec.project_id
163: ,p_award_id_o =>pqh_wfs_shd.g_old_rec.award_id
164: ,p_task_id_o =>pqh_wfs_shd.g_old_rec.task_id
165: ,p_expenditure_type_o =>pqh_wfs_shd.g_old_rec.expenditure_type
158: p_worksheet_fund_src_id =>p_rec.worksheet_fund_src_id
159: ,p_worksheet_bdgt_elmnt_id_o =>pqh_wfs_shd.g_old_rec.worksheet_bdgt_elmnt_id
160: ,p_distribution_percentage_o =>pqh_wfs_shd.g_old_rec.distribution_percentage
161: ,p_cost_allocation_keyflex_id_o =>pqh_wfs_shd.g_old_rec.cost_allocation_keyflex_id
162: ,p_project_id_o =>pqh_wfs_shd.g_old_rec.project_id
163: ,p_award_id_o =>pqh_wfs_shd.g_old_rec.award_id
164: ,p_task_id_o =>pqh_wfs_shd.g_old_rec.task_id
165: ,p_expenditure_type_o =>pqh_wfs_shd.g_old_rec.expenditure_type
166: ,p_organization_id_o =>pqh_wfs_shd.g_old_rec.organization_id
159: ,p_worksheet_bdgt_elmnt_id_o =>pqh_wfs_shd.g_old_rec.worksheet_bdgt_elmnt_id
160: ,p_distribution_percentage_o =>pqh_wfs_shd.g_old_rec.distribution_percentage
161: ,p_cost_allocation_keyflex_id_o =>pqh_wfs_shd.g_old_rec.cost_allocation_keyflex_id
162: ,p_project_id_o =>pqh_wfs_shd.g_old_rec.project_id
163: ,p_award_id_o =>pqh_wfs_shd.g_old_rec.award_id
164: ,p_task_id_o =>pqh_wfs_shd.g_old_rec.task_id
165: ,p_expenditure_type_o =>pqh_wfs_shd.g_old_rec.expenditure_type
166: ,p_organization_id_o =>pqh_wfs_shd.g_old_rec.organization_id
167: ,p_object_version_number_o =>pqh_wfs_shd.g_old_rec.object_version_number
160: ,p_distribution_percentage_o =>pqh_wfs_shd.g_old_rec.distribution_percentage
161: ,p_cost_allocation_keyflex_id_o =>pqh_wfs_shd.g_old_rec.cost_allocation_keyflex_id
162: ,p_project_id_o =>pqh_wfs_shd.g_old_rec.project_id
163: ,p_award_id_o =>pqh_wfs_shd.g_old_rec.award_id
164: ,p_task_id_o =>pqh_wfs_shd.g_old_rec.task_id
165: ,p_expenditure_type_o =>pqh_wfs_shd.g_old_rec.expenditure_type
166: ,p_organization_id_o =>pqh_wfs_shd.g_old_rec.organization_id
167: ,p_object_version_number_o =>pqh_wfs_shd.g_old_rec.object_version_number
168: );
161: ,p_cost_allocation_keyflex_id_o =>pqh_wfs_shd.g_old_rec.cost_allocation_keyflex_id
162: ,p_project_id_o =>pqh_wfs_shd.g_old_rec.project_id
163: ,p_award_id_o =>pqh_wfs_shd.g_old_rec.award_id
164: ,p_task_id_o =>pqh_wfs_shd.g_old_rec.task_id
165: ,p_expenditure_type_o =>pqh_wfs_shd.g_old_rec.expenditure_type
166: ,p_organization_id_o =>pqh_wfs_shd.g_old_rec.organization_id
167: ,p_object_version_number_o =>pqh_wfs_shd.g_old_rec.object_version_number
168: );
169: --
162: ,p_project_id_o =>pqh_wfs_shd.g_old_rec.project_id
163: ,p_award_id_o =>pqh_wfs_shd.g_old_rec.award_id
164: ,p_task_id_o =>pqh_wfs_shd.g_old_rec.task_id
165: ,p_expenditure_type_o =>pqh_wfs_shd.g_old_rec.expenditure_type
166: ,p_organization_id_o =>pqh_wfs_shd.g_old_rec.organization_id
167: ,p_object_version_number_o =>pqh_wfs_shd.g_old_rec.object_version_number
168: );
169: --
170: exception
163: ,p_award_id_o =>pqh_wfs_shd.g_old_rec.award_id
164: ,p_task_id_o =>pqh_wfs_shd.g_old_rec.task_id
165: ,p_expenditure_type_o =>pqh_wfs_shd.g_old_rec.expenditure_type
166: ,p_organization_id_o =>pqh_wfs_shd.g_old_rec.organization_id
167: ,p_object_version_number_o =>pqh_wfs_shd.g_old_rec.object_version_number
168: );
169: --
170: exception
171: --
187: -- |---------------------------------< del >----------------------------------|
188: -- ----------------------------------------------------------------------------
189: Procedure del
190: (
191: p_rec in pqh_wfs_shd.g_rec_type
192: ) is
193: --
194: l_proc varchar2(72) := g_package||'del';
195: --
197: hr_utility.set_location('Entering:'||l_proc, 5);
198: --
199: -- We must lock the row which we need to delete.
200: --
201: pqh_wfs_shd.lck
202: (
203: p_rec.worksheet_fund_src_id,
204: p_rec.object_version_number
205: );
229: p_worksheet_fund_src_id in number,
230: p_object_version_number in number
231: ) is
232: --
233: l_rec pqh_wfs_shd.g_rec_type;
234: l_proc varchar2(72) := g_package||'del';
235: --
236: Begin
237: hr_utility.set_location('Entering:'||l_proc, 5);