ＤＢの大きい数値データを登録するには (ID:20801)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文

ＤＢにＣＳＶから読み込んだ８〜１０桁の数字文字列を登録するときに下記のようなエラーが表示されます。
※またエラー処理で次のデータに進みたいです
ご存知の方ご指導よろしくお願いします。

DB:interbase(FireBird)
LIMITSUM DECIMAL(10,0)

エラー内容
SQL error code=-206
Column unknown
LIMITSUM
Client SQL dialect 1 does not support reference to BIGINT datatype

procedure TForm1.Button1Click(Sender:TObject);
var
  SL1:TStringList;
  SL2:TStringList;
  i,j:Word;
begin

try
    IBDatabase1.Connected:=Active;
    SL1:=TstringList.Create;
    SL2:=TstringList.Create;

if Opendialog1.Execute then begin
      SL1.LoadFromFile(Opendialog1.FileName);
      for i:=0 to SL1.Count-1 do begin
        SL2.CommaText := SL1[i];
        IBQuery1.Close;
        IBQuery1.SQL.Clear;
        IBQuery1.SQL.Add('insert into customer');
        IBQuery1.SQL.Add('(LIMITSUM)');
        IBQuery1.SQL.Add('VALUES');
        IBQuery1.SQL.Add('(:LIMITSUM)');
        IBQuery1.ParamByName('LIMITSUM').AsInteger:=StrTOInt(SL2[30]);
        Try
          IBQuery.ExecSQL;
        except begin
          エラー処理
          エラーレコードを登録しないで次のレコードに進みたい
        end;
      end;
    end;
  end;
  Finally
    SL1.Free;
    SL2.Free;
    IBQuery1.Active := False;
    IBDatabase1.Connected:=False;
  end;
end;

←解決時は質問者本人がここをチェックしてください。

戻る