CREATE OR REPLACE FUNCTION indexof(
	c_target_char character varying,
	c_search_char character varying)
    RETURNS integer LANGUAGE 'plpgsql' COST 100 VOLATILE 
AS $BODY$
declare
BEGIN

	--文字列と検索文字列が空かnullなら0とする
	if (c_target_char is null) or (c_target_char= '') then
		return 0;
	end if;
	if (c_search_char is null) or (c_search_char = '') then
		return 0;
	end if;

	RETURN strpos(c_target_char, c_search_char);

END;
$BODY$;

 select indexOf('abcdefgh', 'f');  --【結果】:6

CREATE OR REPLACE FUNCTION convert_hiragana_to_katakana(character varying)
  RETURNS character varying AS
$BODY$
declare
	c_hiragana	alias for $1;      --引数1:置換する文字列
	c_katakana	character varying;

begin

	return
	translate(
		c_hiragana,
		'ぁあぃいぅうぇえぉおかがきぎくぐけげこごさざしじすずせぜそぞただちぢっつづてでとどなにぬねのはばぱひびぴふぶぷへべぺほぼぽまみむめもゃやゅゆょよらりるれろゎわゐゑをんゕゖ',
		'ァアィイゥウェエォオカガキギクグケゲコゴサザシジスズセゼソゾタダチヂッツヅテデトドナニヌネノハバパヒビピフブプヘベペホボポマミムメモャヤュユョヨラリルレロヮワヰヱヲンヵヶ'
	);

end;
$BODY$
  LANGUAGE plpgsql VOLATILE
  COST 100;
ALTER FUNCTION convert_hiragana_to_katakana(character varying)
  OWNER TO postgres;

select * From convert_hiragana_to_katakana('あいうえお');
--【結果】アイウエオ

-- 構文（5行で一つのSQLです）
select translate(
	'ここに変換する文字を入力します',
	'ぁあぃいぅうぇえぉおかがきぎくぐけげこごさざしじすずせぜそぞただちぢっつづてでとどなにぬねのはばぱひびぴふぶぷへべぺほぼぽまみむめもゃやゅゆょよらりるれろゎわゐゑをんゕゖ',
	'ァアィイゥウェエォオカガキギクグケゲコゴサザシジスズセゼソゾタダチヂッツヅテデトドナニヌネノハバパヒビピフブプヘベペホボポマミムメモャヤュユョヨラリルレロヮワヰヱヲンヵヶ'
);
--【結果】ココニ変換スル文字ヲ入力シマス

CREATE OR REPLACE FUNCTION convert_katakana_to_hiragana(character varying)
  RETURNS character varying AS
$BODY$
declare

	c_katakana	alias for $1;      --引数1:置換する文字列
	c_hiragana	character varying;

begin

	c_hiragana = translate(
	c_katakana,
	'ァアィイゥウェエォオカガキギクグケゲコゴサザシジスズセゼソゾタダチヂッツヅテデトドナニヌネノハバパヒビピフブプヘベペホボポマミムメモャヤュユョヨラリルレロヮワヰヱヲンヵヶ',
	'ぁあぃいぅうぇえぉおかがきぎくぐけげこごさざしじすずせぜそぞただちぢっつづてでとどなにぬねのはばぱひびぴふぶぷへべぺほぼぽまみむめもゃやゅゆょよらりるれろゎわゐゑをんゕゖ'
	);

	return c_hiragana;

end;
$BODY$
  LANGUAGE plpgsql VOLATILE
  COST 100;

select * From convert_katakana_to_hiragana('アメリカ');
--【結果】あめりか

-- 構文（5行で一つのSQLです）
select translate(
	'ココニ変換スル文字ヲ入力シマス',
	'ァアィイゥウェエォオカガキギクグケゲコゴサザシジスズセゼソゾタダチヂッツヅテデトドナニヌネノハバパヒビピフブプヘベペホボポマミムメモャヤュユョヨラリルレロヮワヰヱヲンヵヶ',
	'ぁあぃいぅうぇえぉおかがきぎくぐけげこごさざしじすずせぜそぞただちぢっつづてでとどなにぬねのはばぱひびぴふぶぷへべぺほぼぽまみむめもゃやゅゆょよらりるれろゎわゐゑをんゕゖ'
);
--【結果】ここに変換する文字を入力します

CREATE OR REPLACE FUNCTION isempty(
	c_target character varying)
    RETURNS boolean
    LANGUAGE 'plpgsql' COST 100 VOLATILE 
    
AS $BODY$
declare
	b_flg		boolean:=false; 
BEGIN

	--初期値セット
	b_flg = false;

	--""のチェック
	if trim(c_target) = '' then
		b_flg = true;
	end if;

	--nullチェック
	if c_target is null then
		b_flg = true;
	end if;

	return b_flg;

END;
$BODY$;

select isempty(null);    -- true（判定：空）
select isempty('');      -- true（判定：空）
select isempty('abc');   -- false（判定：空でない）

-- nullの時:'a' , 空文字の時:'b' , それ以外は'c'とする
select case 
when 'ここにチェックする文字を入れる' is null then 'a' 
when 'ここにチェックする文字を入れる' = '' then 'b' 
else 'c' end;

--曜日を取得する ※ 'dow' = Day of Weekの略
date_part('dow', timestamp)
date_part('dow', date)

--使用例
select date_part('dow', now());                  -- 3 (水曜日)
select date_part('dow', timestamp '2021/1/1');   -- 5（金曜日）
select date_part('dow', date '2021/2/1');        -- 1（月曜日）

CREATE OR REPLACE FUNCTION get_dayofweek(t_day timestamp without time zone)
  RETURNS character varying AS
$BODY$
declare
	c_dayofweek	character varying;
begin

	select	case 
		when date_part('dow', t_day) = 0 then '日'	
		when date_part('dow', t_day) = 1 then '月'
		when date_part('dow', t_day) = 2 then '火'	
		when date_part('dow', t_day) = 3 then '水'
		when date_part('dow', t_day) = 4 then '木'	
		when date_part('dow', t_day) = 5 then '金'
		when date_part('dow', t_day) = 6 then '土'	
	else	
		null
	end	into c_dayofweek;

	return c_dayofweek;

end;
$BODY$
  LANGUAGE plpgsql VOLATILE
  COST 100;

select get_dayofweek(timestamp '2021/01/01');  -- 金
select get_dayofweek(date '2021/1/10');        -- 日

CREATE OR REPLACE FUNCTION isdate(c_day character varying)
  RETURNS boolean AS
$BODY$
declare
	d_temp 		date;  --一時変数
BEGIN

	select cast(c_day as date) into d_temp;

    --castできる時はtrueでリターン
	return TRUE;
	
	EXCEPTION
	WHEN OTHERS THEN
	--castできずエラーになる時はfalseでリターン
	return FALSE;

END;
$BODY$
  LANGUAGE plpgsql VOLATILE
  COST 100;

select isdate('20190101');     -- true
select isdate('2019/01/01');   -- true
select isdate('abc');          -- false
select isdate('20190132');     -- false（存在しない日付はfalseとなる）

CREATE OR REPLACE FUNCTION char_initcap(character varying)
  RETURNS character varying AS
$BODY$
declare

	c_target_char	alias for $1;

BEGIN

	return initcap(c_target_char); 

END;
$BODY$
  LANGUAGE plpgsql VOLATILE
  COST 100;

select * From char_initcap('abcdef');
--【結果】Abcdef

CREATE OR REPLACE FUNCTION check_char_exists(
    c_target_char character varying,
    c_replace_char character varying)
  RETURNS boolean AS
$BODY$
declare
BEGIN

	--対象の文字列でreplaceして、元の文字列と異なったら含まれると判断する
	if c_target_char = replace(c_target_char,c_replace_char,'') then
		return false;
	else
		return true;
	end if;
	
END;
$BODY$
  LANGUAGE plpgsql VOLATILE
  COST 100;

--'abcdef'に'bc'が存在するか
select * From check_char_exists('abcdef','bc');   -- true

--'abcdef'に'xyz'が存在するか
select * From check_char_exists('abcdef','xyz');  -- false

CREATE OR REPLACE FUNCTION isnumeric(c_num character varying)
  RETURNS boolean AS
$BODY$
declare
 
	n_result 		numeric;  -- 一時変数
	
BEGIN

    --数値へcastする
	select cast(c_num as numeric) into n_result;

	--castできる時はtrueでリターン
	return TRUE;
	
    --castできずエラーになる時はここのEXCEPTIONに入る
	EXCEPTION
	WHEN OTHERS THEN
	--エラー時はfalseでリターン
	return FALSE;
 
END;
$BODY$
  LANGUAGE plpgsql VOLATILE
  COST 100;

select * from isnumeric('123456');   -- true ：数値
select * from isnumeric('abcdef');   -- False：数値でない

-- 1．四捨五入
round(数値 , 小数点以下をこの桁数にする)  -- 四捨五入
-- 例
select * From round(123.45678,3);      -- 123.457（小数第3位四捨五入）

-- 2．切り捨て
trunc(数値 , 小数点以下をこの桁数にする)  -- 切り捨て
-- 例
select * From trunc(123.45678,3);      -- 123.456（小数第3位切り捨て）

CREATE OR REPLACE FUNCTION round(
    numeric,
    integer,
    integer)
  RETURNS numeric AS
$BODY$
declare

	n_target        alias for $1; 	--引数1:四捨五入する対象の数値
	i_flg           alias for $2; 	--引数2:計算するフラグ (1:四捨五入、2:切り上げ、3:切り捨て)
	i_digits        alias for $3; 	--引数3:小数点何桁まで表示するか（2を指定：小数2桁まで表示する）
	c_add           character varying;

begin

	if i_flg = 1 then
		--四捨五入
		return round(n_target,i_digits);
	
	elseif i_flg = 2 then
		--切り上げ
		c_add ='0.';
		FOR i IN 1..i_digits LOOP
		    c_add = c_add || '0';
		END LOOP;
		c_add = c_add || '9';

		return trunc(n_target + cast(c_add as numeric),i_digits);
	
	elseif i_flg = 3 then
		--切り捨て
		return trunc(n_target,i_digits);
	end if;

	return null;

end;
$BODY$
  LANGUAGE plpgsql VOLATILE
  COST 100;

--小数第4位切り上げ(小数3桁まで表示する）
select * From round(1.2345678,2,3);  --'1.235'