DBA Data[Home] [Help]

APPS.PQP_GB_PSI_FUNCTIONS dependencies on PQP_GB_PSI_FUNCTIONS

Line 1: PACKAGE BODY PQP_GB_PSI_FUNCTIONS AS

1: PACKAGE BODY PQP_GB_PSI_FUNCTIONS AS
2: -- /* $Header: pqpgbpsifunc.pkb 120.18.12010000.15 2008/09/01 13:12:06 jvaradra ship $ */
3:
4: --
5: --

Line 452: NOT PQP_GB_PSI_FUNCTIONS.is_alphanumeric(p_string=> l_pay_point)

448:
449:
450: IF l_pay_point = ''
451: or
452: NOT PQP_GB_PSI_FUNCTIONS.is_alphanumeric(p_string=> l_pay_point)
453: THEN
454: -- Raise error as Paypoint is unknown(E)
455: hr_utility.set_message(805, 'BEN_94453_INV_PAYPOINT');
456: fnd_file.put_line(fnd_file.LOG

Line 474: ELSIF NOT PQP_GB_PSI_FUNCTIONS.is_alphanumeric(p_string=> l_bonus_rec.code) THEN

470: l_alphanum_code := NULL;
471:
472: IF l_bonus_rec.code IS NULL THEN
473: l_alphanum_code := 'NULL';
474: ELSIF NOT PQP_GB_PSI_FUNCTIONS.is_alphanumeric(p_string=> l_bonus_rec.code) THEN
475: -- raise error against this element/code
476: l_alphanum_code := l_bonus_rec.code;
477: END IF;
478:

Line 584: NOT PQP_GB_PSI_FUNCTIONS.is_alphanumeric(p_string=> l_pay_point)

580: debug ('l_pay_point:'||l_pay_point);
581:
582: IF l_pay_point = ''
583: or
584: NOT PQP_GB_PSI_FUNCTIONS.is_alphanumeric(p_string=> l_pay_point)
585: THEN
586: -- Raise error as Paypoint is unknown(E)
587: hr_utility.set_message(805, 'BEN_94453_INV_PAYPOINT');
588: fnd_file.put_line(fnd_file.LOG

Line 604: ELSIF NOT PQP_GB_PSI_FUNCTIONS.is_alphanumeric(p_string=> l_allowance_rec.code) THEN

600: l_alphanum_code := NULL;
601:
602: IF l_allowance_rec.code IS NULL THEN
603: l_alphanum_code := 'NULL';
604: ELSIF NOT PQP_GB_PSI_FUNCTIONS.is_alphanumeric(p_string=> l_allowance_rec.code) THEN
605: -- raise error against this element/code
606: l_alphanum_code := l_allowance_rec.code;
607: END IF;
608:

Line 945: g_debug := pqp_gb_psi_functions.check_debug(p_business_group_id);

941:
942: -- check for enabling trace
943: IF p_execution_mode = '3DBG'
944: THEN
945: g_debug := pqp_gb_psi_functions.check_debug(p_business_group_id);
946: END IF;
947:
948: debug_enter(l_proc_name);
949: --Maintaining all Penserver extracts in record,so that

Line 1801: g_debug := pqp_gb_psi_functions.check_debug(p_business_group_id);

1797:
1798:
1799: hr_utility.set_location('p_ext_ehi_rslt_id: ' || p_ext_ehi_rslt_id, 10);
1800: -- check for enabling trace
1801: g_debug := pqp_gb_psi_functions.check_debug(p_business_group_id);
1802:
1803: l_ext_bdi_rslt_id := p_ext_bdi_rslt_id;
1804: l_ext_adi_rslt_id := p_ext_adi_rslt_id;
1805: l_ext_sehi_rslt_id := p_ext_sehi_rslt_id;

Line 1826: NOT PQP_GB_PSI_FUNCTIONS.is_alphanumeric(p_string=> l_pay_point)

1822: debug ('l_pay_point:'||l_pay_point);
1823:
1824: IF l_pay_point = ''
1825: or
1826: NOT PQP_GB_PSI_FUNCTIONS.is_alphanumeric(p_string=> l_pay_point)
1827: THEN
1828: -- Raise error as Paypoint is unknown(E)
1829: hr_utility.set_message(805, 'BEN_94453_INV_PAYPOINT');
1830: fnd_file.put_line(fnd_file.LOG

Line 3997: g_debug := pqp_gb_psi_functions.check_debug(p_business_group_id);

3993: --
3994: BEGIN
3995:
3996:
3997: g_debug := pqp_gb_psi_functions.check_debug(p_business_group_id);
3998:
3999: debug_enter(l_proc_name);
4000:
4001: -- fnd_file.put_line(fnd_file.log, l_proc_name || to_char(SYSDATE,'dd-Mon-yyyy hh:mm:ss am'));

Line 4019: NOT PQP_GB_PSI_FUNCTIONS.is_alphanumeric(p_string=> p_paypoint)

4015: IF p_paypoint = ''
4016: or
4017: p_paypoint IS NULL
4018: or
4019: NOT PQP_GB_PSI_FUNCTIONS.is_alphanumeric(p_string=> p_paypoint)
4020: THEN
4021: -- error
4022: PQP_GB_PSI_FUNCTIONS.store_extract_exceptions
4023: (p_extract_type => 'Pay Point'

Line 4022: PQP_GB_PSI_FUNCTIONS.store_extract_exceptions

4018: or
4019: NOT PQP_GB_PSI_FUNCTIONS.is_alphanumeric(p_string=> p_paypoint)
4020: THEN
4021: -- error
4022: PQP_GB_PSI_FUNCTIONS.store_extract_exceptions
4023: (p_extract_type => 'Pay Point'
4024: ,p_error_number => 94453
4025: ,p_error_text => 'BEN_94453_INV_PAYPOINT'
4026: ,p_error_warning_flag => 'E'

Line 4497: IF NOT PQP_GB_PSI_FUNCTIONS.is_alphanumeric(p_string=> g_assignment_number)

4493: ,p_token1 => g_assignment_number
4494: );
4495: END IF;
4496:
4497: IF NOT PQP_GB_PSI_FUNCTIONS.is_alphanumeric(p_string=> g_assignment_number)
4498: THEN
4499: -- store error
4500: l_value := raise_extract_error
4501: (p_error_number => 94467

Line 5450: debug('g_effective_start_date: '||PQP_GB_PSI_FUNCTIONS.g_effective_start_date);

5446: debug('p_element_name: '||p_element_name,10);
5447: debug('p_element_entry_id: '||p_element_entry_id,10);
5448: debug('p_assg_start_date: '||p_assg_start_date,10);
5449:
5450: debug('g_effective_start_date: '||PQP_GB_PSI_FUNCTIONS.g_effective_start_date);
5451: debug('g_effective_end_date: '||PQP_GB_PSI_FUNCTIONS.g_effective_end_date);
5452: END IF;
5453:
5454:

Line 5451: debug('g_effective_end_date: '||PQP_GB_PSI_FUNCTIONS.g_effective_end_date);

5447: debug('p_element_entry_id: '||p_element_entry_id,10);
5448: debug('p_assg_start_date: '||p_assg_start_date,10);
5449:
5450: debug('g_effective_start_date: '||PQP_GB_PSI_FUNCTIONS.g_effective_start_date);
5451: debug('g_effective_end_date: '||PQP_GB_PSI_FUNCTIONS.g_effective_end_date);
5452: END IF;
5453:
5454:
5455: IF p_claim_date < p_assg_start_date THEN

Line 5458: l_temp := PQP_GB_PSI_FUNCTIONS.raise_extract_error

5454:
5455: IF p_claim_date < p_assg_start_date THEN
5456: -- claim date is before the start date of the person
5457: debug('ERROR: Future Claim Date: '||ben_ext_person.g_chg_surrogate_key);
5458: l_temp := PQP_GB_PSI_FUNCTIONS.raise_extract_error
5459: (p_error_number => 94513
5460: ,p_error_text => 'BEN_94513_EARLY_CLAIM_DATE'
5461: ,p_token1 => p_claim_date
5462: ,p_token2 => SUBSTR(p_element_name

Line 5470: END IF; --IF p_claim_date > PQP_GB_PSI_FUNCTIONS.g_effective_end_date THEN

5466: debug('Returning FALSE',20);
5467: debug_exit(l_proc);
5468: RETURN FALSE;
5469:
5470: END IF; --IF p_claim_date > PQP_GB_PSI_FUNCTIONS.g_effective_end_date THEN
5471:
5472: IF p_claim_date > PQP_GB_PSI_FUNCTIONS.g_effective_end_date THEN
5473:
5474: debug('ERROR: Future Claim Date: '||ben_ext_person.g_chg_surrogate_key);

Line 5472: IF p_claim_date > PQP_GB_PSI_FUNCTIONS.g_effective_end_date THEN

5468: RETURN FALSE;
5469:
5470: END IF; --IF p_claim_date > PQP_GB_PSI_FUNCTIONS.g_effective_end_date THEN
5471:
5472: IF p_claim_date > PQP_GB_PSI_FUNCTIONS.g_effective_end_date THEN
5473:
5474: debug('ERROR: Future Claim Date: '||ben_ext_person.g_chg_surrogate_key);
5475: l_temp := PQP_GB_PSI_FUNCTIONS.raise_extract_error
5476: (p_error_number => 94512

Line 5475: l_temp := PQP_GB_PSI_FUNCTIONS.raise_extract_error

5471:
5472: IF p_claim_date > PQP_GB_PSI_FUNCTIONS.g_effective_end_date THEN
5473:
5474: debug('ERROR: Future Claim Date: '||ben_ext_person.g_chg_surrogate_key);
5475: l_temp := PQP_GB_PSI_FUNCTIONS.raise_extract_error
5476: (p_error_number => 94512
5477: ,p_error_text => 'BEN_94512_FUTURE_CLAIM_DATE'
5478: ,p_token1 => p_claim_date
5479: ,p_token2 => SUBSTR(p_element_name

Line 5501: l_temp := PQP_GB_PSI_FUNCTIONS.raise_extract_error

5497: IF l_pay_assg_status = 'DO NOT PROCESS'
5498: OR l_per_assg_status IN ('TERM_ASSIGN','SUSP_ASSIGN','END') THEN
5499:
5500: debug('ERROR: Assignment does not qualify on the claim date');
5501: l_temp := PQP_GB_PSI_FUNCTIONS.raise_extract_error
5502: (p_error_number => 94539
5503: ,p_error_text => 'BEN_94539_ASG_TERM_CLAIM_DATE'
5504: ,p_token1 => p_claim_date
5505: ,p_token2 => SUBSTR(p_element_name

Line 5516: l_include := PQP_GB_PSI_FUNCTIONS.chk_penserver_basic_criteria

5512: END IF;
5513:
5514: IF l_include <> 'N' THEN
5515:
5516: l_include := PQP_GB_PSI_FUNCTIONS.chk_penserver_basic_criteria
5517: (p_business_group_id => g_business_group_id
5518: ,p_effective_date => p_claim_date
5519: ,p_assignment_id => g_assignment_id
5520: ,p_person_dtl => l_curr_person_dtls

Line 5526: l_temp := PQP_GB_PSI_FUNCTIONS.raise_extract_error

5522: );
5523:
5524: IF l_include = 'N' THEN
5525: debug('ERROR: Assignment does not qualify on the claim date');
5526: l_temp := PQP_GB_PSI_FUNCTIONS.raise_extract_error
5527: (p_error_number => 94542
5528: ,p_error_text => 'BEN_94542_ASG_INV_CLAIM_DATE'
5529: ,p_token1 => p_claim_date
5530: ,p_token2 => SUBSTR(p_element_name

Line 6433: l_return := PQP_GB_PSI_FUNCTIONS.raise_extract_error

6429:
6430: IF p_output = 'Y' THEN
6431: IF g_elements_of_info_type(g_curr_element_type_id).eei_information4 <> 'Y' THEN
6432: debug('ERROR: Not a Pensionable Allowance, will not be processed.');
6433: l_return := PQP_GB_PSI_FUNCTIONS.raise_extract_error
6434: (p_error_number => 94528
6435: ,p_error_text => 'BEN_94528_NOT_PEN_ALLOWANCE'
6436: ,p_token1 =>
6437: g_elements_of_info_type(g_curr_element_type_id).element_name

Line 6844: IF PQP_GB_PSI_FUNCTIONS.chk_is_employee_a_leaver

6840: IF l_chg_table = 'PER_ALL_ASSIGNMENTS_F'
6841: AND (l_chg_column_name = 'ASSIGNMENT_STATUS_TYPE_ID'
6842: OR l_update_type = 'E') THEN
6843:
6844: IF PQP_GB_PSI_FUNCTIONS.chk_is_employee_a_leaver
6845: (
6846: p_assignment_id => g_assignment_id
6847: ,p_effective_date => l_chg_date
6848: ,p_leaver_date => l_leaver_date

Line 7237: IF PQP_GB_PSI_FUNCTIONS.chk_is_employee_a_leaver

7233: IF l_chg_table = 'PER_ALL_ASSIGNMENTS_F'
7234: AND (l_chg_column_name = 'ASSIGNMENT_STATUS_TYPE_ID'
7235: OR l_update_type = 'E') THEN
7236:
7237: IF PQP_GB_PSI_FUNCTIONS.chk_is_employee_a_leaver
7238: (
7239: p_assignment_id => g_assignment_id
7240: ,p_effective_date => l_chg_date
7241: ,p_leaver_date => l_leaver_date

Line 7331: IF PQP_GB_PSI_FUNCTIONS.chk_is_employee_a_leaver

7327: IF l_chg_table = 'PER_ALL_ASSIGNMENTS_F'
7328: AND (l_chg_column_name = 'ASSIGNMENT_STATUS_TYPE_ID'
7329: OR l_update_type = 'E') THEN
7330:
7331: IF PQP_GB_PSI_FUNCTIONS.chk_is_employee_a_leaver
7332: (
7333: p_assignment_id => g_assignment_id
7334: ,p_effective_date => l_chg_date
7335: ,p_leaver_date => l_leaver_date

Line 7642: l_error := PQP_GB_PSI_FUNCTIONS.raise_extract_warning

7638:
7639: IF l_contract_type IS NULL THEN
7640: -- Raise warning that the contract type is missing
7641: debug('WARNING: Contract type for the person is missing',20);
7642: l_error := PQP_GB_PSI_FUNCTIONS.raise_extract_warning
7643: (p_error_number => 94441
7644: ,p_error_text => 'BEN_94441_NO_CONTRACT_TYPE'
7645: ,p_token1 => to_char(g_effective_date,'dd-MON-yyyy')
7646: );

Line 7663: l_error := PQP_GB_PSI_FUNCTIONS.raise_extract_warning

7659: IF p_output IS NULL THEN
7660: -- raise warning that the PenServer Contract Type is missing in the UDT PQP_CONTRACT_TYPES for the contract
7661: debug('WARNING: PenServer Contract Type is missing in the'||
7662: 'UDT PQP_CONTRACT_TYPES for the contract: '||l_contract_type,20);
7663: l_error := PQP_GB_PSI_FUNCTIONS.raise_extract_warning
7664: (p_error_number => 94442
7665: ,p_error_text => 'BEN_94442_NO_PEN_CONTRACT_TYPE'
7666: ,p_token1 => to_char(g_effective_date,'dd-MON-yyyy')
7667: );

Line 7891: l_error := PQP_GB_PSI_FUNCTIONS.raise_extract_error

7887: DEBUG ( 'Leaving: '
7888: || l_proc, -999);
7889: END IF;
7890: debug('ERROR: Error Raised during calculation of Notional Pay',20);
7891: l_error := PQP_GB_PSI_FUNCTIONS.raise_extract_error
7892: (p_error_number => 94541
7893: ,p_error_text => 'BEN_94541_ERR_USR_NOTIONAL_PAY'
7894: ,p_token1 => p_custom_function
7895: );

Line 7906: l_error := PQP_GB_PSI_FUNCTIONS.raise_extract_error

7902: p_rate := NVL(l_notional_pay,0);
7903: END IF; --IF p_custom_function IS NOT NULL THEN
7904: else
7905: debug('ERROR: Error Raised during calculation of Notional Pay',20);
7906: l_error := PQP_GB_PSI_FUNCTIONS.raise_extract_error
7907: (p_error_number => 94456
7908: ,p_error_text => 'BEN_94456_ERR_NOTIONAL_PAY'
7909: ,p_token1 => SUBSTR(l_err_msg,1,30)
7910: );

Line 7979: l_error := PQP_GB_PSI_FUNCTIONS.raise_extract_warning

7975: END IF;
7976: ELSE
7977: -- data error.
7978: debug('Data Error: FTE value for the person is missing on: '||to_char(g_effective_date,'dd/mm/yyyy'),20);
7979: l_error := PQP_GB_PSI_FUNCTIONS.raise_extract_warning
7980: (p_error_number => 94449
7981: ,p_error_text => 'BEN_94449_NO_FTE_VALUE'
7982: ,p_token1 => to_char(g_effective_date,'dd-MON-yyyy')
7983: );

Line 8116: END PQP_GB_PSI_FUNCTIONS;

8112: debug_exit(l_proc);
8113: END get_rate_usr_func_name;
8114: ---
8115:
8116: END PQP_GB_PSI_FUNCTIONS;