92: --
93: hr_utility.set_location(' Leaving:'||l_proc, 10);
94: --
95: Exception
96: When hr_api.check_integrity_violated Then
97: -- A check constraint has been violated
98: --
99: pqh_ver_shd.constraint_error
100: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
96: When hr_api.check_integrity_violated Then
97: -- A check constraint has been violated
98: --
99: pqh_ver_shd.constraint_error
100: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
101: When hr_api.parent_integrity_violated Then
102: -- Parent integrity has been violated
103: --
104: pqh_ver_shd.constraint_error
97: -- A check constraint has been violated
98: --
99: pqh_ver_shd.constraint_error
100: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
101: When hr_api.parent_integrity_violated Then
102: -- Parent integrity has been violated
103: --
104: pqh_ver_shd.constraint_error
105: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
101: When hr_api.parent_integrity_violated Then
102: -- Parent integrity has been violated
103: --
104: pqh_ver_shd.constraint_error
105: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
106: When hr_api.unique_integrity_violated Then
107: -- Unique integrity has been violated
108: --
109: pqh_ver_shd.constraint_error
102: -- Parent integrity has been violated
103: --
104: pqh_ver_shd.constraint_error
105: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
106: When hr_api.unique_integrity_violated Then
107: -- Unique integrity has been violated
108: --
109: pqh_ver_shd.constraint_error
110: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
106: When hr_api.unique_integrity_violated Then
107: -- Unique integrity has been violated
108: --
109: pqh_ver_shd.constraint_error
110: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
111: When Others Then
112: --
113: Raise;
114: End update_dml;
271: );
272: --
273: exception
274: --
275: when hr_api.cannot_find_prog_unit then
276: --
277: hr_api.cannot_find_prog_unit_error
278: (p_module_name => 'PQH_DE_WRKPLC_VLDTN_VERS'
279: ,p_hook_type => 'AU');
273: exception
274: --
275: when hr_api.cannot_find_prog_unit then
276: --
277: hr_api.cannot_find_prog_unit_error
278: (p_module_name => 'PQH_DE_WRKPLC_VLDTN_VERS'
279: ,p_hook_type => 'AU');
280: --
281: end;
336: -- p_rec plsql record structure
337: -- to see if a system default is being used. If a system default
338: -- is being used then we must set to the 'current' argument value.
339: --
340: If (p_rec.wrkplc_vldtn_id = hr_api.g_number) then
341: p_rec.wrkplc_vldtn_id :=
342: pqh_ver_shd.g_old_rec.wrkplc_vldtn_id;
343: End If;
344: If (p_rec.version_number = hr_api.g_number) then
340: If (p_rec.wrkplc_vldtn_id = hr_api.g_number) then
341: p_rec.wrkplc_vldtn_id :=
342: pqh_ver_shd.g_old_rec.wrkplc_vldtn_id;
343: End If;
344: If (p_rec.version_number = hr_api.g_number) then
345: p_rec.version_number :=
346: pqh_ver_shd.g_old_rec.version_number;
347: End If;
348: If (p_rec.business_group_id = hr_api.g_number) then
344: If (p_rec.version_number = hr_api.g_number) then
345: p_rec.version_number :=
346: pqh_ver_shd.g_old_rec.version_number;
347: End If;
348: If (p_rec.business_group_id = hr_api.g_number) then
349: p_rec.business_group_id :=
350: pqh_ver_shd.g_old_rec.business_group_id;
351: End If;
352: If (p_rec.tariff_contract_code = hr_api.g_varchar2) then
348: If (p_rec.business_group_id = hr_api.g_number) then
349: p_rec.business_group_id :=
350: pqh_ver_shd.g_old_rec.business_group_id;
351: End If;
352: If (p_rec.tariff_contract_code = hr_api.g_varchar2) then
353: p_rec.tariff_contract_code :=
354: pqh_ver_shd.g_old_rec.tariff_contract_code;
355: End If;
356: If (p_rec.tariff_group_code = hr_api.g_varchar2) then
352: If (p_rec.tariff_contract_code = hr_api.g_varchar2) then
353: p_rec.tariff_contract_code :=
354: pqh_ver_shd.g_old_rec.tariff_contract_code;
355: End If;
356: If (p_rec.tariff_group_code = hr_api.g_varchar2) then
357: p_rec.tariff_group_code :=
358: pqh_ver_shd.g_old_rec.tariff_group_code;
359: End If;
360: If (p_rec.remuneration_job_description = hr_api.g_varchar2) then
356: If (p_rec.tariff_group_code = hr_api.g_varchar2) then
357: p_rec.tariff_group_code :=
358: pqh_ver_shd.g_old_rec.tariff_group_code;
359: End If;
360: If (p_rec.remuneration_job_description = hr_api.g_varchar2) then
361: p_rec.remuneration_job_description :=
362: pqh_ver_shd.g_old_rec.remuneration_job_description;
363: End If;
364: If (p_rec.job_group_id = hr_api.g_number) then
360: If (p_rec.remuneration_job_description = hr_api.g_varchar2) then
361: p_rec.remuneration_job_description :=
362: pqh_ver_shd.g_old_rec.remuneration_job_description;
363: End If;
364: If (p_rec.job_group_id = hr_api.g_number) then
365: p_rec.job_group_id :=
366: pqh_ver_shd.g_old_rec.job_group_id;
367: End If;
368: If (p_rec.remuneration_job_id = hr_api.g_number) then
364: If (p_rec.job_group_id = hr_api.g_number) then
365: p_rec.job_group_id :=
366: pqh_ver_shd.g_old_rec.job_group_id;
367: End If;
368: If (p_rec.remuneration_job_id = hr_api.g_number) then
369: p_rec.remuneration_job_id :=
370: pqh_ver_shd.g_old_rec.remuneration_job_id;
371: End If;
372: If (p_rec.derived_grade_id = hr_api.g_number) then
368: If (p_rec.remuneration_job_id = hr_api.g_number) then
369: p_rec.remuneration_job_id :=
370: pqh_ver_shd.g_old_rec.remuneration_job_id;
371: End If;
372: If (p_rec.derived_grade_id = hr_api.g_number) then
373: p_rec.derived_grade_id :=
374: pqh_ver_shd.g_old_rec.derived_grade_id;
375: End If;
376: If (p_rec.derived_case_group_id = hr_api.g_number) then
372: If (p_rec.derived_grade_id = hr_api.g_number) then
373: p_rec.derived_grade_id :=
374: pqh_ver_shd.g_old_rec.derived_grade_id;
375: End If;
376: If (p_rec.derived_case_group_id = hr_api.g_number) then
377: p_rec.derived_case_group_id :=
378: pqh_ver_shd.g_old_rec.derived_case_group_id;
379: End If;
380: If (p_rec.derived_subcasgrp_id = hr_api.g_number) then
376: If (p_rec.derived_case_group_id = hr_api.g_number) then
377: p_rec.derived_case_group_id :=
378: pqh_ver_shd.g_old_rec.derived_case_group_id;
379: End If;
380: If (p_rec.derived_subcasgrp_id = hr_api.g_number) then
381: p_rec.derived_subcasgrp_id :=
382: pqh_ver_shd.g_old_rec.derived_subcasgrp_id;
383: End If;
384: If (p_rec.user_enterable_grade_id = hr_api.g_number) then
380: If (p_rec.derived_subcasgrp_id = hr_api.g_number) then
381: p_rec.derived_subcasgrp_id :=
382: pqh_ver_shd.g_old_rec.derived_subcasgrp_id;
383: End If;
384: If (p_rec.user_enterable_grade_id = hr_api.g_number) then
385: p_rec.user_enterable_grade_id :=
386: pqh_ver_shd.g_old_rec.user_enterable_grade_id;
387: End If;
388: If (p_rec.user_enterable_case_group_id = hr_api.g_number) then
384: If (p_rec.user_enterable_grade_id = hr_api.g_number) then
385: p_rec.user_enterable_grade_id :=
386: pqh_ver_shd.g_old_rec.user_enterable_grade_id;
387: End If;
388: If (p_rec.user_enterable_case_group_id = hr_api.g_number) then
389: p_rec.user_enterable_case_group_id :=
390: pqh_ver_shd.g_old_rec.user_enterable_case_group_id;
391: End If;
392: If (p_rec.user_enterable_subcasgrp_id = hr_api.g_number) then
388: If (p_rec.user_enterable_case_group_id = hr_api.g_number) then
389: p_rec.user_enterable_case_group_id :=
390: pqh_ver_shd.g_old_rec.user_enterable_case_group_id;
391: End If;
392: If (p_rec.user_enterable_subcasgrp_id = hr_api.g_number) then
393: p_rec.user_enterable_subcasgrp_id :=
394: pqh_ver_shd.g_old_rec.user_enterable_subcasgrp_id;
395: End If;
396: If (p_rec.freeze = hr_api.g_varchar2) then
392: If (p_rec.user_enterable_subcasgrp_id = hr_api.g_number) then
393: p_rec.user_enterable_subcasgrp_id :=
394: pqh_ver_shd.g_old_rec.user_enterable_subcasgrp_id;
395: End If;
396: If (p_rec.freeze = hr_api.g_varchar2) then
397: p_rec.freeze :=
398: pqh_ver_shd.g_old_rec.freeze;
399: End If;
400: --
460: Procedure upd
461: (p_effective_date in date
462: ,p_wrkplc_vldtn_ver_id in number
463: ,p_object_version_number in out nocopy number
464: ,p_wrkplc_vldtn_id in number default hr_api.g_number
465: ,p_version_number in number default hr_api.g_number
466: ,p_business_group_id in number default hr_api.g_number
467: ,p_tariff_contract_code in varchar2 default hr_api.g_varchar2
468: ,p_tariff_group_code in varchar2 default hr_api.g_varchar2
461: (p_effective_date in date
462: ,p_wrkplc_vldtn_ver_id in number
463: ,p_object_version_number in out nocopy number
464: ,p_wrkplc_vldtn_id in number default hr_api.g_number
465: ,p_version_number in number default hr_api.g_number
466: ,p_business_group_id in number default hr_api.g_number
467: ,p_tariff_contract_code in varchar2 default hr_api.g_varchar2
468: ,p_tariff_group_code in varchar2 default hr_api.g_varchar2
469: ,p_freeze in varchar2 default hr_api.g_varchar2
462: ,p_wrkplc_vldtn_ver_id in number
463: ,p_object_version_number in out nocopy number
464: ,p_wrkplc_vldtn_id in number default hr_api.g_number
465: ,p_version_number in number default hr_api.g_number
466: ,p_business_group_id in number default hr_api.g_number
467: ,p_tariff_contract_code in varchar2 default hr_api.g_varchar2
468: ,p_tariff_group_code in varchar2 default hr_api.g_varchar2
469: ,p_freeze in varchar2 default hr_api.g_varchar2
470: ,p_remuneration_job_description in varchar2 default hr_api.g_varchar2
463: ,p_object_version_number in out nocopy number
464: ,p_wrkplc_vldtn_id in number default hr_api.g_number
465: ,p_version_number in number default hr_api.g_number
466: ,p_business_group_id in number default hr_api.g_number
467: ,p_tariff_contract_code in varchar2 default hr_api.g_varchar2
468: ,p_tariff_group_code in varchar2 default hr_api.g_varchar2
469: ,p_freeze in varchar2 default hr_api.g_varchar2
470: ,p_remuneration_job_description in varchar2 default hr_api.g_varchar2
471: ,p_job_group_id in number default hr_api.g_number
464: ,p_wrkplc_vldtn_id in number default hr_api.g_number
465: ,p_version_number in number default hr_api.g_number
466: ,p_business_group_id in number default hr_api.g_number
467: ,p_tariff_contract_code in varchar2 default hr_api.g_varchar2
468: ,p_tariff_group_code in varchar2 default hr_api.g_varchar2
469: ,p_freeze in varchar2 default hr_api.g_varchar2
470: ,p_remuneration_job_description in varchar2 default hr_api.g_varchar2
471: ,p_job_group_id in number default hr_api.g_number
472: ,p_remuneration_job_id in number default hr_api.g_number
465: ,p_version_number in number default hr_api.g_number
466: ,p_business_group_id in number default hr_api.g_number
467: ,p_tariff_contract_code in varchar2 default hr_api.g_varchar2
468: ,p_tariff_group_code in varchar2 default hr_api.g_varchar2
469: ,p_freeze in varchar2 default hr_api.g_varchar2
470: ,p_remuneration_job_description in varchar2 default hr_api.g_varchar2
471: ,p_job_group_id in number default hr_api.g_number
472: ,p_remuneration_job_id in number default hr_api.g_number
473: ,p_derived_grade_id in number default hr_api.g_number
466: ,p_business_group_id in number default hr_api.g_number
467: ,p_tariff_contract_code in varchar2 default hr_api.g_varchar2
468: ,p_tariff_group_code in varchar2 default hr_api.g_varchar2
469: ,p_freeze in varchar2 default hr_api.g_varchar2
470: ,p_remuneration_job_description in varchar2 default hr_api.g_varchar2
471: ,p_job_group_id in number default hr_api.g_number
472: ,p_remuneration_job_id in number default hr_api.g_number
473: ,p_derived_grade_id in number default hr_api.g_number
474: ,p_derived_case_group_id in number default hr_api.g_number
467: ,p_tariff_contract_code in varchar2 default hr_api.g_varchar2
468: ,p_tariff_group_code in varchar2 default hr_api.g_varchar2
469: ,p_freeze in varchar2 default hr_api.g_varchar2
470: ,p_remuneration_job_description in varchar2 default hr_api.g_varchar2
471: ,p_job_group_id in number default hr_api.g_number
472: ,p_remuneration_job_id in number default hr_api.g_number
473: ,p_derived_grade_id in number default hr_api.g_number
474: ,p_derived_case_group_id in number default hr_api.g_number
475: ,p_derived_subcasgrp_id in number default hr_api.g_number
468: ,p_tariff_group_code in varchar2 default hr_api.g_varchar2
469: ,p_freeze in varchar2 default hr_api.g_varchar2
470: ,p_remuneration_job_description in varchar2 default hr_api.g_varchar2
471: ,p_job_group_id in number default hr_api.g_number
472: ,p_remuneration_job_id in number default hr_api.g_number
473: ,p_derived_grade_id in number default hr_api.g_number
474: ,p_derived_case_group_id in number default hr_api.g_number
475: ,p_derived_subcasgrp_id in number default hr_api.g_number
476: ,p_user_enterable_grade_id in number default hr_api.g_number
469: ,p_freeze in varchar2 default hr_api.g_varchar2
470: ,p_remuneration_job_description in varchar2 default hr_api.g_varchar2
471: ,p_job_group_id in number default hr_api.g_number
472: ,p_remuneration_job_id in number default hr_api.g_number
473: ,p_derived_grade_id in number default hr_api.g_number
474: ,p_derived_case_group_id in number default hr_api.g_number
475: ,p_derived_subcasgrp_id in number default hr_api.g_number
476: ,p_user_enterable_grade_id in number default hr_api.g_number
477: ,p_user_enterable_case_group_id in number default hr_api.g_number
470: ,p_remuneration_job_description in varchar2 default hr_api.g_varchar2
471: ,p_job_group_id in number default hr_api.g_number
472: ,p_remuneration_job_id in number default hr_api.g_number
473: ,p_derived_grade_id in number default hr_api.g_number
474: ,p_derived_case_group_id in number default hr_api.g_number
475: ,p_derived_subcasgrp_id in number default hr_api.g_number
476: ,p_user_enterable_grade_id in number default hr_api.g_number
477: ,p_user_enterable_case_group_id in number default hr_api.g_number
478: ,p_user_enterable_subcasgrp_id in number default hr_api.g_number
471: ,p_job_group_id in number default hr_api.g_number
472: ,p_remuneration_job_id in number default hr_api.g_number
473: ,p_derived_grade_id in number default hr_api.g_number
474: ,p_derived_case_group_id in number default hr_api.g_number
475: ,p_derived_subcasgrp_id in number default hr_api.g_number
476: ,p_user_enterable_grade_id in number default hr_api.g_number
477: ,p_user_enterable_case_group_id in number default hr_api.g_number
478: ,p_user_enterable_subcasgrp_id in number default hr_api.g_number
479: ) is
472: ,p_remuneration_job_id in number default hr_api.g_number
473: ,p_derived_grade_id in number default hr_api.g_number
474: ,p_derived_case_group_id in number default hr_api.g_number
475: ,p_derived_subcasgrp_id in number default hr_api.g_number
476: ,p_user_enterable_grade_id in number default hr_api.g_number
477: ,p_user_enterable_case_group_id in number default hr_api.g_number
478: ,p_user_enterable_subcasgrp_id in number default hr_api.g_number
479: ) is
480: --
473: ,p_derived_grade_id in number default hr_api.g_number
474: ,p_derived_case_group_id in number default hr_api.g_number
475: ,p_derived_subcasgrp_id in number default hr_api.g_number
476: ,p_user_enterable_grade_id in number default hr_api.g_number
477: ,p_user_enterable_case_group_id in number default hr_api.g_number
478: ,p_user_enterable_subcasgrp_id in number default hr_api.g_number
479: ) is
480: --
481: l_rec pqh_ver_shd.g_rec_type;
474: ,p_derived_case_group_id in number default hr_api.g_number
475: ,p_derived_subcasgrp_id in number default hr_api.g_number
476: ,p_user_enterable_grade_id in number default hr_api.g_number
477: ,p_user_enterable_case_group_id in number default hr_api.g_number
478: ,p_user_enterable_subcasgrp_id in number default hr_api.g_number
479: ) is
480: --
481: l_rec pqh_ver_shd.g_rec_type;
482: l_proc varchar2(72) := g_package||'upd';