DBA Data[Home] [Help]

APPS.HR_PERF_MGMT_PLAN_INTERNAL dependencies on HR_UTILITY

Line 7: g_debug BOOLEAN := hr_utility.debug_enabled;

3: -- Package Variables
4: -- Package Variables
5: --
6: g_package VARCHAR2 (33) := 'hr_perf_mgmt_plan_internal.';
7: g_debug BOOLEAN := hr_utility.debug_enabled;
8: g_num_errors NUMBER := 0;
9: g_max_errors NUMBER;
10: --
11: -- Proprietory debugging. Allows for concurrent request output, etc.

Line 241: hr_utility.trace (SUBSTR (p_message_text, 1, 200));

237: IS
238: BEGIN
239: IF fnd_global.conc_request_id = -1
240: THEN
241: hr_utility.trace (SUBSTR (p_message_text, 1, 200));
242: hr_utility.trace (SUBSTR (p_message_text, 201, 200));
243: ELSE
244: fnd_file.put_line (fnd_file.LOG, p_message_text);
245: END IF;

Line 242: hr_utility.trace (SUBSTR (p_message_text, 201, 200));

238: BEGIN
239: IF fnd_global.conc_request_id = -1
240: THEN
241: hr_utility.trace (SUBSTR (p_message_text, 1, 200));
242: hr_utility.trace (SUBSTR (p_message_text, 201, 200));
243: ELSE
244: fnd_file.put_line (fnd_file.LOG, p_message_text);
245: END IF;
246: END log_message;

Line 325: hr_utility.set_location ('Entering:' || l_proc, 10);

321: AND TRUNC (SYSDATE) BETWEEN ppp.date_start AND NVL (ppp.actual_termination_date, TRUNC (SYSDATE)));
322:
323: l_valid_sup VARCHAR2 (1);
324: BEGIN
325: hr_utility.set_location ('Entering:' || l_proc, 10);
326: l_valid_sup := 'N';
327:
328: IF p_plan_id IS NULL
329: THEN

Line 343: hr_utility.set_location ('Not a valid plan_id value passed. Exiting.' || l_proc, 20);

339: IF csr_plan_supervisor%NOTFOUND
340: THEN
341: CLOSE csr_plan_supervisor;
342:
343: hr_utility.set_location ('Not a valid plan_id value passed. Exiting.' || l_proc, 20);
344: hr_utility.raise_error;
345: END IF;
346:
347: CLOSE csr_plan_supervisor;

Line 344: hr_utility.raise_error;

340: THEN
341: CLOSE csr_plan_supervisor;
342:
343: hr_utility.set_location ('Not a valid plan_id value passed. Exiting.' || l_proc, 20);
344: hr_utility.raise_error;
345: END IF;
346:
347: CLOSE csr_plan_supervisor;
348:

Line 395: hr_utility.set_message (800, 'HR_50436_WPM_TERM_SUPERVISOR'); --- new message

391: log_message ('l_valid_sup' || l_valid_sup || '-' || l_proc);
392:
393: IF NVL (l_valid_sup, 'N') <> 'Y'
394: THEN
395: hr_utility.set_message (800, 'HR_50436_WPM_TERM_SUPERVISOR'); --- new message
396: hr_utility.set_location ('Top supervisor for the plan terminated. Exiting.' || l_proc, 30);
397: hr_utility.raise_error;
398: END IF;
399: ELSE -- SUP_ASG.

Line 396: hr_utility.set_location ('Top supervisor for the plan terminated. Exiting.' || l_proc, 30);

392:
393: IF NVL (l_valid_sup, 'N') <> 'Y'
394: THEN
395: hr_utility.set_message (800, 'HR_50436_WPM_TERM_SUPERVISOR'); --- new message
396: hr_utility.set_location ('Top supervisor for the plan terminated. Exiting.' || l_proc, 30);
397: hr_utility.raise_error;
398: END IF;
399: ELSE -- SUP_ASG.
400: IF l_plan_dtls.assignment_types_code IN ('E', 'EC')

Line 397: hr_utility.raise_error;

393: IF NVL (l_valid_sup, 'N') <> 'Y'
394: THEN
395: hr_utility.set_message (800, 'HR_50436_WPM_TERM_SUPERVISOR'); --- new message
396: hr_utility.set_location ('Top supervisor for the plan terminated. Exiting.' || l_proc, 30);
397: hr_utility.raise_error;
398: END IF;
399: ELSE -- SUP_ASG.
400: IF l_plan_dtls.assignment_types_code IN ('E', 'EC')
401: THEN

Line 442: hr_utility.set_message (800, 'HR_50436_WPM_TERM_SUPERVISOR'); --- new message

438: log_message ('l_valid_sup' || l_valid_sup || '-' || l_proc);
439:
440: IF NVL (l_valid_sup, 'N') <> 'Y'
441: THEN
442: hr_utility.set_message (800, 'HR_50436_WPM_TERM_SUPERVISOR'); --- new message
443: hr_utility.set_location ('Top supervisor for the plan terminated. Exiting.' || l_proc, 30);
444: hr_utility.raise_error;
445: END IF;
446: END IF;

Line 443: hr_utility.set_location ('Top supervisor for the plan terminated. Exiting.' || l_proc, 30);

439:
440: IF NVL (l_valid_sup, 'N') <> 'Y'
441: THEN
442: hr_utility.set_message (800, 'HR_50436_WPM_TERM_SUPERVISOR'); --- new message
443: hr_utility.set_location ('Top supervisor for the plan terminated. Exiting.' || l_proc, 30);
444: hr_utility.raise_error;
445: END IF;
446: END IF;
447: ELSE

Line 444: hr_utility.raise_error;

