[サンプル共通関数] 対象日が属する年度の開始日を取得するFunction

投稿日：2017年12月21日更新日：2017年12月22日

対象日が属する年度の開始日を取得するFunctionサンプルです。

サンプル

例）対象日が属する年度の開始日を取得するFunction

CREATE OR REPLACE FUNCTION FNC_GET_NENDO_START(
  a IN VARCHAR2
)
RETURN VARCHAR2
IS
  dt  DATE;
  ret VARCHAR2(8);
BEGIN
  dt := TO_DATE(a, 'YYYYMMDD');
  IF EXTRACT(MONTH FROM dt) >= 4 THEN
    ret := TO_CHAR(EXTRACT(YEAR FROM dt)) || '0401';
  ELSE
    ret := TO_CHAR(EXTRACT(YEAR FROM dt) -1) || '0401';
  END IF;

  RETURN ret;

EXCEPTION
  WHEN OTHERS THEN
    RETURN NULL;
END;
/

CREATE OR REPLACE FUNCTION FNC_GET_NENDO_START(

a IN VARCHAR2

)

RETURN VARCHAR2

dt DATE;

ret VARCHAR2(8);

BEGIN

dt := TO_DATE(a, 'YYYYMMDD');

IF EXTRACT(MONTH FROM dt) >= 4 THEN

ret := TO_CHAR(EXTRACT(YEAR FROM dt)) || '0401';

ELSE

ret := TO_CHAR(EXTRACT(YEAR FROM dt) -1) || '0401';

END IF;

RETURN ret;

EXCEPTION

WHEN OTHERS THEN

RETURN NULL;

END;

実行例: SQL>select FNC_GET_NENDO_START('20171201') from dual; FNC_GET_NENDO_START('20171201') ----------------------------------------- 20170401

解説

YYYYMMDD形式の日付文字列でない場合はNULLが返ります。

執筆者：とら