DBA Data[Home] [Help]

APPS.IGI_CIS2007_CDROM_PKG dependencies on FND_FILE

Line 290: fnd_file.put_line(fnd_file.log, l_message);

286: End If;
287: Exception
288: When E_Request1_Submit_Error Then
289: fnd_message.retrieve(l_message);
290: fnd_file.put_line(fnd_file.log, l_message);
291: Raise;
292: When E_Request2_Submit_Error Then
293: fnd_message.retrieve(l_message);
294: fnd_file.put_line(fnd_file.log, l_message);

Line 294: fnd_file.put_line(fnd_file.log, l_message);

290: fnd_file.put_line(fnd_file.log, l_message);
291: Raise;
292: When E_Request2_Submit_Error Then
293: fnd_message.retrieve(l_message);
294: fnd_file.put_line(fnd_file.log, l_message);
295: Raise;
296: When E_Request1_Wait_Error Then
297: fnd_message.retrieve(l_message);
298: fnd_file.put_line(fnd_file.log, l_message);

Line 298: fnd_file.put_line(fnd_file.log, l_message);

294: fnd_file.put_line(fnd_file.log, l_message);
295: Raise;
296: When E_Request1_Wait_Error Then
297: fnd_message.retrieve(l_message);
298: fnd_file.put_line(fnd_file.log, l_message);
299: Raise;
300: When E_Request2_Wait_Error Then
301: fnd_message.retrieve(l_message);
302: fnd_file.put_line(fnd_file.log, l_message);

Line 302: fnd_file.put_line(fnd_file.log, l_message);

298: fnd_file.put_line(fnd_file.log, l_message);
299: Raise;
300: When E_Request2_Wait_Error Then
301: fnd_message.retrieve(l_message);
302: fnd_file.put_line(fnd_file.log, l_message);
303: Raise;
304: When E_Loader1_Failure Then
305: fnd_message.set_name('IGI', 'IGIPCDUP_NOT_NORM_COMPLETE');
306: fnd_message.set_token('FILE_NAME', l_data_file_name);

Line 308: fnd_file.put_line(fnd_file.log, l_message);

304: When E_Loader1_Failure Then
305: fnd_message.set_name('IGI', 'IGIPCDUP_NOT_NORM_COMPLETE');
306: fnd_message.set_token('FILE_NAME', l_data_file_name);
307: l_message := fnd_message.get;
308: fnd_file.put_line(fnd_file.log, l_message);
309: Raise;
310: When E_Loader2_Failure Then
311: fnd_message.set_name('IGI', 'IGIPSDUP_NOT_NORM_COMPLETE');
312: fnd_message.set_token('FILE_NAME', l_data_file_name);

Line 314: fnd_file.put_line(fnd_file.log, l_message);

310: When E_Loader2_Failure Then
311: fnd_message.set_name('IGI', 'IGIPSDUP_NOT_NORM_COMPLETE');
312: fnd_message.set_token('FILE_NAME', l_data_file_name);
313: l_message := fnd_message.get;
314: fnd_file.put_line(fnd_file.log, l_message);
315: Raise;
316: When Others Then
317: fnd_message.retrieve(l_message);
318: fnd_file.put_line(fnd_file.log, l_message);

Line 318: fnd_file.put_line(fnd_file.log, l_message);

314: fnd_file.put_line(fnd_file.log, l_message);
315: Raise;
316: When Others Then
317: fnd_message.retrieve(l_message);
318: fnd_file.put_line(fnd_file.log, l_message);
319: Raise;
320: END Spawn_Loader;
321:
322: Procedure Match_And_Update(P_Upl_Option IN Varchar2) IS

Line 436: fnd_file.put_line(fnd_file.log, l_message);

432: End LooP;
433: Exception
434: When Others Then
435: fnd_message.retrieve(l_message);
436: fnd_file.put_line(fnd_file.log, l_message);
437: Raise;
438: End Match_And_Update;
439:
440: Procedure Generate_Report(p_upl_option IN Varchar2) Is

Line 506: fnd_file.put_line(fnd_file.output, '');

502: And inv.vendor_site_id(+) = atr.vendor_site_id
503: Order by pvs.vendor_site_code, atr.tax_name;
504: l_rec_count Number;
505: Begin
506: fnd_file.put_line(fnd_file.output, '');
507: If (p_upl_option = 'U') Then
508: fnd_file.put_line(fnd_file.output,'CD-ROM Data : Matched and Updated');
509: fnd_file.put_line(fnd_file.output,'---------------------------------');
510: Else

Line 508: fnd_file.put_line(fnd_file.output,'CD-ROM Data : Matched and Updated');

504: l_rec_count Number;
505: Begin
506: fnd_file.put_line(fnd_file.output, '');
507: If (p_upl_option = 'U') Then
508: fnd_file.put_line(fnd_file.output,'CD-ROM Data : Matched and Updated');
509: fnd_file.put_line(fnd_file.output,'---------------------------------');
510: Else
511: fnd_file.put_line(fnd_file.output, 'CD-ROM Data : Matched');
512: fnd_file.put_line(fnd_file.output, '---------------------');

Line 509: fnd_file.put_line(fnd_file.output,'---------------------------------');

505: Begin
506: fnd_file.put_line(fnd_file.output, '');
507: If (p_upl_option = 'U') Then
508: fnd_file.put_line(fnd_file.output,'CD-ROM Data : Matched and Updated');
509: fnd_file.put_line(fnd_file.output,'---------------------------------');
510: Else
511: fnd_file.put_line(fnd_file.output, 'CD-ROM Data : Matched');
512: fnd_file.put_line(fnd_file.output, '---------------------');
513: End If;