440: IF NVL (l_valid_sup, 'N') <> 'Y'
441: THEN
442: hr_utility.set_message (800, 'HR_50436_WPM_TERM_SUPERVISOR'); --- new message
443: hr_utility.set_location ('Top supervisor for the plan terminated. Exiting.' || l_proc, 30);
444: hr_utility.raise_error;
445: END IF;
446: END IF;
447: ELSE
448: hr_utility.set_location ('Not a supervisor hierarchy type plan. So no validation performed.' || l_proc, 80);

Line 448: hr_utility.set_location ('Not a supervisor hierarchy type plan. So no validation performed.' || l_proc, 80);

444: hr_utility.raise_error;
445: END IF;
446: END IF;
447: ELSE
448: hr_utility.set_location ('Not a supervisor hierarchy type plan. So no validation performed.' || l_proc, 80);
449: END IF;
450:
451: hr_utility.set_location ('Leaving:' || l_proc, 100);
452: END chk_top_supervisor;

Line 451: hr_utility.set_location ('Leaving:' || l_proc, 100);

447: ELSE
448: hr_utility.set_location ('Not a supervisor hierarchy type plan. So no validation performed.' || l_proc, 80);
449: END IF;
450:
451: hr_utility.set_location ('Leaving:' || l_proc, 100);
452: END chk_top_supervisor;
453:
454: --
455: -- ----------------------------------------------------------------------------

Line 572: hr_utility.set_location (SUBSTR (l_msg, 1, 70), p_location);

568: IF g_dbg_type = g_pipe OR g_debug
569: THEN
570: IF p_location IS NOT NULL
571: THEN
572: hr_utility.set_location (SUBSTR (l_msg, 1, 70), p_location);
573: ELSE
574: log_message (SUBSTR (l_msg, 1, 70));
575: END IF;
576: ELSIF g_dbg_type = g_fnd_log

Line 5766: hr_utility.set_location ('Before transfer out _for_person', 107);

5762: -- FOR plan_appraisals IN csr_plan_appraisals(p_plan_id)
5763: OPEN csr_find_appr_for_scorecard (p_plan_id, g_curr_sc_pop_tbl (l_curr_sc_pop_index).scorecard_id);
5764:
5765: LOOP
5766: hr_utility.set_location ('Before transfer out _for_person', 107);
5767:
5768: FETCH csr_find_appr_for_scorecard
5769: INTO l_appr_id, l_appr_ovn, l_appr_sys_status;
5770:

Line 5790: hr_utility.set_location ('After transfer out appraisal_for_person appraisal_id: ' || l_appr_id, 107);

5786: -- we are doing a direct update as update API will not work for terminated and traansfer employees
5787: -- update it to transfer out so as to not show the details anywhere
5788: END IF;
5789:
5790: hr_utility.set_location ('After transfer out appraisal_for_person appraisal_id: ' || l_appr_id, 107);
5791: END LOOP;
5792:
5793: CLOSE csr_find_appr_for_scorecard;
5794: END IF;

Line 6439: hr_utility.set_location (' wf_notification.send:', 51);

