512: --
513: hr_utility.set_location('hr_assignment.gen_new_ass_number',1);
514: select 'Y'
515: into duplicate
516: from sys.dual
517: where exists
518: ( select 'Y'
519: from per_all_assignments_f
520: -- from per_assignments_f commented for bug 4232539
1078: hr_utility.set_location('hr_assignment.warn_del_term',1);
1079: --
1080: select 'Y'
1081: into p_term_found
1082: from sys.dual
1083: where exists
1084: (select null
1085: from per_assignments_f a
1086: , per_assignment_status_types s
1140: hr_utility.set_location('hr_assignment.delete_ass_ref_int',1);
1141: --
1142: SELECT 'Y'
1143: into del_flag
1144: FROM SYS.DUAL
1145: WHERE EXISTS
1146: (SELECT NULL
1147: FROM PER_SPINAL_POINT_PLACEMENTS_F P
1148: WHERE P.business_group_id + 0 = p_business_group_id
1168: hr_utility.set_location('hr_assignment.delete_ass_ref_int',3);
1169: --
1170: SELECT 'Y'
1171: into del_flag
1172: from sys.dual
1173: WHERE EXISTS
1174: (SELECT NULL
1175: FROM PER_SECONDARY_ASS_STATUSES S
1176: WHERE S.business_group_id + 0 = p_business_group_id
1195: hr_utility.set_location('hr_assignment.delete_ass_ref_int',5);
1196: --
1197: SELECT 'Y'
1198: into del_flag
1199: from sys.dual
1200: WHERE EXISTS
1201: (SELECT NULL
1202: FROM PER_ASSIGNMENT_BUDGET_VALUES_F BV
1203: WHERE BV.business_group_id + 0 = p_business_group_id
1337: hr_utility.set_location('hr_assignment.check_future_primary',2);
1338: --
1339: select 'Y'
1340: into p_change_flag
1341: from sys.dual
1342: where exists
1343: (select null
1344: from per_assignments_f
1345: where assignment_id = p_assignment_id
1632: flag = 'N' and that all future changes are set to 'N'
1633: otherwise
1634: ensure that all future primary flags are set to 'N'.
1635: NB. This uses several calls to DO_PRIMARY_UPDATE which handles the
1636: date effective insert for an individual assignment row if one
1637: is required.
1638: PARAMETERS
1639: p_assignment_id - The current assignment
1640: p_period_of_service_id - The current Period of Service
2415: --
2416: BEGIN
2417: select 'Y'
2418: into p_del_flag
2419: from sys.dual
2420: where exists (
2421: select null
2422: from PER_ASSIGNMENTS_F A
2423: , FND_SESSIONS S
2448: --
2449: BEGIN
2450: select 'Y'
2451: into p_del_flag
2452: from sys.dual
2453: where exists (
2454: select null
2455: from PER_EVENTS
2456: where assignment_id = p_assignment_id
2480: --
2481: BEGIN
2482: select 'Y'
2483: into p_del_flag
2484: from sys.dual
2485: where exists (
2486: select null
2487: from PER_LETTER_REQUEST_LINES
2488: where assignment_id = p_assignment_id
2509: --
2510: BEGIN
2511: select 'Y'
2512: into p_del_flag
2513: from sys.dual
2514: where exists (
2515: select null
2516: from PAY_COST_ALLOCATIONS_F
2517: where assignment_id = p_assignment_id
2546: --
2547: BEGIN
2548: select 'Y'
2549: into p_del_flag
2550: from sys.dual
2551: where exists (
2552: select null
2553: from PER_SECONDARY_ASS_STATUSES
2554: where assignment_id = p_assignment_id
2576: --
2577: BEGIN
2578: select 'Y'
2579: into p_del_flag
2580: from sys.dual
2581: where exists (
2582: select null
2583: from PAY_PERSONAL_PAYMENT_METHODS_F
2584: where assignment_id = p_assignment_id
2606: --
2607: /* BEGIN
2608: select 'Y'
2609: into p_del_flag
2610: from sys.dual
2611: where exists
2612: (select null
2613: from pay_payroll_actions ps
2614: , pay_assignment_actions aa
2625: IF P_MODE = 'ZAP' then -- Added for Bug 4946199
2626: BEGIN
2627: select 'Y'
2628: into p_del_flag
2629: from dual
2630: where exists
2631: (select null
2632: from pay_payroll_actions ps
2633: , pay_assignment_actions aa
2641: ELSIF p_MODE = 'END' then
2642: BEGIN
2643: select 'Y'
2644: into p_del_flag
2645: from sys.dual
2646: where exists
2647: (select null
2648: from pay_payroll_actions ps
2649: , pay_assignment_actions aa
2673: --
2674: BEGIN
2675: select 'Y'
2676: into p_del_flag
2677: from sys.dual
2678: where exists (
2679: select null
2680: from hr_assignment_set_amendments asa
2681: where asa.assignment_id = p_assignment_id
2703: --
2704: BEGIN
2705: select 'Y'
2706: into p_del_flag
2707: from sys.dual
2708: where exists (
2709: select null
2710: from PER_COBRA_COV_ENROLLMENTS
2711: where assignment_id = p_assignment_id
2732: --
2733: BEGIN
2734: select 'Y'
2735: into p_del_flag
2736: from dual
2737: where exists
2738: (select null
2739: from per_cobra_cov_enrollments e
2740: , per_cobra_coverage_benefits_f b
2773: This has beeen changed for Bug# 787633 */
2774:
2775: select 'Y'
2776: into p_del_flag
2777: from sys.dual
2778: where exists (
2779: select null
2780: from PAY_US_EMP_FED_TAX_RULES_F pef,
2781: per_assignments_f paf
2947: BEGIN
2948: --
2949: SELECT 'Y'
2950: into p_del_flag
2951: FROM SYS.DUAL
2952: WHERE EXISTS
2953: (SELECT NULL
2954: FROM PER_SPINAL_POINT_PLACEMENTS_F P
2955: WHERE P.ASSIGNMENT_ID = p_assignment_id
3301: BEGIN
3302: --
3303: SELECT 'Y'
3304: into p_del_flag
3305: FROM SYS.DUAL
3306: WHERE EXISTS
3307: (SELECT NULL
3308: FROM PER_ASSIGNMENT_BUDGET_VALUES_F ABV
3309: WHERE ABV.ASSIGNMENT_ID = p_assignment_id
3404: -- Just do a lookup without any complex where clause because the complex
3405: -- where clause has been done in PRE-DELETE triggers.
3406: SELECT 'Y'
3407: into p_del_flag
3408: FROM SYS.DUAL
3409: WHERE EXISTS
3410: (SELECT NULL
3411: FROM HR_ASSIGNMENT_SET_AMENDMENTS
3412: WHERE ASSIGNMENT_ID = p_assignment_id);
3430: BEGIN
3431: --
3432: SELECT 'Y'
3433: into p_del_flag
3434: FROM SYS.DUAL
3435: WHERE EXISTS
3436: (SELECT NULL
3437: FROM PER_SECONDARY_ASS_STATUSES
3438: WHERE ASSIGNMENT_ID = p_assignment_id);
3455: BEGIN
3456: --
3457: SELECT 'Y'
3458: into p_del_flag
3459: FROM SYS.DUAL
3460: WHERE EXISTS
3461: (SELECT NULL
3462: FROM PER_PAY_PROPOSALS
3463: WHERE ASSIGNMENT_ID = p_assignment_id);
3480:
3481: BEGIN
3482: select 'Y'
3483: into p_del_flag
3484: from sys.dual
3485: where exists (
3486: select null
3487: from PAY_US_EMP_FED_TAX_RULES_F pef
3488: where pef.assignment_id = p_assignment_id);
3525: BEGIN
3526: --
3527: SELECT 'Y'
3528: into p_del_flag
3529: FROM SYS.DUAL
3530: WHERE EXISTS
3531: (SELECT NULL
3532: FROM PER_ASSIGNMENT_EXTRA_INFO
3533: WHERE ASSIGNMENT_ID = p_assignment_id);
3683: p_cost_warning := FALSE;
3684: BEGIN
3685: select 'Y'
3686: into p_del_flag
3687: from sys.dual
3688: where exists (
3689: select null
3690: from per_secondary_ass_statuses
3691: where assignment_id = p_assignment_id
3728: --
3729: BEGIN
3730: select 'Y'
3731: into p_del_flag
3732: from sys.dual
3733: where exists (
3734: select null
3735: from per_secondary_ass_statuses
3736: where assignment_id = p_assignment_id
3756: --
3757: BEGIN
3758: select 'Y'
3759: into p_del_flag
3760: from sys.dual
3761: where exists (
3762: select null
3763: from pay_cost_allocations_f
3764: where assignment_id = p_assignment_id
3844: --
3845: BEGIN
3846: select 'Y'
3847: into p_del_flag
3848: from sys.dual
3849: where exists (
3850: select null
3851: from per_assignment_budget_values_f abv
3852: where abv.assignment_id = p_assignment_id
3873:
3874: BEGIN
3875: select 'Y'
3876: into p_del_flag
3877: from sys.dual
3878: where exists (
3879: select null
3880: from per_assignment_budget_values_f abv
3881: where abv.assignment_id = p_assignment_id
4043: call_terminate_entries
4044: DESCRIPTION
4045: This procedure determines the Actual Termination Date, Last Standard
4046: Processing Date and Final Process Date in order to terminate element
4047: entries and ALUs when an individual assignment is terminated or ended.
4048:
4049: There are several cases :-
4050:
4051: i. Status is END and there are no prior TERM_ASSIGNs
4104: --
4105: BEGIN
4106: select 'Y'
4107: into term_exists
4108: from sys.dual
4109: where exists
4110: (select null
4111: from per_assignments_f a
4112: , per_assignment_status_types s
4419: hr_utility.set_location('hr_assignment.check_for_cobra',1);
4420: BEGIN
4421: select 'Y'
4422: into l_cobra_term_exists
4423: from sys.dual
4424: where exists
4425: (select null
4426: from per_cobra_cov_enrollments e
4427: where e.assignment_id = p_assignment_id
5038: declare
5039: g_rec per_assignments_v%rowtype;
5040: begin
5041: HR_ASSIGNMENT.get_assgn_dff_value('||p_business_group_id||','||p_person_id||','||p_assignment_id||','||':1,g_rec);
5042: select g_rec.'||l_context_val||' into :2 from dual;
5043: end;';
5044:
5045: EXECUTE IMMEDIATE l_sql using
5046: in out l_effective_start_date,