Bug in DBMS_METADATA.get_ddl?

Question

If you create the functions:
CREATE OR REPLACE FUNCTION testingit1 RETURN NUMBER IS
tmpVar NUMBER;
BEGIN
tmpVar := 0;
RETURN tmpVar;
EXCEPTION
WHEN NO_DATA_FOUND THEN
NULL;
WHEN OTHERS THEN
-- Consider logging the error and then re-raise
RAISE;
END testingit1;
and
CREATE OR REPLACE FUNCTION
testingit2 RETURN NUMBER IS
tmpVar NUMBER;
BEGIN
tmpVar := 0;
RETURN tmpVar;
EXCEPTION
WHEN NO_DATA_FOUND THEN
NULL;
WHEN OTHERS THEN
-- Consider logging the error and then re-raise
RAISE;
END testingit2;
And use DBMS_METADATA.get_ddl to return the code. When the function was created with the name on a seperate line (testingit2) the code returned has the name repeated
e..g., SELECT DBMS_METADATA.get_ddl('FUNCTION', 'TESTINGIT2')
FROM dual
returns
"CREATE OR REPLACE FUNCTION "TESTUSER"."TESTINGIT2"
testingit2 RETURN NUMBER IS
tmpVar NUMBER; ..."
Anyone seen this before and know how to fix it?

Answer 1

using some sort of XML transform? Yes,
SQL> create or replace function get_code return clob is
  2      l_xml XMLTYPE ;
  3      l_xsl XMLTYPE ;
  4  begin
  5      select XMLTYPE(dbms_metadata.get_xml('FUNCTION', 'TESTINGIT2')) into l_xml from dual ;
  6      l_xsl := XMLTYPE('<?xml version="1.0"?>'||
  7                   '<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform"'||
  8                   ' version="1.0"'||
  9                   ' result-ns=""'||
10                   ' indent="no">'||
11                   '<xsl:output method="text" media-type="text/text" indent="no"/>'||
12                   '<xsl:template match="/">'||
13                   'CREATE OR REPLACE <xsl:for-each select="//SOURCE_LINES/SOURCE_LINES_ITEM">'||
14                   '<xsl:value-of select="./SOURCE" />'||
15                   ' </xsl:for-each>'||
16                   '</xsl:template>'||
17                   '</xsl:stylesheet>') ;
18      return(l_xml.transform(l_xsl).getCLOBVal()) ;
19  end ;
20  /
Function created.
SQL> select get_code from dual ;
GET_CODE
CREATE OR REPLACE FUNCTION
testingit2 RETURN NUMBER IS
tmpVar NUMBER;
begin
null ;
end ;
1 row selected.
SQL>