6435: THEN
6436: op (l_proc, g_debug_log, 54);
6437: END IF;
6438:
6439: hr_utility.set_location (' wf_notification.send:', 51);
6440: l_notification_id :=
6441: wf_notification.send (ROLE => l_to_role_name,
6442: msg_type => 'HRWPM',
6443: msg_name => 'WPM_PLAN_ROLLB_ADMIN_MSG',

Line 7001: hr_utility.set_location ('Entering ' || l_proc, 10);

6997: IS
6998: l_request_id NUMBER;
6999: l_proc VARCHAR2 (72) := g_package || 'backout_perf_mgmt_plan_cp';
7000: BEGIN
7001: hr_utility.set_location ('Entering ' || l_proc, 10);
7002:
7003: IF p_plan_id IS NULL
7004: THEN
7005: hr_api.mandatory_arg_error (p_api_name => 'BACKOUT_PERF_MGMT_PLAN_CP',

Line 7029: hr_utility.set_location ('Leaving ' || l_proc, 20);

7025: argument3 => p_report_only
7026: );
7027: COMMIT;
7028: log_message ('Request id: ' || l_request_id);
7029: hr_utility.set_location ('Leaving ' || l_proc, 20);
7030: RETURN l_request_id;
7031: EXCEPTION
7032: WHEN OTHERS
7033: THEN

Line 7034: hr_utility.set_location ('Error submitting the request.' || l_proc, 30);

7030: RETURN l_request_id;
7031: EXCEPTION
7032: WHEN OTHERS
7033: THEN
7034: hr_utility.set_location ('Error submitting the request.' || l_proc, 30);
7035: RETURN -1;
7036: RAISE;
7037: END backout_perf_mgmt_plan_cp;
7038:

Line 7093: hr_utility.set_location ('Entering:' || l_proc, 10);

7089: l_dummy BOOLEAN;
7090: -- added for 13650421
7091: l_request_id NUMBER;
7092: BEGIN
7093: hr_utility.set_location ('Entering:' || l_proc, 10);
7094:
7095: --Bug7294077
7096: OPEN csr_person_ids (p_plan_id);
7097:

Line 7128: hr_utility.set_message (800, 'HR_50264_PMS_INVALID_PLAN');

7124: INTO l_plan_rec;
7125:
7126: IF csr_valid_plan%NOTFOUND
7127: THEN
7128: hr_utility.set_message (800, 'HR_50264_PMS_INVALID_PLAN');
7129: log_message ('Perf. Management Plan doesn''t exist.');
7130: hr_utility.raise_error;
7131: END IF;
7132:

Line 7130: hr_utility.raise_error;

7126: IF csr_valid_plan%NOTFOUND
7127: THEN
7128: hr_utility.set_message (800, 'HR_50264_PMS_INVALID_PLAN');
7129: log_message ('Perf. Management Plan doesn''t exist.');
7130: hr_utility.raise_error;
7131: END IF;
7132:
7133: CLOSE csr_valid_plan;
7134:

Line 7141: hr_utility.raise_error;

7137: fnd_message.set_name ('PER', 'HR_50780_WPM_INVALID_STATUS_BACKOUT');
7138: log_message ('This plan cannot be backed out as this is currently in
7139: ' || l_plan_rec.status_code);
7140: fnd_message.set_token ('STATUS', l_plan_rec.status_code);
7141: hr_utility.raise_error;
7142: END IF;
7143:
7144: IF TRUNC (SYSDATE) > TRUNC (l_plan_rec.end_date)
7145: THEN

Line 7147: hr_utility.raise_error;

7143:
7144: IF TRUNC (SYSDATE) > TRUNC (l_plan_rec.end_date)
7145: THEN
7146: log_message ('This plan cannot be backed out as this plan is Completed');
7147: hr_utility.raise_error;
7148: END IF;
7149:
7150: log_message ('Details of the Plan: ' || l_plan_rec.plan_name);
7151: log_message ('--------------------------------------------------------------');

Line 7254: hr_utility.set_location ('Leaving:' || l_proc, 50);

7250: -- Send notification to administrator that plan rolled back
7251: ---- added for 13650421
7252: send_fyi_admin (p_plan_rec => l_plan_rec, p_status => 'ROLLBACK', p_request_id => l_request_id);
7253: COMMIT;
7254: hr_utility.set_location ('Leaving:' || l_proc, 50);
7255: EXCEPTION
7256: WHEN OTHERS
7257: THEN
7258: retcode := error;

Line 7287: hr_utility.set_location ('Entering ' || l_proc, 10);

7283: l_request_id NUMBER;
7284: l_proc VARCHAR2 (72) := g_package || 'plan_admin_actions_cp';
7285: BEGIN
7286: --
7287: hr_utility.set_location ('Entering ' || l_proc, 10);
7288:
7289: IF p_plan_id IS NULL
7290: THEN
7291: hr_api.mandatory_arg_error (p_api_name => 'PLAN_ADMIN_ACTIONS_CP',

Line 7333: hr_utility.set_location ('Leaving ' || l_proc, 20);

7329: argument4 => p_task_code
7330: );
7331: COMMIT;
7332: log_message ('Request id: ' || l_request_id);
7333: hr_utility.set_location ('Leaving ' || l_proc, 20);
7334: --
7335: RETURN l_request_id;
7336: EXCEPTION
7337: WHEN OTHERS

Line 7339: hr_utility.set_location ('Error submitting the request.' || l_proc, 30);

7335: RETURN l_request_id;
7336: EXCEPTION
7337: WHEN OTHERS
7338: THEN
7339: hr_utility.set_location ('Error submitting the request.' || l_proc, 30);
7340: RAISE;
7341: END plan_admin_actions_cp;
7342:
7343: --

Line 7438: hr_utility.set_location ('Entering: ' || l_proc, 10);

7434: AND elig.column_name = 'APPRAISAL_PERIOD_ID'
7435: AND elig.COLUMN_VALUE = p_appraisal_period_id
7436: AND TRUNC (SYSDATE) BETWEEN elig.effective_start_date AND elig.effective_end_date;
7437: BEGIN
7438: hr_utility.set_location ('Entering: ' || l_proc, 10);
7439:
7440: IF (g_plan_dtls (1).automatic_allocation_flag = 'Y') AND p_pop_qual_objs = 'Y'
7441: THEN
7442: populate_qual_objectives (g_plan_dtls (1).start_date, g_plan_dtls (1).end_date);

Line 7587: hr_utility.set_location (l_proc, 20);

7583: l_qual_obj_index := g_qual_obj_tbl.NEXT (l_qual_obj_index);
7584: --
7585: END LOOP;
7586:
7587: hr_utility.set_location (l_proc, 20);
7588: END IF; --auto allocation flag = 'y'
7589:
7590: log_message ('Done with qual objectives');
7591:

Line 7595: hr_utility.set_location (l_proc, 30);

7591:
7592: IF (g_plan_dtls (1).copy_past_objectives_flag = 'Y' AND g_plan_dtls (1).previous_plan_id IS NOT NULL)
7593: THEN
7594: --
7595: hr_utility.set_location (l_proc, 30);
7596: copy_past_objectives (p_effective_date => l_effective_date,
7597: p_business_group_id => g_qual_pop_tbl (l_qual_pop_index).business_group_id,
7598: p_person_id => g_qual_pop_tbl (l_qual_pop_index).person_id,
7599: p_scorecard_id => l_scorecard_id,

Line 7607: hr_utility.set_location (l_proc, 40);

7603: p_assignemnt_id => g_qual_pop_tbl (l_qual_pop_index).assignment_id,
7604: p_prev_plan_id => g_plan_dtls (1).previous_plan_id,
7605: p_curr_plan_id => g_plan_dtls (1).plan_id
7606: );
7607: hr_utility.set_location (l_proc, 40);
7608: --
7609: END IF; --
7610:
7611: hr_utility.set_location (l_proc || ':' || g_appraisals_exist||':'||g_plan_aprsl_pds_tbl.COUNT ||':'||g_plan_dtls (1).include_appraisals_flag, 45);

Line 7611: hr_utility.set_location (l_proc || ':' || g_appraisals_exist||':'||g_plan_aprsl_pds_tbl.COUNT ||':'||g_plan_dtls (1).include_appraisals_flag, 45);

7607: hr_utility.set_location (l_proc, 40);
7608: --
7609: END IF; --
7610:
7611: hr_utility.set_location (l_proc || ':' || g_appraisals_exist||':'||g_plan_aprsl_pds_tbl.COUNT ||':'||g_plan_dtls (1).include_appraisals_flag, 45);
7612:
7613: -- Create appraisals for this person only if there exists any appraisals for this plan.
7614: IF p_enroll_appr = 'Y'
7615: AND g_plan_dtls (1).include_appraisals_flag = 'Y'

Line 7620: hr_utility.set_location (l_proc, 50);

7616: AND g_appraisals_exist = 'Y'
7617: AND g_plan_aprsl_pds_tbl.COUNT > 0
7618: THEN
7619: l_plan_aprsl_pds_index := g_plan_aprsl_pds_tbl.FIRST;
7620: hr_utility.set_location (l_proc, 50);
7621:
7622: WHILE (l_plan_aprsl_pds_index IS NOT NULL)
7623: LOOP
7624: --23-Jun-2009 schowdhu Eligibility Profile Enhc.-start

Line 7704: hr_utility.set_location (l_proc, 60);

7700: p_return_status => l_appr_ret_status
7701: );
7702: END IF; -- eligibility check
7703:
7704: hr_utility.set_location (l_proc, 60);
7705: --
7706: l_plan_aprsl_pds_index := g_plan_aprsl_pds_tbl.NEXT (l_plan_aprsl_pds_index);
7707: --
7708: END LOOP;

Line 7710: hr_utility.set_location (l_proc, 70);

7706: l_plan_aprsl_pds_index := g_plan_aprsl_pds_tbl.NEXT (l_plan_aprsl_pds_index);
7707: --
7708: END LOOP;
7709:
7710: hr_utility.set_location (l_proc, 70);
7711: END IF;
7712: END IF; -- appraisal = y or objective setting 'y'
7713: END IF; -- plan PUBLISHD
7714:

Line 7715: hr_utility.set_location ('Leaving:' || l_proc, 100);

7711: END IF;
7712: END IF; -- appraisal = y or objective setting 'y'
7713: END IF; -- plan PUBLISHD
7714:
7715: hr_utility.set_location ('Leaving:' || l_proc, 100);
7716: END enroll_a_person;
7717:
7718: --
7719: --

Line 7765: hr_utility.set_location ('Entering:' || l_proc, 10);

7761:
7762: l_asg_already_enrolled VARCHAR2 (1);
7763: l_person_id NUMBER;
7764: BEGIN
7765: hr_utility.set_location ('Entering:' || l_proc, 10);
7766: g_qual_pop_tbl.DELETE;
7767: populate_qual_plan_population (g_plan_dtls (1), p_effective_date);
7768: hr_utility.set_location (l_proc, 11);
7769:

Line 7768: hr_utility.set_location (l_proc, 11);

7764: BEGIN
7765: hr_utility.set_location ('Entering:' || l_proc, 10);
7766: g_qual_pop_tbl.DELETE;
7767: populate_qual_plan_population (g_plan_dtls (1), p_effective_date);
7768: hr_utility.set_location (l_proc, 11);
7769:
7770: IF (g_plan_dtls (1).automatic_allocation_flag = 'Y')
7771: THEN
7772: populate_qual_objectives (g_plan_dtls (1).start_date, g_plan_dtls (1).end_date);

Line 7775: hr_utility.set_location (l_proc, 12);

7771: THEN
7772: populate_qual_objectives (g_plan_dtls (1).start_date, g_plan_dtls (1).end_date);
7773: END IF;
7774:
7775: hr_utility.set_location (l_proc, 12);
7776:
7777: IF (g_plan_dtls (1).include_appraisals_flag = 'Y')
7778: THEN
7779: populate_plan_apprsl_periods (g_plan_dtls (1).plan_id);

Line 7789: hr_utility.set_location (l_proc, 13);

7785:
7786: CLOSE csr_apprs_exist;
7787: END IF;
7788:
7789: hr_utility.set_location (l_proc, 13);
7790: --
7791: l_asg_already_enrolled := 'N';
7792:
7793: FOR i IN g_selected_entities.FIRST .. g_selected_entities.LAST

Line 7795: hr_utility.set_location (l_proc, 14);

7791: l_asg_already_enrolled := 'N';
7792:
7793: FOR i IN g_selected_entities.FIRST .. g_selected_entities.LAST
7794: LOOP
7795: hr_utility.set_location (l_proc, 14);
7796:
7797: OPEN csr_asg_enrolled (g_selected_entities (i), p_plan_id);
7798:
7799: FETCH csr_asg_enrolled

Line 7809: hr_utility.set_location (l_proc, 15);

7805: -- IF NVL(l_asg_already_enrolled,'N') = 'N' THEN
7806: FOR j IN csr_person_dtls (g_selected_entities (i), p_effective_date)
7807: LOOP
7808: l_chk_exists := chk_assignment_in_population (j.assignment_id);
7809: hr_utility.set_location (l_proc, 15);
7810: l_person_id := j.person_id;
7811:
7812: IF l_chk_exists = 'N'
7813: THEN

Line 7857: hr_utility.set_location ('Leaving:' || l_proc, 100);

7853: -- send_message_notification (l_person_id, 'WPM_AP_ENROLL_MSG', p_plan_id, NULL); -- 9014013 Bug Fix
7854: -- END IF; -- asg not enrolled
7855: END LOOP;
7856:
7857: hr_utility.set_location ('Leaving:' || l_proc, 100);
7858: END admin_enroll_into_plan;
7859:
7860: --
7861: --

Line 8494: hr_utility.set_location ('Entering: ' || l_proc, 10);

8490: l_prop_pop_tbl g_qual_pop_t;
8491: l_asg_index NUMBER;
8492: BEGIN
8493: SAVEPOINT admin_change_top_sup;
8494: hr_utility.set_location ('Entering: ' || l_proc, 10);
8495:
8496: OPEN csr_current_population (p_plan_id, p_effective_date);
8497:
8498: FETCH csr_current_population

Line 8606: hr_utility.set_location (l_proc || 'count:' || g_qual_pop_tbl.COUNT, 20);

8602: THEN
8603: populate_plan_apprsl_periods (g_plan_dtls (1).plan_id);
8604: END IF;
8605:
8606: hr_utility.set_location (l_proc || 'count:' || g_qual_pop_tbl.COUNT, 20);
8607: log_message ('COUNT OF PROP TABLE:' || l_prop_pop_tbl.COUNT);
8608:
8609: WHILE (l_asg_index IS NOT NULL)
8610: LOOP

Line 8669: hr_utility.set_location ('Entering: ' || l_proc, 90);

8665: ELSE
8666: COMMIT;
8667: END IF;
8668:
8669: hr_utility.set_location ('Entering: ' || l_proc, 90);
8670: END admin_change_top_sup;
8671:
8672: PROCEDURE copy_curr_objs (p_curr_sc_id IN NUMBER, p_target_sc_id IN NUMBER, p_target_appr_id IN NUMBER)
8673: IS

Line 8692: hr_utility.set_location ('Entering: ' || l_proc, 10);

8688: l_weighting_over_100_warning BOOLEAN;
8689: l_weighting_appraisal_warning BOOLEAN;
8690: l_object_version_number NUMBER;
8691: BEGIN
8692: hr_utility.set_location ('Entering: ' || l_proc, 10);
8693:
8694: FOR i IN csr_curr_objs (p_curr_sc_id)
8695: LOOP
8696: BEGIN

Line 8809: hr_utility.set_location ('Leaving: ' || l_proc, 100);

8805: hr_multi_message.ADD (p_message_type => hr_multi_message.g_warning_msg);
8806: END IF;
8807: END LOOP;
8808:
8809: hr_utility.set_location ('Leaving: ' || l_proc, 100);
8810: END copy_curr_objs;
8811:
8812: PROCEDURE transfer_sc (p_plan_id IN NUMBER, p_effective_date IN DATE, p_enroll_appr IN VARCHAR2, p_copy_curr_obj IN VARCHAR2)
8813: IS

Line 8911: hr_utility.set_location ('Entering:' || l_proc, 10);

8907: l_tgt_supervisor_id per_personal_scorecards.supervisor_id%TYPE;
8908: --bug14046867
8909:
8910: BEGIN
8911: hr_utility.set_location ('Entering:' || l_proc, 10);
8912:
8913:
8914: --hr_utility.set_location ('Entering:' || l_proc, 11);
8915:

Line 8914: --hr_utility.set_location ('Entering:' || l_proc, 11);

8910: BEGIN
8911: hr_utility.set_location ('Entering:' || l_proc, 10);
8912:
8913:
8914: --hr_utility.set_location ('Entering:' || l_proc, 11);
8915:
8916: IF g_qual_pop_tbl.COUNT = 0
8917: THEN
8918: populate_qual_plan_population (g_plan_dtls (1), p_effective_date);

Line 9050: hr_utility.set_location ('Before transfer out _for_person', 107);

9046: -- FOR plan_appraisals IN csr_plan_appraisals(p_plan_id)
9047: OPEN csr_find_appr_for_scorecard (l_sc_rec.plan_id, l_sc_rec.scorecard_id);
9048:
9049: LOOP
9050: hr_utility.set_location ('Before transfer out _for_person', 107);
9051:
9052: FETCH csr_find_appr_for_scorecard
9053: INTO l_appr_id, l_appr_ovn, l_appr_sys_status;
9054:

Line 9074: hr_utility.set_location ('After transfer out appraisal_for_person appraisal_id: ' || l_appr_id, 107);

9070: -- we are doing a direct update as update API will not work for terminated and traansfer employees
9071: -- update it to transfer out so as to not show the details anywhere
9072: END IF;
9073:
9074: hr_utility.set_location ('After transfer out appraisal_for_person appraisal_id: ' || l_appr_id, 107);
9075: END LOOP;
9076:
9077: CLOSE csr_find_appr_for_scorecard;
9078: END IF;-- end include appr

Line 9127: hr_utility.set_location ('Leaving:' || l_proc, 100);

9123: END;
9124: END LOOP;
9125:
9126:
9127: hr_utility.set_location ('Leaving:' || l_proc, 100);
9128: END transfer_sc;
9129:
9130: PROCEDURE admin_transfer_scorecard (p_plan_id NUMBER, p_effective_date DATE, p_sub_taskcode VARCHAR2)
9131: IS

Line 9134: hr_utility.set_location ('Entering:' || l_proc, 10);

9130: PROCEDURE admin_transfer_scorecard (p_plan_id NUMBER, p_effective_date DATE, p_sub_taskcode VARCHAR2)
9131: IS
9132: l_proc VARCHAR2 (80) := g_package || 'admin_transfer_scorecard';
9133: BEGIN
9134: hr_utility.set_location ('Entering:' || l_proc, 10);
9135: log_message ('Dest Plan: ' || g_plan_dtls (1).plan_name);
9136: log_message ( 'Dest Plan: Obj Setting:'
9137: || TO_CHAR (g_plan_dtls (1).obj_setting_start_date, 'dd-mm-yyyy')
9138: || '<->'

Line 9156: hr_utility.set_message (800, 'HR_WPM_TASK_CODE_NOT_EXISTS');

9152: p_lookup_code => p_sub_taskcode
9153: )
9154: THEN
9155: log_message ('Invalid Sub task code selected for transfer action:' || p_sub_taskcode);
9156: hr_utility.set_message (800, 'HR_WPM_TASK_CODE_NOT_EXISTS');
9157: hr_utility.raise_error;
9158: END IF;
9159:
9160: IF g_plan_dtls (1).status_code <> 'PUBLISHED'

Line 9157: hr_utility.raise_error;

9153: )
9154: THEN
9155: log_message ('Invalid Sub task code selected for transfer action:' || p_sub_taskcode);
9156: hr_utility.set_message (800, 'HR_WPM_TASK_CODE_NOT_EXISTS');
9157: hr_utility.raise_error;
9158: END IF;
9159:
9160: IF g_plan_dtls (1).status_code <> 'PUBLISHED'
9161: THEN

