Index: trunk/install/perl/db/Pg.pl
===================================================================
--- trunk/install/perl/db/Pg.pl (リビジョン 122)
+++ trunk/install/perl/db/Pg.pl (リビジョン 124)
@@ -28,4 +28,5 @@
 'foltialib.getfilestatus.1' => "SELECT filestatus FROM foltia_subtitle WHERE pid = ?",
 'foltialib.pid2sid.1' => "SELECT stationid FROM foltia_subtitle WHERE pid = ?",
+'foltialib.mp4filename2tid.1' => "SELECT tid FROM foltia_subtitle WHERE PSPfilename = ?",
 
 'getxml2db.1' => "SELECT count(*) FROM foltia_program WHERE tid = ?",