[Home] [Help]
1: PACKAGE BODY PSP_GENERAL AS
2: /* $Header: PSPGENEB.pls 120.16.12020000.4 2013/03/27 11:38:50 lkodaman ship $ */
3: g_ws_option VARCHAR2(1);
4:
5: FUNCTION good_time_format ( p_time IN VARCHAR2 ) RETURN BOOLEAN IS
59: --
60: e_bad_time_format EXCEPTION;
61: --
62: BEGIN
63: hr_utility.set_location('Entering psp_general.calc_sch_based_dur',10);
64: p_duration := 0;
65: l_time_start := p_time_start;
66: l_time_end := p_time_end;
67: --
218: --
219: END IF;
220: END IF;
221: --
222: hr_utility.set_location('Leaving psp_general.calc_sch_based_dur',20);
223: EXCEPTION
224: --
225: WHEN e_bad_time_format THEN
226: hr_utility.set_location('Leaving psp_general.calc_sch_based_dur',30);
222: hr_utility.set_location('Leaving psp_general.calc_sch_based_dur',20);
223: EXCEPTION
224: --
225: WHEN e_bad_time_format THEN
226: hr_utility.set_location('Leaving psp_general.calc_sch_based_dur',30);
227: hr_utility.set_location(SQLERRM,35);
228: RAISE;
229: WHEN OTHERS THEN
230: hr_utility.set_location('Leaving psp_general.calc_sch_based_dur',40);
226: hr_utility.set_location('Leaving psp_general.calc_sch_based_dur',30);
227: hr_utility.set_location(SQLERRM,35);
228: RAISE;
229: WHEN OTHERS THEN
230: hr_utility.set_location('Leaving psp_general.calc_sch_based_dur',40);
231: hr_utility.set_location(SQLERRM,45);
232: RAISE;
233: END calc_sch_based_dur;
234:
684: l_global_susp_acct VARCHAR2(100);
685: l_organization_account_id NUMBER(9);
686: BEGIN
687: p_organization_account_id := -1;
688: l_global_susp_acct := psp_general.get_specific_profile('PSP_GLOBAL_SUSP_ACC_ORG');
689: IF l_global_susp_acct IS NULL THEN
690: -- --dbms_output.put_line('NO_PROFILE_EXISTS');
691: RETURN('NO_PROFILE_EXISTS');
692: END IF;
1024: end if;
1025:
1026: exception
1027: WHEN OTHERS THEN
1028: fnd_msg_pub.add_exc_msg('PSP_GENERAL',SQLERRM);
1029: raise_application_error(SQLCODE, SQLERRM);
1030: end;
1031:
1032: FUNCTION get_specific_profile(
1352: EXCEPTION
1353: WHEN OTHERS THEN
1354: p_return_status := fnd_api.g_ret_sts_unexp_error;
1355: fnd_msg_pub.add_exc_msg
1356: (p_pkg_name => 'PSP_GENERAL',
1357: p_procedure_name => 'IGW_PERCENT_EFFORT');
1358: fnd_msg_pub.count_and_get
1359: (p_count => l_msg_count,
1360: p_data => p_msg_data);
1862:
1863: begin
1864:
1865:
1866: l_person_name := psp_general.get_person_name(p_person_id,p_effective_date);
1867: If (l_person_name = FND_MESSAGE.GET_STRING('PSP','PSP_NON_PERSON_NOT_FOUND') ) Then
1868: open eff_dates;
1869: fetch eff_dates into max_eff_end_date,min_eff_start_date;
1870: close eff_dates;
1982:
1983: begin
1984:
1985:
1986: l_payroll_name := psp_general.get_payroll_name(p_payroll_id,p_effective_date);
1987: If (l_payroll_name = FND_MESSAGE.GET_STRING('PSP','PSP_NON_PAYROLL_NOT_FOUND') ) Then
1988: open eff_dates;
1989: fetch eff_dates into max_eff_end_date,min_eff_start_date;
1990: close eff_dates;
2958: RETURN NUMBER
2959: IS
2960: l_record_count NUMBER;
2961: l_debug_enabled BOOLEAN := hr_utility.Debug_enabled();
2962: l_package VARCHAR2(30) := ' psp_general.';
2963: l_proc VARCHAR2(100);
2964: l_return_code NUMBER;
2965: l_return_flag NUMBER;
2966:
3965: hr_utility.TRACE ('chk_pa_trans_exists_in_ld => sqlcode is ' || SQLCODE);
3966: RAISE;
3967: END chk_pa_trans_exists_in_ld;
3968:
3969: END psp_general;