0 / 0 / 1
Регистрация: 04.04.2014
Сообщений: 42
1

Ошибка SQL - Token unknown

29.06.2014, 21:04. Показов 2926. Ответов 7
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Помогите пожалуйста. Делаю запрос на удаление в таблице и меня пишет token unknown - line 1, char 29
,. Я так понял запятую где то потерял, но полчаса уже потратил не могу найти. В базе запрос работает а в делфи нет.
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
with f_obiekt.IBQuery4 do
    begin
      if Fnew then
        SQL.Text := 'execute procedure PROC_ZHIL(-1, ''' + Edit1.Text + ''', '''
          + Edit2.Text + ''', ''' + Edit3.Text + ''', ' + Edit4.Text + ', ' +
          Edit5.Text + ', ''' + Edit6.Text + ''', ''' + Edit12.Text + ''', ''' +
          Edit7.Text + ''', ''' + Edit8.Text + ''', ''' + Edit9.Text + ''', '''
          + Edit10.Text + ''', ''' + Edit11.Text + ''')'
      else
        Fnew := false;
      SQL.Text := 'execute procedure PROC_ZHIL(' + f_obiekt.IBQuery1.FieldByName
        ('kod_zhil').AsString + ', ''' + Edit1.Text + ''', ' + Edit2.Text +
        ' , ''' + Edit3.Text + ''', ' + Edit4.Text + ', ' + Edit5.Text + ' , '''
        + Edit6.Text + ''' , ''' + Edit12.Text + ''' , ''' + Edit7.Text +
        ''' , ''' + Edit8.Text + ''' , ''' + Edit9.Text + ''' , ' + Edit10.Text
        + ' , ''' + Edit11.Text + ''')';
      Transaction.StartTransaction;
      ExecSQL;
      Transaction.Commit;
      Transaction.Active := false;
    end;
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
29.06.2014, 21:04
Ответы с готовыми решениями:

Ошибка в SQL-запросе: Token unknown
Вечер добрый. Ошибка в SQL-запросе в делфи. В базе работает, а в делфи нет. Он должен добавлять...

Dynamic SQL Error SQL error code=-104. Token unknown - Line11, char - 1
Доброго времени суток всем. подскажите пожалуйста, почему при выполнении SQL запроса к БД InterBase...

Ошибка запроса, Token unknown <=
select * from st_op where min &lt;= :zn or max &gt;= :zn не понимаю почему, в експерте проверил, та же...

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

7
5858 / 4587 / 1447
Регистрация: 14.04.2014
Сообщений: 20,340
Записей в блоге: 20
29.06.2014, 21:33 2
легко все найти
поставь breakpoint на строке Transaction.StartTransaction
и посмотри значение f_obiekt.IBQuery4.SQL.Text
если сам не найдешь, скопируй и посмотри "в базе"
где-то в Edit ах запросто может оказаться апостроф или кавычки
0
0 / 0 / 1
Регистрация: 04.04.2014
Сообщений: 42
29.06.2014, 22:00  [ТС] 3
SQL
1
          + ''', ''' + Edit10.Text + ''', + ''' + Edit11.Text + ''')'
в базе везде посмотрел, нет ошибки. указывает на эту строчку, хотя не вижу тут ошибки.
0
Пишу на Delphi...иногда
1423 / 1278 / 286
Регистрация: 03.12.2012
Сообщений: 3,914
Записей в блоге: 5
29.06.2014, 22:21 4
в случае длинных строк, которые получаются суммированием (и не только строк) арифметический знак должен стоять в конце предыдущей строки кода, а не в начале - перенесите знак "+" в конец предыдущей строки
0
Native x86
Эксперт Hardware
5594 / 3338 / 951
Регистрация: 13.02.2013
Сообщений: 10,587
29.06.2014, 22:23 5
Ели бы использовали параметры, данный вопрос вообще не возник бы даже.
0
5858 / 4587 / 1447
Регистрация: 14.04.2014
Сообщений: 20,340
Записей в блоге: 20
29.06.2014, 22:27 6
Цитата Сообщение от comedi Посмотреть сообщение
''', + '''
тут
0
0 / 0 / 1
Регистрация: 04.04.2014
Сообщений: 42
30.06.2014, 01:12  [ТС] 7
а чем тогда заменить, ведь они идут последовательно

Добавлено через 17 минут
когда я пытаюсь убрать запятые от третьего эдита оно сразу начинает ругаться, проблема с запятыми вокруг него, а как их решить я не понимаю

Добавлено через 2 минуты
точнее у второго
0
5858 / 4587 / 1447
Регистрация: 14.04.2014
Сообщений: 20,340
Записей в блоге: 20
30.06.2014, 05:53 8
Delphi
1
2
3
4
5
6
7
SQL.Text:=Format('execute procedure PROC_ZHIL(-1, '+
          '%s, %s, %s, %s, ' +
          '%s, %s, %s, %s, ' +
          '%s, %s, %s, %s)',
   [AnsiQuotedStr(Edit1.Text), AnsiQuotedStr(Edit2.Text), AnsiQuotedStr(Edit3.Text), Edit4.Text,
    Edit1.Text, AnsiQuotedStr(Edit6.Text), AnsiQuotedStr(Edit12.Text), AnsiQuotedStr(Edit7.Text),
    AnsiQuotedStr(Edit8.Text), AnsiQuotedStr(Edit9.Text), AnsiQuotedStr(Edit10.Text), AnsiQuotedStr(Edit11.Text)]);
0
30.06.2014, 05:53
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
30.06.2014, 05:53
Помогаю со студенческими работами здесь

Ошибка при подключение таблицы unknown sql data type (590)
Думаю, что это из-за логического поля, помогите исправить, слышал что ibx нужно обновлять, но не...

UPDATE ошибка Invalid use of keyword. Token: By Line Number: 2
В общем при двойном клике по DBGrid открывается форма на которой расположены 4 Edit'а в которых...

Ошибка: Unknown picture file extension (.)
Всем здравствуйте. Проблема следующая. Есть база Access в которой в поле OLE внесены изображения....

Token Unknown
Ребят по мотивам этой темы подскажите правелен ли запрос? select * from FullList WHERE DepID = 3...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
8
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru