[PL/SQL] GOTO文を使う

投稿日：2017年12月31日

GOTO文を使ったサンプルです。

GOTO文を使うと、処理を特定の場所に飛ばすことができます。

サンプル

例）引数が1の場合はhoge、1以外の場合はfugaを表示する

CREATE OR REPLACE PROCEDURE PRC_TEST(
  val VARCHAR2
)IS

BEGIN
  IF val = '1' THEN
    GOTO HOGE;
  ELSE
    GOTO FUGA;
  END IF;

  <<HOGE>>
  DBMS_OUTPUT.PUT_LINE('hoge');
  RETURN;

  <<FUGA>>
  DBMS_OUTPUT.PUT_LINE('fuga');
  RETURN;

END PRC_TEST;
/

CREATE OR REPLACE PROCEDURE PRC_TEST(

val VARCHAR2

)IS

BEGIN

IF val = '1' THEN

GOTO HOGE;

ELSE

GOTO FUGA;

END IF;

<<HOGE>>

DBMS_OUTPUT.PUT_LINE('hoge');

RETURN;

<<FUGA>>

DBMS_OUTPUT.PUT_LINE('fuga');

RETURN;

END PRC_TEST;

DBMS_OUTPUT.PUT_LINEで出力するには、事前に「set serveroutput on」を実行しておく必要があります。

解説

GOTOの飛び先にラベルを付けて、飛びたい所で「GOTO ラベル名」と記述します。
ラベルは、「<<ラベル名>>」という書式で記述します。

執筆者：とら