Line 9180: hr_utility.set_location ('Leaving:' || l_proc, 100);

9176: transfer_sc (p_plan_id => p_plan_id, p_effective_date => p_effective_date, p_enroll_appr => 'N',
9177: p_copy_curr_obj => 'N');
9178: END IF;
9179:
9180: hr_utility.set_location ('Leaving:' || l_proc, 100);
9181: END;
9182:
9183: --
9184: --

Line 9212: hr_utility.set_location ('Entering ' || l_proc, 10);

9208: l_task_code VARCHAR2 (30);
9209: l_sub_taskcode VARCHAR2 (30);
9210: BEGIN
9211: --
9212: hr_utility.set_location ('Entering ' || l_proc, 10);
9213: g_plan_dtls.DELETE;
9214:
9215: OPEN csr_plan_dtls (p_plan_id);
9216:

Line 9274: hr_utility.set_message (800, 'HR_WPM_TASK_CODE_NOT_EXISTS');

9270: p_lookup_code => l_task_code
9271: )
9272: THEN
9273: log_message ('Invalid task code selected.' || l_task_code);
9274: hr_utility.set_message (800, 'HR_WPM_TASK_CODE_NOT_EXISTS');
9275: hr_utility.raise_error;
9276: END IF;
9277:
9278: IF p_task_code = 'CHANGE_TOP_SUPERVISOR'

