55: PROCEDURE debug
56: (p_trace_date IN DATE )
57: IS
58: BEGIN
59: debug(fnd_date.date_to_canonical(p_trace_date));
60: END debug;
61: --
62: --
63: --
2930: END IF;
2931:
2932: g_header_system_element:=
2933: g_header_system_element||
2934: fnd_date.date_to_canonical(g_last_effective_date)||':'||
2935: fnd_date.date_to_canonical(g_effective_run_date) ||':'||
2936: fnd_date.date_to_canonical(g_next_effective_date)||':';
2937:
2938: -- Assign the newly created system element to the type4 global
2931:
2932: g_header_system_element:=
2933: g_header_system_element||
2934: fnd_date.date_to_canonical(g_last_effective_date)||':'||
2935: fnd_date.date_to_canonical(g_effective_run_date) ||':'||
2936: fnd_date.date_to_canonical(g_next_effective_date)||':';
2937:
2938: -- Assign the newly created system element to the type4 global
2939: pqp_gb_tp_pension_extracts.g_header_system_element := g_header_system_element;
2932: g_header_system_element:=
2933: g_header_system_element||
2934: fnd_date.date_to_canonical(g_last_effective_date)||':'||
2935: fnd_date.date_to_canonical(g_effective_run_date) ||':'||
2936: fnd_date.date_to_canonical(g_next_effective_date)||':';
2937:
2938: -- Assign the newly created system element to the type4 global
2939: pqp_gb_tp_pension_extracts.g_header_system_element := g_header_system_element;
2940:
2963:
2964: debug(TO_CHAR(g_effective_date,'DD-MON-YYYY'));
2965:
2966: debug('g_effective_date: '||
2967: fnd_date.date_to_canonical(g_effective_date));
2968:
2969: IF to_number(to_char(g_effective_date, 'MM'))
2970: BETWEEN 1 AND 3 THEN
2971:
2985:
2986:
2987: g_header_system_element:=
2988: g_header_system_element||
2989: fnd_date.date_to_canonical(g_pension_year_start_date)||':'||
2990: fnd_date.date_to_canonical(g_pension_year_end_date)||':'||
2991: fnd_date.date_to_canonical(g_effective_date)||':';
2992:
2993: -- Set the globals in this package
2986:
2987: g_header_system_element:=
2988: g_header_system_element||
2989: fnd_date.date_to_canonical(g_pension_year_start_date)||':'||
2990: fnd_date.date_to_canonical(g_pension_year_end_date)||':'||
2991: fnd_date.date_to_canonical(g_effective_date)||':';
2992:
2993: -- Set the globals in this package
2994: g_last_effective_date := g_pension_year_start_date;
2987: g_header_system_element:=
2988: g_header_system_element||
2989: fnd_date.date_to_canonical(g_pension_year_start_date)||':'||
2990: fnd_date.date_to_canonical(g_pension_year_end_date)||':'||
2991: fnd_date.date_to_canonical(g_effective_date)||':';
2992:
2993: -- Set the globals in this package
2994: g_last_effective_date := g_pension_year_start_date;
2995: g_next_effective_date := g_effective_date;
3029: debug_enter(l_proc_name);
3030:
3031:
3032: debug('p_status: '||p_status);
3033: debug('p_start_date: '||fnd_date.date_to_canonical(p_start_date));
3034: debug('p_end_date: '||fnd_date.date_to_canonical(p_end_date));
3035: --
3036: -- Mark pay_process_events to process
3037: -- as determined by the date range. The maxmum allowed range
3030:
3031:
3032: debug('p_status: '||p_status);
3033: debug('p_start_date: '||fnd_date.date_to_canonical(p_start_date));
3034: debug('p_end_date: '||fnd_date.date_to_canonical(p_end_date));
3035: --
3036: -- Mark pay_process_events to process
3037: -- as determined by the date range. The maxmum allowed range
3038: -- is the pension year start date and a day before the current eff date
3082: debug_enter(l_proc_name);
3083:
3084:
3085: debug('p_status: '||p_status);
3086: debug('p_start_date: '||fnd_date.date_to_canonical(p_start_date));
3087: debug('p_end_date: '||fnd_date.date_to_canonical(p_end_date));
3088:
3089: --
3090: -- Mark pay_process_events to process
3083:
3084:
3085: debug('p_status: '||p_status);
3086: debug('p_start_date: '||fnd_date.date_to_canonical(p_start_date));
3087: debug('p_end_date: '||fnd_date.date_to_canonical(p_end_date));
3088:
3089: --
3090: -- Mark pay_process_events to process
3091: -- as determined by the date range. The maxmum allowed range
7887: l_error := pqp_gb_tp_extract_functions.raise_extract_warning
7888: (p_assignment_id => p_assignment_id
7889: ,p_error_text => 'BEN_94044_ZERO_SAL_RATE'
7890: ,p_error_number => 94044
7891: ,p_token1 => fnd_date.date_to_displaydate(p_effective_start_date)
7892: );
7893: END IF ;*/
7894:
7895: debug('l_warn_for_sal_paid: '||l_warn_for_sal_paid,530) ;
7898: l_error := pqp_gb_tp_extract_functions.raise_extract_warning
7899: (p_assignment_id => p_assignment_id
7900: ,p_error_text => 'BEN_94045_ZERO_PT_SAL_PAID'
7901: ,p_error_number => 94045
7902: ,p_token1 => fnd_date.date_to_displaydate(p_effective_start_date)
7903: );
7904: END IF ;
7905:
7906:
9878: loop
9879: fetch csr_get_eev_info into l_start_dt_vals;
9880: exit when csr_get_eev_info%notfound;
9881:
9882: l_abs_start_day := fnd_date.canonical_to_date(l_start_dt_vals.screen_entry_value);
9883: if trunc(p_effective_end_date) < trunc(l_abs_start_day)
9884: then
9885:
9886: exit;
10082:
10083: l_eff_end_date := p_effective_end_date;
10084:
10085: -- Get part time salary paid value for this assignment
10086: debug ('l_eff_start_date '||fnd_date.date_to_canonical(l_eff_start_date),50);
10087: debug ('l_eff_end_date '||fnd_date.date_to_canonical(l_eff_end_date));
10088:
10089: l_part_time_sal := calc_part_time_sal
10090: (p_assignment_id => p_assignment_id
10083: l_eff_end_date := p_effective_end_date;
10084:
10085: -- Get part time salary paid value for this assignment
10086: debug ('l_eff_start_date '||fnd_date.date_to_canonical(l_eff_start_date),50);
10087: debug ('l_eff_end_date '||fnd_date.date_to_canonical(l_eff_end_date));
10088:
10089: l_part_time_sal := calc_part_time_sal
10090: (p_assignment_id => p_assignment_id
10091: ,p_effective_start_date => l_eff_start_date
10157: );
10158:
10159: l_eff_end_date := p_effective_end_date;
10160:
10161: debug ('l_eff_start_date '||fnd_date.date_to_canonical(l_eff_start_date),50);
10162: debug ('l_eff_end_date '||fnd_date.date_to_canonical(l_eff_end_date));
10163:
10164: -- Get part time salary paid value for this assignment
10165: l_part_time_sal := calc_part_time_sal
10158:
10159: l_eff_end_date := p_effective_end_date;
10160:
10161: debug ('l_eff_start_date '||fnd_date.date_to_canonical(l_eff_start_date),50);
10162: debug ('l_eff_end_date '||fnd_date.date_to_canonical(l_eff_end_date));
10163:
10164: -- Get part time salary paid value for this assignment
10165: l_part_time_sal := calc_part_time_sal
10166: (p_assignment_id => p_assignment_id
14846: l_error := pqp_gb_tp_extract_functions.raise_extract_warning
14847: (p_assignment_id => p_assignment_id
14848: ,p_error_text => 'BEN_94159_EXT_TP_RETRO_PAY'
14849: ,p_error_number => 94159
14850: --,p_token1 => fnd_date.string_to_canonical(p_dtl_rec.val_13,'DDMMYY')
14851: );
14852: g_raise_retro_warning := 'N' ;
14853: END IF;
14854: