沉睡森林@漂在北京

          本處文章除注明“轉載”外均為原創,轉載請注明出處。

            BlogJava :: 首頁 :: 新隨筆 :: 聯系 :: 聚合  :: 管理 ::
            152 隨筆 :: 4 文章 :: 114 評論 :: 0 Trackbacks
          drop package TESTFUNINPROC
          /

          /*==============================================================*/
          /* Database package: TESTFUNINPROC                              */
          /*==============================================================*/
          create or replace package TESTFUNINPROC as
             type OUTLIST 
          is REF CURSOR;
             
          function TESTFUN (TYPENUM IN varchar2return outlist;
             
          procedure TESTPROC (TYPENUM IN varchar2,RESULT OUT outlist);
          end TESTFUNINPROC;
          /

          create or replace package body TESTFUNINPROC as
             
          function TESTFUN (TYPENUM IN varchar2return outlist as
             rc outlist;
               
          Begin
                     
          open rc for
                   
          select * 
                   
          from GG_BOOK book
                   
          where book.BOOK_ZBLX = typeNum ;
                   
          return rc;
               
          End;
             
          procedure TESTPROC (TYPENUM IN varchar2,RESULT OUT outlist) as
             
          Begin
                      result :
          = hblz_new.TestFunInProc.testFun(typeNum);
               
          End;
          end TESTFUNINPROC;
          /
          posted on 2009-05-21 14:37 王總兵 閱讀(260) 評論(0)  編輯  收藏 所屬分類: DataBase
          主站蜘蛛池模板: 铅山县| 贵州省| 珠海市| 盐池县| 天峻县| 安阳县| 长宁县| 巍山| 中阳县| 南陵县| 九寨沟县| 凤台县| 上虞市| 西平县| 旬阳县| 英超| 广安市| 鹰潭市| 神农架林区| 西昌市| 永川市| 奉新县| 石景山区| 皋兰县| 淄博市| 西贡区| 渭南市| 乐平市| 泾川县| 九江县| 札达县| 上栗县| 六枝特区| 巨鹿县| 东山县| 郓城县| 大姚县| 治多县| 普洱| 天镇县| 鹤岗市|