Line 9275: hr_utility.raise_error;

9271: )
9272: THEN
9273: log_message ('Invalid task code selected.' || l_task_code);
9274: hr_utility.set_message (800, 'HR_WPM_TASK_CODE_NOT_EXISTS');
9275: hr_utility.raise_error;
9276: END IF;
9277:
9278: IF p_task_code = 'CHANGE_TOP_SUPERVISOR'
9279: THEN

Line 9333: hr_utility.set_message (800, 'HR_WPM_TASK_CODE_NOT_VALID');

9329: admin_transfer_scorecard (p_plan_id => p_plan_id, p_effective_date => l_effective_date,
9330: p_sub_taskcode => l_sub_taskcode);
9331: ELSE
9332: log_message ('Invalid task code selected.' || l_task_code);
9333: hr_utility.set_message (800, 'HR_WPM_TASK_CODE_NOT_VALID');
9334: hr_utility.raise_error;
9335: END IF;
9336:
9337: --

Line 9334: hr_utility.raise_error;

9330: p_sub_taskcode => l_sub_taskcode);
9331: ELSE
9332: log_message ('Invalid task code selected.' || l_task_code);
9333: hr_utility.set_message (800, 'HR_WPM_TASK_CODE_NOT_VALID');
9334: hr_utility.raise_error;
9335: END IF;
9336:
9337: --
9338: --

