Creating a XMLfile using pl/sql procedure.

Question

Hi,
I have a scenario here. I have to create a XML file, in a perticular format. Since its not a well formed XML format, I am facing issues while creating the file.
The XML file format is as below.
<SECTION>10-B</SECTION>
<?xml version="1.0" encoding="UTF-8"?>
<Name>
<First>ABC</First>
<Middle>BCD</Middle>
<Lastt>ABC</Last>
<Marks>
<Subj1>89</Subj1>
<Subj2>89</Subj2>
<Subj3>89</Subj3>
</Marks>
</Name>
<?xml version="1.0" encoding="UTF-8"?>
<Name>
<First>ABC</First>
<Middle>BCD</Middle>
<Lastt>ABC</Last>
<Marks>
<Subj1>89</Subj1>
<Subj2>89</Subj2>
<Subj3>89</Subj3>
</Marks>
</Name>
<SECTIONCNT>6</SECTIONCNT>
I tried to create the file using utl functions, But it didnt work. I would like to know is there any alternative approach?
-- Anu

Answer 1

Oracle Database 10g Enterprise Edition Release 10.2.0.5.0 - 64bi
PL/SQL Release 10.2.0.5.0 - Production
CORE 10.2.0.5.0 Production
TNS for Solaris: Version 10.2.0.5.0 - Production
NLSRTL Version 10.2.0.5.0 - Production
I used the below query to get the XML data from relational tables.
To fetch the header :
SELECT XMLELEMENT (NAME "BATCHHEADER", batch_name) bname
FROM AP_BATCHES_ALL ab
WHERE ab.batch_id = c_batch_id AND ab.org_id = c_org_id;
For the details :
SELECT '<?xml version="1.0" encoding="UTF-8" ?>'
|| XMLELEMENT (
NAME "ABCD",
XMLELEMENT (
NAME "BankSvcRq",
XMLELEMENT (
NAME "RqUID",
'00000000-0000-0000-0000-000000'
|| TO_CHAR (SYSDATE, 'MMDDYY')),
XMLELEMENT (
NAME "XferAddRq",
XMLELEMENT (
NAME "RqUID",
'00000000-0000-0000-0000-000000'
|| TO_CHAR (SYSDATE, 'MMDDYY')),
XMLELEMENT (NAME "PmtRefId", invoice_num),
XMLELEMENT (
NAME "CustId",
XMLFOREST ('B-Bank' AS "SPName",
'B-BankID' AS "CustPermId")),
XMLELEMENT (
NAME "XferInfo",
XMLELEMENT (
NAME "DepAcctIdFrom",
XMLELEMENT (NAME "AcctId", '123456'),
XMLELEMENT (NAME "AcctType", 'DDB'),
XMLELEMENT (NAME "Name", 'Corelogic'),
XMLELEMENT (
NAME "BankInfo",
XMLFOREST ('ABC' AS "BankIdType",
'11111111' AS "BankId"))),
XMLELEMENT (
NAME "DepAcctIdTo",
XMLELEMENT (NAME "AcctId", '888888'),
XMLELEMENT (NAME "AcctType", 'DDD'),
XMLELEMENT (NAME "Name", 'Comerica Bank'),
XMLELEMENT (
NAME "BankInfo",
XMLFOREST ('ABCD' AS "BankIdType",
'11111111' AS "BankId"))),
XMLELEMENT (
NAME "RemoteCheckPayee",
(SELECT XMLELEMENT (NAME "PayeeName",
vendor_name)
FROM po_vendors po
WHERE po.vendor_id = ai.vendor_id)),
XMLELEMENT (
NAME "CurAmt",
XMLFOREST ( invoice_amount AS "Amt",
payment_currency_code AS "CurCode")),
XMLELEMENT (NAME "DueDt",
TO_CHAR (SYSDATE, 'YYYY-MM-DD')),
(SELECT XMLAGG (
XMLELEMENT (
NAME "RefInfo",
XMLFOREST (
'Originator to Beneficiary '
|| distribution_line_number AS "RefType",
ad.description AS "RefId"))
ORDER BY distribution_line_number ASC)
FROM ap_invoice_distributions_all ad
WHERE ad.invoice_id = ai.invoice_id)),
XMLELEMENT (
NAME "PrinterInfo",
XMLELEMENT (
NAME "PrinterId",
'ABCD-Printer')))))
lc_qry
FROM ap_invoices_all ai
WHERE batch_id = 1168207
AND org_id = 13
And for the trailer:
SELECT XMLELEMENT (NAME "BATCHTRAILER", COUNT (1)) cnt
FROM ap_invoices_all ai
WHERE invoice_id = NVL (c_invoice_id, invoice_id)
AND batch_id = c_batch_id
AND org_id = c_org_id
Since the details query is having avery long output, I cant print this in one shot. So I am breaking the line and writing the same in the output file.
But this results in breaking the tags/data,
Regards,
Anupama