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.45.12020000.2 2012/07/05 12:12:03 amnaraya ship $ */
3:
4: --
5: --

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

512:
513:
514: IF l_pay_point = ''
515: or
516: NOT PQP_GB_PSI_FUNCTIONS.is_alphanumeric(p_string=> l_pay_point)
517: THEN
518: -- Raise error as Paypoint is unknown(E)
519: hr_utility.set_message(805, 'BEN_94453_INV_PAYPOINT');
520: fnd_file.put_line(fnd_file.LOG

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

534: l_alphanum_code := NULL;
535:
536: IF l_bonus_rec.code IS NULL THEN
537: l_alphanum_code := 'NULL';
538: ELSIF NOT PQP_GB_PSI_FUNCTIONS.is_alphanumeric(p_string=> l_bonus_rec.code) THEN
539: -- raise error against this element/code
540: l_alphanum_code := l_bonus_rec.code;
541: END IF;
542:

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

644: debug ('l_pay_point:'||l_pay_point);
645:
646: IF l_pay_point = ''
647: or
648: NOT PQP_GB_PSI_FUNCTIONS.is_alphanumeric(p_string=> l_pay_point)
649: THEN
650: -- Raise error as Paypoint is unknown(E)
651: hr_utility.set_message(805, 'BEN_94453_INV_PAYPOINT');
652: fnd_file.put_line(fnd_file.LOG

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

664: l_alphanum_code := NULL;
665:
666: IF l_allowance_rec.code IS NULL THEN
667: l_alphanum_code := 'NULL';
668: ELSIF NOT PQP_GB_PSI_FUNCTIONS.is_alphanumeric(p_string=> l_allowance_rec.code) THEN
669: -- raise error against this element/code
670: l_alphanum_code := l_allowance_rec.code;
671: END IF;
672:

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

1005:
1006: -- check for enabling trace
1007: IF p_execution_mode = '3DBG'
1008: THEN
1009: g_debug := pqp_gb_psi_functions.check_debug(p_business_group_id);
1010: END IF;
1011:
1012: debug_enter(l_proc_name);
1013: --Maintaining all Penserver extracts in record,so that

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

1861:
1862:
1863: hr_utility.set_location('p_ext_ehi_rslt_id: ' || p_ext_ehi_rslt_id, 10);
1864: -- check for enabling trace
1865: g_debug := pqp_gb_psi_functions.check_debug(p_business_group_id);
1866:
1867: l_ext_bdi_rslt_id := p_ext_bdi_rslt_id;
1868: l_ext_adi_rslt_id := p_ext_adi_rslt_id;
1869: l_ext_sehi_rslt_id := p_ext_sehi_rslt_id;

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

1886: debug ('l_pay_point:'||l_pay_point);
1887:
1888: IF l_pay_point = ''
1889: or
1890: NOT PQP_GB_PSI_FUNCTIONS.is_alphanumeric(p_string=> l_pay_point)
1891: THEN
1892: -- Raise error as Paypoint is unknown(E)
1893: hr_utility.set_message(805, 'BEN_94453_INV_PAYPOINT');
1894: fnd_file.put_line(fnd_file.LOG

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

4057: --
4058: BEGIN
4059:
4060:
4061: g_debug := pqp_gb_psi_functions.check_debug(p_business_group_id);
4062:
4063: debug_enter(l_proc_name);
4064:
4065: -- fnd_file.put_line(fnd_file.log, l_proc_name || to_char(SYSDATE,'dd-Mon-yyyy hh:mm:ss am'));

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

4087: IF p_paypoint = ''
4088: or
4089: p_paypoint IS NULL
4090: or
4091: NOT PQP_GB_PSI_FUNCTIONS.is_alphanumeric(p_string=> p_paypoint)
4092: THEN
4093: -- error
4094: PQP_GB_PSI_FUNCTIONS.store_extract_exceptions
4095: (p_extract_type => 'Pay Point'

Line 4094: PQP_GB_PSI_FUNCTIONS.store_extract_exceptions

4090: or
4091: NOT PQP_GB_PSI_FUNCTIONS.is_alphanumeric(p_string=> p_paypoint)
4092: THEN
4093: -- error
4094: PQP_GB_PSI_FUNCTIONS.store_extract_exceptions
4095: (p_extract_type => 'Pay Point'
4096: ,p_error_number => 94453
4097: ,p_error_text => 'BEN_94453_INV_PAYPOINT'
4098: ,p_error_warning_flag => 'E'

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

4565: ,p_token1 => g_assignment_number
4566: );
4567: END IF;
4568:
4569: IF NOT PQP_GB_PSI_FUNCTIONS.is_alphanumeric(p_string=> g_assignment_number)
4570: THEN
4571: -- store error
4572: l_value := raise_extract_error
4573: (p_error_number => 94467

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

5556: debug('p_element_name: '||p_element_name,10);
5557: debug('p_element_entry_id: '||p_element_entry_id,10);
5558: debug('p_assg_start_date: '||p_assg_start_date,10);
5559:
5560: debug('g_effective_start_date: '||PQP_GB_PSI_FUNCTIONS.g_effective_start_date);
5561: debug('g_effective_end_date: '||PQP_GB_PSI_FUNCTIONS.g_effective_end_date);
5562: END IF;
5563:
5564:

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

5557: debug('p_element_entry_id: '||p_element_entry_id,10);
5558: debug('p_assg_start_date: '||p_assg_start_date,10);
5559:
5560: debug('g_effective_start_date: '||PQP_GB_PSI_FUNCTIONS.g_effective_start_date);
5561: debug('g_effective_end_date: '||PQP_GB_PSI_FUNCTIONS.g_effective_end_date);
5562: END IF;
5563:
5564:
5565: IF p_claim_date < p_assg_start_date THEN

Line 5568: l_temp := PQP_GB_PSI_FUNCTIONS.raise_extract_error

5564:
5565: IF p_claim_date < p_assg_start_date THEN
5566: -- claim date is before the start date of the person
5567: debug('ERROR: Future Claim Date: '||ben_ext_person.g_chg_surrogate_key);
5568: l_temp := PQP_GB_PSI_FUNCTIONS.raise_extract_error
5569: (p_error_number => 94513
5570: ,p_error_text => 'BEN_94513_EARLY_CLAIM_DATE'
5571: ,p_token1 => p_claim_date
5572: ,p_token2 => SUBSTR(p_element_name

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

5576: debug('Returning FALSE',20);
5577: debug_exit(l_proc);
5578: RETURN FALSE;
5579:
5580: END IF; --IF p_claim_date > PQP_GB_PSI_FUNCTIONS.g_effective_end_date THEN
5581:
5582: IF p_claim_date > PQP_GB_PSI_FUNCTIONS.g_effective_end_date THEN
5583:
5584: debug('ERROR: Future Claim Date: '||ben_ext_person.g_chg_surrogate_key);

Line 5582: IF p_claim_date > PQP_GB_PSI_FUNCTIONS.g_effective_end_date THEN

5578: RETURN FALSE;
5579:
5580: END IF; --IF p_claim_date > PQP_GB_PSI_FUNCTIONS.g_effective_end_date THEN
5581:
5582: IF p_claim_date > PQP_GB_PSI_FUNCTIONS.g_effective_end_date THEN
5583:
5584: debug('ERROR: Future Claim Date: '||ben_ext_person.g_chg_surrogate_key);
5585: l_temp := PQP_GB_PSI_FUNCTIONS.raise_extract_error
5586: (p_error_number => 94512

Line 5585: l_temp := PQP_GB_PSI_FUNCTIONS.raise_extract_error

5581:
5582: IF p_claim_date > PQP_GB_PSI_FUNCTIONS.g_effective_end_date THEN
5583:
5584: debug('ERROR: Future Claim Date: '||ben_ext_person.g_chg_surrogate_key);
5585: l_temp := PQP_GB_PSI_FUNCTIONS.raise_extract_error
5586: (p_error_number => 94512
5587: ,p_error_text => 'BEN_94512_FUTURE_CLAIM_DATE'
5588: ,p_token1 => p_claim_date
5589: ,p_token2 => SUBSTR(p_element_name

Line 5611: l_temp := PQP_GB_PSI_FUNCTIONS.raise_extract_error

5607: IF l_pay_assg_status = 'DO NOT PROCESS'
5608: OR l_per_assg_status IN ('TERM_ASSIGN','SUSP_ASSIGN','END') THEN
5609:
5610: debug('ERROR: Assignment does not qualify on the claim date');
5611: l_temp := PQP_GB_PSI_FUNCTIONS.raise_extract_error
5612: (p_error_number => 94539
5613: ,p_error_text => 'BEN_94539_ASG_TERM_CLAIM_DATE'
5614: ,p_token1 => p_claim_date
5615: ,p_token2 => SUBSTR(p_element_name

Line 5626: l_include := PQP_GB_PSI_FUNCTIONS.chk_penserver_basic_criteria

5622: END IF;
5623:
5624: IF l_include <> 'N' THEN
5625:
5626: l_include := PQP_GB_PSI_FUNCTIONS.chk_penserver_basic_criteria
5627: (p_business_group_id => g_business_group_id
5628: ,p_effective_date => p_claim_date
5629: ,p_assignment_id => g_assignment_id
5630: ,p_person_dtl => l_curr_person_dtls

Line 5636: l_temp := PQP_GB_PSI_FUNCTIONS.raise_extract_error

5632: );
5633:
5634: IF l_include = 'N' THEN
5635: debug('ERROR: Assignment does not qualify on the claim date');
5636: l_temp := PQP_GB_PSI_FUNCTIONS.raise_extract_error
5637: (p_error_number => 94542
5638: ,p_error_text => 'BEN_94542_ASG_INV_CLAIM_DATE'
5639: ,p_token1 => p_claim_date
5640: ,p_token2 => SUBSTR(p_element_name

Line 6593: l_return := PQP_GB_PSI_FUNCTIONS.raise_extract_error

6589:
6590: IF p_output = 'Y' THEN
6591: IF g_elements_of_info_type(g_curr_element_type_id).eei_information4 <> 'Y' THEN
6592: debug('ERROR: Not a Pensionable Allowance, will not be processed.');
6593: l_return := PQP_GB_PSI_FUNCTIONS.raise_extract_error
6594: (p_error_number => 94528
6595: ,p_error_text => 'BEN_94528_NOT_PEN_ALLOWANCE'
6596: ,p_token1 =>
6597: g_elements_of_info_type(g_curr_element_type_id).element_name

Line 7004: IF PQP_GB_PSI_FUNCTIONS.chk_is_employee_a_leaver

7000: IF l_chg_table = 'PER_ALL_ASSIGNMENTS_F'
7001: AND (l_chg_column_name = 'ASSIGNMENT_STATUS_TYPE_ID'
7002: OR l_update_type = 'E') THEN
7003:
7004: IF PQP_GB_PSI_FUNCTIONS.chk_is_employee_a_leaver
7005: (
7006: p_assignment_id => g_assignment_id
7007: ,p_effective_date => l_chg_date
7008: ,p_leaver_date => l_leaver_date

Line 7558: IF PQP_GB_PSI_FUNCTIONS.chk_is_employee_a_leaver

7554: IF l_chg_table = 'PER_ALL_ASSIGNMENTS_F'
7555: AND (l_chg_column_name = 'ASSIGNMENT_STATUS_TYPE_ID'
7556: OR l_update_type = 'E') THEN
7557:
7558: IF PQP_GB_PSI_FUNCTIONS.chk_is_employee_a_leaver
7559: (
7560: p_assignment_id => g_assignment_id
7561: ,p_effective_date => l_chg_date
7562: ,p_leaver_date => l_leaver_date

Line 7669: IF PQP_GB_PSI_FUNCTIONS.chk_is_employee_a_leaver

7665: IF l_chg_table = 'PER_ALL_ASSIGNMENTS_F'
7666: AND (l_chg_column_name = 'ASSIGNMENT_STATUS_TYPE_ID'
7667: OR l_update_type = 'E') THEN
7668:
7669: IF PQP_GB_PSI_FUNCTIONS.chk_is_employee_a_leaver
7670: (
7671: p_assignment_id => g_assignment_id
7672: ,p_effective_date => l_chg_date
7673: ,p_leaver_date => l_leaver_date

Line 8107: l_error := PQP_GB_PSI_FUNCTIONS.raise_extract_warning

8103:
8104: IF l_contract_type IS NULL THEN
8105: -- Raise warning that the contract type is missing
8106: debug('WARNING: Contract type for the person is missing',20);
8107: l_error := PQP_GB_PSI_FUNCTIONS.raise_extract_warning
8108: (p_error_number => 94441
8109: ,p_error_text => 'BEN_94441_NO_CONTRACT_TYPE'
8110: ,p_token1 => to_char(g_effective_date,'dd-MON-yyyy')
8111: );

Line 8128: l_error := PQP_GB_PSI_FUNCTIONS.raise_extract_warning

8124: IF p_output IS NULL THEN
8125: -- raise warning that the PenServer Contract Type is missing in the UDT PQP_CONTRACT_TYPES for the contract
8126: debug('WARNING: PenServer Contract Type is missing in the'||
8127: 'UDT PQP_CONTRACT_TYPES for the contract: '||l_contract_type,20);
8128: l_error := PQP_GB_PSI_FUNCTIONS.raise_extract_warning
8129: (p_error_number => 94442
8130: ,p_error_text => 'BEN_94442_NO_PEN_CONTRACT_TYPE'
8131: ,p_token1 => to_char(g_effective_date,'dd-MON-yyyy')
8132: );

Line 8356: l_error := PQP_GB_PSI_FUNCTIONS.raise_extract_error

8352: DEBUG ( 'Leaving: '
8353: || l_proc, -999);
8354: END IF;
8355: debug('ERROR: Error Raised during calculation of Notional Pay',20);
8356: l_error := PQP_GB_PSI_FUNCTIONS.raise_extract_error
8357: (p_error_number => 94541
8358: ,p_error_text => 'BEN_94541_ERR_USR_NOTIONAL_PAY'
8359: ,p_token1 => p_custom_function
8360: );

Line 8371: l_error := PQP_GB_PSI_FUNCTIONS.raise_extract_error

8367: p_rate := NVL(l_notional_pay,0);
8368: END IF; --IF p_custom_function IS NOT NULL THEN
8369: else
8370: debug('ERROR: Error Raised during calculation of Notional Pay',20);
8371: l_error := PQP_GB_PSI_FUNCTIONS.raise_extract_error
8372: (p_error_number => 94456
8373: ,p_error_text => 'BEN_94456_ERR_NOTIONAL_PAY'
8374: ,p_token1 => SUBSTR(l_err_msg,1,30)
8375: );

Line 8444: l_error := PQP_GB_PSI_FUNCTIONS.raise_extract_warning

8440: END IF;
8441: ELSE
8442: -- data error.
8443: debug('Data Error: FTE value for the person is missing on: '||to_char(g_effective_date,'dd/mm/yyyy'),20);
8444: l_error := PQP_GB_PSI_FUNCTIONS.raise_extract_warning
8445: (p_error_number => 94449
8446: ,p_error_text => 'BEN_94449_NO_FTE_VALUE'
8447: ,p_token1 => to_char(g_effective_date,'dd-MON-yyyy')
8448: );

Line 8581: END PQP_GB_PSI_FUNCTIONS;

8577: debug_exit(l_proc);
8578: END get_rate_usr_func_name;
8579: ---
8580:
8581: END PQP_GB_PSI_FUNCTIONS;