Line 9349: hr_utility.set_location ('Leaving ' || l_proc, 100);

9345: errbuf := 'Errors occured processing the selected persons. Pl. check the
9346: concurrent log for details.';
9347: END IF;
9348:
9349: hr_utility.set_location ('Leaving ' || l_proc, 100);
9350: EXCEPTION
9351: WHEN OTHERS
9352: THEN
9353: log_message ('Error Completing the process.');

Line 9731: hr_utility.set_location ('Entering:' || l_proc, 10);

9727: WHERE plan_id = p_plan_id;
9728:
9729: l_plan_rec csr_get_plan_rec%ROWTYPE;
9730: BEGIN
9731: hr_utility.set_location ('Entering:' || l_proc, 10);
9732: hr_api.mandatory_arg_error (p_api_name => 'submit_publish_plan_rep_cp',
9733: p_argument => 'p_effective_date',
9734: p_argument_value => p_effective_date
9735: );

Line 9849: hr_utility.set_location ('Leaving:' || l_proc, 80);

9845: ELSE
9846: p_status_code := 'E';
9847: END IF;
9848:
9849: hr_utility.set_location ('Leaving:' || l_proc, 80);
9850: END submit_publish_plan_rep_cp;
9851:
9852: --
9853: PROCEDURE sc_allocate_objs (p_plan_id IN NUMBER, p_scorecard_id IN NUMBER, p_reallocate IN VARCHAR2)

Line 10254: hr_utility.set_location('Scorecard Id: ' || TO_CHAR (g_curr_sc_pop_tbl (l_curr_sc_pop_index).scorecard_id), 777);

10250:
10251: WHILE (l_curr_sc_pop_index IS NOT NULL)
10252: LOOP
10253: op ('Scorecard Id: ' || TO_CHAR (g_curr_sc_pop_tbl (l_curr_sc_pop_index).scorecard_id), g_debug_log, 777);
10254: hr_utility.set_location('Scorecard Id: ' || TO_CHAR (g_curr_sc_pop_tbl (l_curr_sc_pop_index).scorecard_id), 777);
10255:
10256: OPEN csr_sc (g_curr_sc_pop_tbl (l_curr_sc_pop_index).scorecard_id);
10257:
10258: FETCH csr_sc

Line 10345: hr_utility.set_location('In sc_refresh_sup Scorecard Id: ' || TO_CHAR (p_scorecard_id), 7777);

