+ $oDB =& DB::connect(CONST_Database_DSN, false);
+ if (!$oDB || PEAR::isError($oDB))
+ {
+ statusError("No database");
+ }
+
+ $sStandardWord = $oDB->getOne("select make_standard_name('a')");
+ if (PEAR::isError($sStandardWord))
+ {
+ statusError("Module failed");
+ }
+ if ($sStandardWord != 'a')
+ {
+ statusError("Module call failed");
+ }
+