紧急求助：帮我看看一个SQL存储过程，错在什么地方？

Question

第一个试试这样：
CREATE OR REPLACE  PROCEDURE  SP_TEST(
   lpMoblieno in varchar2(11),
   lpStartZip out varchar2(6)   
  )
将
   lpMoblieno in varchar2(11),
   lpStartZip out varchar2(6)  
改为：
   lpMoblieno in varchar2,
   lpStartZip out varchar2

Answer 1

1: 
CREATE OR REPLACE  PROCEDURE  SP_TEST(
   lpMoblieno in varchar2(11),
   lpStartZip out varchar2(6)   
  )
as
begin
  Select vc_postcode
  into lpStartZIP
  from zq_userinfo
  where vc_mobileno=:lpMobileno;  
end SP_TEST; 

Answer 2

谢谢 qiaozhiwei(乔)
我写完之后就自己尝试了一下，发现的确如你所说那样去修改。现在就主要是第二个的问题。 

Answer 3

CREATE OR REPLACE PROCEDURE SP_TEST(
   lpMoblieno in Varchar2,
   lpStartZip out Varchar2   
  )
as
begin
  Select vc_postcode
  into lpStartZIP
  from zq_userinfo
  where vc_mobileno=lpMoblieno;  
end SP_TEST;

Answer 4

to ORARichard(没钱的日子好难过啊) 
你的方法好像不行啊。

Answer 5

第二个：
create or replace procedure Sp_ZQ_DivideRegion()
改为
create or replace procedure Sp_ZQ_DivideRegion

Answer 6

Create Or Replace Procedure Sp_Zq_Divideregion As
  Cursor Zqcursor Is
    Select Startzip, Endzip, Namekeyword, Region, Priority
      From Config_Gotone_Zq
     Order By Priority Desc;
  Curs_Row Zqcursor%Rowtype;
Begin
  For Curs_Row In Zqcursor Loop
    Update Zq_Userinfo
       Set Vc_Region = Curs_Row.Region
     Where (Vc_Feepostcode >= Curs_Row.Startzip And
           Vc_Feepostcode >= Curs_Row.Endzip)
       And (Vc_Postcode >= Curs_Row.Startzip And
           Vc_Postcode >= Curs_Row.Endzip);
  End Loop;
End Sp_Zq_Divideregion;

Answer 7

谢谢 liuyi8903(西西)
刚刚看了书，这次理解了。