ケースユーザ（PLSQL、匿名ブロック）から読み込んだときに条件が正しく実行されない場合

Question

私のコードを実行すると、そのコード内のステートメントに関係なく、すべてのケース条件を通過するようです。私が達成しようとしている何

：

• 私は、ユーザーからの単純な整数を読んで、彼は0値を入力した場合、私はプログラムを終了し、loopを終了したいと思います。
  • はcase

  実行例のすべてのwhen文が入ります：

  1. プログラムは、（整数の入力をユーザーに尋ねる私はプログラムを実行するとどうなり

0/1/2/3）

ユーザエンティティRS 0（プログラムはループを終了し、壊す必要があります）

市の詳細情報を要求します（行32）

私は都市の詳細を入力し、プログラム

走り続けることをしようとしていませんコードを開発しました：

SET SERVEROUTPUT ON; 

declare 
    poli_name poli.name%type; 
    poli_lat poli.lat%type; 
    poli_lon poli.lon%type; 
    counter int :=1; 

    cursor poli_c is select name,lat,lon from poli; 

    number_of_cities int; 

    epilogi number; 

begin 
    dbms_output.put_line('Select 1 To Enter Details'); 
    dbms_output.put_line('Select 2 To View All The Details'); 
    dbms_output.put_line('Select 3 To Run Group Algorithm'); 
    dbms_output.put_line('Select 0 To Exit The Programm'); 

    epilogi:=&Epilogi; 

    loop 
     case epilogi 
      when 0 then 
       dbms_output.putline('Exiting Programm...'); 
       exit; 
      when 1 then 
       name_c := &Enter_City_Name; --line 32 
       lat := &Enter_City_Lat; 
       lon := &Enter_City_Lon; 

       if lon >= -180 and lon <= 180 and lat >= -90 and lat <= 90 then 
        select count(id) into number_of_cities from poli; 

        if number_of_cities <= 15 then 
         insert into poli values(counter,name_c,lat,lon); 
         dbms_output.putline('City Successfully Added'); 
        else 
         dbms_output.putline('Cities Can Not Be More Than 15'); 
        end if; 
       else 
        dbms_output.putline('Wrong Longitude Or Latidute Values'); 
       end if; 
      when 2 then 
       open poli_c; 
       fetch poli_c into poli_name,poli_lat,poli_lon; 
       dbms_output.put_line('Onoma Polis:'||poli_name); 
       dbms_output.put_line('Latidute '||poli_name||': '||poli_lat); 
       dbms_output.put_line('Longtidute '||poli_name||': '||poli_lon); 
       close poli_c; 
      when 3 then 
       null; 
      else 
       dbms_output.put_line('Wrong input - try again...'); 
     end case; 

     counter := counter+1; 
     epilogi := &Epilogi; 
    end loop; 
end; 

私は間違って何かしていますか？それは何でしょうか？御時間ありがとうございます。

Answer 1

& Varは置換変数です。

& Epilogi、& Enter_City_Name、& Enter_City_Lat、& Enter_City_Lon - 彼らはすべてのスクリプトが実行され、それに渡される前に設定してください。

ケースは正しく動作していますが、実行する前にすべての変数を設定する必要があります。 たとえば、次のような場合でも、価値を提供する必要があります。

declare 
var1 int; 

begin 
    return; 
    dbms_output.put_line('Unreachable code'); 
    var1 := &v1; 


end; 

Answer 2

PostgresのCASE .. WHEN ... THEN ... ELSE ...に表現していない文であることに注意してください。したがって、式が有効な場所、つまり代入、戻り値などのどこでも使用する必要があります。

* EDIT： 本物の間違い、PLSQLとPGSQL .. Oracleの変種は、通常スラッシュ（PL/SQL）が私に混乱をもたらしました *