103: utl_raw.cast_to_varchar2(hextoraw('C386')),'AE'
104: ),
105: utl_raw.cast_to_varchar2(hextoraw('C3A9')),'e'
106: )
107: from dual;
108:
109: BEGIN
110: l_data := trim(p_data);
111: l_data := REPLACE(l_data, '&' , '&' || 'amp;');
211:
212: hr_utility.trace('l_transmitter_number = ' || l_transmitter_number);
213: SELECT substr(l_transmitter_number,1,2)
214: INTO dummy1
215: FROM dual;
216:
217: IF (dummy1 <> 'NP' OR
218: length(l_transmitter_number) <> 8) THEN
219: RAISE INVALID_NUMBER;
220: END IF;
221:
222: SELECT to_number(substr(l_transmitter_number,3,6))
223: INTO dummy
224: FROM dual;
225:
226: EXCEPTION
227: WHEN INVALID_NUMBER THEN
228: hr_utility.set_message(800,'PAY_CA_RL1_INVALID_TRANSMITTER');
288:
289: cursor cur_further_info(p_cpp_withheld NUMBER,p_cpp_taxable NUMBER) is
290: select substr(ltrim(rtrim(code)),1,60) code, value value
291: from (
292: select 'B-1' code,to_char(p_cpp_withheld) value from dual
293: where p_cpp_withheld <> 0
294: union
295: select 'G-2' code,to_char(p_cpp_taxable) value from dual
296: where p_cpp_taxable <> 0
291: from (
292: select 'B-1' code,to_char(p_cpp_withheld) value from dual
293: where p_cpp_withheld <> 0
294: union
295: select 'G-2' code,to_char(p_cpp_taxable) value from dual
296: where p_cpp_taxable <> 0
297: union
298: select decode(fdi.user_name,'CAEOY_RL1_FURTHER_INFO_AMOUNT_201_AMT_PER_JD_YTD','201',
299: 'CAEOY_RL1_FURTHER_INFO_AMOUNT_211_AMT_PER_JD_YTD','211',
631: hr_utility.set_location('pay_ca_rl1_can_mag.create_assignement_act', 40);
632:
633: SELECT pay_assignment_actions_s.nextval
634: INTO lockingactid
635: FROM dual;
636:
637: hr_utility.set_location('pay_ca_rl1_can_mag.create_assignement_act', 50);
638: hr_nonrun_asact.insact(lockingactid,
639: l_assignment_id,
869:
870: SELECT
871: fnd_global.local_chr(13) || fnd_global.local_chr(10)
872: INTO EOL
873: FROM dual;
874:
875: lAnnee := 1;
876: lTypeEnvoi := 2;
877: lProvenance := 3;
1566:
1567: SELECT
1568: fnd_global.local_chr(13) || fnd_global.local_chr(10)
1569: INTO EOL
1570: FROM dual;
1571:
1572: lAnnee := 1;
1573: lNoReleve := 2;
1574: lNAS := 3;
1918: to_number(l_box) <> 0 THEN
1919:
1920: SELECT ltrim(rtrim(to_char(to_number(l_box),l_format_mask)))
1921: INTO l_formatted_box
1922: FROM dual;
1923: tab_employee(lA_RevenuEmploi) := '
1924: '
1925: tab_xml_employee(lA_RevenuEmploi) := l_formatted_box; --
1926: l_all_box_0 := FALSE;
1950: l_BoxB := l_box;
1951:
1952: SELECT ltrim(rtrim(to_char(to_number(l_box),l_format_mask)))
1953: INTO l_formatted_box
1954: FROM dual;
1955:
1956: tab_employee(lB_CotisationRRQ) := '
1957: || '
1958: tab_xml_employee(lB_CotisationRRQ) := l_formatted_box; --
1984: to_number(l_box) <> 0 THEN
1985:
1986: SELECT ltrim(rtrim(to_char(to_number(l_box),l_format_mask)))
1987: INTO l_formatted_box
1988: FROM dual;
1989:
1990: tab_employee(lC_CotisationAssEmploi) := '
1991: l_formatted_box || '
1992: tab_xml_employee(lC_CotisationAssEmploi) := l_formatted_box; --
2017: to_number(l_box) <> 0 THEN
2018:
2019: SELECT ltrim(rtrim(to_char(to_number(l_box),l_format_mask)))
2020: INTO l_formatted_box
2021: FROM dual;
2022:
2023: tab_employee(lD_CotisationRPA) := '
2024: l_formatted_box || '
2025: tab_xml_employee(lD_CotisationRPA) := l_formatted_box; --
2051: to_number(l_box) <> 0 THEN
2052:
2053: SELECT ltrim(rtrim(to_char(to_number(l_box),l_format_mask)))
2054: INTO l_formatted_box
2055: FROM dual;
2056:
2057: tab_employee(lE_ImpotQue) := '
2058: l_formatted_box || '
2059: tab_xml_employee(lE_ImpotQue) := l_formatted_box ; --
2084: to_number(l_box) <> 0 THEN
2085:
2086: SELECT ltrim(rtrim(to_char(to_number(l_box),l_format_mask)))
2087: INTO l_formatted_box
2088: FROM dual;
2089:
2090: tab_employee(lF_CotisationSyndicale) := '
2091: l_formatted_box || '
2092: tab_xml_employee(lF_CotisationSyndicale) := l_formatted_box; --
2116: to_number(l_box) <> 0 THEN
2117:
2118: SELECT ltrim(rtrim(to_char(to_number(l_box),l_format_mask)))
2119: INTO l_formatted_box
2120: FROM dual;
2121:
2122: tab_employee(lQ_SalaireDiffere) := '
2123: l_formatted_box || '
2124: tab_xml_employee(lQ_SalaireDiffere) := l_formatted_box; --
2151: to_number(l_box) <> 0 THEN
2152:
2153: SELECT ltrim(rtrim(to_char(to_number(l_box),l_format_mask)))
2154: INTO l_formatted_box
2155: FROM dual;
2156:
2157: tab_employee(lU_RetraiteProgressive) := '
2158: l_formatted_box || '
2159: tab_xml_employee(lU_RetraiteProgressive) := l_formatted_box; --
2191: l_msg_code := 'AMT_GREATER_THAN_RANGE';
2192:
2193: SELECT ltrim(rtrim(to_char(to_number(l_box),l_format_mask)))
2194: INTO l_formatted_box
2195: FROM dual;
2196:
2197: tab_employee(lG_SalaireAdmisRRQ) := '
2198: l_formatted_box || '
2199: --tab_xml_employee(lG_SalaireAdmisRRQ) := l_formatted_box; --
2209: NVL(to_number(l_BoxU),0)) THEN
2210:
2211: SELECT ltrim(rtrim(to_char(to_number(l_box),l_format_mask)))
2212: INTO l_formatted_box
2213: FROM dual;
2214:
2215: tab_employee(lG_SalaireAdmisRRQ) := '
2216: l_formatted_box || '
2217:
2226: --tab_xml_employee(lG_SalaireAdmisRRQ) := NULL; --
2227:
2228: SELECT ltrim(rtrim(to_char(to_number(l_box),l_format_mask)))
2229: INTO l_formatted_box
2230: FROM dual;
2231:
2232: tab_employee(lG_SalaireAdmisRRQ) := '
2233: l_formatted_box || '
2234:
2261: to_number(l_box) <> 0 THEN
2262:
2263: SELECT ltrim(rtrim(to_char(to_number(l_box),l_format_mask)))
2264: INTO l_formatted_box
2265: FROM dual;
2266:
2267: tab_employee(lV_NourritureLogement) := '
2268: l_formatted_box || '
2269: tab_xml_employee(lV_NourritureLogement) := l_formatted_box; --
2294: to_number(l_box) <> 0 THEN
2295:
2296: SELECT ltrim(rtrim(to_char(to_number(l_box),l_format_mask)))
2297: INTO l_formatted_box
2298: FROM dual;
2299:
2300: tab_employee(lW_Vehicule) := '
2301: l_formatted_box || '
2302: tab_xml_employee(lW_Vehicule) := l_formatted_box; --
2326: to_number(l_box) <> 0 THEN
2327:
2328: SELECT ltrim(rtrim(to_char(to_number(l_box),l_format_mask)))
2329: INTO l_formatted_box
2330: FROM dual;
2331:
2332: tab_employee(lH_CotisationRQAP) := '
2333: l_formatted_box || '
2334: tab_xml_employee(lH_CotisationRQAP) := l_formatted_box; --
2360: to_number(l_box) <> 0 THEN
2361:
2362: SELECT ltrim(rtrim(to_char(to_number(l_box),l_format_mask)))
2363: INTO l_formatted_box
2364: FROM dual;
2365:
2366: tab_employee(lI_SalaireAdmisRQAP) := '
2367: l_formatted_box || '
2368: tab_xml_employee(lI_SalaireAdmisRQAP) := l_formatted_box; --
2394: to_number(l_box) <> 0 THEN
2395:
2396: SELECT ltrim(rtrim(to_char(to_number(l_box),l_format_mask)))
2397: INTO l_formatted_box
2398: FROM dual;
2399:
2400: tab_employee(lJ_RegimeAssMaladie) := '
2401: l_formatted_box || '
2402: tab_xml_employee(lJ_RegimeAssMaladie) := l_formatted_box; --
2427: to_number(l_box) <> 0 THEN
2428:
2429: SELECT ltrim(rtrim(to_char(to_number(l_box),l_format_mask)))
2430: INTO l_formatted_box
2431: FROM dual;
2432:
2433: tab_employee(lK_Voyage) := '
2434: l_formatted_box || '
2435: tab_xml_employee(lK_Voyage) := l_formatted_box; --
2459: to_number(l_box) <> 0 THEN
2460:
2461: SELECT ltrim(rtrim(to_char(to_number(l_box),l_format_mask)))
2462: INTO l_formatted_box
2463: FROM dual;
2464:
2465: tab_employee(lL_AutreAvantage) := '
2466: l_formatted_box || '
2467: tab_xml_employee(lL_AutreAvantage) := l_formatted_box; --
2491: to_number(l_box) <> 0 THEN
2492:
2493: SELECT ltrim(rtrim(to_char(to_number(l_box),l_format_mask)))
2494: INTO l_formatted_box
2495: FROM dual;
2496:
2497: tab_employee(lM_Commission) := '
2498: l_formatted_box || '
2499: tab_xml_employee(lM_Commission) := l_formatted_box; --
2523: to_number(l_box) <> 0 THEN
2524:
2525: SELECT ltrim(rtrim(to_char(to_number(l_box),l_format_mask)))
2526: INTO l_formatted_box
2527: FROM dual;
2528:
2529: tab_employee(lN_DonBienfaisance) := '
2530: l_formatted_box || '
2531: tab_xml_employee(lN_DonBienfaisance) := l_formatted_box; --
2557:
2558: l_boxO := l_box;
2559: SELECT ltrim(rtrim(to_char(to_number(l_box),l_format_mask)))
2560: INTO l_formatted_box
2561: FROM dual;
2562:
2563: tab_employee(lO_AutreRevenu) := '
2564: l_formatted_box || '
2565: tab_xml_employee(lO_AutreRevenu) := l_formatted_box; --
2619: to_number(l_box) <> 0 THEN
2620:
2621: SELECT ltrim(rtrim(to_char(to_number(l_box),l_format_mask)))
2622: INTO l_formatted_box
2623: FROM dual;
2624:
2625: tab_employee(lP_RegimeAssInterEntr) := '
2626: l_formatted_box || '
2627: tab_xml_employee(lP_RegimeAssInterEntr) := l_formatted_box; --
2651: to_number(l_box) <> 0 THEN
2652:
2653: SELECT ltrim(rtrim(to_char(to_number(l_box),l_format_mask)))
2654: INTO l_formatted_box
2655: FROM dual;
2656:
2657: tab_employee(lR_RevenuIndien) := '
2658: l_formatted_box || '
2659: tab_xml_employee(lR_RevenuIndien) := l_formatted_box; --
2683: to_number(l_box) <> 0 THEN
2684:
2685: SELECT ltrim(rtrim(to_char(to_number(l_box),l_format_mask)))
2686: INTO l_formatted_box
2687: FROM dual;
2688:
2689: tab_employee(lS_PourboireRecu) := '
2690: l_formatted_box || '
2691: tab_xml_employee(lS_PourboireRecu) := l_formatted_box; --
2715: to_number(l_box) <> 0 THEN
2716:
2717: SELECT ltrim(rtrim(to_char(to_number(l_box),l_format_mask)))
2718: INTO l_formatted_box
2719: FROM dual;
2720:
2721: tab_employee(lT_PourboireAttribue) := '
2722: l_formatted_box || '
2723: tab_xml_employee(lT_PourboireAttribue) := l_formatted_box; --
2747: and l_taxation_year = '2011' THEN /*Bug 14701466 */
2748:
2749: SELECT ltrim(rtrim(to_char(to_number(l_box),l_format_mask)))
2750: INTO l_formatted_box
2751: FROM dual;
2752:
2753: tab_employee(l_ContisationRPC) := '
2754: l_formatted_box || '
2755: l_all_box_0 := FALSE;
2776: to_number(l_box) <> 0
2777: and l_taxation_year = '2011' THEN /*Bug 14701466 here*/
2778: SELECT ltrim(rtrim(to_char(to_number(l_box),l_format_mask)))
2779: INTO l_formatted_box
2780: FROM dual;
2781:
2782: tab_employee(l_FraisGarde) := '
2783: l_formatted_box || '
2784: l_all_box_0 := FALSE;
2809: and l_taxation_year = '2011' THEN /*Bug 14701466 */
2810:
2811: SELECT ltrim(rtrim(to_char(to_number(l_box),l_format_mask)))
2812: INTO l_formatted_box
2813: FROM dual;
2814:
2815: tab_employee(l_DeductionForce) := '
2816: l_formatted_box || '
2817: l_all_box_0 := FALSE;
2864: if l_further_amount(l_i) is not null and
2865: l_further_amount(l_i) <> '0' then
2866: SELECT ltrim(rtrim(to_char(to_number(l_further_amount(l_i)),l_format_mask)))
2867: INTO l_formatted_box
2868: FROM dual;
2869: select decode(l_further_code(l_i),'201','F_1','211','F_2','235','F_3',replace(l_further_code(l_i),'-','_'))
2870: into l_formatted_code
2871: from dual;
2872: l_other_details:=l_other_details||'<'||l_formatted_code||'>'
2867: INTO l_formatted_box
2868: FROM dual;
2869: select decode(l_further_code(l_i),'201','F_1','211','F_2','235','F_3',replace(l_further_code(l_i),'-','_'))
2870: into l_formatted_code
2871: from dual;
2872: l_other_details:=l_other_details||'<'||l_formatted_code||'>'
2873: ||l_formatted_box||''||l_formatted_code||'>'||EOL;
2874: end if;
2875: end loop;
2954: and (NVL(tab_xml_employee(l_SourceCase),'RZ') = 'RZ' or l_further_code(l_i) not like 'RZ%') then
2955: l_k := l_k + 1;
2956: SELECT ltrim(rtrim(to_char(to_number(l_further_amount(l_i)),l_format_mask)))
2957: INTO l_formatted_box
2958: FROM dual;
2959: l_further_info_string:=l_further_info_string||'
2960: ||'
2961: ||'
2962: ||'
3088:
3089: SELECT
3090: fnd_global.local_chr(13) || fnd_global.local_chr(10)
3091: INTO EOL
3092: FROM dual;
3093:
3094: lAnnee := 1;
3095: lNbReleves := 2;
3096: lNoId := 3;