Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2010.03.14;
Скачать: CL | DM;

Вниз

Ошибка Project raised exception class EIBInterBaseError with ...   Найти похожие ветки 

 
Иван   (2010-01-09 06:11) [0]

Извините за тупость =(

но из за чего может возникать ошибка на while (l<>U_ko) do BEGIN типы же совпадают и дальше цикл вроде должен выполняться

сама ошибка
Project raised exception class EIBInterBaseError with message "arithmetic exception, numeric overflow, or string truncation
Cannot transliterate character between character sets" Process stopped. Use Step or Run to continue.


procedure TForm_D.BitBtn1Click(Sender: TObject);
var
kolvo, l, U_ko: integer;
dolj:string  ;
begin
l:=1;
Form_User.IBTable1.Last;
Form_D.Label1.Caption:=IntToStr(Form_User.IBTable1.RecNo);
U_ko:=Form_User.IBTable1.RecNo;
Form_User.IBTable1.First;

while (l<>U_ko) do BEGIN
Form1.DataSource1.DataSet:=IBQuery1;
Form1.IBQuery1.Close;
Form1.IBQuery1.SQL.Clear;
Form1.IBQuery1.SQL.Add("select db1.fio_avtor, db1.NAZVANIE_KNIGI, db1.DATE_IN, db1.DATE_OUT,

db1.JANR, db1.STAT, db1.ID_USER");
Form1.IBQuery1.SQL.Add("from db1 where stat = ""Долг"" ");
Form1.IBQuery1.Open;
kolvo:=Form1.IBQuery1.RecordCount;
if (kolvo>=2) then begin
                   dolj:=Form_user.IBTable1.FieldByName("U_FIO").Value;
                   Form1.DataSource1.DataSet:=form_d.IBQuery1;
                   Form_D.IBTable1.Edit;
                   Form_D.IBTable1.FieldByName("D_FIO").Value:=dolj;
                   Form_D.IBTable1.Refresh;
                  end;          
l:=l+1;
Form_user.IBTable1.Next;
Form1.DataSource1.DataSet:=form_d.IBQuery1;
Form1.IBQuery1.Close;
Form1.IBQuery1.SQL.Clear;
Form1.IBQuery1.SQL.Add("select db1.fio_avtor, db1.NAZVANIE_KNIGI, db1.DATE_IN, db1.DATE_OUT,

db1.JANR, db1.STAT, db1.ID_USER");
Form1.IBQuery1.SQL.Add("from db4 inner join db1 on db4.U_ID=db1.ID_USER");
Form1.IBQuery1.SQL.Add("where db4.U_FIO ="""+Form1.DBEdit1.Text+"""");
Form1.IBQuery1.Open;
                                         END;
end;


 
KilkennyCat ©   (2010-01-09 08:09) [1]

у тебя здесь два запроса и редактирование, имело бы смысл не заставлять народ работать процессором, а самому локализовать хотя бы место возникновения ошибки.


 
Ганя   (2010-01-09 11:49) [2]

На строчке while "(l<>U_ko) do BEGIN" данная ошибка не может возникнуть в принципе.
Эта ошибка может возникнуть при обращении к объектам базы


 
Иван   (2010-01-10 19:33) [3]

А из за чего может "возникнуть при обращении к объектам базы" ??


 
Ганя   (2010-01-10 20:53) [4]

для ответа на этот вопрос надо правильно локализовать место возникновения


 
Иван   (2010-01-10 22:05) [5]

просто сами запросы отдельно работают, а вот цикл типо не рабочий(
хотя я узнаю количество записей в другой таблице и оно правильное, да даже если просто поставить число он ругается(


 
sniknik ©   (2010-01-10 22:35) [6]

> А из за чего может "возникнуть при обращении к объектам базы" ??
в ошибке причина наприсана
> "arithmetic exception, numeric overflow, or string truncation Cannot transliterate character between character sets"


 
KilkennyCat ©   (2010-01-10 22:39) [7]


> а вот цикл типо не рабочий

а у тебя цикл типо неделимая хрень.
и ошибку сказало на выход из допустимых значений количества записей.
Вообщем, переустанавливай виндоуз.



Страницы: 1 вся ветка

Текущий архив: 2010.03.14;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.014 c
15-1261638900
Oleg1963
2009-12-24 10:15
2010.03.14
Помогите. Delphi 7 interprise не компилирует


2-1263386089
yantux
2010-01-13 15:34
2010.03.14
Как правильно читать запись в record ассемблерной функции?


15-1261659128
Olegz77
2009-12-24 15:52
2010.03.14
Миниатюра окна в панели задач Windows Vista


3-1236236249
ford
2009-03-05 09:57
2010.03.14
BLOB


15-1261867671
KennyG
2009-12-27 01:47
2010.03.14
Ярлык с указанием CLSID вместо пути