Line 511: fnd_file.put_line(fnd_file.output, 'CD-ROM Data : Matched');

507: If (p_upl_option = 'U') Then
508: fnd_file.put_line(fnd_file.output,'CD-ROM Data : Matched and Updated');
509: fnd_file.put_line(fnd_file.output,'---------------------------------');
510: Else
511: fnd_file.put_line(fnd_file.output, 'CD-ROM Data : Matched');
512: fnd_file.put_line(fnd_file.output, '---------------------');
513: End If;
514:
515: For C_Cdrom_Matched_Vendors_Rec IN C_Cdrom_Matched_Vendors Loop

Line 512: fnd_file.put_line(fnd_file.output, '---------------------');

508: fnd_file.put_line(fnd_file.output,'CD-ROM Data : Matched and Updated');
509: fnd_file.put_line(fnd_file.output,'---------------------------------');
510: Else
511: fnd_file.put_line(fnd_file.output, 'CD-ROM Data : Matched');
512: fnd_file.put_line(fnd_file.output, '---------------------');
513: End If;
514:
515: For C_Cdrom_Matched_Vendors_Rec IN C_Cdrom_Matched_Vendors Loop
516: fnd_file.put_line(fnd_file.output,'');

Line 516: fnd_file.put_line(fnd_file.output,'');

512: fnd_file.put_line(fnd_file.output, '---------------------');
513: End If;
514:
515: For C_Cdrom_Matched_Vendors_Rec IN C_Cdrom_Matched_Vendors Loop
516: fnd_file.put_line(fnd_file.output,'');
517: fnd_file.put_line(fnd_file.output,
518: 'Subcontractor UTR Subcontractor Name NINO or CRN Tax month last paid Tax treatment');
519: fnd_file.put_line(fnd_file.output,
520: '----------------- ---------------------------- ----------- ------------------- -------------');

