130:
131: hr_utility.trace('l_transmitter_number = ' || l_transmitter_number);
132: SELECT substr(l_transmitter_number,1,2)
133: INTO dummy1
134: FROM dual;
135:
136: IF (dummy1 <> 'NP' OR
137: length(l_transmitter_number) <> 8) THEN
138: RAISE INVALID_NUMBER;
139: END IF;
140:
141: SELECT to_number(substr(l_transmitter_number,3,6))
142: INTO dummy
143: FROM dual;
144:
145: EXCEPTION
146: WHEN INVALID_NUMBER THEN
147: hr_utility.set_message(800,'PAY_CA_RL1_INVALID_TRANSMITTER');
428: hr_utility.set_location('pay_ca_rl2_mag.create_assignment_act', 40);
429:
430: SELECT pay_assignment_actions_s.nextval
431: INTO lockingactid
432: FROM dual;
433:
434: hr_utility.set_location('pay_ca_rl2_mag.create_assignment_act', 50);
435: hr_nonrun_asact.insact(lockingactid,
436: l_assignment_id,
806:
807: SELECT
808: fnd_global.local_chr(13) || fnd_global.local_chr(10)
809: INTO EOL
810: FROM dual;
811:
812: lAnnee := 1;
813: lTypeEnvoi := 2;
814: lProvenance := 3;
1471: l_footnote_count := 0;
1472: SELECT
1473: fnd_global.local_chr(13) || fnd_global.local_chr(10)
1474: INTO EOL
1475: FROM dual;
1476:
1477: lAnnee := 1;
1478: lNoReleve := 2;
1479: lNAS := 3;
1758: '';
1759: tab_employee2(l_authorisation_no) := '
1760: || '
1761:
1762: select pay_ca_rl2_pdf_seq_s.nextval into l_seq_num from dual;
1763: tab_employee(l_sequence_no) := '
1764: ||'
1765: tab_employee1(l_sequence_no) := '
1766: ||'
2083: to_number(l_rl2_box_a) <> 0 THEN
2084:
2085: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_a),l_format_mask)))
2086: INTO l_formatted_box
2087: FROM dual;
2088: tab_employee(lA_PrestRPA_RPNA) := '
2089: '
2090: if l_rep_type = 'RL2PAPERPDF' then
2091: tab_employee1(lA_PrestRPA_RPNA) := '
2115: to_number(l_rl2_box_b) <> 0 THEN
2116:
2117: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_b),l_format_mask)))
2118: INTO l_formatted_box
2119: FROM dual;
2120:
2121: tab_employee(lB_PrestREER_FERR_RPDB) := '
2122: || '
2123: if l_rep_type = 'RL2PAPERPDF' then
2150: to_number(l_rl2_box_c) <> 0 THEN
2151:
2152: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_c),l_format_mask)))
2153: INTO l_formatted_box
2154: FROM dual;
2155:
2156: tab_employee(lC_AutrePaiement ) := '
2157: l_formatted_box || '
2158: if l_rep_type = 'RL2PAPERPDF' then
2184: to_number(l_rl2_box_d) <> 0 THEN
2185:
2186: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_d),l_format_mask)))
2187: INTO l_formatted_box
2188: FROM dual;
2189:
2190: tab_employee(lD_RembPrimeConjoint) := '
2191: l_formatted_box || '
2192: if l_rep_type = 'RL2PAPERPDF' then
2217: to_number(l_rl2_box_e) <> 0 THEN
2218:
2219: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_e),l_format_mask)))
2220: INTO l_formatted_box
2221: FROM dual;
2222:
2223: tab_employee(lE_PrestDeces) := '
2224: l_formatted_box || '
2225: if l_rep_type = 'RL2PAPERPDF' then
2251: to_number(l_rl2_box_f) <> 0 THEN
2252:
2253: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_f),l_format_mask)))
2254: INTO l_formatted_box
2255: FROM dual;
2256:
2257: tab_employee(lF_RembCotisInutilise) := '
2258: l_formatted_box || '
2259: if l_rep_type = 'RL2PAPERPDF' then
2284: to_number(l_rl2_box_g) <> 0 THEN
2285:
2286: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_g),l_format_mask)))
2287: INTO l_formatted_box
2288: FROM dual;
2289:
2290: tab_employee(lG_RevocationREER_FERR ) := '
2291: l_formatted_box || '
2292: if l_rep_type = 'RL2PAPERPDF' then
2317: to_number(l_rl2_box_h) <> 0 THEN
2318:
2319: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_h),l_format_mask)))
2320: INTO l_formatted_box
2321: FROM dual;
2322:
2323: tab_employee(lH_AutreRevenu) := '
2324: l_formatted_box || '
2325: if l_rep_type = 'RL2PAPERPDF' then
2351: to_number(l_rl2_box_i) <> 0 THEN
2352:
2353: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_i),l_format_mask)))
2354: INTO l_formatted_box
2355: FROM dual;
2356:
2357: tab_employee(lI_DroitDeduction ) := '
2358: l_formatted_box || '
2359: if l_rep_type = 'RL2PAPERPDF' then
2384: to_number(l_rl2_box_j) <> 0 THEN
2385:
2386: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_j),l_format_mask)))
2387: INTO l_formatted_box
2388: FROM dual;
2389:
2390: tab_employee(lJ_ImpotQueRetenuSource ) := '
2391: l_formatted_box || '
2392: if l_rep_type = 'RL2PAPERPDF' then
2417: to_number(l_rl2_box_k) <> 0 THEN
2418:
2419: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_k),l_format_mask)))
2420: INTO l_formatted_box
2421: FROM dual;
2422:
2423: tab_employee(lK_RevenuApresDeces ) := '
2424: l_formatted_box || '
2425: if l_rep_type = 'RL2PAPERPDF' then
2450: to_number(l_rl2_box_l) <> 0 THEN
2451:
2452: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_l),l_format_mask)))
2453: INTO l_formatted_box
2454: FROM dual;
2455:
2456: tab_employee(lL_RetraitREEP ) := '
2457: l_formatted_box || '
2458: if l_rep_type = 'RL2PAPERPDF' then
2483: to_number(l_rl2_box_m) <> 0 THEN
2484:
2485: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_m),l_format_mask)))
2486: INTO l_formatted_box
2487: FROM dual;
2488:
2489: tab_employee(lM_LibereImpot) := '
2490: l_formatted_box || '
2491: if l_rep_type = 'RL2PAPERPDF' then
2563: to_number(l_rl2_box_o) <> 0 THEN
2564:
2565: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_o),l_format_mask)))
2566: INTO l_formatted_box
2567: FROM dual;
2568:
2569: tab_employee(lO_RetraitRAP ) := '
2570: l_formatted_box || '
2571: if l_rep_type = 'RL2PAPERPDF' then
2670: l_footnote_amount <> 0 THEN
2671:
2672: SELECT ltrim(rtrim(to_char(l_footnote_amount,l_format_mask)))
2673: INTO l_formatted_box
2674: FROM dual;
2675: tab_employee(lBoxA_UnregisterdPlan) := '
2676: '
2677: END IF;
2678: END IF;
2683: l_footnote_amount <> 0 THEN
2684:
2685: SELECT ltrim(rtrim(to_char(l_footnote_amount,l_format_mask)))
2686: INTO l_formatted_box
2687: FROM dual;
2688: tab_employee(lDesg_BenefitExcAmt ) := '
2689: END IF;
2690: END IF;
2691:
2696: l_footnote_amount <> 0 THEN
2697:
2698: SELECT ltrim(rtrim(to_char(l_footnote_amount,l_format_mask)))
2699: INTO l_formatted_box
2700: FROM dual;
2701: tab_employee(lBoxB_DesgBenefitTrnsAmt) := '
2702: '
2703: END IF;
2704: END IF;
2710: l_footnote_amount <> 0 THEN
2711:
2712: SELECT ltrim(rtrim(to_char(l_footnote_amount,l_format_mask)))
2713: INTO l_formatted_box
2714: FROM dual;
2715: tab_employee(lBoxExcessAmt) := '
2716: END IF;
2717: END IF;
2718:
2723: l_footnote_amount <> 0 THEN
2724:
2725: SELECT ltrim(rtrim(to_char(l_footnote_amount,l_format_mask)))
2726: INTO l_formatted_box
2727: FROM dual;
2728: tab_employee(lAmount_Transferred) := '
2729: END IF;
2730: END IF;
2731:
2736: l_footnote_amount <> 0 THEN
2737:
2738: SELECT ltrim(rtrim(to_char(l_footnote_amount,l_format_mask)))
2739: INTO l_formatted_box
2740: FROM dual;
2741: tab_employee(lBoxC_SinglePayAccured) := '
2742: '
2743: END IF;
2744: END IF;
2750: l_footnote_amount <> 0 THEN
2751:
2752: SELECT ltrim(rtrim(to_char(l_footnote_amount,l_format_mask)))
2753: INTO l_formatted_box
2754: FROM dual;
2755: tab_employee(lBoxC_SinglePayAccUnreg) := '
2756: '
2757: END IF;
2758:
2765: l_footnote_amount <> 0 THEN
2766:
2767: SELECT ltrim(rtrim(to_char(l_footnote_amount,l_format_mask)))
2768: INTO l_formatted_box
2769: FROM dual;
2770: tab_employee(lBoxC_ExcessAmtSinPayTrans) := '
2771: '
2772: END IF;
2773: END IF;
3130:
3131: SELECT
3132: fnd_global.local_chr(13) || fnd_global.local_chr(10)
3133: INTO EOL
3134: FROM dual;
3135:
3136: lAnnee := 1;
3137: lNbReleves := 2;
3138: lNold := 3;
3448: utl_raw.cast_to_varchar2(hextoraw('C386')),'AE'
3449: ),
3450: utl_raw.cast_to_varchar2(hextoraw('C3A9')),'e'
3451: )
3452: from dual;
3453:
3454: BEGIN
3455: l_data := trim(p_data);
3456: l_data := REPLACE(l_data, '&' , '&' || 'amp;');