Oracle EBS R12 XML数据表格的Excel脚本报表

一.概述

在EBS系统中，报表是一个非常重要的客户化开发内容，也是系统一种比较常见的数据输出形式。报表的做法有很多种，输出格式也有多种，较为常见的就是“数据文件+报表模板”的形式，例如用脚本程序输出XML数据源，RTF模板控制数据格式的方式。也有直接用PLSQL程序输出HTML格式的报表，数据和格式统一在程序中控制。

Excel是一种非常常用的办公软件，操作比较容易被用户接受，对表格中数据的控制也比较容易，一系列的公式支持也为用户节省了很大的工作量。

Excel标准格式为".xls"或".xlsx"文件格式，也可以另存为XML数据表格的格式（".xml"），这就为程序直接输出XML格式的脚本来生成Excel表格提供了有利条件。经过实际的操作，利用这种方式输出的报表，可以在EBS R12中输出，在Excel中打开，并且可以进行表格相关格式控制。

注1：Excel文件 ”.xls” 或”.xlsx” 另存为”.xml”文件可能存在兼容性问题。

注2：Excel文件”.xls” 或”.xlsx”与”.xml”之间的相互转换可能存在一些对象的不相互兼容问题（例如”.xls”或”.xlsx”中的图表）。相关支持内容请查看MSDN。

二. 解决的问题

2.1 解决的问题

以当前项目中的实际为例，客户要求对生产计划和效率产出做一个比较，月初做计划，月底做对比，提交并发程序输出报表。设计文档中报表的样式为Excel表格，其中一些特殊的格式，例如竖排文字，多次汇总，分隔汇总，数据格式控制，公式，字体，表格状的动态增长报表，经过分析，这种形式的报表用Excel的形式输出是非常合适的，相类似HTML在格式控制上没有Excel灵活。

所以此文需要解决的问题是，输出Ecxel脚本报表。Excel的”.xls”或”.xlsx”为二进制文件，直接输出二进制脚本可行性并不大，难度大，所以改用XML脚本的Excel文件来输出。

2.2 准备

相关工具及输入输出

编程：PLSQL Developer X

输出：XML

系统：EBS R12

浏览器：（建议为）IE8及以上版本

其他：Office 20XX

注：多次测试发现IE6在打开特定头的XML文件时，常出现卡死状态，不建议使用。

三. 一个最简单的XML格式的Excel报表

把”.xls”或”.xlsx”文件以”XML数据表格”的格式另存，用记事本或其他文本编辑器打开，就可以看到此表格的XML脚本。这种形式的Excel文件脚本大体分为4个部分，XML头，Excel样式，Sheet主数据块，XML尾。



其中有一些部分的信息是可以没有的，经过简化，将一个最基本的文件结构提取出来，形成如下的例子。

3.1 脚本代码

<?xml version="1.0"?>
2 <?mso-application progid="Excel.Sheet"?>
3 <Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
4  xmlns:o="urn:schemas-microsoft-com:office:office"
5  xmlns:x="urn:schemas-microsoft-com:office:excel"
6  xmlns:ss="urn:schemas-microsoft-com:office:spreadsheet"
7  xmlns:html="http://www.w3.org/TR/REC-html40">
8  <Worksheet ss:Name="Demo Sheet">
9   <Table>
<Row>
<Cell><Data ss:Type="String">Hello!World!</Data></Cell>
</Row>
<Row>
<Cell><Data ss:Type="String">Hello!World!</Data></Cell>
</Row>
<Row>
<Cell><Data ss:Type="String">Hello!World!</Data></Cell>
</Row>
</Table>
</Worksheet>
</Workbook>

3.2 效果

用Excel打开文件，效果如下：

四. XML格式的Excel文件结构分析

分析文件结构，能够使我们清楚的掌握要用程序输出一个正确的脚本所必须的要素。XML和HTML的一个很大的区别在于，HTML为已定义的标签，每一个标签在浏览器中作用并不会存在很大的冲突，这里的意思是，浏览器在解释HTML脚本的时候，并不会太严格，原因是互联网刚发展的时候网络并不佳，请求丢包很多，所以HTML在丢失少量tag或某些特殊字符时，并不会出现严重的问题。但是XML不一样，XML是结构化自定义的，在确定了namespaces的情况下，必须按照namespace的结构定义来组成XML文件，特别是应用程序特殊处理的XML文件，不能出现细微错误的情况，例如tag有开始没有结束时，在Excel中就无法正确打开这个XML文件。

