4802: insert_temp_data(3,null,message_text ,null,crec.duns||crec.plus_four,null,null);
4803: END LOOP;
4804: END IF;
4805:
4806: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' CCR Data Load Report');
4807: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4808:
4809: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'Concurrent Request ID: '||l_request_id);
4810: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'Extract File Parameters ');
4803: END LOOP;
4804: END IF;
4805:
4806: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' CCR Data Load Report');
4807: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4808:
4809: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'Concurrent Request ID: '||l_request_id);
4810: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'Extract File Parameters ');
4811: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4805:
4806: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' CCR Data Load Report');
4807: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4808:
4809: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'Concurrent Request ID: '||l_request_id);
4810: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'Extract File Parameters ');
4811: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4812: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('File Location: '||p_file_location,75,' ')||rpad('File Name: '||p_file_name,75,' ')||'File Type: '||p_file_type);
4813: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('DUNS Numbers To Query: '||nvl(p_duns,'All'),75,' ')||rpad('Enter DUNS Number: '||nvl(p_duns,'N/A'),75,' '));
4806: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' CCR Data Load Report');
4807: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4808:
4809: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'Concurrent Request ID: '||l_request_id);
4810: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'Extract File Parameters ');
4811: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4812: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('File Location: '||p_file_location,75,' ')||rpad('File Name: '||p_file_name,75,' ')||'File Type: '||p_file_type);
4813: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('DUNS Numbers To Query: '||nvl(p_duns,'All'),75,' ')||rpad('Enter DUNS Number: '||nvl(p_duns,'N/A'),75,' '));
4814: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4807: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4808:
4809: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'Concurrent Request ID: '||l_request_id);
4810: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'Extract File Parameters ');
4811: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4812: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('File Location: '||p_file_location,75,' ')||rpad('File Name: '||p_file_name,75,' ')||'File Type: '||p_file_type);
4813: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('DUNS Numbers To Query: '||nvl(p_duns,'All'),75,' ')||rpad('Enter DUNS Number: '||nvl(p_duns,'N/A'),75,' '));
4814: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4815:
4808:
4809: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'Concurrent Request ID: '||l_request_id);
4810: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'Extract File Parameters ');
4811: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4812: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('File Location: '||p_file_location,75,' ')||rpad('File Name: '||p_file_name,75,' ')||'File Type: '||p_file_type);
4813: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('DUNS Numbers To Query: '||nvl(p_duns,'All'),75,' ')||rpad('Enter DUNS Number: '||nvl(p_duns,'N/A'),75,' '));
4814: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4815:
4816: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'XML Parameters');
4809: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'Concurrent Request ID: '||l_request_id);
4810: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'Extract File Parameters ');
4811: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4812: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('File Location: '||p_file_location,75,' ')||rpad('File Name: '||p_file_name,75,' ')||'File Type: '||p_file_type);
4813: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('DUNS Numbers To Query: '||nvl(p_duns,'All'),75,' ')||rpad('Enter DUNS Number: '||nvl(p_duns,'N/A'),75,' '));
4814: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4815:
4816: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'XML Parameters');
4817: -- FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('DUNS Numbers To Query: '||nvl(p_duns,'All'),75,' ')||rpad('Enter DUNS Number: '||nvl(p_duns,'N/A'),35,' ')||'CAGE Code: '||'N/A');
4810: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'Extract File Parameters ');
4811: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4812: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('File Location: '||p_file_location,75,' ')||rpad('File Name: '||p_file_name,75,' ')||'File Type: '||p_file_type);
4813: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('DUNS Numbers To Query: '||nvl(p_duns,'All'),75,' ')||rpad('Enter DUNS Number: '||nvl(p_duns,'N/A'),75,' '));
4814: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4815:
4816: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'XML Parameters');
4817: -- FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('DUNS Numbers To Query: '||nvl(p_duns,'All'),75,' ')||rpad('Enter DUNS Number: '||nvl(p_duns,'N/A'),35,' ')||'CAGE Code: '||'N/A');
4818: -- FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('Taxpayer Number: '||'N/A',75,' ')||'Registration Status: '||'N/A');
4812: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('File Location: '||p_file_location,75,' ')||rpad('File Name: '||p_file_name,75,' ')||'File Type: '||p_file_type);
4813: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('DUNS Numbers To Query: '||nvl(p_duns,'All'),75,' ')||rpad('Enter DUNS Number: '||nvl(p_duns,'N/A'),75,' '));
4814: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4815:
4816: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'XML Parameters');
4817: -- FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('DUNS Numbers To Query: '||nvl(p_duns,'All'),75,' ')||rpad('Enter DUNS Number: '||nvl(p_duns,'N/A'),35,' ')||'CAGE Code: '||'N/A');
4818: -- FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('Taxpayer Number: '||'N/A',75,' ')||'Registration Status: '||'N/A');
4819: -- FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('Start Date: '||'N/A',75,' ')||'End Date: '||'N/A');
4820:
4813: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('DUNS Numbers To Query: '||nvl(p_duns,'All'),75,' ')||rpad('Enter DUNS Number: '||nvl(p_duns,'N/A'),75,' '));
4814: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4815:
4816: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'XML Parameters');
4817: -- FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('DUNS Numbers To Query: '||nvl(p_duns,'All'),75,' ')||rpad('Enter DUNS Number: '||nvl(p_duns,'N/A'),35,' ')||'CAGE Code: '||'N/A');
4818: -- FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('Taxpayer Number: '||'N/A',75,' ')||'Registration Status: '||'N/A');
4819: -- FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('Start Date: '||'N/A',75,' ')||'End Date: '||'N/A');
4820:
4821: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('DUNS Numbers To Query: '||nvl(p_duns,'All'),75,' ')||rpad('Enter DUNS Number: '||nvl(p_duns,'N/A'),75,' ')||'Insert New Records: '||p_insert_data);
4814: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4815:
4816: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'XML Parameters');
4817: -- FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('DUNS Numbers To Query: '||nvl(p_duns,'All'),75,' ')||rpad('Enter DUNS Number: '||nvl(p_duns,'N/A'),35,' ')||'CAGE Code: '||'N/A');
4818: -- FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('Taxpayer Number: '||'N/A',75,' ')||'Registration Status: '||'N/A');
4819: -- FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('Start Date: '||'N/A',75,' ')||'End Date: '||'N/A');
4820:
4821: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('DUNS Numbers To Query: '||nvl(p_duns,'All'),75,' ')||rpad('Enter DUNS Number: '||nvl(p_duns,'N/A'),75,' ')||'Insert New Records: '||p_insert_data);
4822:
4815:
4816: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'XML Parameters');
4817: -- FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('DUNS Numbers To Query: '||nvl(p_duns,'All'),75,' ')||rpad('Enter DUNS Number: '||nvl(p_duns,'N/A'),35,' ')||'CAGE Code: '||'N/A');
4818: -- FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('Taxpayer Number: '||'N/A',75,' ')||'Registration Status: '||'N/A');
4819: -- FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('Start Date: '||'N/A',75,' ')||'End Date: '||'N/A');
4820:
4821: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('DUNS Numbers To Query: '||nvl(p_duns,'All'),75,' ')||rpad('Enter DUNS Number: '||nvl(p_duns,'N/A'),75,' ')||'Insert New Records: '||p_insert_data);
4822:
4823: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4817: -- FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('DUNS Numbers To Query: '||nvl(p_duns,'All'),75,' ')||rpad('Enter DUNS Number: '||nvl(p_duns,'N/A'),35,' ')||'CAGE Code: '||'N/A');
4818: -- FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('Taxpayer Number: '||'N/A',75,' ')||'Registration Status: '||'N/A');
4819: -- FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('Start Date: '||'N/A',75,' ')||'End Date: '||'N/A');
4820:
4821: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('DUNS Numbers To Query: '||nvl(p_duns,'All'),75,' ')||rpad('Enter DUNS Number: '||nvl(p_duns,'N/A'),75,' ')||'Insert New Records: '||p_insert_data);
4822:
4823: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4824: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4825:
4819: -- FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('Start Date: '||'N/A',75,' ')||'End Date: '||'N/A');
4820:
4821: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('DUNS Numbers To Query: '||nvl(p_duns,'All'),75,' ')||rpad('Enter DUNS Number: '||nvl(p_duns,'N/A'),75,' ')||'Insert New Records: '||p_insert_data);
4822:
4823: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4824: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4825:
4826: l_report_count := 0;
4827:
4820:
4821: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('DUNS Numbers To Query: '||nvl(p_duns,'All'),75,' ')||rpad('Enter DUNS Number: '||nvl(p_duns,'N/A'),75,' ')||'Insert New Records: '||p_insert_data);
4822:
4823: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4824: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4825:
4826: l_report_count := 0;
4827:
4828: FOR l_ccr_rep in c_ccr_rep
4827:
4828: FOR l_ccr_rep in c_ccr_rep
4829: LOOP
4830: l_report_count := l_report_count + 1;
4831: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'');
4832: IF l_ccr_rep.record_type ='1' THEN
4833: IF (l_title1set = false) THEN
4834: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'====================================================================== DUNS/DUNS+4 Returned ======================================================================= ');
4835: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4830: l_report_count := l_report_count + 1;
4831: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'');
4832: IF l_ccr_rep.record_type ='1' THEN
4833: IF (l_title1set = false) THEN
4834: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'====================================================================== DUNS/DUNS+4 Returned ======================================================================= ');
4835: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4836: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('DUNS/DUNS+4 Number',20,' ')||' '||rpad('Legal Business Name',90,' ')||' '||rpad('CAGE Code',10,' ')||' '||rpad('SSN/TIN',20,' ')||' '||rpad('Registration Status',30,' '));
4837: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('------------------',20,' ')||' '||rpad('-------------------',90,' ')||' '||rpad('---------',10,' ')||' '||rpad('-------',20,' ')||' '||rpad('-------------------',30,' '));
4838: l_title1set := true;
4831: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'');
4832: IF l_ccr_rep.record_type ='1' THEN
4833: IF (l_title1set = false) THEN
4834: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'====================================================================== DUNS/DUNS+4 Returned ======================================================================= ');
4835: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4836: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('DUNS/DUNS+4 Number',20,' ')||' '||rpad('Legal Business Name',90,' ')||' '||rpad('CAGE Code',10,' ')||' '||rpad('SSN/TIN',20,' ')||' '||rpad('Registration Status',30,' '));
4837: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('------------------',20,' ')||' '||rpad('-------------------',90,' ')||' '||rpad('---------',10,' ')||' '||rpad('-------',20,' ')||' '||rpad('-------------------',30,' '));
4838: l_title1set := true;
4839: END IF;
4832: IF l_ccr_rep.record_type ='1' THEN
4833: IF (l_title1set = false) THEN
4834: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'====================================================================== DUNS/DUNS+4 Returned ======================================================================= ');
4835: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4836: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('DUNS/DUNS+4 Number',20,' ')||' '||rpad('Legal Business Name',90,' ')||' '||rpad('CAGE Code',10,' ')||' '||rpad('SSN/TIN',20,' ')||' '||rpad('Registration Status',30,' '));
4837: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('------------------',20,' ')||' '||rpad('-------------------',90,' ')||' '||rpad('---------',10,' ')||' '||rpad('-------',20,' ')||' '||rpad('-------------------',30,' '));
4838: l_title1set := true;
4839: END IF;
4840: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad(l_ccr_rep.duns_info,20,' ')||' '||rpad(substr(l_ccr_rep.reference1,1,90),90,' ')||' '||
4833: IF (l_title1set = false) THEN
4834: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'====================================================================== DUNS/DUNS+4 Returned ======================================================================= ');
4835: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4836: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('DUNS/DUNS+4 Number',20,' ')||' '||rpad('Legal Business Name',90,' ')||' '||rpad('CAGE Code',10,' ')||' '||rpad('SSN/TIN',20,' ')||' '||rpad('Registration Status',30,' '));
4837: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('------------------',20,' ')||' '||rpad('-------------------',90,' ')||' '||rpad('---------',10,' ')||' '||rpad('-------',20,' ')||' '||rpad('-------------------',30,' '));
4838: l_title1set := true;
4839: END IF;
4840: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad(l_ccr_rep.duns_info,20,' ')||' '||rpad(substr(l_ccr_rep.reference1,1,90),90,' ')||' '||
4841: rpad(l_ccr_rep.reference2,10,' ')||' '||rpad(l_ccr_rep.reference3,20,' ')||' '||l_ccr_rep.reference4);
4836: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('DUNS/DUNS+4 Number',20,' ')||' '||rpad('Legal Business Name',90,' ')||' '||rpad('CAGE Code',10,' ')||' '||rpad('SSN/TIN',20,' ')||' '||rpad('Registration Status',30,' '));
4837: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('------------------',20,' ')||' '||rpad('-------------------',90,' ')||' '||rpad('---------',10,' ')||' '||rpad('-------',20,' ')||' '||rpad('-------------------',30,' '));
4838: l_title1set := true;
4839: END IF;
4840: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad(l_ccr_rep.duns_info,20,' ')||' '||rpad(substr(l_ccr_rep.reference1,1,90),90,' ')||' '||
4841: rpad(l_ccr_rep.reference2,10,' ')||' '||rpad(l_ccr_rep.reference3,20,' ')||' '||l_ccr_rep.reference4);
4842: ELSIF l_ccr_rep.record_type ='2' THEN
4843: IF (l_title2set = false) THEN
4844: if p_xml_import = 'Y' then
4841: rpad(l_ccr_rep.reference2,10,' ')||' '||rpad(l_ccr_rep.reference3,20,' ')||' '||l_ccr_rep.reference4);
4842: ELSIF l_ccr_rep.record_type ='2' THEN
4843: IF (l_title2set = false) THEN
4844: if p_xml_import = 'Y' then
4845: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'========================================================================== DUN/DUNS+4 ============================================================================ ');
4846: else
4847: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'====================================================================== New DUN/DUNS+4 ============================================================================ ');
4848: end if;
4849: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4843: IF (l_title2set = false) THEN
4844: if p_xml_import = 'Y' then
4845: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'========================================================================== DUN/DUNS+4 ============================================================================ ');
4846: else
4847: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'====================================================================== New DUN/DUNS+4 ============================================================================ ');
4848: end if;
4849: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4850: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('DUNS/DUNS+4 Number',20,' ')||' '||rpad('Legal Business Name',90,' ')||' '||'Notes');
4851: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('------------------',20,' ')||' '||rpad('-------------------',90,' ')||' '||'-----');
4845: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'========================================================================== DUN/DUNS+4 ============================================================================ ');
4846: else
4847: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'====================================================================== New DUN/DUNS+4 ============================================================================ ');
4848: end if;
4849: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4850: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('DUNS/DUNS+4 Number',20,' ')||' '||rpad('Legal Business Name',90,' ')||' '||'Notes');
4851: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('------------------',20,' ')||' '||rpad('-------------------',90,' ')||' '||'-----');
4852: l_title2set := true;
4853: END IF;
4846: else
4847: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'====================================================================== New DUN/DUNS+4 ============================================================================ ');
4848: end if;
4849: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4850: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('DUNS/DUNS+4 Number',20,' ')||' '||rpad('Legal Business Name',90,' ')||' '||'Notes');
4851: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('------------------',20,' ')||' '||rpad('-------------------',90,' ')||' '||'-----');
4852: l_title2set := true;
4853: END IF;
4854: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad(l_ccr_rep.duns_info,20,' ')||' '||rpad(substr(l_ccr_rep.reference1,1,90),90,' ')||' '||l_ccr_rep.reference2);
4847: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'====================================================================== New DUN/DUNS+4 ============================================================================ ');
4848: end if;
4849: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4850: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('DUNS/DUNS+4 Number',20,' ')||' '||rpad('Legal Business Name',90,' ')||' '||'Notes');
4851: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('------------------',20,' ')||' '||rpad('-------------------',90,' ')||' '||'-----');
4852: l_title2set := true;
4853: END IF;
4854: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad(l_ccr_rep.duns_info,20,' ')||' '||rpad(substr(l_ccr_rep.reference1,1,90),90,' ')||' '||l_ccr_rep.reference2);
4855:
4850: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('DUNS/DUNS+4 Number',20,' ')||' '||rpad('Legal Business Name',90,' ')||' '||'Notes');
4851: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('------------------',20,' ')||' '||rpad('-------------------',90,' ')||' '||'-----');
4852: l_title2set := true;
4853: END IF;
4854: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad(l_ccr_rep.duns_info,20,' ')||' '||rpad(substr(l_ccr_rep.reference1,1,90),90,' ')||' '||l_ccr_rep.reference2);
4855:
4856: ELSIF l_ccr_rep.record_type ='3' THEN
4857: IF (l_title3set = false) THEN
4858: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'====================================================================== Messages Reported ========================================================================== ');
4854: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad(l_ccr_rep.duns_info,20,' ')||' '||rpad(substr(l_ccr_rep.reference1,1,90),90,' ')||' '||l_ccr_rep.reference2);
4855:
4856: ELSIF l_ccr_rep.record_type ='3' THEN
4857: IF (l_title3set = false) THEN
4858: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'====================================================================== Messages Reported ========================================================================== ');
4859: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4860: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('Source',20,' ')||' '||rpad('Message',90 ,' ')||' '||'Action');
4861: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('------',20,' ')||' '||rpad('-------',90 ,' ')||' '||'------');
4862: l_title3set := true;
4855:
4856: ELSIF l_ccr_rep.record_type ='3' THEN
4857: IF (l_title3set = false) THEN
4858: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'====================================================================== Messages Reported ========================================================================== ');
4859: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4860: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('Source',20,' ')||' '||rpad('Message',90 ,' ')||' '||'Action');
4861: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('------',20,' ')||' '||rpad('-------',90 ,' ')||' '||'------');
4862: l_title3set := true;
4863: END IF;
4856: ELSIF l_ccr_rep.record_type ='3' THEN
4857: IF (l_title3set = false) THEN
4858: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'====================================================================== Messages Reported ========================================================================== ');
4859: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4860: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('Source',20,' ')||' '||rpad('Message',90 ,' ')||' '||'Action');
4861: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('------',20,' ')||' '||rpad('-------',90 ,' ')||' '||'------');
4862: l_title3set := true;
4863: END IF;
4864:
4857: IF (l_title3set = false) THEN
4858: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'====================================================================== Messages Reported ========================================================================== ');
4859: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4860: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('Source',20,' ')||' '||rpad('Message',90 ,' ')||' '||'Action');
4861: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('------',20,' ')||' '||rpad('-------',90 ,' ')||' '||'------');
4862: l_title3set := true;
4863: END IF;
4864:
4865: IF length(l_ccr_rep.reference1) > 90 THEN
4866: i := 1;
4867: WHILE i < length(l_ccr_rep.reference1)
4868: LOOP
4869: if i = 1 then
4870: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad(l_ccr_rep.reference3,20,' ')||' '||substr(l_ccr_rep.reference1,i,90)||' '||l_ccr_rep.reference2);
4871: else
4872: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad(' ',20,' ')||' '||substr(l_ccr_rep.reference1,i,90));
4873: end if;
4874: i := i + 90;
4868: LOOP
4869: if i = 1 then
4870: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad(l_ccr_rep.reference3,20,' ')||' '||substr(l_ccr_rep.reference1,i,90)||' '||l_ccr_rep.reference2);
4871: else
4872: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad(' ',20,' ')||' '||substr(l_ccr_rep.reference1,i,90));
4873: end if;
4874: i := i + 90;
4875: END LOOP;
4876: ELSE
4873: end if;
4874: i := i + 90;
4875: END LOOP;
4876: ELSE
4877: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad(l_ccr_rep.reference3,20,' ')||' '||rpad(l_ccr_rep.reference1,length(l_ccr_rep.reference1),' ')||' '||l_ccr_rep.reference2);
4878: END IF;
4879:
4880: END IF;
4881: END LOOP;
4881: END LOOP;
4882:
4883: --bug3958492
4884: if l_report_count = 0 then
4885: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'====================================================================== DUNS/DUNS+4 Processed ====================================================================== ');
4886: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4887: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('DUNS/DUNS+4 Number',20,' ')||' '||rpad('Legal Business Name',90,' ')||' '||rpad('CAGE Code',10,' ')||' '||rpad('Taxpayer ID',20,' ')||' '||rpad('Registration Status',30,' '));
4888: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('------------------',20,' ')||' '||rpad('-------------------',90,' ')||' '||rpad('---------',10,' ')||' '||rpad('-----------',20,' ')||' '||rpad('-------------------',30,' '));
4889: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'None');
4882:
4883: --bug3958492
4884: if l_report_count = 0 then
4885: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'====================================================================== DUNS/DUNS+4 Processed ====================================================================== ');
4886: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4887: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('DUNS/DUNS+4 Number',20,' ')||' '||rpad('Legal Business Name',90,' ')||' '||rpad('CAGE Code',10,' ')||' '||rpad('Taxpayer ID',20,' ')||' '||rpad('Registration Status',30,' '));
4888: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('------------------',20,' ')||' '||rpad('-------------------',90,' ')||' '||rpad('---------',10,' ')||' '||rpad('-----------',20,' ')||' '||rpad('-------------------',30,' '));
4889: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'None');
4890: end if;
4883: --bug3958492
4884: if l_report_count = 0 then
4885: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'====================================================================== DUNS/DUNS+4 Processed ====================================================================== ');
4886: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4887: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('DUNS/DUNS+4 Number',20,' ')||' '||rpad('Legal Business Name',90,' ')||' '||rpad('CAGE Code',10,' ')||' '||rpad('Taxpayer ID',20,' ')||' '||rpad('Registration Status',30,' '));
4888: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('------------------',20,' ')||' '||rpad('-------------------',90,' ')||' '||rpad('---------',10,' ')||' '||rpad('-----------',20,' ')||' '||rpad('-------------------',30,' '));
4889: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'None');
4890: end if;
4891:
4884: if l_report_count = 0 then
4885: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'====================================================================== DUNS/DUNS+4 Processed ====================================================================== ');
4886: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4887: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('DUNS/DUNS+4 Number',20,' ')||' '||rpad('Legal Business Name',90,' ')||' '||rpad('CAGE Code',10,' ')||' '||rpad('Taxpayer ID',20,' ')||' '||rpad('Registration Status',30,' '));
4888: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('------------------',20,' ')||' '||rpad('-------------------',90,' ')||' '||rpad('---------',10,' ')||' '||rpad('-----------',20,' ')||' '||rpad('-------------------',30,' '));
4889: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'None');
4890: end if;
4891:
4892:
4885: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'====================================================================== DUNS/DUNS+4 Processed ====================================================================== ');
4886: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' ');
4887: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('DUNS/DUNS+4 Number',20,' ')||' '||rpad('Legal Business Name',90,' ')||' '||rpad('CAGE Code',10,' ')||' '||rpad('Taxpayer ID',20,' ')||' '||rpad('Registration Status',30,' '));
4888: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,rpad('------------------',20,' ')||' '||rpad('-------------------',90,' ')||' '||rpad('---------',10,' ')||' '||rpad('-----------',20,' ')||' '||rpad('-------------------',30,' '));
4889: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'None');
4890: end if;
4891:
4892:
4893: -- purge the temporary tables