DBA Data[Home] [Help]

APPS.PAY_DK_TCR dependencies on FND_FILE

Line 124: -- fnd_file.put_line(fnd_file.log,'1');

120: BEGIN
121:
122: /* Pick up the data related to Record 1000*/
123:
124: -- fnd_file.put_line(fnd_file.log,'1');
125: gtagdata(l_counter).TagName := 'REC_1000';
126: gtagdata(l_counter).TagValue := 'REC_1000';
127: l_counter := l_counter + 1;
128:

Line 168: fnd_file.put_line(fnd_file.log,HR_DK_UTILITY.GET_MESSAGE('PAY','HR_377103_DK_EINCOME_STATUS'));

164: CLOSE service_provider_details;
165:
166: /* If the service provider has Data Supplier set to 'N', output the message and stop processing */
167: if(sp.org_information3<>'Y') then
168: fnd_file.put_line(fnd_file.log,HR_DK_UTILITY.GET_MESSAGE('PAY','HR_377103_DK_EINCOME_STATUS'));
169: RAISE NO_E_INCOME_DATA_SUPPLIER;
170: end if;
171:
172: l_sender_type:='02';

Line 245: -- fnd_file.put_line(fnd_file.log,'2');

241: gtagdata(l_counter).TagName := 'RT1000_17';
242: gtagdata(l_counter).TagValue := 'E';
243: l_counter := l_counter + 1;
244:
245: -- fnd_file.put_line(fnd_file.log,'2');
246:
247: -- Record 2001
248: gtagdata(l_counter).TagName := 'REC_2001';
249: gtagdata(l_counter).TagValue := 'REC_2001';

Line 283: -- fnd_file.put_line(fnd_file.log,'3');

279: gtagdata(l_counter).TagName := 'RT2001_06';
280: gtagdata(l_counter).TagValue := 'DKK'; -- constant
281: l_counter := l_counter + 1;
282:
283: -- fnd_file.put_line(fnd_file.log,'3');
284: l_le_id:= p_legal_employer;
285:
286: -- fnd_file.put_line(fnd_file.log,'4');
287: l_bg_id:= to_number(p_business_group_id);

Line 286: -- fnd_file.put_line(fnd_file.log,'4');

282:
283: -- fnd_file.put_line(fnd_file.log,'3');
284: l_le_id:= p_legal_employer;
285:
286: -- fnd_file.put_line(fnd_file.log,'4');
287: l_bg_id:= to_number(p_business_group_id);
288:
289: -- fnd_file.put_line(fnd_file.log,'5');
290:

Line 289: -- fnd_file.put_line(fnd_file.log,'5');

285:
286: -- fnd_file.put_line(fnd_file.log,'4');
287: l_bg_id:= to_number(p_business_group_id);
288:
289: -- fnd_file.put_line(fnd_file.log,'5');
290:
291: -- fnd_file.put_line(fnd_file.log,'l_le_id : '||l_le_id);
292: -- fnd_file.put_line(fnd_file.log,'l_bg_id : '|| to_char(l_bg_id));
293:

Line 291: -- fnd_file.put_line(fnd_file.log,'l_le_id : '||l_le_id);

287: l_bg_id:= to_number(p_business_group_id);
288:
289: -- fnd_file.put_line(fnd_file.log,'5');
290:
291: -- fnd_file.put_line(fnd_file.log,'l_le_id : '||l_le_id);
292: -- fnd_file.put_line(fnd_file.log,'l_bg_id : '|| to_char(l_bg_id));
293:
294: -- fnd_file.put_line(fnd_file.log,'p_start_date : '||p_start_date);
295: -- Record 2101

Line 292: -- fnd_file.put_line(fnd_file.log,'l_bg_id : '|| to_char(l_bg_id));

288:
289: -- fnd_file.put_line(fnd_file.log,'5');
290:
291: -- fnd_file.put_line(fnd_file.log,'l_le_id : '||l_le_id);
292: -- fnd_file.put_line(fnd_file.log,'l_bg_id : '|| to_char(l_bg_id));
293:
294: -- fnd_file.put_line(fnd_file.log,'p_start_date : '||p_start_date);
295: -- Record 2101
296: FOR rg_csr_get_person_id IN csr_get_person_id(l_le_id,l_bg_id)

Line 294: -- fnd_file.put_line(fnd_file.log,'p_start_date : '||p_start_date);

290:
291: -- fnd_file.put_line(fnd_file.log,'l_le_id : '||l_le_id);
292: -- fnd_file.put_line(fnd_file.log,'l_bg_id : '|| to_char(l_bg_id));
293:
294: -- fnd_file.put_line(fnd_file.log,'p_start_date : '||p_start_date);
295: -- Record 2101
296: FOR rg_csr_get_person_id IN csr_get_person_id(l_le_id,l_bg_id)
297: LOOP
298:

Line 299: -- fnd_file.put_line(fnd_file.log,'6');

