Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Ошибка при вставке строки, D7, Interbase, IBTable 
V
    Опции темы
comtat
  Дата 20.1.2007, 18:02 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1310
Регистрация: 2.5.2006
Где: Россия, Казань

Репутация: 1
Всего: 71
Имеется такая БД на InterBase и в ней таблица к которую нужна добовлять записи
Цитата

  "CALLECTORID"    INTEGER NOT NULL,
  "STARTPERIODDATE"    DATE default '0000-00-00' NOT NULL,
  "FINISHPERIODDATE"    DATE default '0000-00-00' NOT NULL,
  "PHONEM"    VARCHAR(20) CHARACTER SET WIN1251 default 'Unknown' NOT NULL,
  "CONTRACT"    VARCHAR(30) CHARACTER SET WIN1251,
  "CALLTYPE"    VARCHAR(50) CHARACTER SET WIN1251,
  "DISTANCE"    VARCHAR(20) CHARACTER SET WIN1251 default 'Unknown' NOT NULL,
  "PHONETO"    VARCHAR(20) CHARACTER SET WIN1251 default 'Unknown' NOT NULL,
  "CALLDATE"    DATE NOT NULL,
  "CALLTIME"    TIME NOT NULL,
  "PRICE"    FLOAT default '0.0' NOT NULL,
 PRIMARY KEY ("CALLECTORID")


Вставку делаю через IBTable таким способом
Код

               IBTable1.Insert;
               IBTable1.FieldByName('CALLECTORID').AsInteger      := index;
               IBTable1.FieldByName('STARTPERIODDATE').AsDateTime := StrToDate(date_st);
               IBTable1.FieldByName('FINISHPERIODDATE').AsDateTime:= StrToDate(date_fn);
               IBTable1.FieldByName('PHONEM').AsString            := phone;
               IBTable1.FieldByName('CONTRACT').AsString          := contract;
               IBTable1.FieldByName('CALLTYPE').AsString          := types;
               IBTable1.FieldByName('DISTANCE').AsString          := distance;
               IBTable1.FieldByName('PHONETO').AsString           := phoneto;
               IBTable1.FieldByName('CALLDATE').AsDateTime        := StrToDate(calldate);
               IBTable1.FieldByName('CALLTIME').AsDateTime        := StrToTime(calltime);
               IBTable1.FieldByName('PRICE').AsFloat              := StrToFloat(price);
               IBTable1.Post;


На IBTable1.Post; вываливается следующая ошибка value exceeds the range of valid dates
Подскажите, как можно решить эту проблему


--------------------
Рожденный в СССР !!!
ExtJS - мой фреймворк 
PM   Вверх
skyboy
Дата 20.1.2007, 18:52 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


неОпытный
****


Профиль
Группа: Модератор
Сообщений: 9820
Регистрация: 18.5.2006
Где: Днепропетровск

Репутация: нет
Всего: 260
а если вставлять строкой?
PM MAIL   Вверх
comtat
Дата 20.1.2007, 19:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1310
Регистрация: 2.5.2006
Где: Россия, Казань

Репутация: 1
Всего: 71
Цитата(skyboy @  20.1.2007,  18:52 Найти цитируемый пост)
а если вставлять строкой?

через IBQuery ??


--------------------
Рожденный в СССР !!!
ExtJS - мой фреймворк 
PM   Вверх
skyboy
Дата 20.1.2007, 19:32 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


неОпытный
****


Профиль
Группа: Модератор
Сообщений: 9820
Регистрация: 18.5.2006
Где: Днепропетровск

Репутация: нет
Всего: 260
Код

IBTable1.FieldByName('CALLDATE').AsString        := calldate;

Попробуй так. А что там за calldate?
PM MAIL   Вверх
comtat
Дата 21.1.2007, 14:43 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1310
Регистрация: 2.5.2006
Где: Россия, Казань

Репутация: 1
Всего: 71
Цитата(skyboy @  20.1.2007,  19:32 Найти цитируемый пост)
Попробуй так. А что там за calldate?

calldate -дата звонка
Пробовал, но так не чего и не изменилось  smile 


Это сообщение отредактировал(а) comtat - 21.1.2007, 14:50


--------------------
Рожденный в СССР !!!
ExtJS - мой фреймворк 
PM   Вверх
skyboy
Дата 21.1.2007, 16:12 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


