それでは日銀が常に頑なだったのだろうか。

政府紙幣について - Baatarismの溜息通信
このような日銀の頑なな姿勢があるため、日本においては、国債を発行せずに財政政策を行う最も現実的な方法が、政府紙幣の発行となるわけです。

調べてみた。

boj-bs

このグラフは、日銀のバランスシートの推移を、2000年1月から2009年1月まで追ってみたもの。元データは

をスクレイプして取った。スクリプトは最後に。


藤巻健史の実践・金融マーケット集中講義
藤巻 健史

これを見ると、量的緩和の時代がはっきり見て取れる。この時には当座預金残高がぐっと増えて、それに対応するように国債保有残高も増えている。なぜこういう動きになるかは、「藤巻健史の実践・金融マーケット集中講義」を読むとわかる。

実際には、マンデル・フレミングの法則を避けて財政政策をする方法として、この政府紙幣以外に、政府が発行した国債を日銀が買い入れて（これを国債引き受けと言います）、市場で流通する国債の量が増えないようにする方法もあります。日銀が直接政府から国債を買っても良いですし、政府が発行した国債と同じ量を日銀が市場から買っても良いです。

量的緩和の時代は、まさにこれをやっていた。

しかし、日銀はこの方法には否定的です。その理由は、戦前・戦時中に軍部が軍備拡張や戦争の費用を調達するため、日銀に大量の国債を引き受けさせて、その結果、戦後に大幅なインフレを招いたためです。日銀はこのことを二度と繰り返してはならないと思う余り、国債の買い入れには消極的なのです。

とはいっても見てのとおり日銀はピーク時で100兆円も国債を保有していて、今でも65兆円弱保有している。その割合バランスシートの54%にもなるのに、「原則禁止」なのだとしたら、一体原則とは一体なんなのだろうという気がする。

日本銀行が国債の引受けを行わないのはなぜですか？：日本銀行
ただし、金融調節の結果として保有している国債のうち、償還期限が到来したものについては、「財政法」（第５条ただし書き）の規定に基づいて、国会の議決を経た金額の範囲内に限って、国による借換えに応じています。

あれ？「国会の議決」って書いてある。

だとしたら、なんで「ついこの間まで」やってた方法を捨ててまで政府紙幣なんて言うんだろ?「前例がない」とかならとにかく、見ての通り2006年度まではやってたわけですし。私にはリフレがいいか悪いかわからないけど、政府紙幣が不要なことは日銀自らが証明しているのは確かではないのだろうか。

もっとも、政府紙幣にしろ国債引き受けにしろ、今のままだと金が回るのは市中銀行までで、その先に行き渡るかがかなり疑問なのだけど。"Money as Debt"も指摘する通り、銀行以外の誰かが借りてくれないとお金も増えないのだし。

それにしても、お金はいつまで増やさないといけないのだろう....

Dan the Taxpayer

#!/usr/local/bin/perl
use v5.10;
use strict;
use warnings;
use LWP::Simple;
use Encode;
use POSIX qw/mktime/;

my $base_url = 'http://www.boj.or.jp/type/stat/boj_stat/ac';
my $sjis     = find_encoding('sjis');

for my $year ( 0 .. 9 ) {
    my @days =
      ( 31, ( $year % 4 ? 28 : 29 ), 31, 30, 31, 30, 31, 31, 30, 31, 30, 31 );
    for my $month ( 1 .. 12 ) {
        my $fn = sprintf "ac%02d%02d%02d.htm",
          $year, $month, $days[ $month - 1 ];
        my $url = "$base_url/$fn";
        $url =~ s{/ac/}{/ac07/} if 7 <= $year && $year <= 10;
        my $body = get($url);
        last unless $body;
        use utf8;
        no warnings;
        my $_ = $sjis->decode($body);
        my ( %item, $item );
        my ( $jgb, $note, $checking, $total ) = ();

        for my $dummy ( 1 .. 4 ) {
            s{\A.*?>(国債|発行銀行券|当座預金|合計)[<\s　]}{
                $item = {
                    '国債'=>'jgb','発行銀行券'=>'note',
                    '当座預金'=>'ck',合計=>'total'
                }->{$1};
            }msex;
            s{\A.*?>([\d\,]{6,})}{$item{$item} = $1}msex;
        }
        printf
          "20%02d/%02d\t$item{jgb}\t$item{note}\t$item{ck}\t$item{total}\n",
          $year, $month;

        # last ;
    }
}