1

データベース: Interbase 6.5 接続: IBX または BDE で同じ結果 プログラムは delphi 7 で記述

SPを更新しようとしています。結果 "Token unknown -line xx, char yy" Line xx および char yy は最初の変数を指します。

例：

  query.sql.add('ALTER PROCEDURE');
  query.sql.add('MYPROCEDURE (mypkey integer)');
  query.sql.add('returns (myresult integer)');
  query.sql.add('as');
  query.sql.add('declare variable helpint integer;');
  query.sql.add('BEGIN');
  query.sql.add('select count(bla)');
  query.sql.add('from mytable');
  query.sql.add('where pkey=:mypkey');
  query.sql.add('into :helpint;');    <------ here is line xx
  query.sql.add('if (helpint>0) then myresult = 1;');
  query.sql.add('suspend;');
  query.sql.add('END');
try
  query.ExecSQL;
except
  on E:Exception do
  begin
    E.Message := E.Message +#13#10+query.SQL.Text;
    raise;
end;

sp を ibconsole で更新すると、動作します。

何がうまくいかないのですか？

アップデート：

元のコードでは、デカールされた変数です!

修正：

query.sql.add('into :helpint;');    <------ here is line xx
query.sql.add('if (helpint>0) then myresult = 1;');
4

2 に答える 2

2

行う

query.ParamCheck := False;
query.Params.Clear;
query.SQL.Clear;

SQL を割り当てる前に。ParamCheckDDL の更新が完了しTrueたら、元に戻すことを忘れないでください。

于 2011-03-11T11:16:25.417 に答える
0

変数 HELPINT を宣言したので、マークされた行と次の行でも VARIABLE ではなく、HELPINT を変数として使用する必要があります。

于 2011-03-11T10:38:14.010 に答える