неОпытный
****


Профиль
Группа: Модератор
Сообщений: 9820
Регистрация: 18.5.2006
Где: Днепропетровск

Репутация: нет
Всего: 260
Цитата(comtat @  21.1.2007,  13:43 Найти цитируемый пост)
calldate -дата звонка

не понял вопроса, видимо. формат совпадает с тем, который ожидает сервер?
PM MAIL   Вверх
Rodman
Дата 21.1.2007, 17:34 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


CIO
****


Профиль
Группа: Участник
Сообщений: 6144
Регистрация: 7.5.2006
Где: Ukraine ⇛ Kyiv ci ty

Репутация: 22
Всего: 122
есть вариант сделать поле типа стринга, а при работе преобразовывать при помощи DateToStr и StrToDate...


но все равно рекомендую сделать при помощи 
Цитата(comtat @  20.1.2007,  18:23 Найти цитируемый пост)
через IBQuery




--------------------

Лотереи мира
PM MAIL WWW Skype GTalk YIM MSN   Вверх
kobra
Дата 21.1.2007, 18:45 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 730
Регистрация: 15.6.2005
Где: Грузия, Тбилиси

Репутация: 1
Всего: 9
Код
IBTable1.FieldByName('STARTPERIODDATE').AsDate
а так?
PM MAIL   Вверх
SergeBS
Дата 22.1.2007, 08:28 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1111
Регистрация: 10.6.2005
Где: Владимир

Репутация: 11
Всего: 22
comtat, 
Цитата

Range of date values January 1, 100 a.d. to February 29, 32768 a.d.

100 > 0000. Дальше сам догадайся smile.
PM MAIL   Вверх
comtat
Дата 23.1.2007, 12:45 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1310
Регистрация: 2.5.2006
Где: Россия, Казань

Репутация: 1
Всего: 71
Цитата(SergeBS @  22.1.2007,  08:28 Найти цитируемый пост)
100 > 0000. Дальше сам догадайся

0000 при Default же ?
Цитата
IBTable1.FieldByName('STARTPERIODDATE').AsDate
 не катит, пробовал  smile 
Цитата

есть вариант сделать поле типа стринга, а при работе преобразовывать при помощи DateToStr и StrToDate...
 не такой вариант, не приемлим.. 


Это сообщение отредактировал(а) comtat - 23.1.2007, 12:48


--------------------
Рожденный в СССР !!!
ExtJS - мой фреймворк 
PM   Вверх
SergeBS
Дата 23.1.2007, 12:56 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1111
Регистрация: 10.6.2005
Где: Владимир

Репутация: 11
Всего: 22
comtat, 
Цитата
0000 при Default же ?

С ручника снимись. Когда это проверяется? Намек: Insert. Пытаешься создать запись с НЕДОПУСТИМЫМИ данными.
PM MAIL   Вверх
CatATonik
Дата 23.1.2007, 13:01 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 95
Регистрация: 12.1.2007
Где: Москва

Репутация: нет
Всего: 8
Ругается на: default '0000-00-00' NOT NULL, 
надо убрать default '0000-00-00' и тогда все ОК

Это сообщение отредактировал(а) CatATonik - 23.1.2007, 15:13
PM MAIL   Вверх
comtat
Дата 23.1.2007, 19:25 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1310
Регистрация: 2.5.2006
Где: Россия, Казань

Репутация: 1
Всего: 71
Цитата(CatATonik @  23.1.2007,  13:01 Найти цитируемый пост)
надо убрать default '0000-00-00' и тогда все ОК

Спасибо !!!
Проблема решена ...  smile 

СПАСИБО, ВСЕМ 

Это сообщение отредактировал(а) comtat - 23.1.2007, 19:26


--------------------
Рожденный в СССР !!!
ExtJS - мой фреймворк 
PM   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Базы данных и репортинг"
Vit
Петрович

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами


Обязательно указание:

1. Базы данных (Paradox, Oracle и т.п.)

2. Способа доступа (ADO, BDE и т.д.)


  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи
  • Вопросы по SQL и вопросы по базам данных не связанные с Дельфи задавать здесь

FAQ раздела лежит здесь!

Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Vit, Петрович.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Базы данных и репортинг | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.1023 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.