PL SQL中通过Java Source获取文件列表

CREATE GLOBAL TEMPORARY TABLE XXC.XXCFND_DIRLIST_TEM
(
  FILENAME VARCHAR2(255),
  FILESIZE NUMBER,
  FILEDATE DATE
)
ON COMMIT DELETE ROWS;

CREATE OR REPLACE AND COMPILE JAVA SOURCE NAMED xxcfnd_get_filelist AS
import java.io.*;
import java.sql.*;
public class DirList
{
  public static void getList(String directory) throws SQLException
  {
    File path = new File(directory);
    String[] fileList = path.list();
    String fileName;
    long fileSize;
    long fileDate;
    for (int i = 0; i < fileList.length; i++)
    {
      fileName = fileList[i];
      File fpath = new File(directory + '/' + fileName);
      fileSize = fpath.length();
      fileDate = fpath.lastModified();
      #sql{INSERT INTO XXCFND_DIRLIST_TEM(filename, filesize, filedate)
       VALUES(:fileName, :fileSize, to_date('01/01/1970','mm/dd/yyyy') + :fileDate / (24*60*60*1000))};
    }
  }
}