PARSER_ID = SPHINXCLIENT$CREATE();
  IF (SPHINXCLIENT$EXEC_SQL(PARSER_ID, SQL_TEXT) = 1) THEN
  BEGIN
    DELETE FROM SPHINXSEARCH$RESULTS WHERE TID = CURRENT_TRANSACTION;
    WHILE (SPHINXCLIENT$EOF(PARSER_ID) = 1) DO
    BEGIN
      INSERT INTO SPHINXSEARCH$RESULTS (MODULE_ID, TABLE_KEY)
        VALUES (SPHINXCLIENT$CURRENT_VALUE(:PARSER_ID, 0), SPHINXCLIENT$CURRENT_VALUE(:PARSER_ID, 1));
      SPHINXCLIENT$NEXT(PARSER_ID);
    END
  END
  ELSE
    EXCEPTION SPHINXSEARCH$ERROR 'Remote procedure "SPHINXCLIENT$EXEC_SQL" call failed';
  SPHINXCLIENT$FREE(PARSER_ID);