201:
202: hr_utility.trace('l_transmitter_number = ' || l_transmitter_number);
203: SELECT substr(l_transmitter_number,1,2)
204: INTO dummy1
205: FROM dual;
206:
207: IF (dummy1 <> 'NP' OR
208: length(l_transmitter_number) <> 8) THEN
209: RAISE INVALID_NUMBER;
210: END IF;
211:
212: SELECT to_number(substr(l_transmitter_number,3,6))
213: INTO dummy
214: FROM dual;
215:
216: EXCEPTION
217: WHEN INVALID_NUMBER THEN
218: hr_utility.set_message(800,'PAY_CA_RL1_INVALID_TRANSMITTER');
502: hr_utility.set_location('pay_ca_rl2_mag.create_assignment_act', 40);
503:
504: SELECT pay_assignment_actions_s.nextval
505: INTO lockingactid
506: FROM dual;
507:
508: hr_utility.set_location('pay_ca_rl2_mag.create_assignment_act', 50);
509: hr_nonrun_asact.insact(lockingactid,
510: l_assignment_id,
918:
919: SELECT
920: fnd_global.local_chr(13) || fnd_global.local_chr(10)
921: INTO EOL
922: FROM dual;
923:
924: lAnnee := 1;
925: lTypeEnvoi := 2;
926: lProvenance := 3;
2023: l_footnote_count := 0;
2024: SELECT
2025: fnd_global.local_chr(13) || fnd_global.local_chr(10)
2026: INTO EOL
2027: FROM dual;
2028:
2029: lAnnee := 1;
2030: lNoReleve := 2;
2031: lNAS := 3;
2402: '';
2403: tab_employee5(l_authorisation_no) := '
2404: || '
2405:
2406: --select pay_ca_rl2_pdf_seq_s.nextval into l_seq_num from dual;
2407:
2408: l_seq_num := pay_ca_eoy_rl2_archive.gen_rl2_pdf_seq(p_arch_action_id, --Bug 6768167
2409: l_reporting_year,
2410: 'XMLPROC');
2975: to_number(l_rl2_box_a) <> 0 THEN
2976:
2977: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_a),l_format_mask)))
2978: INTO l_formatted_box
2979: FROM dual;
2980: --
2981: tab_employee(lA_PrestRPA_RPNA) := '
2982: '
2983: /* All pdf templates using tag
3024: to_number(l_rl2_box_b) <> 0 THEN
3025:
3026: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_b),l_format_mask)))
3027: INTO l_formatted_box
3028: FROM dual;
3029:
3030: tab_employee(lB_PrestREER_FERR_RPDB) := '
3031: || '
3032: if p_rep_type = 'RL2PAPERPDF' or p_rep_type='PAYCARL2AMPDF' or p_rep_type='PAYCARL2CLPDF'
3070: to_number(l_rl2_box_c) <> 0 THEN
3071:
3072: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_c),l_format_mask)))
3073: INTO l_formatted_box
3074: FROM dual;
3075:
3076: tab_employee(lC_AutrePaiement ) := '
3077: l_formatted_box || '
3078: if p_rep_type = 'RL2PAPERPDF' or p_rep_type='PAYCARL2AMPDF' or p_rep_type='PAYCARL2CLPDF'
3115: to_number(l_rl2_box_d) <> 0 THEN
3116:
3117: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_d),l_format_mask)))
3118: INTO l_formatted_box
3119: FROM dual;
3120:
3121: tab_employee(lD_RembPrimeConjoint) := '
3122: l_formatted_box || '
3123: if p_rep_type = 'RL2PAPERPDF' or p_rep_type='PAYCARL2AMPDF' or p_rep_type='PAYCARL2CLPDF'
3159: to_number(l_rl2_box_e) <> 0 THEN
3160:
3161: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_e),l_format_mask)))
3162: INTO l_formatted_box
3163: FROM dual;
3164:
3165: tab_employee(lE_PrestDeces) := '
3166: l_formatted_box || '
3167: if p_rep_type = 'RL2PAPERPDF' or p_rep_type='PAYCARL2AMPDF' or p_rep_type='PAYCARL2CLPDF'
3204: to_number(l_rl2_box_f) <> 0 THEN
3205:
3206: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_f),l_format_mask)))
3207: INTO l_formatted_box
3208: FROM dual;
3209:
3210: tab_employee(lF_RembCotisInutilise) := '
3211: l_formatted_box || '
3212: if p_rep_type = 'RL2PAPERPDF' or p_rep_type='PAYCARL2AMPDF' or p_rep_type='PAYCARL2CLPDF'
3248: to_number(l_rl2_box_g) <> 0 THEN
3249:
3250: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_g),l_format_mask)))
3251: INTO l_formatted_box
3252: FROM dual;
3253:
3254: tab_employee(lG_RevocationREER_FERR ) := '
3255: l_formatted_box || '
3256: if p_rep_type = 'RL2PAPERPDF' or p_rep_type='PAYCARL2AMPDF' or p_rep_type='PAYCARL2CLPDF'
3292: to_number(l_rl2_box_h) <> 0 THEN
3293:
3294: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_h),l_format_mask)))
3295: INTO l_formatted_box
3296: FROM dual;
3297:
3298: tab_employee(lH_AutreRevenu) := '
3299: l_formatted_box || '
3300: if p_rep_type = 'RL2PAPERPDF' or p_rep_type='PAYCARL2AMPDF' or p_rep_type='PAYCARL2CLPDF'
3337: to_number(l_rl2_box_i) <> 0 THEN
3338:
3339: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_i),l_format_mask)))
3340: INTO l_formatted_box
3341: FROM dual;
3342:
3343: tab_employee(lI_DroitDeduction ) := '
3344: l_formatted_box || '
3345: if p_rep_type = 'RL2PAPERPDF' or p_rep_type='PAYCARL2AMPDF' or p_rep_type='PAYCARL2CLPDF'
3381: to_number(l_rl2_box_j) <> 0 THEN
3382:
3383: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_j),l_format_mask)))
3384: INTO l_formatted_box
3385: FROM dual;
3386:
3387: tab_employee(lJ_ImpotQueRetenuSource ) := '
3388: l_formatted_box || '
3389: if p_rep_type = 'RL2PAPERPDF' or p_rep_type='PAYCARL2AMPDF' or p_rep_type='PAYCARL2CLPDF'
3425: to_number(l_rl2_box_k) <> 0 THEN
3426:
3427: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_k),l_format_mask)))
3428: INTO l_formatted_box
3429: FROM dual;
3430:
3431: tab_employee(lK_RevenuApresDeces ) := '
3432: l_formatted_box || '
3433: if p_rep_type = 'RL2PAPERPDF' or p_rep_type='PAYCARL2AMPDF' or p_rep_type='PAYCARL2CLPDF'
3469: to_number(l_rl2_box_l) <> 0 THEN
3470:
3471: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_l),l_format_mask)))
3472: INTO l_formatted_box
3473: FROM dual;
3474:
3475: tab_employee(lL_RetraitREEP ) := '
3476: l_formatted_box || '
3477: if p_rep_type = 'RL2PAPERPDF' or p_rep_type='PAYCARL2AMPDF' or p_rep_type='PAYCARL2CLPDF'
3513: to_number(l_rl2_box_m) <> 0 THEN
3514:
3515: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_m),l_format_mask)))
3516: INTO l_formatted_box
3517: FROM dual;
3518:
3519: tab_employee(lM_LibereImpot) := '
3520: l_formatted_box || '
3521: if p_rep_type = 'RL2PAPERPDF' or p_rep_type='PAYCARL2AMPDF' or p_rep_type='PAYCARL2CLPDF'
3631: to_number(l_rl2_box_o) <> 0 THEN
3632:
3633: SELECT ltrim(rtrim(to_char(to_number(l_rl2_box_o),l_format_mask)))
3634: INTO l_formatted_box
3635: FROM dual;
3636:
3637: tab_employee(lO_RetraitRAP ) := '
3638: l_formatted_box || '
3639: if p_rep_type = 'RL2PAPERPDF' or p_rep_type = 'PAYCARL2AMPDF' or p_rep_type='PAYCARL2CLPDF'
3818: if l_further_amount(l_i) is not null then
3819: if(l_further_code(l_i) <> '201' and to_number(l_further_amount(l_i)) <> 0) then
3820: SELECT ltrim(rtrim(to_char(l_further_amount(l_i),l_format_mask)))
3821: INTO l_formatted_box
3822: FROM dual;
3823: further_info_details:= further_info_details ||
3824: '
3825: '
3826: '
3858: if l_further_amount(l_i) is not null then
3859: if(l_further_code(l_i) <> '201' and to_number(l_further_amount(l_i)) <> 0) then
3860: SELECT ltrim(rtrim(to_char(l_further_amount(l_i),l_format_mask)))
3861: INTO l_formatted_box
3862: FROM dual;
3863:
3864: select decode(l_further_code(l_i),'235','F_2','210','F_3',replace(l_further_code(l_i),'-','_')) -- bug 14701748
3865: into l_formatted_code
3866: from dual;
3862: FROM dual;
3863:
3864: select decode(l_further_code(l_i),'235','F_2','210','F_3',replace(l_further_code(l_i),'-','_')) -- bug 14701748
3865: into l_formatted_code
3866: from dual;
3867: if l_formatted_box < 0 then
3868: l_negative_box := 'Y';
3869: end if;
3870: l_other_details:=l_other_details||'<'||l_formatted_code||'>'
3959: if ( counter <= 4 ) then
3960: if(l_further_code(l_i) <> '201' and to_number(l_further_amount(l_i)) <> 0) then
3961: SELECT ltrim(rtrim(to_char(l_further_amount(l_i),l_format_mask)))
3962: INTO l_formatted_box
3963: FROM dual;
3964:
3965: further_info_details:= further_info_details || '
3966: '
3967: '
4040: if l_further_amount(l_i) is not null then
4041: if(l_further_code(l_i) <> '201' and to_number(l_further_amount(l_i)) <> 0) then
4042: SELECT ltrim(rtrim(to_char(l_further_amount(l_i),l_format_mask)))
4043: INTO l_formatted_box
4044: FROM dual;
4045:
4046: further_info_details:= further_info_details || '
4047: '
4048: '
4754:
4755: SELECT
4756: fnd_global.local_chr(13) || fnd_global.local_chr(10)
4757: INTO EOL
4758: FROM dual;
4759:
4760: lAnnee := 1;
4761: lNbReleves := 2;
4762: lNold := 3;
5072: utl_raw.cast_to_varchar2(hextoraw('C386')),'AE'
5073: ),
5074: utl_raw.cast_to_varchar2(hextoraw('C3A9')),'e'
5075: )
5076: from dual;
5077:
5078: BEGIN
5079: l_data := trim(p_data);
5080: l_data := REPLACE(l_data, '&' , '&' || 'amp;');