DBAsupport.com Forums - Powered by vBulletin
Results 1 to 2 of 2

Thread: pls 00103: encountered the symbol exception

  1. #1
    Join Date
    Sep 2010
    Posts
    1

    Question pls 00103: encountered the symbol exception

    FUNCTION A(O_error_message IN OUT VARCHAR2
    ) RETURN NUMBER IS

    // all declarations -- no error here

    cursor c1;

    cursor c2;

    cursor c3;

    BEGIN

    P_SKU :=NULL;
    P_STORE :=NULL;
    P_CLEARANCE :=NULL;
    P_ZONE_GROUP_ID :=NULL;
    P_PRICE :=NULL;
    --COUNTER :=0;

    for c_eff in c1 loop
    exit when c1%notfound;
    begin
    flag_clear_susp_head :=0;
    open c_rec(c_eff.effective_date);
    loop
    fetch c_rec into P_SKU,P_STORE,P_EVENT_NO,P_DEPT,P_ORIGINAL_EFFECTIVE_DATE,P_EFFECTIVE_DATE,P_PRICE,P_TRAN_TYPE,
    P_STATUS,P_MANUAL_CHANGE_IND,P_MERCH_IND,P_TICKET_TYPE,P_REASON_MSI,P_SEASONAL_CLEAR_MSI;

    exit when c_rec%notfound;
    begin

    P_Print_worksheet_at_loc_msi := 'Y';


    --if O_return_code='TRUE' then

    if flag_clear_susp_head=0 then
    insert into clear_susp_head (CLEARANCE,
    CLEARANCE_DESC,
    REASON,
    STATUS,
    ZONE_GROUP_ID,
    ORIG_ZONE_GROUP_ID,
    CREATE_DATE,
    CREATE_ID,
    APPROVAL_DATE,
    APPROVAL_ID,
    PRINT_WORKSHEET_AT_LOC_MSI,
    SEASONAL_CLEAR_MSI)
    values
    (P_CLEARANCE,
    'CODI SKU' ,
    3,
    'S',
    P_ZONE_GROUP_ID,
    P_ZONE_GROUP_ID,
    sysdate,
    user,
    sysdate,
    user,
    P_Print_worksheet_at_loc_msi,
    'Y');
    flag_clear_susp_head:=1;

    --end if;

    end if;

    for c_szp in c3(P_SKU) loop
    exit when c3%notfound;

    begin
    INSERT INTO CLEAR_SUSP_DETAIL (CLEARANCE,
    SKU,
    ZONE_GROUP_ID,
    ZONE_ID,
    MARKDOWN_NBR,
    ACTIVE_DATE,
    UNIT_RETAIL,
    DOWNLOADED_DATE,
    STATUS)
    VALUES
    (P_CLEARANCE,
    P_SKU,
    P_ZONE_GROUP_ID,
    c_szp.zone_id,
    1,
    P_EFFECTIVE_DATE,
    0, -- hard coded unit retail
    NULL,
    'S');
    end loop;



    commit;
    end loop ;
    CLOSE C_REC;
    end loop ;


    RETURN 0;


    EXCEPTION

    WHEN OTHERS THEN

    O_error_message := SQL_LIB.CREATE_MSG('PACKAGE_ERROR',
    SQLERRM,
    'A',
    to_char(SQLCODE));
    O_error_message := O_error_message ||' SKU ' || P_SKU || ' STORE ' || P_STORE ;

    ROLLBACK;
    RETURN -1;

    END A;



    I m getting the following error
    Error(865,1): PLS-00103: Encountered the symbol "EXCEPTION" when expecting one of the following: begin case declare end exit for goto if loop mod null pragma raise return select update while with << close current delete fetch lock insert open rollback savepoint set sql execute commit forall merge pipe


    Cant understand why..
    Any suggestions would be of great help.

  2. #2
    Join Date
    Jul 2002
    Location
    Lake Worth, FL
    Posts
    1,492

    Thumbs down Spaghetti code

    Maybe if you format your spaghetti code it would be easier for you to find the problem.

    Hint: Then use the "code" tags to post it (Select your code and click on the "#" icon in the upper menu).
    "The person who says it cannot be done should not interrupt the person doing it." --Chinese Proverb

Tags for this Thread

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  


Click Here to Expand Forum to Full Width