DBA Data[Home] [Help]

APPS.XDP_UTILITIES dependencies on FND_FILE

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

1881: BEGIN
1882:
1883: FOR lv_rec IN lc_proc LOOP
1884:
1885: fnd_file.put_line(fnd_file.output,'--------------------------------------------------------------');
1886: fnd_file.put_line(fnd_file.output,' ');
1887: fnd_file.put_line(fnd_file.output,'Examining Procedure: ' || lv_rec.proc_name);
1888: fnd_file.put_line(fnd_file.output,'Procedure Type found to be: ' || lv_rec.proc_type);
1889:

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

1882:
1883: FOR lv_rec IN lc_proc LOOP
1884:
1885: fnd_file.put_line(fnd_file.output,'--------------------------------------------------------------');
1886: fnd_file.put_line(fnd_file.output,' ');
1887: fnd_file.put_line(fnd_file.output,'Examining Procedure: ' || lv_rec.proc_name);
1888: fnd_file.put_line(fnd_file.output,'Procedure Type found to be: ' || lv_rec.proc_type);
1889:
1890: lv_body := null;

Line 1887: fnd_file.put_line(fnd_file.output,'Examining Procedure: ' || lv_rec.proc_name);

1883: FOR lv_rec IN lc_proc LOOP
1884:
1885: fnd_file.put_line(fnd_file.output,'--------------------------------------------------------------');
1886: fnd_file.put_line(fnd_file.output,' ');
1887: fnd_file.put_line(fnd_file.output,'Examining Procedure: ' || lv_rec.proc_name);
1888: fnd_file.put_line(fnd_file.output,'Procedure Type found to be: ' || lv_rec.proc_type);
1889:
1890: lv_body := null;
1891: lv_amount := 80;

Line 1888: fnd_file.put_line(fnd_file.output,'Procedure Type found to be: ' || lv_rec.proc_type);

1884:
1885: fnd_file.put_line(fnd_file.output,'--------------------------------------------------------------');
1886: fnd_file.put_line(fnd_file.output,' ');
1887: fnd_file.put_line(fnd_file.output,'Examining Procedure: ' || lv_rec.proc_name);
1888: fnd_file.put_line(fnd_file.output,'Procedure Type found to be: ' || lv_rec.proc_type);
1889:
1890: lv_body := null;
1891: lv_amount := 80;
1892: lv_offset := 1;

