Oracle PLSQL读取(解析)Excel文档

samt007

18977916685 发表于 2018-2-16 17:07
因为我不是学开发，我是初级运维，很多都不太懂，我的想法是将excel放到directories下，执行一个可用的sql ...

确实是需要一定的基础才可以弄好。当时我写开发文档也有一定的偷懒哈。
不过核心的处理代码都完整贴出来了，别的细节的知识点最好自己弄弄咯。否则以后出问题了也不知道怎么解决。

samt007

18977916685 发表于 2018-2-16 17:07
因为我不是学开发，我是初级运维，很多都不太懂，我的想法是将excel放到directories下，执行一个可用的sql ...

我有更新了FILE包，在帖子首页那里，你下载试试看能不能用。
不过说真的，如果没一定的基础很难搞好这个的。要不你找属性这块的同事帮你一下吧

fs80

下下来看看，目前导数据用的是WEB ADI

xgstcn

学习,学习,多谢分享

samt007

CREATE OR REPLACE PACKAGE APPS.XYG_PUB_DATA_UPLOAD_PKG
AS
   /******************************************************************************
      NAME:       XYG_PUB_DATA_UPLOAD_PKG
      PURPOSE:    公用的上传PKG For XYG 模组

      REVISIONS:
      Ver        Date        Author           Description
      ---------  ----------  ---------------  ------------------------------------
      1.0        2012/01/04   Sam.T          1,New Create the pkg
      1.1        2012/06/28   Sam.T          1, 增加单行的输出
      1.2        2015/05/06   Sam.T          1, 增加解析Excel的过程！直接输出变量
   ******************************************************************************/

   ---全局参数
   V_USER_ID               NUMBER := NVL(FND_PROFILE.VALUE('USER_ID'),-1);--FND_GLOBAL.USER_ID;
   --User ID, Sysadmin here
   V_LOGIN_ID              NUMBER := NVL(FND_PROFILE.VALUE('login_ID'),-1); --FND_GLOBAL.LOGIN_ID;
   
   ---调试的级别
   G_LEVEL0        CONSTANT  NUMBER := 0;
   G_LEVEL1        CONSTANT  NUMBER := 1;
   G_LEVEL2        CONSTANT  NUMBER := 2;
   G_LEVEL3        CONSTANT  NUMBER := 3;
   G_LEVEL4        CONSTANT  NUMBER := 4;
   G_LEVEL5        CONSTANT  NUMBER := 5;
   ----
   ---是否为调试模式
   /*
   G_DEBUG_LEVEL:调试的级别
   0：不启动调试
   1：调试程序主要流程，不进入任何的循环
   2：第一层主循环(游标的每批处理)的信息
   3：第二层循环，进入到每一行的处理
   4：第三层循环，每一行的明细的调试信息
   5：第四层循环，调试最明细的信息
   */
   G_DEBUG_LEVEL           NUMBER := 0;
   ---DBMS_OUTPUT直接输出/FILE_OUTPUT文档输出/REQUEST_OUTPUT请求日志输出/CONTEXT_OUTPUT 将日志改为上下文输出(暂不支持)
   G_DEBUG_TYPE            VARCHAR2(240) := 'DBMS_OUTPUT';
   --G_CONTEXT_OUTPUT        VARCHAR2(4000);
   
   type VARCHAR2_TBL_TYPE_1 is table of varchar2(1) index by binary_integer;
   type VARCHAR2_TBL_TYPE_50 is table of varchar2(50) index by binary_integer;
   type VARCHAR2_TBL_TYPE_240 is table of varchar2(240) index by binary_integer;
   type VARCHAR2_TBL_TYPE_2000 is table of varchar2(2000 CHAR) index by binary_integer;
   type NUMBER_TBL_TYPE is table of number index by binary_integer;
   type DATE_TBL_TYPE is table of DATE index by binary_integer;
   type vc_arr2 is table of varchar2(32767) index by binary_integer;
   
   -------------------------------------
   --3,管道表函数！将BLOB的Excel文件解析，并输出一个表格
   -------------------------------------
   FUNCTION CONVER_EXCEL_TO_TAB(
      P_DOCUMENT       BLOB
     ,P_SHEETS         IN VARCHAR2 DEFAULT NULL
     ,P_RAISE          IN NUMBER DEFAULT XYG_PUB_CONST_PKG.C_TRUE
   )
      RETURN XYG_PUB_DATA_UPLOAD_OBJ_TAB
      PIPELINED;

END XYG_PUB_DATA_UPLOAD_PKG;

newkid

楼主还没放弃钻研，必须点赞！

samt007

newkid 发表于 2024-4-2 04:03
楼主还没放弃钻研，必须点赞！

感谢支持哈。最近有个网友要用这个功能，咨询了一下我怎么弄，就再整理一下代码哈。