>>398
subプロシージャで調べてみ