Line 1903: fnd_file.put_line(fnd_file.log, 'Procedure '||

1899: and proc_type = lv_rec.proc_type;
1900:
1901: lv_src_length := dbms_lob.GETLENGTH(lv_lob2);
1902: IF lv_src_length = 0 THEN
1903: fnd_file.put_line(fnd_file.log, 'Procedure '||
1904: lv_rec.proc_name||
1905: ' does not contain any body text.');
1906: fnd_file.put_line(fnd_file.log, 'Ignored...');
1907: GOTO l_continue;

Line 1906: fnd_file.put_line(fnd_file.log, 'Ignored...');

1902: IF lv_src_length = 0 THEN
1903: fnd_file.put_line(fnd_file.log, 'Procedure '||
1904: lv_rec.proc_name||
1905: ' does not contain any body text.');
1906: fnd_file.put_line(fnd_file.log, 'Ignored...');
1907: GOTO l_continue;
1908: ELSE
1909: null;
1910: END IF;

Line 2012: fnd_file.put_line(fnd_file.output,'Pre-Compiling Package...');

2008: elsif lv_rec.proc_type in ('CONNECT','DISCONNECT') then
2009: lv_ActualID := lv_fetype_id;
2010: end if;
2011:
2012: fnd_file.put_line(fnd_file.output,'Pre-Compiling Package...');
2013: xdp_procedure_builder.PrecompileProcedure(
2014: p_ProcType => lv_rec.proc_type,
2015: p_ProcBody => lv_body,
2016: p_ID => lv_ActualID,

Line 2022: fnd_file.put_line(fnd_file.log,

2018: x_ErrorCode => lv_ret,
2019: x_ErrorString => lv_str);
2020:
2021: if lv_ret <> 0 then
2022: fnd_file.put_line(fnd_file.log,
2023: '--------------------------------------------------------------');
2024: fnd_file.put_line(fnd_file.log,'Package Pre-Compilation failed');
2025: fnd_file.put_line(fnd_file.log,
2026: 'Pre-Compilation failed for procedure: '||lv_rec.proc_name);

Line 2024: fnd_file.put_line(fnd_file.log,'Package Pre-Compilation failed');

2020:
2021: if lv_ret <> 0 then
2022: fnd_file.put_line(fnd_file.log,
2023: '--------------------------------------------------------------');
2024: fnd_file.put_line(fnd_file.log,'Package Pre-Compilation failed');
2025: fnd_file.put_line(fnd_file.log,
2026: 'Pre-Compilation failed for procedure: '||lv_rec.proc_name);
2027: for lv_index in 1..(LENGTH(lv_str)/80 + 1) loop
2028: fnd_file.put_line(fnd_file.log,

Line 2025: fnd_file.put_line(fnd_file.log,

2021: if lv_ret <> 0 then
2022: fnd_file.put_line(fnd_file.log,
2023: '--------------------------------------------------------------');
2024: fnd_file.put_line(fnd_file.log,'Package Pre-Compilation failed');
2025: fnd_file.put_line(fnd_file.log,
2026: 'Pre-Compilation failed for procedure: '||lv_rec.proc_name);
2027: for lv_index in 1..(LENGTH(lv_str)/80 + 1) loop
2028: fnd_file.put_line(fnd_file.log,
2029: SUBSTR(lv_str,((lv_index - 1) * 80) + 1, 80));

Line 2028: fnd_file.put_line(fnd_file.log,

2024: fnd_file.put_line(fnd_file.log,'Package Pre-Compilation failed');
2025: fnd_file.put_line(fnd_file.log,
2026: 'Pre-Compilation failed for procedure: '||lv_rec.proc_name);
2027: for lv_index in 1..(LENGTH(lv_str)/80 + 1) loop
2028: fnd_file.put_line(fnd_file.log,
2029: SUBSTR(lv_str,((lv_index - 1) * 80) + 1, 80));
2030: end loop;
2031: lv_ret := 0;
2032: goto l_continue;

Line 2034: fnd_file.put_line(fnd_file.output,

2030: end loop;
2031: lv_ret := 0;
2032: goto l_continue;
2033: else
2034: fnd_file.put_line(fnd_file.output,
2035: 'Package Pre-Compiled created successfully... ');
2036: end if;
2037:
2038:

Line 2039: fnd_file.put_line(fnd_file.output,'Creating Package Spec... ');

2035: 'Package Pre-Compiled created successfully... ');
2036: end if;
2037:
2038:
2039: fnd_file.put_line(fnd_file.output,'Creating Package Spec... ');
2040: XDP_PROCEDURE_UTIL.Create_Package_Spec(
2041: lv_proc_name,
2042: lv_rec.proc_type,
2043: lv_ret,

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

2042: lv_rec.proc_type,
2043: lv_ret,
2044: lv_str);
2045: if lv_ret <> 0 then
2046: fnd_file.put_line(fnd_file.log,'--------------------------------------------------------------');
2047: fnd_file.put_line(fnd_file.log,'Package Spec creation failed');
2048: fnd_file.put_line(fnd_file.log,'Compilation failed for procedure: '||lv_rec.proc_name);
2049: for lv_index in 1..(LENGTH(lv_str)/80 + 1) loop
2050: fnd_file.put_line(fnd_file.log,SUBSTR(lv_str,((lv_index - 1) * 80) + 1, 80));

Line 2047: fnd_file.put_line(fnd_file.log,'Package Spec creation failed');

2043: lv_ret,
2044: lv_str);
2045: if lv_ret <> 0 then
2046: fnd_file.put_line(fnd_file.log,'--------------------------------------------------------------');
2047: fnd_file.put_line(fnd_file.log,'Package Spec creation failed');
2048: fnd_file.put_line(fnd_file.log,'Compilation failed for procedure: '||lv_rec.proc_name);
2049: for lv_index in 1..(LENGTH(lv_str)/80 + 1) loop
2050: fnd_file.put_line(fnd_file.log,SUBSTR(lv_str,((lv_index - 1) * 80) + 1, 80));
2051: end loop;

Line 2048: fnd_file.put_line(fnd_file.log,'Compilation failed for procedure: '||lv_rec.proc_name);

2044: lv_str);
2045: if lv_ret <> 0 then
2046: fnd_file.put_line(fnd_file.log,'--------------------------------------------------------------');
2047: fnd_file.put_line(fnd_file.log,'Package Spec creation failed');
2048: fnd_file.put_line(fnd_file.log,'Compilation failed for procedure: '||lv_rec.proc_name);
2049: for lv_index in 1..(LENGTH(lv_str)/80 + 1) loop
2050: fnd_file.put_line(fnd_file.log,SUBSTR(lv_str,((lv_index - 1) * 80) + 1, 80));
2051: end loop;
2052: lv_ret := 0;

Line 2050: fnd_file.put_line(fnd_file.log,SUBSTR(lv_str,((lv_index - 1) * 80) + 1, 80));

2046: fnd_file.put_line(fnd_file.log,'--------------------------------------------------------------');
2047: fnd_file.put_line(fnd_file.log,'Package Spec creation failed');
2048: fnd_file.put_line(fnd_file.log,'Compilation failed for procedure: '||lv_rec.proc_name);
2049: for lv_index in 1..(LENGTH(lv_str)/80 + 1) loop
2050: fnd_file.put_line(fnd_file.log,SUBSTR(lv_str,((lv_index - 1) * 80) + 1, 80));
2051: end loop;
2052: lv_ret := 0;
2053: goto l_continue;
2054: else

Line 2055: fnd_file.put_line(fnd_file.output,'Package Spec created successfully... ');

2051: end loop;
2052: lv_ret := 0;
2053: goto l_continue;
2054: else
2055: fnd_file.put_line(fnd_file.output,'Package Spec created successfully... ');
2056: fnd_file.put_line(fnd_file.output,'Creating Package Body... ');
2057: XDP_PROCEDURE_UTIL.Create_Package_Body(
2058: lv_proc_name,
2059: lv_rec.proc_type,

Line 2056: fnd_file.put_line(fnd_file.output,'Creating Package Body... ');

2052: lv_ret := 0;
2053: goto l_continue;
2054: else
2055: fnd_file.put_line(fnd_file.output,'Package Spec created successfully... ');
2056: fnd_file.put_line(fnd_file.output,'Creating Package Body... ');
2057: XDP_PROCEDURE_UTIL.Create_Package_Body(
2058: lv_proc_name,
2059: lv_rec.proc_type,
2060: lv_fa_id,

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

2063: lv_ret,
2064: lv_str);
2065:
2066: if lv_ret <> 0 then
2067: fnd_file.put_line(fnd_file.log,'--------------------------------------------------------------');
2068: fnd_file.put_line(fnd_file.log,'Package Body creation failed');
2069: fnd_file.put_line(fnd_file.log,'Compilation failed for procedure: '||lv_rec.proc_name);
2070: for lv_index in 1..(LENGTH(lv_str)/80 + 1) loop
2071: fnd_file.put_line(fnd_file.log,SUBSTR(lv_str,((lv_index - 1) * 80) + 1, 80));

Line 2068: fnd_file.put_line(fnd_file.log,'Package Body creation failed');

2064: lv_str);
2065:
2066: if lv_ret <> 0 then
2067: fnd_file.put_line(fnd_file.log,'--------------------------------------------------------------');
2068: fnd_file.put_line(fnd_file.log,'Package Body creation failed');
2069: fnd_file.put_line(fnd_file.log,'Compilation failed for procedure: '||lv_rec.proc_name);
2070: for lv_index in 1..(LENGTH(lv_str)/80 + 1) loop
2071: fnd_file.put_line(fnd_file.log,SUBSTR(lv_str,((lv_index - 1) * 80) + 1, 80));
2072: end loop;

Line 2069: fnd_file.put_line(fnd_file.log,'Compilation failed for procedure: '||lv_rec.proc_name);

2065:
2066: if lv_ret <> 0 then
2067: fnd_file.put_line(fnd_file.log,'--------------------------------------------------------------');
2068: fnd_file.put_line(fnd_file.log,'Package Body creation failed');
2069: fnd_file.put_line(fnd_file.log,'Compilation failed for procedure: '||lv_rec.proc_name);
2070: for lv_index in 1..(LENGTH(lv_str)/80 + 1) loop
2071: fnd_file.put_line(fnd_file.log,SUBSTR(lv_str,((lv_index - 1) * 80) + 1, 80));
2072: end loop;
2073: lv_ret := 0;

Line 2071: fnd_file.put_line(fnd_file.log,SUBSTR(lv_str,((lv_index - 1) * 80) + 1, 80));

2067: fnd_file.put_line(fnd_file.log,'--------------------------------------------------------------');
2068: fnd_file.put_line(fnd_file.log,'Package Body creation failed');
2069: fnd_file.put_line(fnd_file.log,'Compilation failed for procedure: '||lv_rec.proc_name);
2070: for lv_index in 1..(LENGTH(lv_str)/80 + 1) loop
2071: fnd_file.put_line(fnd_file.log,SUBSTR(lv_str,((lv_index - 1) * 80) + 1, 80));
2072: end loop;
2073: lv_ret := 0;
2074: goto l_continue;
2075: else

Line 2076: fnd_file.put_line(fnd_file.output,'Compilation succeed for procedure: '||lv_rec.proc_name);

2072: end loop;
2073: lv_ret := 0;
2074: goto l_continue;
2075: else
2076: fnd_file.put_line(fnd_file.output,'Compilation succeed for procedure: '||lv_rec.proc_name);
2077: lv_ret := 0;
2078: commit;
2079: end if;
2080: end if;

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

2079: end if;
2080: end if;
2081: <>
2082: COMMIT;
2083: fnd_file.put_line(fnd_file.output,' ');
2084: fnd_file.put_line(fnd_file.output,'--------------------------------------------------------------');
2085: END LOOP;
2086:
2087: RETCODE := 0;

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

2080: end if;
2081: <>
2082: COMMIT;
2083: fnd_file.put_line(fnd_file.output,' ');
2084: fnd_file.put_line(fnd_file.output,'--------------------------------------------------------------');
2085: END LOOP;
2086:
2087: RETCODE := 0;
2088: ERRBUF := 'Success';