151:
152: hr_utility.trace('l_transmitter_number = ' || l_transmitter_number);
153: SELECT substr(l_transmitter_number,1,2)
154: INTO dummy1
155: FROM dual;
156:
157: IF (dummy1 <> 'NP' OR
158: length(l_transmitter_number) <> 8) THEN
159: RAISE INVALID_NUMBER;
160: END IF;
161:
162: SELECT to_number(substr(l_transmitter_number,3,6))
163: INTO dummy
164: FROM dual;
165:
166: EXCEPTION
167: WHEN INVALID_NUMBER THEN
168: hr_utility.set_message(800,'PAY_CA_RL1_INVALID_TRANSMITTER');
511: hr_utility.set_location('pay_ca_rl2_can_mag.create_assignment_act', 40);
512:
513: SELECT pay_assignment_actions_s.nextval
514: INTO lockingactid
515: FROM dual;
516:
517: hr_utility.set_location('pay_ca_rl2_can_mag.create_assignment_act', 50);
518: hr_nonrun_asact.insact(lockingactid,
519: l_assignment_id,
900:
901: SELECT
902: fnd_global.local_chr(13) || fnd_global.local_chr(10)
903: INTO EOL
904: FROM dual;
905:
906: lAnnee := 1;
907: lTypeEnvoi := 2;
908: lProvenance := 3;
1665: l_footnote_count := 0;
1666: SELECT
1667: fnd_global.local_chr(13) || fnd_global.local_chr(10)
1668: INTO EOL
1669: FROM dual;
1670:
1671: lAnnee := 1;
1672: lNoReleve := 2;
1673: lNAS := 3;
1996: to_number(l_rl2_box_a) <> 0 THEN
1997:
1998: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_a),l_format_mask)))
1999: INTO l_formatted_box
2000: FROM dual;
2001: --
2002: tab_employee(lA_PrestRPA_RPNA) := '
2003: '
2004: l_all_box_0 := FALSE;
2018: to_number(l_rl2_box_b) <> 0 THEN
2019:
2020: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_b),l_format_mask)))
2021: INTO l_formatted_box
2022: FROM dual;
2023:
2024: tab_employee(lB_PrestREER_FERR_RPDB) := '
2025: || '
2026: l_all_box_0 := FALSE;
2040: to_number(l_rl2_box_c) <> 0 THEN
2041:
2042: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_c),l_format_mask)))
2043: INTO l_formatted_box
2044: FROM dual;
2045:
2046: tab_employee(lC_AutrePaiement ) := '
2047: l_formatted_box || '
2048: l_all_box_0 := FALSE;
2063: to_number(l_rl2_box_d) <> 0 THEN
2064:
2065: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_d),l_format_mask)))
2066: INTO l_formatted_box
2067: FROM dual;
2068:
2069: tab_employee(lD_RembPrimeConjoint) := '
2070: l_formatted_box || '
2071: l_all_box_0 := FALSE;
2085: to_number(l_rl2_box_e) <> 0 THEN
2086:
2087: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_e),l_format_mask)))
2088: INTO l_formatted_box
2089: FROM dual;
2090:
2091: tab_employee(lE_PrestDeces) := '
2092: l_formatted_box || '
2093: l_all_box_0 := FALSE;
2108: to_number(l_rl2_box_f) <> 0 THEN
2109:
2110: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_f),l_format_mask)))
2111: INTO l_formatted_box
2112: FROM dual;
2113:
2114: tab_employee(lF_RembCotisInutilise) := '
2115: l_formatted_box || '
2116: l_all_box_0 := FALSE;
2130: to_number(l_rl2_box_g) <> 0 THEN
2131:
2132: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_g),l_format_mask)))
2133: INTO l_formatted_box
2134: FROM dual;
2135:
2136: tab_employee(lG_RevocationREER_FERR ) := '
2137: l_formatted_box || '
2138: l_all_box_0 := FALSE;
2153: to_number(l_rl2_box_h) <> 0 THEN
2154:
2155: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_h),l_format_mask)))
2156: INTO l_formatted_box
2157: FROM dual;
2158:
2159: tab_employee(lH_AutreRevenu) := '
2160: l_formatted_box || '
2161: l_all_box_0 := FALSE;
2176: to_number(l_rl2_box_i) <> 0 THEN
2177:
2178: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_i),l_format_mask)))
2179: INTO l_formatted_box
2180: FROM dual;
2181:
2182: tab_employee(lI_DroitDeduction ) := '
2183: l_formatted_box || '
2184: l_all_box_0 := FALSE;
2198: to_number(l_rl2_box_j) <> 0 THEN
2199:
2200: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_j),l_format_mask)))
2201: INTO l_formatted_box
2202: FROM dual;
2203:
2204: tab_employee(lJ_ImpotQueRetenuSource ) := '
2205: l_formatted_box || '
2206: l_all_box_0 := FALSE;
2220: to_number(l_rl2_box_k) <> 0 THEN
2221:
2222: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_k),l_format_mask)))
2223: INTO l_formatted_box
2224: FROM dual;
2225:
2226: tab_employee(lK_RevenuApresDeces ) := '
2227: l_formatted_box || '
2228: l_all_box_0 := FALSE;
2242: to_number(l_rl2_box_l) <> 0 THEN
2243:
2244: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_l),l_format_mask)))
2245: INTO l_formatted_box
2246: FROM dual;
2247:
2248: tab_employee(lL_RetraitREEP ) := '
2249: l_formatted_box || '
2250: l_all_box_0 := FALSE;
2264: to_number(l_rl2_box_m) <> 0 THEN
2265:
2266: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_m),l_format_mask)))
2267: INTO l_formatted_box
2268: FROM dual;
2269:
2270: tab_employee(lM_LibereImpot) := '
2271: l_formatted_box || '
2272: l_all_box_0 := FALSE;
2298: to_number(l_rl2_box_o) <> 0 THEN
2299:
2300: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_o),l_format_mask)))
2301: INTO l_formatted_box
2302: FROM dual;
2303:
2304: tab_employee(lO_RetraitRAP ) := '
2305: l_formatted_box || '
2306: l_all_box_0 := FALSE;
2379: if rec.value is not null then
2380: if(rec.code <> '201' and to_number(rec.value) <> 0) then
2381: SELECT ltrim(rtrim(to_char(rec.value,l_format_mask)))
2382: INTO l_formatted_box
2383: FROM dual;
2384:
2385: select decode(rec.code,'235','F_2','210','F_3',replace(rec.code,'-','_')) -- Bug 14701748
2386: into l_formatted_code
2387: from dual;
2383: FROM dual;
2384:
2385: select decode(rec.code,'235','F_2','210','F_3',replace(rec.code,'-','_')) -- Bug 14701748
2386: into l_formatted_code
2387: from dual;
2388: l_other_details:=l_other_details||'<'||l_formatted_code||'>'
2389: ||l_formatted_box||''||l_formatted_code||'>'||EOL;
2390: elsif rec.code = '201' then
2391: l_other_details:=l_other_details||'
2525: if ( counter <= 4 ) then
2526: if(l_further_code(l_i) <> '201' and to_number(l_further_amount(l_i)) <> 0) then
2527: SELECT ltrim(rtrim(to_char(l_further_amount(l_i),l_format_mask)))
2528: INTO l_formatted_box
2529: FROM dual;
2530:
2531:
2532: further_info_details:= further_info_details || '
2533: '
2607: if l_further_amount(l_i) is not null then
2608: if(l_further_code(l_i) <> '201' and to_number(l_further_amount(l_i)) <> 0) then
2609: SELECT ltrim(rtrim(to_char(l_further_amount(l_i),l_format_mask)))
2610: INTO l_formatted_box
2611: FROM dual;
2612:
2613:
2614: further_info_details:= further_info_details || '
2615: '
2719:
2720: SELECT
2721: fnd_global.local_chr(13) || fnd_global.local_chr(10)
2722: INTO EOL
2723: FROM dual;
2724:
2725: lAnnee := 1;
2726: lNbReleves := 2;
2727: lNold := 3;
3044: utl_raw.cast_to_varchar2(hextoraw('C386')),'AE'
3045: ),
3046: utl_raw.cast_to_varchar2(hextoraw('C3A9')),'e'
3047: )
3048: from dual;
3049:
3050: BEGIN
3051: l_data := trim(p_data);
3052: l_data := REPLACE(l_data, '&' , '&' || 'amp;');