XML数据表格格式的Excel文件的顶级tag是Workbook，二级Tag主要有：

以下分别说明每一个tag的用途和主要属性。

4.1 XML头

头信息（必须）

<?xml version="1.0"?>

<?mso-application progid="Excel.Sheet"?>

XML文件头以

<?xml version="1.0"?>

开始，表明这是一个XML文件；对于需要用Excel来默认打开的XML文件，需要再加一句：

　　　　　　<?mso-application progid="Excel.Sheet"?>

表明此XML文件用Excel默认打开。

注：后者其实可以不添加，打开时右键用Excel打开也是可行的，但是不推荐。

4.2 Tag: Namespaces

Namespaces信息（必须，固定内容）

<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
xmlns:o="urn:schemas-microsoft-com:office:office"
xmlns:x="urn:schemas-microsoft-com:office:excel"
xmlns:ss="urn:schemas-microsoft-com:office:spreadsheet"
xmlns:html="http://www.w3.org/TR/REC-html40">

这个部分为XML的开始，我们可以看到XML电子表格格式的Excel文件的顶级tag是<workbook> ，放在这个tag里面的属性为Namespace信息，相关控制文件都来自Microsoft.com，说明Excel在打开这种类型的XML文件的时候，是严格按照这几个Namespaces的格式来读取文件的。

这个部分的Namespaces信息为固定的，必须的内容。

4.3 Tag: DocumentProperties

DocumentProperties（非必须）

一个例子：

<DocumentProperties xmlns="urn:schemas-microsoft-com:office:office">
<Created>2012-02-13T11:21:51Z</Created>
<LastSaved>2012-02-13T14:03:08Z</LastSaved>
<Version>14.00</Version>
</DocumentProperties>

这个部分主要设置Excel的文档属性内容，可以看到里有创建时间，修改时间和版本信息。

注：这个部分的信息非必须的意思是，系统输出XML之后，其实还是”.xml”格式的文件，用Excel打开之后，保存，这些信息会自动添加到脚本中，如果程序要求中不需要这样的信息，可以不添加。

4.4 Tag: OfficeDocumentSettings

OfficeDocumentSettings （非必须）

一个例子

<OfficeDocumentSettings xmlns="urn:schemas-microsoft-com:office:office">
<AllowPNG/>
<RemovePersonalInformation/>
</OfficeDocumentSettings>

这个部分设置Offce 文档属性。

4.5 Tag: ExcelWorkbook

ExcelWorkbook （非必须）

一个例子：

<ExcelWorkbook xmlns="urn:schemas-microsoft-com:office:excel">
<WindowHeight>11640</WindowHeight>
<WindowWidth>19200</WindowWidth>
<WindowTopX>0</WindowTopX>
<WindowTopY>90</WindowTopY>
<ProtectStructure>False</ProtectStructure>
<ProtectWindows>False</ProtectWindows>
</ExcelWorkbook>

这个部分设置工作表的属性。

4.6 Tag: Styles

Styles（非必须）

Style是一个可以作很大文章的部分，里面的属性设置包含了Excel里面常见的所有单元格，数据，颜色，方向等等，以ID的方式关联到具体的行，列或者单元格，对工作薄的格式设置支持比较完全。

一个例子：

<Styles>
2 <Style ss:ID="m76469184">
3 <Alignment ss:Vertical="Bottom" ss:Rotate="90" ss:Horizontal="Center"/>
4 <Borders>
5 <Border ss:Weight="1" ss:LineStyle="Continuous" ss:Position="Bottom"/>
6 <Border ss:Weight="1" ss:LineStyle="Continuous" ss:Position="Left"/>
7 <Border ss:Weight="1" ss:LineStyle="Continuous" ss:Position="Right"/>
8 <Border ss:Weight="1" ss:LineStyle="Continuous" ss:Position="Top"/>
9 </Borders>
<Font ss:Size="8" ss:FontName="Helv" ss:Bold="1" x:Family="Swiss"/>
<Interior ss:Color="#FFFF99" ss:Pattern="Solid"/>
<NumberFormat ss:Format="Fixed"/>
</Style>
</Styles>

