/**
  * 入力されたSQL文が正しく実行出来るかのチェックを行う.
  *
  * @param string SQL文データ(頭にSELECTは入れない)
  * @return string エラー内容
  */
 function lfCheckSQL($sql)
 {
     // FIXME: 意図的に new SC_Query しています。 force_runをtrueにする必要があるので.本当はqueryの引数で制御したい。ref SC_Query
     $objQuery = new SC_Query_Ex('', true);
     $err = '';
     $sql = 'SELECT ' . $sql . ' ';
     $objErrMsg = $objQuery->query($sql);
     if (PEAR::isError($objErrMsg)) {
         $err = $objErrMsg->message . "\n" . $objErrMsg->userinfo;
     }
     return $err;
 }