Extract an embedded pdf file from xml in ADF

Question

Hi,
I have a xml file containing an embedded pdf like below
<?xml version="1.0" encoding="ISO-8859-1" ?>
<dbtx>
<response>
<transaction_rs>
<EMBEDDED_FILE>
<DOCUMENT>
JVBERi0xLjMKJaqrrK0KNCAwIG9iago8PCAvVHlwZSAvSW5mbwovUHJvZHVjZXIgKG51bGwpID4+CmVuZG9iago1IDAgb2JqCjw8IC9MZW5ndGggMTQzOCAvRmlsdGVyIC9GbGF0ZURlY29kZSAKID4+CnN0cmVhbQp4nK1Y23LiRhB95yv0tPFWzOzcR/OILxBSvgXIVqVCHmQsE1WB5Mhia8tfnyOEpJG4KVvZfTAW6nO6e/p09/hq1rud9f7pMY8Sn+KfRz0vXXrNB5OR11NEa+sZLYhW0mOSESO419eKCKO8NPSee7/1rjrDMWmIpKwCNPhe6x/H48wnXJsKTzBGfMaOAeZ2FA7kCFvAxoNtvIISavwKUGmi7dGALV7OETyVf9jlinEiYblY976M18y7Sf6fiJRpefBlyDymwDt77eX0swXCWeaI+M+8CkhaInzpzdbenxc3n64+e31ufLx/cbtJk7cwiOsn18n6LVhkn72/vNmv/9ljbokx1mPWJ5Irr88E+YEjlaxIeQUHGOHvw+Xh61307WPdywGXxDesyMEkeHtL0iypw/4WvW+CVfTxERRPhcqTLqR3QXX9VrB0TDhldJemPTL8ZHxH9rBZh6lj9xI5gM/PSRysw7hg5RRFtmWd3A77Gb5wz6HM0rL6NCrFSTXhSJTyGWHQVj8HP1f4hanWmiiOHEvCjPBYYfjqVviuwG1V39qg5kBX1Ddv1vf+SVjiS14RKfy0OWGDaVvJsjjLOpuFocHJcVMkc/yCXEWv0SL4iJI4rDP5qf44TdbrII2SXe6+DBEWbULjcIXwPS0FKGwBfTUZ3PxRo4xng7vxwEGd3LVOuwTBYSu7A3kK4iQN1vDPQYpf8HuWpFGzCA6CUWi89GgSvS/+
</DOCUMENT>
</EMBEDDED_FILE>
</response>
</transaction_rs>
</dbtx>Requirement: I want to extract the pdf from xml and store it in local drive. How can I do this in java?
Jdev : 11.1.1.3
Any help will be appriciated.
~Abhijit

Answer 1

I have made this procedure to convert the input clob to a decoded base 64 binary, i then obtain a pdf file but its' corrupted or damaged.
any ideas?
thks guys.
Andrea
create or replace FUNCTION c2b_64( c IN CLOB ) RETURN BLOB
-- typecasts CLOB to BLOB (binary conversion)
IS
pos PLS_INTEGER := 1;
buffer RAW( 32767 );
buffer64 RAW( 32767 );
res BLOB;
lob_len PLS_INTEGER := DBMS_LOB.getLength( c );
BEGIN
DBMS_LOB.createTemporary( res, TRUE );
DBMS_LOB.OPEN( res, DBMS_LOB.LOB_ReadWrite );
LOOP
buffer := UTL_RAW.cast_to_raw( DBMS_LOB.SUBSTR( c, 78, pos ) );
buffer64 := UTL_ENCODE.base64_decode (buffer);
IF UTL_RAW.LENGTH( buffer64 ) > 0 THEN
DBMS_LOB.writeAppend( res, UTL_RAW.LENGTH( buffer64 ), buffer64 );
END IF;
pos := pos + 78;
EXIT WHEN pos > lob_len;
END LOOP;
RETURN res; -- res is OPEN here
END c2b_64;