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 438: fnd_file.put_line(fnd_file.log, l_message);

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

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

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

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

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

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

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

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

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

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

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

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

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

Line 519: fnd_file.put_line(fnd_file.output,

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

Line 521: fnd_file.put_line(fnd_file.output,

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

Line 523: fnd_file.put_line(fnd_file.output,

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

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

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

Line 534: fnd_file.put_line(fnd_file.output,

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

Line 537: fnd_file.put_line(fnd_file.output,

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

Line 539: fnd_file.put_line(fnd_file.output,

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

Line 541: fnd_file.put_line(fnd_file.output,

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

Line 544: fnd_file.put_line(fnd_file.output,

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

Line 565: fnd_file.put_line(fnd_file.output,

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

Line 567: fnd_file.put_line(fnd_file.output,

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

Line 571: fnd_file.put_line(fnd_file.output,

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

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

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

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

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

Line 581: fnd_file.put_line(fnd_file.output,

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

Line 583: fnd_file.put_line(fnd_file.output,

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

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

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

Line 586: fnd_file.put_line(fnd_file.output,

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

Line 588: fnd_file.put_line(fnd_file.output,

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

Line 592: fnd_file.put_line(fnd_file.output,

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

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

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

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

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

Line 636: fnd_file.put_line(fnd_file.output,

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

Line 638: fnd_file.put_line(fnd_file.output,

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

Line 640: fnd_file.put_line(fnd_file.output,

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

Line 642: fnd_file.put_line(fnd_file.output,

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

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

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

Line 648: fnd_file.put_line(fnd_file.output,

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

Line 650: fnd_file.put_line(fnd_file.output,

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

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

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

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

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

Line 661: fnd_file.put_line(fnd_file.output,

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

Line 663: fnd_file.put_line(fnd_file.output,

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

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

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

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

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

Line 688: fnd_file.put_line(fnd_file.output,

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

Line 690: fnd_file.put_line(fnd_file.output,

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

Line 692: fnd_file.put_line(fnd_file.output,

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

Line 694: fnd_file.put_line(fnd_file.output,

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

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

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

Line 700: fnd_file.put_line(fnd_file.output,

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

Line 702: fnd_file.put_line(fnd_file.output,

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

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

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

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

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

Line 727: fnd_file.put_line(fnd_file.output,

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

Line 729: fnd_file.put_line(fnd_file.output,

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

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

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

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

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

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

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

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

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

Line 742: fnd_file.put_line(fnd_file.output,

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

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

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

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

767: retcode := 2;
768: errbuf := l_message;
769: WHEN Others Then
770: fnd_message.retrieve(l_message);
771: fnd_file.put_line(fnd_file.log, l_message);
772: retcode := 2;
773: errbuf := l_message;
774: End Import_Cdrom_Data_Process;
775: