由于工作需要,需要生成周报,EXCEL的格式是给定的,懒得一个个将数据黏贴到表格中,所以写了个小程序,节约了两个小时的工作量,下面我将过程写出来和大家分享一下。
1.在Oracle数据库中,我将数据通过存储过程都插到了一张表里面,这张表是在正式库里面的,所有操作都做我本地数据库中进行,用dblink连接正式库;
2.在我本地数据库建这么一张表t_table_to_excel
create table T_TABLE_TO_EXCEL
(
SQLCODE VARCHAR2(3000),–SQL语句,查找到正式库中的数据
X NUMBER,–上面sql查出来的值对应在EXCEL中的行数-1
Y NUMBER,–上面sql查出来的值对应在EXCEL中的列数-1
ID NUMBER –这是我写的一个参数,便于在函数中分批返回值
)
3.创建函数
CREATE OR REPLACE FUNCTION FUN_IMPORT_EXCEL(QXMC VARCHAR2,p_ID NUMBER) RETURN VARCHAR2 AS
V_SQL VARCHAR2(1000);
QXBM VARCHAR2(22);
V_VALUE VARCHAR2(1000);
V_RESULT VARCHAR2(9000);
V_SQLERRM VARCHAR2(400);
BEGIN
BEGIN
V_RESULT := ”;