以上这个例子中，<Styles>中可以有若干个<Style>，每一个Style确定一种样式，以ID区分不同的样式(ID为必须，如果ID为”Default”，则该样式为默认样式，只能有一个”Defulat”样式)。可以看到，样式定义中，可以定义对其方式，边框，字体，填充，数据格式等。

常用样式解释如下

<Alignment>

主要属性有：

属性	值
ss:Vertical	枚举：Bottom/Center/Top
ss:Horizontal	枚举：Left/Center/Right
ss:Rotate	数字，逆时针旋转，例如“90”代表单元格内容逆时针旋转90度
ss:WrapText	数字，“1”代表此单元格为多行显示

< Borders >

Borders里面下一级tag为Border，每一个Border为一个方向的边框格式设置，Border属性主要有：

属性	值
ss:Position	枚举：Bottom/ Left/ Right/ Top
ss:LineStyle	枚举：Continuous/…
ss:Weight	数字，边框粗细

<Font>

主要属性有：

属性	值
ss:FontName	枚举，字体
x:Family	枚举，字体类
ss:Bold	数字，1代表加粗
ss:Italic	数字，1代斜体
ss:Size	数字，字体大小
ss:Underline	枚举：Single/…
ss:Color	RGB或颜色号，文字颜色（不是填充颜色）

<Interior>

主要属性有：

属性	值
ss:Color	RGB或颜色号，填充颜色（不是字体颜色）
ss:Pattern	枚举：Solid/…，填充类型

<NumberFormat>

主要属性为

属性	值
ss:Format	”0.0”/”0”/”Fixed”/”0%”/…

4.7 Tag: Worksheet

Worksheet（必须）

这个部分为工作薄的数据表格部分，格式引用Styles中定义的Style。一个例子：

<Worksheet ss:Name="Sheet1">
2 <Table ss:DefaultColumnWidth="54" ss:StyleID="s119" ">
3 <Column ss:StyleID="s119" ss:Width="34.5" ss:AutoFitWidth="0"/>
4 <Column ss:StyleID="s119" ss:Width="34.5" ss:AutoFitWidth="0"/>
5 <Column ss:StyleID="s119" ss:Width="34.5" ss:AutoFitWidth="0"/>
6 <Row ss:StyleID="s28" ss:Height="15" ss:AutoFitHeight="0">
7 <Cell ss:StyleID="s17"><Data ss:Type="String">data here</Data></Cell>
8 <Cell ss:StyleID="s17"><Data ss:Type="String">data here</Data></Cell>
9 <Cell ss:StyleID="s17"><Data ss:Type="String">data here</Data></Cell>
</Row>
<Row ss:StyleID="s28" ss:Height="15" ss:AutoFitHeight="0">
<Cell ss:StyleID="s17" ss:MergeAcross="1" ><Data ss:Type="String">data here</Data></Cell>
<Cell ss:StyleID="s17"><Data ss:Type="String">data here</Data></Cell>
</Row>
</Table>
<Worksheet>

每一个Worksheet代表一个工作薄，即Excel中每一个工作页，”ss:Name” 代表工作表的名字，可以有多个工作表，不可重名。

<Worksheet>二级标签主要是<Table>和<WorksheetOptions>

4.7.1 <Table> （必须）

每一页工作表为一个Table，Table标签常用属性有

属性	值
ss:DefaultColumnWidth	数字，默认列宽
ss:StyleID	引用样式ID

注：每一处引用Style样式（包括后面的单元格样式），必须在之前的Styles标签中定义过，否则无法正常打开文件。

Table的二级标签主要是<Column>和<Row>：

<Column>主要作用是放在< Row >之前，控制每一列的宽度，不作显示数据用；

< Row >是具体行，<Row>标签内是<Cell>，确定行内的每一个单元格。

Table的形式是这样的，先确定列宽度，然后确定行，然后确定单元格，其中值得注意的是列宽只能在<Column>的属性里确定，不能在<Cell>里指定单元格宽度；行高只能在<Row>的属性里确定，不能在<Cell>里指定单元格高度，否则会出现问价无法发开的情况。例如这样设置是正确的：

