請教：關(guān)于oracle 9I wrap命令的編譯錯誤

gqj100

UPDATE H_KM SET DJKM = (
                            SELECT (SELECT DECODE(COUNT(*)-1,0,1,0)
                                              FROM H_KM t
                                              WHERE KM        LIKE m.KM||'%'    AND
                                                    ZTBM       = v_ZTBM         AND
                                                    DEPARTCODE = v_DEPARTCODE
                                    )
                              FROM H_KM m
                              WHERE ZTBM       = v_ZTBM        AND
                                    DEPARTCODE = v_DEPARTCODE  AND
                                    KM         = H_KM.KM
                            )
      WHERE ZTBM       = v_ZTBM        AND
            DEPARTCODE = v_DEPARTCODE  ;
這段程序在Package中運(yùn)行時(shí)沒有問題的，但是wrap的時(shí)候卻不能通過
我懷疑9I 的wrap采用的語法還是oracle7下面的，因?yàn)閛racle7不支持這種語法，其實(shí)就是view中套一個(gè)view，
9I下面編譯錯誤信息：
PL/SQL Wrapper: Release 9.0.1.1.1- Production on Sun Feb 06 11:30:30 2005

Copyright (c) Oracle Corporation 1993, 2001.  All Rights Reserved.

Processing CWCODE.PCK to CWCODE.plb
PSU(103,1,281,37):Encountered the symbol "SELECT" when expecting one of the following:

   ( - + case mod not null others <an identifier>;
   <a double-quoted delimited-identifier>; <a bind variable>; avg
   count current exists max min prior sql stddev sum variance
   execute forall merge time timestamp interval date
   <a string literal with character set specification>;
   <a number>; <a single-quoted SQL string>; pipe

PSU(103,1,286,37):Encountered the symbol "" when expecting one of the following:

   . ( * @ % & - + ; / at for mod rem <an exponent (**)>; and or
   group having intersect minus order start union where connect
   ||

哪位朋友能否指點(diǎn)一下，是不是oracle的wrap程序有問題？感覺wrap的編譯語法還是oracle7似的