Line 517: fnd_file.put_line(fnd_file.output,

513: End If;
514:
515: For C_Cdrom_Matched_Vendors_Rec IN C_Cdrom_Matched_Vendors Loop
516: fnd_file.put_line(fnd_file.output,'');
517: fnd_file.put_line(fnd_file.output,
518: 'Subcontractor UTR Subcontractor Name NINO or CRN Tax month last paid Tax treatment');
519: fnd_file.put_line(fnd_file.output,
520: '----------------- ---------------------------- ----------- ------------------- -------------');
521: fnd_file.put_line(fnd_file.output,

Line 519: fnd_file.put_line(fnd_file.output,

515: For C_Cdrom_Matched_Vendors_Rec IN C_Cdrom_Matched_Vendors Loop
516: fnd_file.put_line(fnd_file.output,'');
517: fnd_file.put_line(fnd_file.output,
518: 'Subcontractor UTR Subcontractor Name NINO or CRN Tax month last paid Tax treatment');
519: fnd_file.put_line(fnd_file.output,
520: '----------------- ---------------------------- ----------- ------------------- -------------');
521: fnd_file.put_line(fnd_file.output,
522: rpad(nvl(to_char(C_Cdrom_Matched_Vendors_Rec.subcontractor_utr),' '),17) || ' ' ||
523: rpad(nvl(C_Cdrom_Matched_Vendors_Rec.subcontractor_name,' '),28) || ' ' ||

Line 521: fnd_file.put_line(fnd_file.output,

517: fnd_file.put_line(fnd_file.output,
518: 'Subcontractor UTR Subcontractor Name NINO or CRN Tax month last paid Tax treatment');
519: fnd_file.put_line(fnd_file.output,
520: '----------------- ---------------------------- ----------- ------------------- -------------');
521: fnd_file.put_line(fnd_file.output,
522: rpad(nvl(to_char(C_Cdrom_Matched_Vendors_Rec.subcontractor_utr),' '),17) || ' ' ||
523: rpad(nvl(C_Cdrom_Matched_Vendors_Rec.subcontractor_name,' '),28) || ' ' ||
524: rpad(nvl(C_Cdrom_Matched_Vendors_Rec.subcontractor_ref_id,' '),11) || ' ' ||
525: rpad(nvl(to_char(C_Cdrom_Matched_Vendors_Rec.tax_month_last_paid),' '),19) || ' ' ||

Line 531: fnd_file.put_line(fnd_file.output,'');

527: l_rec_count := 0;
528: For C_Site_Invoice_Count_Rec in C_Site_Invoice_Count(
529: C_Cdrom_Matched_Vendors_Rec.subcontractor_utr) Loop
530: If l_rec_count = 0 Then
531: fnd_file.put_line(fnd_file.output,'');
532: fnd_file.put_line(fnd_file.output,
533: 'Current Withholding Tax Certificate Details for ' ||
534: C_Cdrom_Matched_Vendors_Rec.subcontractor_name);
535: fnd_file.put_line(fnd_file.output,

Line 532: fnd_file.put_line(fnd_file.output,

528: For C_Site_Invoice_Count_Rec in C_Site_Invoice_Count(
529: C_Cdrom_Matched_Vendors_Rec.subcontractor_utr) Loop
530: If l_rec_count = 0 Then
531: fnd_file.put_line(fnd_file.output,'');
532: fnd_file.put_line(fnd_file.output,
533: 'Current Withholding Tax Certificate Details for ' ||
534: C_Cdrom_Matched_Vendors_Rec.subcontractor_name);
535: fnd_file.put_line(fnd_file.output,
536: '-----------------------------------------------');

Line 535: fnd_file.put_line(fnd_file.output,

531: fnd_file.put_line(fnd_file.output,'');
532: fnd_file.put_line(fnd_file.output,
533: 'Current Withholding Tax Certificate Details for ' ||
534: C_Cdrom_Matched_Vendors_Rec.subcontractor_name);
535: fnd_file.put_line(fnd_file.output,
536: '-----------------------------------------------');
537: fnd_file.put_line(fnd_file.output,
538: 'Site Tax Code Tax Rate Number of Open Invoices For the Site');
539: fnd_file.put_line(fnd_file.output,

Line 537: fnd_file.put_line(fnd_file.output,

533: 'Current Withholding Tax Certificate Details for ' ||
534: C_Cdrom_Matched_Vendors_Rec.subcontractor_name);
535: fnd_file.put_line(fnd_file.output,
536: '-----------------------------------------------');
537: fnd_file.put_line(fnd_file.output,
538: 'Site Tax Code Tax Rate Number of Open Invoices For the Site');
539: fnd_file.put_line(fnd_file.output,
540: '--------------- --------------- --------------- ------------------------------------');
541: End If;

Line 539: fnd_file.put_line(fnd_file.output,

535: fnd_file.put_line(fnd_file.output,
536: '-----------------------------------------------');
537: fnd_file.put_line(fnd_file.output,
538: 'Site Tax Code Tax Rate Number of Open Invoices For the Site');
539: fnd_file.put_line(fnd_file.output,
540: '--------------- --------------- --------------- ------------------------------------');
541: End If;
542: fnd_file.put_line(fnd_file.output,
543: rpad(nvl(C_Site_Invoice_Count_Rec.site_code,' '),15) || ' ' ||

Line 542: fnd_file.put_line(fnd_file.output,

538: 'Site Tax Code Tax Rate Number of Open Invoices For the Site');
539: fnd_file.put_line(fnd_file.output,
540: '--------------- --------------- --------------- ------------------------------------');
541: End If;
542: fnd_file.put_line(fnd_file.output,
543: rpad(nvl(C_Site_Invoice_Count_Rec.site_code,' '),15) || ' ' ||
544: rpad(nvl(C_Site_Invoice_Count_Rec.tax_name,' '),15) || ' ' ||
545: rpad(nvl(to_char(C_Site_Invoice_Count_Rec.tax_rate),' '),15) || ' ' ||
546: rpad(nvl(to_char(C_Site_Invoice_Count_Rec.inv_count),' '),15));

Line 551: fnd_file.put_line(fnd_file.output, '');

547: l_rec_count := l_rec_count + 1;
548: End Loop;
549: End Loop;
550:
551: fnd_file.put_line(fnd_file.output, '');
552: fnd_file.put_line(fnd_file.output,'');
553:
554: If (p_upl_option = 'U') Then
555: fnd_file.put_line(fnd_file.output,'CD-ROM Data : Unmatched and Not Updated');

Line 552: fnd_file.put_line(fnd_file.output,'');

548: End Loop;
549: End Loop;
550:
551: fnd_file.put_line(fnd_file.output, '');
552: fnd_file.put_line(fnd_file.output,'');
553:
554: If (p_upl_option = 'U') Then
555: fnd_file.put_line(fnd_file.output,'CD-ROM Data : Unmatched and Not Updated');
556: fnd_file.put_line(fnd_file.output,'---------------------------------------');

Line 555: fnd_file.put_line(fnd_file.output,'CD-ROM Data : Unmatched and Not Updated');

551: fnd_file.put_line(fnd_file.output, '');
552: fnd_file.put_line(fnd_file.output,'');
553:
554: If (p_upl_option = 'U') Then
555: fnd_file.put_line(fnd_file.output,'CD-ROM Data : Unmatched and Not Updated');
556: fnd_file.put_line(fnd_file.output,'---------------------------------------');
557: Else
558: fnd_file.put_line(fnd_file.output, 'CD-ROM Data : Unmatched');
559: fnd_file.put_line(fnd_file.output, '-----------------------');

Line 556: fnd_file.put_line(fnd_file.output,'---------------------------------------');

552: fnd_file.put_line(fnd_file.output,'');
553:
554: If (p_upl_option = 'U') Then
555: fnd_file.put_line(fnd_file.output,'CD-ROM Data : Unmatched and Not Updated');
556: fnd_file.put_line(fnd_file.output,'---------------------------------------');
557: Else
558: fnd_file.put_line(fnd_file.output, 'CD-ROM Data : Unmatched');
559: fnd_file.put_line(fnd_file.output, '-----------------------');
560: End If;

Line 558: fnd_file.put_line(fnd_file.output, 'CD-ROM Data : Unmatched');

554: If (p_upl_option = 'U') Then
555: fnd_file.put_line(fnd_file.output,'CD-ROM Data : Unmatched and Not Updated');
556: fnd_file.put_line(fnd_file.output,'---------------------------------------');
557: Else
558: fnd_file.put_line(fnd_file.output, 'CD-ROM Data : Unmatched');
559: fnd_file.put_line(fnd_file.output, '-----------------------');
560: End If;
561:
562: fnd_file.put_line(fnd_file.output,'');

Line 559: fnd_file.put_line(fnd_file.output, '-----------------------');

555: fnd_file.put_line(fnd_file.output,'CD-ROM Data : Unmatched and Not Updated');
556: fnd_file.put_line(fnd_file.output,'---------------------------------------');
557: Else
558: fnd_file.put_line(fnd_file.output, 'CD-ROM Data : Unmatched');
559: fnd_file.put_line(fnd_file.output, '-----------------------');
560: End If;
561:
562: fnd_file.put_line(fnd_file.output,'');
563: fnd_file.put_line(fnd_file.output,

Line 562: fnd_file.put_line(fnd_file.output,'');

558: fnd_file.put_line(fnd_file.output, 'CD-ROM Data : Unmatched');
559: fnd_file.put_line(fnd_file.output, '-----------------------');
560: End If;
561:
562: fnd_file.put_line(fnd_file.output,'');
563: fnd_file.put_line(fnd_file.output,
564: 'Subcontractor UTR Subcontractor Name NINO or CRN Tax month last paid Tax treatment');
565: fnd_file.put_line(fnd_file.output,
566: '----------------- ---------------------------- ----------- ------------------- -------------');

Line 563: fnd_file.put_line(fnd_file.output,

559: fnd_file.put_line(fnd_file.output, '-----------------------');
560: End If;
561:
562: fnd_file.put_line(fnd_file.output,'');
563: fnd_file.put_line(fnd_file.output,
564: 'Subcontractor UTR Subcontractor Name NINO or CRN Tax month last paid Tax treatment');
565: fnd_file.put_line(fnd_file.output,
566: '----------------- ---------------------------- ----------- ------------------- -------------');
567:

Line 565: fnd_file.put_line(fnd_file.output,

561:
562: fnd_file.put_line(fnd_file.output,'');
563: fnd_file.put_line(fnd_file.output,
564: 'Subcontractor UTR Subcontractor Name NINO or CRN Tax month last paid Tax treatment');
565: fnd_file.put_line(fnd_file.output,
566: '----------------- ---------------------------- ----------- ------------------- -------------');
567:
568: For C_Cdrom_Unmatched_Vendors_Rec IN C_Cdrom_Unmatched_Vendors Loop
569: fnd_file.put_line(fnd_file.output,

Line 569: fnd_file.put_line(fnd_file.output,

565: fnd_file.put_line(fnd_file.output,
566: '----------------- ---------------------------- ----------- ------------------- -------------');
567:
568: For C_Cdrom_Unmatched_Vendors_Rec IN C_Cdrom_Unmatched_Vendors Loop
569: fnd_file.put_line(fnd_file.output,
570: rpad(nvl(to_char(C_Cdrom_Unmatched_Vendors_Rec.subcontractor_utr),' '),17) || ' ' ||
571: rpad(nvl(C_Cdrom_Unmatched_Vendors_Rec.subcontractor_name,' '),28) || ' ' ||
572: rpad(nvl(C_Cdrom_Unmatched_Vendors_Rec.subcontractor_ref_id,' '),11) || ' ' ||
573: rpad(nvl(to_char(C_Cdrom_Unmatched_Vendors_Rec.tax_month_last_paid),' '),19) || ' ' ||

Line 577: fnd_file.put_line(fnd_file.output,'');

573: rpad(nvl(to_char(C_Cdrom_Unmatched_Vendors_Rec.tax_month_last_paid),' '),19) || ' ' ||
574: C_Cdrom_Unmatched_Vendors_Rec.tax_treatment);
575: End Loop;
576:
577: fnd_file.put_line(fnd_file.output,'');
578: fnd_file.put_line(fnd_file.output,'');
579: fnd_file.put_line(fnd_file.output,
580: 'CIS Enabled Subcontractors not found in the CD-ROM data received from HMRC.');
581: fnd_file.put_line(fnd_file.output,

Line 578: fnd_file.put_line(fnd_file.output,'');

574: C_Cdrom_Unmatched_Vendors_Rec.tax_treatment);
575: End Loop;
576:
577: fnd_file.put_line(fnd_file.output,'');
578: fnd_file.put_line(fnd_file.output,'');
579: fnd_file.put_line(fnd_file.output,
580: 'CIS Enabled Subcontractors not found in the CD-ROM data received from HMRC.');
581: fnd_file.put_line(fnd_file.output,
582: '---------------------------------------------------------------------------');

Line 579: fnd_file.put_line(fnd_file.output,

575: End Loop;
576:
577: fnd_file.put_line(fnd_file.output,'');
578: fnd_file.put_line(fnd_file.output,'');
579: fnd_file.put_line(fnd_file.output,
580: 'CIS Enabled Subcontractors not found in the CD-ROM data received from HMRC.');
581: fnd_file.put_line(fnd_file.output,
582: '---------------------------------------------------------------------------');
583: fnd_file.put_line(fnd_file.output,'');

Line 581: fnd_file.put_line(fnd_file.output,

577: fnd_file.put_line(fnd_file.output,'');
578: fnd_file.put_line(fnd_file.output,'');
579: fnd_file.put_line(fnd_file.output,
580: 'CIS Enabled Subcontractors not found in the CD-ROM data received from HMRC.');
581: fnd_file.put_line(fnd_file.output,
582: '---------------------------------------------------------------------------');
583: fnd_file.put_line(fnd_file.output,'');
584: fnd_file.put_line(fnd_file.output,
585: 'Vendor Name Subcontractor UTR Partnership UTR NINO CRN ');

Line 583: fnd_file.put_line(fnd_file.output,'');

579: fnd_file.put_line(fnd_file.output,
580: 'CIS Enabled Subcontractors not found in the CD-ROM data received from HMRC.');
581: fnd_file.put_line(fnd_file.output,
582: '---------------------------------------------------------------------------');
583: fnd_file.put_line(fnd_file.output,'');
584: fnd_file.put_line(fnd_file.output,
585: 'Vendor Name Subcontractor UTR Partnership UTR NINO CRN ');
586: fnd_file.put_line(fnd_file.output,
587: '----------------------------- ----------------- --------------- ---------- --------- ');

Line 584: fnd_file.put_line(fnd_file.output,

580: 'CIS Enabled Subcontractors not found in the CD-ROM data received from HMRC.');
581: fnd_file.put_line(fnd_file.output,
582: '---------------------------------------------------------------------------');
583: fnd_file.put_line(fnd_file.output,'');
584: fnd_file.put_line(fnd_file.output,
585: 'Vendor Name Subcontractor UTR Partnership UTR NINO CRN ');
586: fnd_file.put_line(fnd_file.output,
587: '----------------------------- ----------------- --------------- ---------- --------- ');
588:

Line 586: fnd_file.put_line(fnd_file.output,

582: '---------------------------------------------------------------------------');
583: fnd_file.put_line(fnd_file.output,'');
584: fnd_file.put_line(fnd_file.output,
585: 'Vendor Name Subcontractor UTR Partnership UTR NINO CRN ');
586: fnd_file.put_line(fnd_file.output,
587: '----------------------------- ----------------- --------------- ---------- --------- ');
588:
589: For C_Vendor_Not_Found_Rec IN C_Vendor_Not_Found Loop
590: fnd_file.put_line(fnd_file.output,

Line 590: fnd_file.put_line(fnd_file.output,

586: fnd_file.put_line(fnd_file.output,
587: '----------------------------- ----------------- --------------- ---------- --------- ');
588:
589: For C_Vendor_Not_Found_Rec IN C_Vendor_Not_Found Loop
590: fnd_file.put_line(fnd_file.output,
591: rpad(nvl(C_Vendor_Not_Found_Rec.vendor_name,' '),29) || ' ' ||
592: rpad(nvl(to_char(C_Vendor_Not_Found_Rec.unique_tax_reference_num),' '),17) || ' ' ||
593: rpad(nvl(to_char(C_Vendor_Not_Found_Rec.partnership_utr),' '),15) || ' ' ||
594: rpad(nvl(C_Vendor_Not_Found_Rec.national_insurance_number,' '),10) || ' ' ||

Line 600: fnd_file.put_line(fnd_file.log, l_message);

596: End Loop;
597: Exception
598: When Others Then
599: fnd_message.retrieve(l_message);
600: fnd_file.put_line(fnd_file.log, l_message);
601: Raise;
602: End Generate_Report;
603:
604: Procedure Cis_Duplicate_Data Is

Line 631: fnd_file.put_line(fnd_file.output, '');

627: l_dup_rec := 'Y';
628: End Loop;
629:
630: If l_dup_rec = 'Y' Then
631: fnd_file.put_line(fnd_file.output, '');
632: fnd_file.put_line(fnd_file.output,
633: 'The CD-ROM Data Upload Process found duplicate values in the system.');
634: fnd_file.put_line(fnd_file.output,
635: 'These duplicate values could lead to potential data corruption.');

Line 632: fnd_file.put_line(fnd_file.output,

628: End Loop;
629:
630: If l_dup_rec = 'Y' Then
631: fnd_file.put_line(fnd_file.output, '');
632: fnd_file.put_line(fnd_file.output,
633: 'The CD-ROM Data Upload Process found duplicate values in the system.');
634: fnd_file.put_line(fnd_file.output,
635: 'These duplicate values could lead to potential data corruption.');
636: fnd_file.put_line(fnd_file.output,

Line 634: fnd_file.put_line(fnd_file.output,

630: If l_dup_rec = 'Y' Then
631: fnd_file.put_line(fnd_file.output, '');
632: fnd_file.put_line(fnd_file.output,
633: 'The CD-ROM Data Upload Process found duplicate values in the system.');
634: fnd_file.put_line(fnd_file.output,
635: 'These duplicate values could lead to potential data corruption.');
636: fnd_file.put_line(fnd_file.output,
637: 'CD-ROM records matching to duplicate records in the system would not be uploaded');
638: fnd_file.put_line(fnd_file.output,

Line 636: fnd_file.put_line(fnd_file.output,

632: fnd_file.put_line(fnd_file.output,
633: 'The CD-ROM Data Upload Process found duplicate values in the system.');
634: fnd_file.put_line(fnd_file.output,
635: 'These duplicate values could lead to potential data corruption.');
636: fnd_file.put_line(fnd_file.output,
637: 'CD-ROM records matching to duplicate records in the system would not be uploaded');
638: fnd_file.put_line(fnd_file.output,
639: 'Please rectify the duplicate data in your system and then submit the CD-ROM Upload Process again.');
640: l_count := 0;

Line 638: fnd_file.put_line(fnd_file.output,

634: fnd_file.put_line(fnd_file.output,
635: 'These duplicate values could lead to potential data corruption.');
636: fnd_file.put_line(fnd_file.output,
637: 'CD-ROM records matching to duplicate records in the system would not be uploaded');
638: fnd_file.put_line(fnd_file.output,
639: 'Please rectify the duplicate data in your system and then submit the CD-ROM Upload Process again.');
640: l_count := 0;
641: For C_Partnership_UTR_Rec in C_Partnership_UTR Loop
642: If l_count = 0 Then

Line 643: fnd_file.put_line(fnd_file.output, '');

639: 'Please rectify the duplicate data in your system and then submit the CD-ROM Upload Process again.');
640: l_count := 0;
641: For C_Partnership_UTR_Rec in C_Partnership_UTR Loop
642: If l_count = 0 Then
643: fnd_file.put_line(fnd_file.output, '');
644: fnd_file.put_line(fnd_file.output,
645: 'Duplicate Partnership Unique Taxpayer Reference found in the system');
646: fnd_file.put_line(fnd_file.output,
647: '-------------------------------------------------------------------');

Line 644: fnd_file.put_line(fnd_file.output,

640: l_count := 0;
641: For C_Partnership_UTR_Rec in C_Partnership_UTR Loop
642: If l_count = 0 Then
643: fnd_file.put_line(fnd_file.output, '');
644: fnd_file.put_line(fnd_file.output,
645: 'Duplicate Partnership Unique Taxpayer Reference found in the system');
646: fnd_file.put_line(fnd_file.output,
647: '-------------------------------------------------------------------');
648: End If;

Line 646: fnd_file.put_line(fnd_file.output,

642: If l_count = 0 Then
643: fnd_file.put_line(fnd_file.output, '');
644: fnd_file.put_line(fnd_file.output,
645: 'Duplicate Partnership Unique Taxpayer Reference found in the system');
646: fnd_file.put_line(fnd_file.output,
647: '-------------------------------------------------------------------');
648: End If;
649: fnd_file.put_line(fnd_file.output, C_Partnership_UTR_Rec.PARTNERSHIP_UTR);
650: l_count := l_count + 1;

Line 649: fnd_file.put_line(fnd_file.output, C_Partnership_UTR_Rec.PARTNERSHIP_UTR);

645: 'Duplicate Partnership Unique Taxpayer Reference found in the system');
646: fnd_file.put_line(fnd_file.output,
647: '-------------------------------------------------------------------');
648: End If;
649: fnd_file.put_line(fnd_file.output, C_Partnership_UTR_Rec.PARTNERSHIP_UTR);
650: l_count := l_count + 1;
651: End loop;
652:
653: l_count := 0;

Line 656: fnd_file.put_line(fnd_file.output, '');

652:
653: l_count := 0;
654: For C_Subcontractor_UTR_Rec in C_Subcontractor_UTR Loop
655: If l_count = 0 Then
656: fnd_file.put_line(fnd_file.output, '');
657: fnd_file.put_line(fnd_file.output,
658: 'Duplicate Subcontractor Unique Taxpayer Reference found in the system');
659: fnd_file.put_line(fnd_file.output,
660: '---------------------------------------------------------------------');

Line 657: fnd_file.put_line(fnd_file.output,

653: l_count := 0;
654: For C_Subcontractor_UTR_Rec in C_Subcontractor_UTR Loop
655: If l_count = 0 Then
656: fnd_file.put_line(fnd_file.output, '');
657: fnd_file.put_line(fnd_file.output,
658: 'Duplicate Subcontractor Unique Taxpayer Reference found in the system');
659: fnd_file.put_line(fnd_file.output,
660: '---------------------------------------------------------------------');
661: End If;

Line 659: fnd_file.put_line(fnd_file.output,

655: If l_count = 0 Then
656: fnd_file.put_line(fnd_file.output, '');
657: fnd_file.put_line(fnd_file.output,
658: 'Duplicate Subcontractor Unique Taxpayer Reference found in the system');
659: fnd_file.put_line(fnd_file.output,
660: '---------------------------------------------------------------------');
661: End If;
662: fnd_file.put_line(fnd_file.output, C_Subcontractor_UTR_Rec.UNIQUE_TAX_REFERENCE_NUM);
663: l_count := l_count + 1;

Line 662: fnd_file.put_line(fnd_file.output, C_Subcontractor_UTR_Rec.UNIQUE_TAX_REFERENCE_NUM);

658: 'Duplicate Subcontractor Unique Taxpayer Reference found in the system');
659: fnd_file.put_line(fnd_file.output,
660: '---------------------------------------------------------------------');
661: End If;
662: fnd_file.put_line(fnd_file.output, C_Subcontractor_UTR_Rec.UNIQUE_TAX_REFERENCE_NUM);
663: l_count := l_count + 1;
664: End Loop;
665: End If;
666: End Cis_Duplicate_Data;

Line 683: fnd_file.put_line(fnd_file.output, '');

679: l_dup_rec := 'Y';
680: End Loop;
681:
682: If l_dup_rec = 'Y' Then
683: fnd_file.put_line(fnd_file.output, '');
684: fnd_file.put_line(fnd_file.output,
685: 'The CD-ROM Data Upload Process found duplicate values in the CD-ROM data received from HMRC.');
686: fnd_file.put_line(fnd_file.output,
687: 'These Duplicate values could lead to potential data corruption.');

Line 684: fnd_file.put_line(fnd_file.output,

680: End Loop;
681:
682: If l_dup_rec = 'Y' Then
683: fnd_file.put_line(fnd_file.output, '');
684: fnd_file.put_line(fnd_file.output,
685: 'The CD-ROM Data Upload Process found duplicate values in the CD-ROM data received from HMRC.');
686: fnd_file.put_line(fnd_file.output,
687: 'These Duplicate values could lead to potential data corruption.');
688: fnd_file.put_line(fnd_file.output,

Line 686: fnd_file.put_line(fnd_file.output,

682: If l_dup_rec = 'Y' Then
683: fnd_file.put_line(fnd_file.output, '');
684: fnd_file.put_line(fnd_file.output,
685: 'The CD-ROM Data Upload Process found duplicate values in the CD-ROM data received from HMRC.');
686: fnd_file.put_line(fnd_file.output,
687: 'These Duplicate values could lead to potential data corruption.');
688: fnd_file.put_line(fnd_file.output,
689: 'Duplicate CD-ROM records would not be uploaded');
690: fnd_file.put_line(fnd_file.output,

Line 688: fnd_file.put_line(fnd_file.output,

684: fnd_file.put_line(fnd_file.output,
685: 'The CD-ROM Data Upload Process found duplicate values in the CD-ROM data received from HMRC.');
686: fnd_file.put_line(fnd_file.output,
687: 'These Duplicate values could lead to potential data corruption.');
688: fnd_file.put_line(fnd_file.output,
689: 'Duplicate CD-ROM records would not be uploaded');
690: fnd_file.put_line(fnd_file.output,
691: 'Please rectify the CD-ROM data and then submit the CD-ROM Upload Process again.');
692: l_count := 0;

Line 690: fnd_file.put_line(fnd_file.output,

686: fnd_file.put_line(fnd_file.output,
687: 'These Duplicate values could lead to potential data corruption.');
688: fnd_file.put_line(fnd_file.output,
689: 'Duplicate CD-ROM records would not be uploaded');
690: fnd_file.put_line(fnd_file.output,
691: 'Please rectify the CD-ROM data and then submit the CD-ROM Upload Process again.');
692: l_count := 0;
693: For C_Subcontractor_UTR_Rec in C_Subcontractor_UTR Loop
694: If l_count = 0 Then

Line 695: fnd_file.put_line(fnd_file.output, '');

691: 'Please rectify the CD-ROM data and then submit the CD-ROM Upload Process again.');
692: l_count := 0;
693: For C_Subcontractor_UTR_Rec in C_Subcontractor_UTR Loop
694: If l_count = 0 Then
695: fnd_file.put_line(fnd_file.output, '');
696: fnd_file.put_line(fnd_file.output,
697: 'Duplicate Subcontractor Unique Taxpayer Reference found in the CD-ROM data');
698: fnd_file.put_line(fnd_file.output,
699: '--------------------------------------------------------------------------');

Line 696: fnd_file.put_line(fnd_file.output,

692: l_count := 0;
693: For C_Subcontractor_UTR_Rec in C_Subcontractor_UTR Loop
694: If l_count = 0 Then
695: fnd_file.put_line(fnd_file.output, '');
696: fnd_file.put_line(fnd_file.output,
697: 'Duplicate Subcontractor Unique Taxpayer Reference found in the CD-ROM data');
698: fnd_file.put_line(fnd_file.output,
699: '--------------------------------------------------------------------------');
700: End If;

Line 698: fnd_file.put_line(fnd_file.output,

694: If l_count = 0 Then
695: fnd_file.put_line(fnd_file.output, '');
696: fnd_file.put_line(fnd_file.output,
697: 'Duplicate Subcontractor Unique Taxpayer Reference found in the CD-ROM data');
698: fnd_file.put_line(fnd_file.output,
699: '--------------------------------------------------------------------------');
700: End If;
701: fnd_file.put_line(fnd_file.output, C_Subcontractor_UTR_Rec.SUBCONTRACTOR_UTR);
702: l_count := l_count + 1;

Line 701: fnd_file.put_line(fnd_file.output, C_Subcontractor_UTR_Rec.SUBCONTRACTOR_UTR);

697: 'Duplicate Subcontractor Unique Taxpayer Reference found in the CD-ROM data');
698: fnd_file.put_line(fnd_file.output,
699: '--------------------------------------------------------------------------');
700: End If;
701: fnd_file.put_line(fnd_file.output, C_Subcontractor_UTR_Rec.SUBCONTRACTOR_UTR);
702: l_count := l_count + 1;
703: End Loop;
704: End If;
705: End Cdrom_Duplicate_Data;

Line 722: fnd_file.put_line(fnd_file.output, 'Date : ' || SYSDATE);

718: From Igi_lookups
719: Where Lookup_type = 'IGI_CIS2007_CDROM_OPTION'
720: and lookup_code = 'U';
721: Begin
722: fnd_file.put_line(fnd_file.output, 'Date : ' || SYSDATE);
723: fnd_file.put_line(fnd_file.output,
724: 'Construction Industry Scheme : CD-ROM Data Upload Process Report');
725: fnd_file.put_line(fnd_file.output,
726: '----------------------------------------------------------------');

Line 723: fnd_file.put_line(fnd_file.output,

719: Where Lookup_type = 'IGI_CIS2007_CDROM_OPTION'
720: and lookup_code = 'U';
721: Begin
722: fnd_file.put_line(fnd_file.output, 'Date : ' || SYSDATE);
723: fnd_file.put_line(fnd_file.output,
724: 'Construction Industry Scheme : CD-ROM Data Upload Process Report');
725: fnd_file.put_line(fnd_file.output,
726: '----------------------------------------------------------------');
727: fnd_file.put_line(fnd_file.output,'');

Line 725: fnd_file.put_line(fnd_file.output,

721: Begin
722: fnd_file.put_line(fnd_file.output, 'Date : ' || SYSDATE);
723: fnd_file.put_line(fnd_file.output,
724: 'Construction Industry Scheme : CD-ROM Data Upload Process Report');
725: fnd_file.put_line(fnd_file.output,
726: '----------------------------------------------------------------');
727: fnd_file.put_line(fnd_file.output,'');
728: l_csv_file_name := fnd_profile.VALUE('IGI_CIS2007_CDROM_DATA_PATH');
729: fnd_file.put_line(fnd_file.log, 'Upload Option: ' || p_upl_option);

Line 727: fnd_file.put_line(fnd_file.output,'');

723: fnd_file.put_line(fnd_file.output,
724: 'Construction Industry Scheme : CD-ROM Data Upload Process Report');
725: fnd_file.put_line(fnd_file.output,
726: '----------------------------------------------------------------');
727: fnd_file.put_line(fnd_file.output,'');
728: l_csv_file_name := fnd_profile.VALUE('IGI_CIS2007_CDROM_DATA_PATH');
729: fnd_file.put_line(fnd_file.log, 'Upload Option: ' || p_upl_option);
730: fnd_file.put_line(fnd_file.log, 'CD-ROM csv file: ' || l_csv_file_name);
731: fnd_file.put_line(fnd_file.log, '');

Line 729: fnd_file.put_line(fnd_file.log, 'Upload Option: ' || p_upl_option);

725: fnd_file.put_line(fnd_file.output,
726: '----------------------------------------------------------------');
727: fnd_file.put_line(fnd_file.output,'');
728: l_csv_file_name := fnd_profile.VALUE('IGI_CIS2007_CDROM_DATA_PATH');
729: fnd_file.put_line(fnd_file.log, 'Upload Option: ' || p_upl_option);
730: fnd_file.put_line(fnd_file.log, 'CD-ROM csv file: ' || l_csv_file_name);
731: fnd_file.put_line(fnd_file.log, '');
732:
733: If P_Upl_Option = 'U' Then

Line 730: fnd_file.put_line(fnd_file.log, 'CD-ROM csv file: ' || l_csv_file_name);

726: '----------------------------------------------------------------');
727: fnd_file.put_line(fnd_file.output,'');
728: l_csv_file_name := fnd_profile.VALUE('IGI_CIS2007_CDROM_DATA_PATH');
729: fnd_file.put_line(fnd_file.log, 'Upload Option: ' || p_upl_option);
730: fnd_file.put_line(fnd_file.log, 'CD-ROM csv file: ' || l_csv_file_name);
731: fnd_file.put_line(fnd_file.log, '');
732:
733: If P_Upl_Option = 'U' Then
734: If Trunc(sysdate) < trunc(to_date(fnd_profile.value('IGI_CIS2007_LIB_DATE'),'DD-MM-YYYY')) Then

Line 731: fnd_file.put_line(fnd_file.log, '');

727: fnd_file.put_line(fnd_file.output,'');
728: l_csv_file_name := fnd_profile.VALUE('IGI_CIS2007_CDROM_DATA_PATH');
729: fnd_file.put_line(fnd_file.log, 'Upload Option: ' || p_upl_option);
730: fnd_file.put_line(fnd_file.log, 'CD-ROM csv file: ' || l_csv_file_name);
731: fnd_file.put_line(fnd_file.log, '');
732:
733: If P_Upl_Option = 'U' Then
734: If Trunc(sysdate) < trunc(to_date(fnd_profile.value('IGI_CIS2007_LIB_DATE'),'DD-MM-YYYY')) Then
735: For C_Upl_Meaning_Rec in C_Upl_Meaning Loop

Line 738: fnd_file.put_line(fnd_file.output,

734: If Trunc(sysdate) < trunc(to_date(fnd_profile.value('IGI_CIS2007_LIB_DATE'),'DD-MM-YYYY')) Then
735: For C_Upl_Meaning_Rec in C_Upl_Meaning Loop
736: l_meaning := C_Upl_Meaning_Rec.Meaning;
737: End Loop;
738: fnd_file.put_line(fnd_file.output,
739: 'The ' || l_meaning || ' Option of the CD-ROM Data Upload Process ' ||
740: 'cannot be run before ' || to_char(to_date(fnd_profile.value('IGI_CIS2007_LIB_DATE'),
741: 'DD-MM-YYYY'), 'DD-MON-YYYY'));
742: Raise E_Update_Not_Allowed;

Line 762: fnd_file.put_line(fnd_file.log, l_message);

758: When E_No_Csv_File_Error Then
759: fnd_message.set_name('IGI', 'IGI_CDROM_NO_FILES_TO_IMPORT');
760: fnd_message.set_token('FILE_NAME', l_csv_file_name);
761: l_message := fnd_message.get;
762: fnd_file.put_line(fnd_file.log, l_message);
763: retcode := 2;
764: errbuf := l_message;
765: WHEN Others Then
766: fnd_message.retrieve(l_message);

Line 767: fnd_file.put_line(fnd_file.log, l_message);

763: retcode := 2;
764: errbuf := l_message;
765: WHEN Others Then
766: fnd_message.retrieve(l_message);
767: fnd_file.put_line(fnd_file.log, l_message);
768: retcode := 2;
769: errbuf := l_message;
770: End Import_Cdrom_Data_Process;
771: