56: PROCEDURE debug
57: (p_trace_date IN DATE )
58: IS
59: BEGIN
60: debug(fnd_date.date_to_canonical(p_trace_date));
61: END debug;
62: --
63: --
64: --
2902: END IF;
2903:
2904: g_header_system_element:=
2905: g_header_system_element||
2906: fnd_date.date_to_canonical(g_last_effective_date)||':'||
2907: fnd_date.date_to_canonical(g_effective_run_date) ||':'||
2908: fnd_date.date_to_canonical(g_next_effective_date)||':';
2909:
2910: -- Assign the newly created system element to the type4 global
2903:
2904: g_header_system_element:=
2905: g_header_system_element||
2906: fnd_date.date_to_canonical(g_last_effective_date)||':'||
2907: fnd_date.date_to_canonical(g_effective_run_date) ||':'||
2908: fnd_date.date_to_canonical(g_next_effective_date)||':';
2909:
2910: -- Assign the newly created system element to the type4 global
2911: pqp_gb_tp_pension_extracts.g_header_system_element := g_header_system_element;
2904: g_header_system_element:=
2905: g_header_system_element||
2906: fnd_date.date_to_canonical(g_last_effective_date)||':'||
2907: fnd_date.date_to_canonical(g_effective_run_date) ||':'||
2908: fnd_date.date_to_canonical(g_next_effective_date)||':';
2909:
2910: -- Assign the newly created system element to the type4 global
2911: pqp_gb_tp_pension_extracts.g_header_system_element := g_header_system_element;
2912:
2935:
2936: debug(TO_CHAR(g_effective_date,'DD-MON-YYYY'));
2937:
2938: debug('g_effective_date: '||
2939: fnd_date.date_to_canonical(g_effective_date));
2940:
2941: IF to_number(to_char(g_effective_date, 'MM'))
2942: BETWEEN 1 AND 3 THEN
2943:
2957:
2958:
2959: g_header_system_element:=
2960: g_header_system_element||
2961: fnd_date.date_to_canonical(g_pension_year_start_date)||':'||
2962: fnd_date.date_to_canonical(g_pension_year_end_date)||':'||
2963: fnd_date.date_to_canonical(g_effective_date)||':';
2964:
2965: -- Set the globals in this package
2958:
2959: g_header_system_element:=
2960: g_header_system_element||
2961: fnd_date.date_to_canonical(g_pension_year_start_date)||':'||
2962: fnd_date.date_to_canonical(g_pension_year_end_date)||':'||
2963: fnd_date.date_to_canonical(g_effective_date)||':';
2964:
2965: -- Set the globals in this package
2966: g_last_effective_date := g_pension_year_start_date;
2959: g_header_system_element:=
2960: g_header_system_element||
2961: fnd_date.date_to_canonical(g_pension_year_start_date)||':'||
2962: fnd_date.date_to_canonical(g_pension_year_end_date)||':'||
2963: fnd_date.date_to_canonical(g_effective_date)||':';
2964:
2965: -- Set the globals in this package
2966: g_last_effective_date := g_pension_year_start_date;
2967: g_next_effective_date := g_effective_date;
3001: debug_enter(l_proc_name);
3002:
3003:
3004: debug('p_status: '||p_status);
3005: debug('p_start_date: '||fnd_date.date_to_canonical(p_start_date));
3006: debug('p_end_date: '||fnd_date.date_to_canonical(p_end_date));
3007: --
3008: -- Mark pay_process_events to process
3009: -- as determined by the date range. The maxmum allowed range
3002:
3003:
3004: debug('p_status: '||p_status);
3005: debug('p_start_date: '||fnd_date.date_to_canonical(p_start_date));
3006: debug('p_end_date: '||fnd_date.date_to_canonical(p_end_date));
3007: --
3008: -- Mark pay_process_events to process
3009: -- as determined by the date range. The maxmum allowed range
3010: -- is the pension year start date and a day before the current eff date
3054: debug_enter(l_proc_name);
3055:
3056:
3057: debug('p_status: '||p_status);
3058: debug('p_start_date: '||fnd_date.date_to_canonical(p_start_date));
3059: debug('p_end_date: '||fnd_date.date_to_canonical(p_end_date));
3060:
3061: --
3062: -- Mark pay_process_events to process
3055:
3056:
3057: debug('p_status: '||p_status);
3058: debug('p_start_date: '||fnd_date.date_to_canonical(p_start_date));
3059: debug('p_end_date: '||fnd_date.date_to_canonical(p_end_date));
3060:
3061: --
3062: -- Mark pay_process_events to process
3063: -- as determined by the date range. The maxmum allowed range
7836: l_error := pqp_gb_tp_extract_functions.raise_extract_warning
7837: (p_assignment_id => p_assignment_id
7838: ,p_error_text => 'BEN_94044_ZERO_SAL_RATE'
7839: ,p_error_number => 94044
7840: ,p_token1 => fnd_date.date_to_displaydate(p_effective_start_date)
7841: );
7842: END IF ;
7843:
7844: debug('l_warn_for_sal_paid: '||l_warn_for_sal_paid,530) ;
7847: l_error := pqp_gb_tp_extract_functions.raise_extract_warning
7848: (p_assignment_id => p_assignment_id
7849: ,p_error_text => 'BEN_94045_ZERO_PT_SAL_PAID'
7850: ,p_error_number => 94045
7851: ,p_token1 => fnd_date.date_to_displaydate(p_effective_start_date)
7852: );
7853: END IF ;
7854:
7855:
9758: loop
9759: fetch csr_get_eev_info into l_start_dt_vals;
9760: exit when csr_get_eev_info%notfound;
9761:
9762: l_abs_start_day := fnd_date.canonical_to_date(l_start_dt_vals.screen_entry_value);
9763: if trunc(p_effective_end_date) < trunc(l_abs_start_day)
9764: then
9765:
9766: exit;
9962:
9963: l_eff_end_date := p_effective_end_date;
9964:
9965: -- Get part time salary paid value for this assignment
9966: debug ('l_eff_start_date '||fnd_date.date_to_canonical(l_eff_start_date),50);
9967: debug ('l_eff_end_date '||fnd_date.date_to_canonical(l_eff_end_date));
9968:
9969: l_part_time_sal := calc_part_time_sal
9970: (p_assignment_id => p_assignment_id
9963: l_eff_end_date := p_effective_end_date;
9964:
9965: -- Get part time salary paid value for this assignment
9966: debug ('l_eff_start_date '||fnd_date.date_to_canonical(l_eff_start_date),50);
9967: debug ('l_eff_end_date '||fnd_date.date_to_canonical(l_eff_end_date));
9968:
9969: l_part_time_sal := calc_part_time_sal
9970: (p_assignment_id => p_assignment_id
9971: ,p_effective_start_date => l_eff_start_date
14647: l_error := pqp_gb_tp_extract_functions.raise_extract_warning
14648: (p_assignment_id => p_assignment_id
14649: ,p_error_text => 'BEN_94159_EXT_TP_RETRO_PAY'
14650: ,p_error_number => 94159
14651: --,p_token1 => fnd_date.string_to_canonical(p_dtl_rec.val_13,'DDMMYY')
14652: );
14653: g_raise_retro_warning := 'N' ;
14654: END IF;
14655: