PL/pgSQLにて型のエラーが発生しました。

Question

PL/pgSQLを実行したのですが
なぜこのエラーが発生したのかよくわかりません。

まずいかのようなテーブルとデータを作成しました　。

DROP TABLE IF EXISTS jinko;
create table 
jinko(
code char(12),
name_ken char(12),
jinko int
);

insert into jinko values
('13','東京都','13000000'),
('14','神奈川','9000000'),
('27','大阪','8000000');

続いて
次のようなPL/pgSQLを作成し実行しました。

create or replace function func5_2()
returns void as $$
 declare
  var_code char(2);
  var_name char;
  jinko_cursor CURSOR FOR select code, name_ken FROM jinko;
   
 begin
  open jinko_cursor;
  
  LOOP
   fetch jinko_cursor into var_code, var_name;
   if not found then
    exit;
   end if;
   
   raise notice '都道府県コード=%,都道府県=%', var_code ,var_name;
  END LOOP;
  
  close jinko_cursor;
  return; 
 
 end;
 
 $$ language plpgsql;
 

作成までは問題なかったので
実行したのですがエラーがは発生しました。

ERROR:  value too long for type character(1)
CONTEXT:  PL/pgSQL function func5_2() line 11 at FETCH
SQL state: 22001

11行目?
なぜそこでループ文の行でtoo longなのでしょうか？
どなたかおわかりの方いらっしゃいませんでしょうか？

Answer 1

var_name char;

桁数の指定がないから1桁と判断されたのでは？

insert into jinko values

('13','東京都','13000000'),

SQLではシングルクォーティングすると文字列と判断されます。数値はシングルクォーティングしてはなりません。

字下げは4桁毎に。プログラミングはチーム全体で見ることを前提に。たとえサンプル・コードでも自分だけわかれば良いと雑に書くのは止めましょう。

Answer 2

代入先の変数が代入元より小さいからです。

-- 代入元
  code char(12),
  name_ken char(12),

--代入先
  var_code char(2);
  var_name char;