<Column ss:StyleID="xxC" ss:Width="35" ss:AutoFitWidth="0"/>

<Row ss:StyleID="xxR" ss:Height="15" ss:AutoFitHeight="0">

<Column>主要属性有：

属性	值
ss:Width	数字，宽度
ss:AutoFitWidth	数字，”0”代表非自动宽度

<Row>主要属性有：

属性	值
ss:Height	数字，高度
ss:AutoFitHeight	数字，”0”代表非自动高度

<Cell>内一般放置单元格的内容，用<Data>来包裹内容，<Cell>的主要属性有：

属性	值
ss:MergeAcross	数字，向右合并单元的数
ss:MergeDown	数字，向下合并单元格数
ss:Index="5"	标记列号，index列号不受合并影响。

注：列号可以不指定，但是不便于代码阅读，例如，在A1这个<Cell>位置做了向下合并3，向右合并2，代码如下来编写：

<Table>
2 <Row>
3 <Cell ss:Index="1" ss:MergeDown="3" ss:MergeAcross="2"><Cell/
4 <Cell ss:Index="4" ><Cell/>
5 </Row>
6 <Row>
7 <Cell ss:Index="4" ><Cell/>
8 </Row>
9 <Row>
<Cell ss:Index="4" ><Cell/>
</Row>
<Row>
<Cell ss:Index="4" ><Cell/>
14 </Row>
<Row>
<Cell ss:Index="1" ><Cell/>
<Cell ss:Index="2" ><Cell/>
<Cell ss:Index="3" ><Cell/>
19 <Cell ss:Index="4" ><Cell/>
20 </Row>
</Table>

效果：



<Data>的属性主要有：

属性	值
ss:Type	枚举：”String”/”Number”/…

4.7.2 <WorksheetOptions> （非必须）

此处为一些附加信息，例如

<WorksheetOptions xmlns="urn:schemas-microsoft-com:office:excel">
<PageSetup>
<Print>
<Zoom>80</Zoom>
5 <Selected/>
<Panes>
<ProtectObjects>False</ProtectObjects>
<ProtectScenarios>False</ProtectScenarios>
</WorksheetOptions>

五. EBS系统的开发过程

在实际开发的过程中，一般流程是现在Excel中确定报表的模板，格式，然后把”.xls” 或”.xlsx” 另存为”.xml”文件，用文本编辑器编辑一些内容，删除冗余代码，然后再关键逻辑（一般是动态增长的部分）用程序逻辑来控制输出即可。可执行和并发程序的定义和标准一致，并发程序的输出用“HTML”。

5.1 PLSQL程序

PLSQL程序输出

PROCEDURE output(p_content IN VARCHAR2) IS
BEGIN
3
fnd_file.put_line(fnd_file.output, p_content);

END output;

例如用以上的方法输出，就可以在并发程序的输出中查看，而在程序中，输出的方法，形式，按照具体的需求来就行，和PLSQL输出HTML报表的做法大致相同。

5.2 可执行及并发程序

可执行定义

定义可执行为PL/SQL程序，关联相应的程序包方法，例如：

并发程序定义

定义并发程序关联可执行，设置参数，例如：

5.3 效果

打开方式及效果

并发程序输出用Excel方式打开：



浏览器中可选择以下方式：



保存或者直接打开，选择“打开”时如下的提示，选择”是”：



如果XML脚本正确，Excel就可以打开：



如果是之前是的是“保存”，然后手动打开，会有如下提示：



点击“是”直接打开。

5.4 快速获取XML脚本

逆向工程

对于开发时，没有必要一行一行的写脚本，先用Excel编辑”.xls” 或”.xlsx” 文件，然后另存为”.xml”文件，把一些非必须的脚本代码删除，有关键逻辑的地方特殊处理，就可以在plsql代码中直接输出了。

对于一些特殊的格式，属性的设置，也没有太大的必要去记住，在需要时，”.xls” 或”.xlsx” 文件逆向工程生成XML文件就可以根据ID查出单元格等各种属性的设置。

注：用逆向工程生成的代码，在<styles>内重复率很高，代码重用率不高，对于这种代码，可以进行合并，在指定worksheet里各个tag的属性时，根据需要，调整ID，清除不必要的重复。