10341: op ('In sc_refresh_sup Scorecard Id: ' || TO_CHAR (p_scorecard_id), g_debug_log, 7777);
10342: op ('In sc_refresh_sup Supervisor Id: ' || TO_CHAR (l_sc_sup.supervisor_id), g_debug_log, 7777);
10343: op ('In sc_refresh_sup Supervisor Assignment Id: ' || TO_CHAR (l_sc_sup.supervisor_assignment_id), g_debug_log, 7777);
10344:
10345: hr_utility.set_location('In sc_refresh_sup Scorecard Id: ' || TO_CHAR (p_scorecard_id), 7777);
10346: hr_utility.set_location('In sc_refresh_sup Supervisor Id: ' || TO_CHAR (l_sc_sup.supervisor_id), 7777);
10347: hr_utility.set_location('In sc_refresh_sup Supervisor Assignment Id: ' || TO_CHAR (l_sc_sup.supervisor_assignment_id), 7777);
10348:
10349: hr_personal_scorecard_api.update_scorecard (p_effective_date => TRUNC (SYSDATE),

Line 10346: hr_utility.set_location('In sc_refresh_sup Supervisor Id: ' || TO_CHAR (l_sc_sup.supervisor_id), 7777);

10342: op ('In sc_refresh_sup Supervisor Id: ' || TO_CHAR (l_sc_sup.supervisor_id), g_debug_log, 7777);
10343: op ('In sc_refresh_sup Supervisor Assignment Id: ' || TO_CHAR (l_sc_sup.supervisor_assignment_id), g_debug_log, 7777);
10344:
10345: hr_utility.set_location('In sc_refresh_sup Scorecard Id: ' || TO_CHAR (p_scorecard_id), 7777);
10346: hr_utility.set_location('In sc_refresh_sup Supervisor Id: ' || TO_CHAR (l_sc_sup.supervisor_id), 7777);
10347: hr_utility.set_location('In sc_refresh_sup Supervisor Assignment Id: ' || TO_CHAR (l_sc_sup.supervisor_assignment_id), 7777);
10348:
10349: hr_personal_scorecard_api.update_scorecard (p_effective_date => TRUNC (SYSDATE),
10350: p_scorecard_id => p_scorecard_id,

Line 10347: hr_utility.set_location('In sc_refresh_sup Supervisor Assignment Id: ' || TO_CHAR (l_sc_sup.supervisor_assignment_id), 7777);

10343: op ('In sc_refresh_sup Supervisor Assignment Id: ' || TO_CHAR (l_sc_sup.supervisor_assignment_id), g_debug_log, 7777);
10344:
10345: hr_utility.set_location('In sc_refresh_sup Scorecard Id: ' || TO_CHAR (p_scorecard_id), 7777);
10346: hr_utility.set_location('In sc_refresh_sup Supervisor Id: ' || TO_CHAR (l_sc_sup.supervisor_id), 7777);
10347: hr_utility.set_location('In sc_refresh_sup Supervisor Assignment Id: ' || TO_CHAR (l_sc_sup.supervisor_assignment_id), 7777);
10348:
10349: hr_personal_scorecard_api.update_scorecard (p_effective_date => TRUNC (SYSDATE),
10350: p_scorecard_id => p_scorecard_id,
10351: p_object_version_number => l_sc_sup.object_version_number,

Line 10762: hr_utility.set_location ('Before transfer out _for_person', 107);

10758: -- FOR plan_appraisals IN csr_plan_appraisals(p_plan_id)
10759: OPEN csr_find_appr_for_scorecard (p_plan_id, g_curr_sc_pop_tbl (l_curr_sc_pop_index).scorecard_id);
10760:
10761: LOOP
10762: hr_utility.set_location ('Before transfer out _for_person', 107);
10763:
10764: FETCH csr_find_appr_for_scorecard
10765: INTO l_appr_id, l_appr_ovn, l_appr_sys_status;
10766:

Line 10786: hr_utility.set_location ('After transfer out appraisal_for_person appraisal_id: ' || l_appr_id, 107);

10782: -- we are doing a direct update as update API will not work for terminated and traansfer employees
10783: -- update it to transfer out so as to not show the details anywhere
10784: END IF;
10785:
10786: hr_utility.set_location ('After transfer out appraisal_for_person appraisal_id: ' || l_appr_id, 107);
10787: END LOOP;
10788:
10789: CLOSE csr_find_appr_for_scorecard;
10790: END IF;

Line 11034: hr_utility.set_location('Entering Reallocate Objective for Plan Id: ' || TO_CHAR (p_plan_id), 7);

11030:
11031: IF t_task_codes (i) = 'REALLOCATE_OBJ'
11032: THEN
11033: op ('Entering Reallocate Objective for Plan Id: ' || TO_CHAR (p_plan_id), g_debug_log, 7);
11034: hr_utility.set_location('Entering Reallocate Objective for Plan Id: ' || TO_CHAR (p_plan_id), 7);
11035: reallocate_objectives (p_plan_id);
11036: ELSIF t_task_codes (i) = 'RESET_SC'
11037: THEN
11038: op ('Entering Reset Scorecard for Plan Id: ' || TO_CHAR (p_plan_id), g_debug_log, 7);

Line 11039: hr_utility.set_location('Entering Reset Scorecard for Plan Id: ' || TO_CHAR (p_plan_id), 7);

11035: reallocate_objectives (p_plan_id);
11036: ELSIF t_task_codes (i) = 'RESET_SC'
11037: THEN
11038: op ('Entering Reset Scorecard for Plan Id: ' || TO_CHAR (p_plan_id), g_debug_log, 7);
11039: hr_utility.set_location('Entering Reset Scorecard for Plan Id: ' || TO_CHAR (p_plan_id), 7);
11040: log_message ('Calling reset_sc');
11041: reset_scorecards (p_plan_id);
11042: ELSIF t_task_codes (i) = 'REFRESH_SC'
11043: THEN

Line 11045: hr_utility.set_location('Entering Refresh Scoreacard for Plan Id: ' || TO_CHAR (p_plan_id), 7);

11041: reset_scorecards (p_plan_id);
11042: ELSIF t_task_codes (i) = 'REFRESH_SC'
11043: THEN
11044: op ('Entering Refresh Scoreacard for Plan Id: ' || TO_CHAR (p_plan_id), g_debug_log, 7);
11045: hr_utility.set_location('Entering Refresh Scoreacard for Plan Id: ' || TO_CHAR (p_plan_id), 7);
11046: refresh_scorecards (p_plan_id);
11047: ELSIF t_task_codes (i) = 'REBUILD_SUP_HIER'
11048: THEN
11049: op ('Entering Rebuild Supervisor Heirarchy for Plan Id: ' || TO_CHAR (p_plan_id), g_debug_log, 7);

Line 11050: hr_utility.set_location('Entering Rebuild Supervisor Heirarchy for Plan Id: ' || TO_CHAR (p_plan_id), 7);

11046: refresh_scorecards (p_plan_id);
11047: ELSIF t_task_codes (i) = 'REBUILD_SUP_HIER'
11048: THEN
11049: op ('Entering Rebuild Supervisor Heirarchy for Plan Id: ' || TO_CHAR (p_plan_id), g_debug_log, 7);
11050: hr_utility.set_location('Entering Rebuild Supervisor Heirarchy for Plan Id: ' || TO_CHAR (p_plan_id), 7);
11051: rebuild_sup_hierarchy (p_plan_id);
11052: ELSIF t_task_codes (i) = 'REEVAL_PLAN_POP'
11053: THEN
11054: op ('Entering Re-evaluate Plan Population for Plan Id: ' || TO_CHAR (p_plan_id), g_debug_log, 7);

Line 11055: hr_utility.set_location('Entering Re-evaluate Plan Population for Plan Id: ' || TO_CHAR (p_plan_id), 7);

11051: rebuild_sup_hierarchy (p_plan_id);
11052: ELSIF t_task_codes (i) = 'REEVAL_PLAN_POP'
11053: THEN
11054: op ('Entering Re-evaluate Plan Population for Plan Id: ' || TO_CHAR (p_plan_id), g_debug_log, 7);
11055: hr_utility.set_location('Entering Re-evaluate Plan Population for Plan Id: ' || TO_CHAR (p_plan_id), 7);
11056: reevaluate_plan_pop (p_plan_id);
11057: hr_utility.set_location('Delete Existing qualified plan Population.', 777);
11058: g_qual_pop_tbl.DELETE;
11059: hr_utility.set_location('Repopulate the Qualified Plan Population.', 777);

Line 11057: hr_utility.set_location('Delete Existing qualified plan Population.', 777);

11053: THEN
11054: op ('Entering Re-evaluate Plan Population for Plan Id: ' || TO_CHAR (p_plan_id), g_debug_log, 7);
11055: hr_utility.set_location('Entering Re-evaluate Plan Population for Plan Id: ' || TO_CHAR (p_plan_id), 7);
11056: reevaluate_plan_pop (p_plan_id);
11057: hr_utility.set_location('Delete Existing qualified plan Population.', 777);
11058: g_qual_pop_tbl.DELETE;
11059: hr_utility.set_location('Repopulate the Qualified Plan Population.', 777);
11060: populate_qual_plan_population (l_plan_rec, l_effective_date);
11061: hr_utility.set_location('Reevaluate plan population finished. Calling Rebuild Supervisor Hierarchy with Plan id : ' || TO_CHAR (p_plan_id), 7);

Line 11059: hr_utility.set_location('Repopulate the Qualified Plan Population.', 777);

11055: hr_utility.set_location('Entering Re-evaluate Plan Population for Plan Id: ' || TO_CHAR (p_plan_id), 7);
11056: reevaluate_plan_pop (p_plan_id);
11057: hr_utility.set_location('Delete Existing qualified plan Population.', 777);
11058: g_qual_pop_tbl.DELETE;
11059: hr_utility.set_location('Repopulate the Qualified Plan Population.', 777);
11060: populate_qual_plan_population (l_plan_rec, l_effective_date);
11061: hr_utility.set_location('Reevaluate plan population finished. Calling Rebuild Supervisor Hierarchy with Plan id : ' || TO_CHAR (p_plan_id), 7);
11062: rebuild_sup_hierarchy (p_plan_id);
11063: ELSE

Line 11061: hr_utility.set_location('Reevaluate plan population finished. Calling Rebuild Supervisor Hierarchy with Plan id : ' || TO_CHAR (p_plan_id), 7);

11057: hr_utility.set_location('Delete Existing qualified plan Population.', 777);
11058: g_qual_pop_tbl.DELETE;
11059: hr_utility.set_location('Repopulate the Qualified Plan Population.', 777);
11060: populate_qual_plan_population (l_plan_rec, l_effective_date);
11061: hr_utility.set_location('Reevaluate plan population finished. Calling Rebuild Supervisor Hierarchy with Plan id : ' || TO_CHAR (p_plan_id), 7);
11062: rebuild_sup_hierarchy (p_plan_id);
11063: ELSE
11064: op ('Invalid Task Code. Exiting..' || t_task_codes (i), g_debug_log, 23);
11065: RETURN;

Line 11109: hr_utility.set_location ('Entering:' || l_proc, 10);

11105:
11106: l_wpm_batch_action_id VARCHAR2 (30);
11107: l_effective_date DATE;
11108: BEGIN
11109: hr_utility.set_location ('Entering:' || l_proc, 10);
11110: g_errbuf := NULL;
11111: g_retcode := NULL;
11112: --
11113: hr_api.mandatory_arg_error (p_api_name => 'plan_republish',

Line 11221: hr_utility.set_location ('Leaving:' || l_proc, 80);

11217: UPDATE per_perf_mgmt_plans
11218: SET status_code = 'PUBLISHED'
11219: WHERE plan_id = p_plan_id;
11220: COMMIT;
11221: hr_utility.set_location ('Leaving:' || l_proc, 80);
11222: EXCEPTION
11223: WHEN OTHERS
11224: THEN
11225: ROLLBACK;