295: -- Record 2101
296: FOR rg_csr_get_person_id IN csr_get_person_id(l_le_id,l_bg_id)
297: LOOP
298:
299: -- fnd_file.put_line(fnd_file.log,'6');
300:
301: /* Get the tax requisition status */
302: OPEN csr_get_tax_card_details(rg_csr_get_person_id.assignment_id, 'Tax Card Requisition Status', rg_csr_get_person_id.effective_start_date);
303: FETCH csr_get_tax_card_details INTO rg_csr_get_tax_card_details;

Line 306: -- fnd_file.put_line(fnd_file.log,'7');

302: OPEN csr_get_tax_card_details(rg_csr_get_person_id.assignment_id, 'Tax Card Requisition Status', rg_csr_get_person_id.effective_start_date);
303: FETCH csr_get_tax_card_details INTO rg_csr_get_tax_card_details;
304: CLOSE csr_get_tax_card_details;
305:
306: -- fnd_file.put_line(fnd_file.log,'7');
307:
308: l_input_value_id:=rg_csr_get_tax_card_details.input_value_id;
309: l_req_status:=rg_csr_get_tax_card_details.screen_entry_value;
310: if(l_req_status IN ('REQUIRED','RE-COMMISSION')) then

Line 312: -- fnd_file.put_line(fnd_file.log,'8');

308: l_input_value_id:=rg_csr_get_tax_card_details.input_value_id;
309: l_req_status:=rg_csr_get_tax_card_details.screen_entry_value;
310: if(l_req_status IN ('REQUIRED','RE-COMMISSION')) then
311: l_flag:=1;
312: -- fnd_file.put_line(fnd_file.log,'8');
313: gtagdata(l_counter).TagName := 'REC_2101';
314: gtagdata(l_counter).TagValue := 'REC_2101';
315: l_counter := l_counter + 1;
316:

Line 429: -- fnd_file.put_line(fnd_file.log,'9');

425: FETCH csr_get_territory INTO rg_csr_get_territory;
426: CLOSE csr_get_territory;
427:
428: if(rg_csr_get_territory.country NOT IN ('DK')) then
429: -- fnd_file.put_line(fnd_file.log,'9');
430: gtagdata(l_counter).TagName := 'REC_8001';
431: gtagdata(l_counter).TagValue := 'REC_8001';
432: l_counter := l_counter + 1;
433:

Line 541: fnd_file.put_line(fnd_file.LOG,HR_DK_UTILITY.GET_MESSAGE('PAY','PAY_377104_DK_TCR'));

537: gtagdata(l_counter).TagValue := 'REC_9999_END';
538: l_counter := l_counter + 1;
539:
540: if(l_flag=0) then -- output the message when there are no 2101 records reported
541: fnd_file.put_line(fnd_file.LOG,HR_DK_UTILITY.GET_MESSAGE('PAY','PAY_377104_DK_TCR'));
542: end if;
543:
544:
545: hr_utility.set_location('After populating pl/sql table',30);

Line 584: --fnd_file.put_line(fnd_file.log,'wc1');

580: l_str5 := '>';
581: l_str6 := '';
582: l_str7 := ' ';
583:
584: --fnd_file.put_line(fnd_file.log,'wc1');
585:
586: dbms_lob.createtemporary(l_xfdf_string,FALSE,DBMS_LOB.CALL);
587: dbms_lob.open(l_xfdf_string,dbms_lob.lob_readwrite);
588:

Line 591: --fnd_file.put_line(fnd_file.log,'wc2');

587: dbms_lob.open(l_xfdf_string,dbms_lob.lob_readwrite);
588:
589: current_index := 0;
590:
591: --fnd_file.put_line(fnd_file.log,'wc2');
592:
593: IF gtagdata.count > 0 THEN
594:
595: dbms_lob.writeAppend( l_xfdf_string, length(l_str1), l_str1 );

Line 605: --fnd_file.put_line(fnd_file.log,'wc4');

601:
602: IF l_str9 IN ('REC_1000','REC_1000_END','REC_2001','REC_2001_END','REC_2101','REC_2101_END',
603: 'REC_8001','REC_8001_END','REC_9999','REC_9999_END') THEN
604:
605: --fnd_file.put_line(fnd_file.log,'wc4');
606: IF l_str9 IN ('REC_1000','REC_2001','REC_2101','REC_8001','REC_9999') THEN
607: dbms_lob.writeAppend(l_xfdf_string, length(l_str2), l_str2);
608: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
609: dbms_lob.writeAppend(l_xfdf_string, length(l_str3), l_str3);

Line 652: --fnd_file.put_line(fnd_file.log,'wc5');

648: dbms_lob.writeAppend(l_xfdf_string, length(l_str7), l_str7 );
649: END IF;
650:
651:
652: --fnd_file.put_line(fnd_file.log,'wc5');
653: p_xfdf_clob := l_xfdf_string;
654:
655: hr_utility.set_location('Leaving WritetoCLOB ',40);
656: