51: --
52: -- {End Of Comments}
53: -- ----------------------------------------------------------------------------
54: Procedure update_dml
55: (p_rec in out nocopy psp_pso_shd.g_rec_type
56: ) is
57: --
58: l_proc varchar2(72) := g_package||'update_dml';
59: --
86: Exception
87: When hr_api.check_integrity_violated Then
88: -- A check constraint has been violated
89: --
90: psp_pso_shd.constraint_error
91: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
92: When hr_api.parent_integrity_violated Then
93: -- Parent integrity has been violated
94: --
91: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
92: When hr_api.parent_integrity_violated Then
93: -- Parent integrity has been violated
94: --
95: psp_pso_shd.constraint_error
96: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
97: When hr_api.unique_integrity_violated Then
98: -- Unique integrity has been violated
99: --
96: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
97: When hr_api.unique_integrity_violated Then
98: -- Unique integrity has been violated
99: --
100: psp_pso_shd.constraint_error
101: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
102: When Others Then
103: --
104: Raise;
136: --
137: -- {End Of Comments}
138: -- ----------------------------------------------------------------------------
139: Procedure pre_update
140: (p_rec in psp_pso_shd.g_rec_type
141: ) is
142: --
143: l_proc varchar2(72) := g_package||'pre_update';
144: --
180: --
181: -- {End Of Comments}
182: -- ----------------------------------------------------------------------------
183: Procedure post_update
184: (p_rec in psp_pso_shd.g_rec_type
185: ) is
186: --
187: l_proc varchar2(72) := g_package||'post_update';
188: --
207: => p_rec.annual_salary_cap
208: ,p_object_version_number
209: => p_rec.object_version_number
210: ,p_funding_source_code_o
211: => psp_pso_shd.g_old_rec.funding_source_code
212: ,p_project_id_o
213: => psp_pso_shd.g_old_rec.project_id
214: ,p_start_date_o
215: => psp_pso_shd.g_old_rec.start_date
209: => p_rec.object_version_number
210: ,p_funding_source_code_o
211: => psp_pso_shd.g_old_rec.funding_source_code
212: ,p_project_id_o
213: => psp_pso_shd.g_old_rec.project_id
214: ,p_start_date_o
215: => psp_pso_shd.g_old_rec.start_date
216: ,p_end_date_o
217: => psp_pso_shd.g_old_rec.end_date
211: => psp_pso_shd.g_old_rec.funding_source_code
212: ,p_project_id_o
213: => psp_pso_shd.g_old_rec.project_id
214: ,p_start_date_o
215: => psp_pso_shd.g_old_rec.start_date
216: ,p_end_date_o
217: => psp_pso_shd.g_old_rec.end_date
218: ,p_currency_code_o
219: => psp_pso_shd.g_old_rec.currency_code
213: => psp_pso_shd.g_old_rec.project_id
214: ,p_start_date_o
215: => psp_pso_shd.g_old_rec.start_date
216: ,p_end_date_o
217: => psp_pso_shd.g_old_rec.end_date
218: ,p_currency_code_o
219: => psp_pso_shd.g_old_rec.currency_code
220: ,p_annual_salary_cap_o
221: => psp_pso_shd.g_old_rec.annual_salary_cap
215: => psp_pso_shd.g_old_rec.start_date
216: ,p_end_date_o
217: => psp_pso_shd.g_old_rec.end_date
218: ,p_currency_code_o
219: => psp_pso_shd.g_old_rec.currency_code
220: ,p_annual_salary_cap_o
221: => psp_pso_shd.g_old_rec.annual_salary_cap
222: ,p_object_version_number_o
223: => psp_pso_shd.g_old_rec.object_version_number
217: => psp_pso_shd.g_old_rec.end_date
218: ,p_currency_code_o
219: => psp_pso_shd.g_old_rec.currency_code
220: ,p_annual_salary_cap_o
221: => psp_pso_shd.g_old_rec.annual_salary_cap
222: ,p_object_version_number_o
223: => psp_pso_shd.g_old_rec.object_version_number
224: );
225: --
219: => psp_pso_shd.g_old_rec.currency_code
220: ,p_annual_salary_cap_o
221: => psp_pso_shd.g_old_rec.annual_salary_cap
222: ,p_object_version_number_o
223: => psp_pso_shd.g_old_rec.object_version_number
224: );
225: --
226: exception
227: --
279: --
280: -- {End Of Comments}
281: -- ----------------------------------------------------------------------------
282: Procedure convert_defs
283: (p_rec in out nocopy psp_pso_shd.g_rec_type
284: ) is
285: --
286: Begin
287: --
291: -- is being used then we must set to the 'current' argument value.
292: --
293: If (p_rec.funding_source_code = hr_api.g_varchar2) then
294: p_rec.funding_source_code :=
295: psp_pso_shd.g_old_rec.funding_source_code;
296: End If;
297: If (p_rec.project_id = hr_api.g_number) then
298: p_rec.project_id :=
299: psp_pso_shd.g_old_rec.project_id;
295: psp_pso_shd.g_old_rec.funding_source_code;
296: End If;
297: If (p_rec.project_id = hr_api.g_number) then
298: p_rec.project_id :=
299: psp_pso_shd.g_old_rec.project_id;
300: End If;
301: If (p_rec.start_date = hr_api.g_date) then
302: p_rec.start_date :=
303: psp_pso_shd.g_old_rec.start_date;
299: psp_pso_shd.g_old_rec.project_id;
300: End If;
301: If (p_rec.start_date = hr_api.g_date) then
302: p_rec.start_date :=
303: psp_pso_shd.g_old_rec.start_date;
304: End If;
305: If (p_rec.end_date = hr_api.g_date) then
306: p_rec.end_date :=
307: psp_pso_shd.g_old_rec.end_date;
303: psp_pso_shd.g_old_rec.start_date;
304: End If;
305: If (p_rec.end_date = hr_api.g_date) then
306: p_rec.end_date :=
307: psp_pso_shd.g_old_rec.end_date;
308: End If;
309: If (p_rec.currency_code = hr_api.g_varchar2) then
310: p_rec.currency_code :=
311: psp_pso_shd.g_old_rec.currency_code;
307: psp_pso_shd.g_old_rec.end_date;
308: End If;
309: If (p_rec.currency_code = hr_api.g_varchar2) then
310: p_rec.currency_code :=
311: psp_pso_shd.g_old_rec.currency_code;
312: End If;
313: If (p_rec.annual_salary_cap = hr_api.g_number) then
314: p_rec.annual_salary_cap :=
315: psp_pso_shd.g_old_rec.annual_salary_cap;
311: psp_pso_shd.g_old_rec.currency_code;
312: End If;
313: If (p_rec.annual_salary_cap = hr_api.g_number) then
314: p_rec.annual_salary_cap :=
315: psp_pso_shd.g_old_rec.annual_salary_cap;
316: End If;
317: --
318: End convert_defs;
319: --
320: -- ----------------------------------------------------------------------------
321: -- |---------------------------------< upd >----------------------------------|
322: -- ----------------------------------------------------------------------------
323: Procedure upd
324: (p_rec in out nocopy psp_pso_shd.g_rec_type
325: ) is
326: --
327: l_proc varchar2(72) := g_package||'upd';
328: --
330: hr_utility.set_location('Entering:'||l_proc, 5);
331: --
332: -- We must lock the row which we need to update.
333: --
334: psp_pso_shd.lck
335: (p_rec.salary_cap_override_id
336: ,p_rec.object_version_number
337: );
338: --
381: ,p_annual_salary_cap in number default hr_api.g_number
382: ,p_end_date in date default hr_api.g_date
383: ) is
384: --
385: l_rec psp_pso_shd.g_rec_type;
386: l_proc varchar2(72) := g_package||'upd';
387: --
388: Begin
389: hr_utility.set_location('Entering:'||l_proc, 5);
391: -- Call conversion function to turn arguments into the
392: -- l_rec structure.
393: --
394: l_rec :=
395: psp_pso_shd.convert_args
396: (p_salary_cap_override_id
397: ,p_funding_source_code
398: ,p_project_id
399: ,p_start_date