Strange question on error message " PLS-00103: Encountered the symbol " " "" ( Urgent)

From: Paul <jiacheng_work_at_yahoo.com>
Date: 29 Oct 2001 04:05:39 -0800
Message-ID: <f294310c.0110290405.7c115c6@posting.google.com>

SQL> create or replace procedure RebuildDictionary as   2 iDocID number;
  3 sNotes varchar2(3999);
  4 Ignore4 number;
  5 thecursor4 number;
  6 strSQL4 varchar2(255);
  7 Begin
  8 strSQL4:='SELECT DocketID,DocketNotes FROM tblDocket';   9 thecursor4:= DBMS_SQL.OPEN_CURSOR;
 10 DBMS_SQL.PARSE(thecursor4,

 11          strSQL4,
 12          DBMS_SQL.NATIVE);
 13        DBMS_SQL.DEFINE_COLUMN(thecursor4,1 ,iDocID);
 14          DBMS_SQL.DEFINE_COLUMN(thecursor4,2 ,sNotes,3999);
 15        ignore4 := DBMS_SQL.EXECUTE(thecursor4);

 16 <<DocLoop>> loop
 17 IF DBMS_SQL.FETCH_ROWS(thecursor4) > 0 THEN  18 -- Get column values

 19        DBMS_SQL.COLUMN_VALUE(thecursor4,1 ,iDocID);
 20          DBMS_SQL.COLUMN_VALUE(thecursor4,2 ,sNotes);
 21           if sNotes is not null then
 22                  UpdateDictionaryXRef(iDocID,604,sNotes);
 23           end if; |17 here       
 24    Else
 25            exit DocLoop;

 26 end if;
 27 end loop DocLoop;
 28 --close the cursor
 29 DBMS_SQL.CLOSE_CURSOR(thecursor4);  30 end;
 31 /

Warning: Procedure created with compilation errors.

SQL> sho err
Errors for PROCEDURE REBUILDDICTIONARY:

LINE/COL ERROR

-------- -----------------------------------------------------------------
23/17    PLS-00103: Encountered the symbol " " when expecting one of the
         following:
         begin declare else elsif end exit for goto if loop mod null
         pragma raise return select update while <an identifier>


         <a double-quoted delimited-identifier> <a bind variable> <<

         close current delete fetch lock insert open rollback
         savepoint set sql execute commit forall


         <a single-quoted SQL string>

Received on Mon Oct 29 2001 - 06:05:39 CST