[Home] [Help]
321: -- clear the cached globals
322: clear_cache;
323:
324: -- for trace switching ON/OFF
325: g_debug := PQP_GB_PSI_FUNCTIONS.check_debug(p_business_group_id);
326: -- setting shared globals
327: -- 1) paypoint
328: -- 2) cutover date
329: -- 3) extract def id
326: -- setting shared globals
327: -- 1) paypoint
328: -- 2) cutover date
329: -- 3) extract def id
330: PQP_GB_PSI_FUNCTIONS.set_shared_globals
331: (p_business_group_id => p_business_group_id
332: ,p_paypoint => g_paypoint -- OUT
333: ,p_cutover_date => g_cutover_date -- OUT
334: ,p_ext_dfn_id => g_ext_dfn_id -- OUT
345: g_business_group_id := p_business_group_id;
346:
347: debug('now raise setup exceptions ...',15);
348: -- raise setup errors and warnings
349: PQP_GB_PSI_FUNCTIONS.raise_extract_exceptions(p_extract_type => 'S');
350:
351: -- now clearing cache of assign_cat in basic criteria
352: --PQP_GB_PSI_FUNCTIONS.g_assign_category_mapping.DELETE;
353: END IF; -- shared and basic_data globals have been set
348: -- raise setup errors and warnings
349: PQP_GB_PSI_FUNCTIONS.raise_extract_exceptions(p_extract_type => 'S');
350:
351: -- now clearing cache of assign_cat in basic criteria
352: --PQP_GB_PSI_FUNCTIONS.g_assign_category_mapping.DELETE;
353: END IF; -- shared and basic_data globals have been set
354:
355:
356: -- calling the basic criteria for this person assignment
354:
355:
356: -- calling the basic criteria for this person assignment
357: l_return :=
358: PQP_GB_PSI_FUNCTIONS.chk_penserver_basic_criteria
359: (p_business_group_id => p_business_group_id
360: ,p_effective_date => p_effective_date
361: ,p_assignment_id => p_assignment_id
362: ,p_person_dtl => g_person_dtl
372: g_assignment_id IS NOT NULL and g_assignment_id <> p_assignment_id
373: ) THEN
374: -- put a fucntion here which is to be called only once per person
375: g_altkey :=
376: PQP_GB_PSI_FUNCTIONS.altkey;
377: --(p_assignment_number => g_assignment_dtl.assignment_number
378: --,p_paypoint => g_paypoint
379: --);
380: g_assignment_id := p_assignment_id;
444: -- clearing cache
445: clear_cache();
446:
447: -- for switching trace ON/OFF
448: g_debug := pqp_gb_psi_functions.check_debug(p_business_group_id);
449: -- setting shared globals
450: -- 1) paypoint
451: -- 2) cutover date
452: -- 3) extract def id
449: -- setting shared globals
450: -- 1) paypoint
451: -- 2) cutover date
452: -- 3) extract def id
453: PQP_GB_PSI_FUNCTIONS.set_shared_globals
454: (p_business_group_id => p_business_group_id
455: ,p_paypoint => g_paypoint
456: ,p_cutover_date => g_cutover_date
457: ,p_ext_dfn_id => g_ext_dfn_id
469:
470:
471: debug('now raise setup exceptions ...',15);
472: -- raise setup errors and warnings
473: PQP_GB_PSI_FUNCTIONS.raise_extract_exceptions(p_extract_type => 'S');
474:
475: END IF; -- shared and basic_data globals have been set
476:
477:
478:
479:
480: -- calling the basic criteria for this person assignment
481: l_return :=
482: PQP_GB_PSI_FUNCTIONS.chk_penserver_basic_criteria
483: (p_business_group_id => p_business_group_id
484: ,p_effective_date => p_effective_date
485: ,p_assignment_id => p_assignment_id
486: ,p_person_dtl => g_person_dtl
519: debug_exit(l_proc_name);
520: return l_return;
521: END IF; --IF l_include = 'N'
522:
523: l_return := pqp_gb_psi_functions.include_event
524: (p_actual_date => g_pay_proc_evt_tab(l_curr_evt_index).actual_date
525: ,p_effective_date => g_pay_proc_evt_tab(l_curr_evt_index).effective_date
526: );
527:
540: g_assignment_id IS NOT NULL and g_assignment_id <> p_assignment_id
541: ) THEN
542: -- put a fucntion here which is to be called only once per person
543: g_altkey :=
544: PQP_GB_PSI_FUNCTIONS.altkey;
545: --(p_assignment_number => g_assignment_dtl.assignment_number
546: --,p_paypoint => g_paypoint
547: --);
548: g_assignment_id := p_assignment_id;
641: IF csr_location_code%FOUND
642: THEN
643: debug('l_location_code:' || l_location_code, 20);
644:
645: IF NOT PQP_GB_PSI_FUNCTIONS.is_alphanumeric(p_string=> l_location_code)
646: THEN
647: l_value := PQP_GB_PSI_FUNCTIONS.raise_extract_error
648: (p_error_number => 94476
649: ,p_error_text => 'BEN_94476_INV_LOC_CODE'
643: debug('l_location_code:' || l_location_code, 20);
644:
645: IF NOT PQP_GB_PSI_FUNCTIONS.is_alphanumeric(p_string=> l_location_code)
646: THEN
647: l_value := PQP_GB_PSI_FUNCTIONS.raise_extract_error
648: (p_error_number => 94476
649: ,p_error_text => 'BEN_94476_INV_LOC_CODE'
650: ,p_token1 => p_effective_date
651: );
655: ELSE
656: --ERR : no location code found for this location
657: debug('ERROR!!! : no location code found for this location', 20);
658: -- store error for 'NO Location Code'
659: l_value := PQP_GB_PSI_FUNCTIONS.raise_extract_warning
660: (p_error_number => 94475
661: ,p_error_text => 'BEN_94475_NO_LOCATION_CODE'
662: ,p_token1 => p_effective_date
663: );
1605: -- anshghos: 115.4
1606: IF g_person_dtl.first_name IS NULL
1607: THEN
1608: -- store error for 'NO First Name'
1609: l_value := PQP_GB_PSI_FUNCTIONS.raise_extract_error
1610: (p_error_number => 94474
1611: ,p_error_text => 'BEN_94474_NO_FIRST_NAME'
1612: );
1613: p_output := '';
1771: BEGIN -- basic_data_post_proc_rule
1772:
1773: debug_enter(l_proc_name);
1774:
1775: PQP_GB_PSI_FUNCTIONS.common_post_process(g_business_group_id);
1776:
1777: debug_exit(l_proc_name);
1778: RETURN 'Y';
1779: