Экспорт в DBF

[ksandr]

Доброго времени суток товарищи. Вот возникла тут проблемка. Необходимо производить экспорт данных в dbf. НО экспорт даты не проходит ни под каким видом.

DBFConn.Execute('insert into XXXXX.DBF(XXXXXX) values('+FORMAT(01022006D)+')');

Вот на такую строку ругается что ошибка в числе 01.02.06. Что за ошибка никак сообразить не могу, подставил уже в лоб, но конечно хочется забирать данные из таблицы. Народ подкиньте кто-нить код или подскажите где накасячил ???

Спасиб большое.

[Dzemon]

Тут скорей всего ошибка в национальном формате даты. Попробуйте создать дату формата ММ.ДД.ГГГГ.

[ksandr]

В том то и проблема, дата задана хитро, чтобы не стояло на первом месте дата или месяц по идее экспорт должен прокатывать. Напрягает то что в сообщении ошибки выдаётся дата 01.02.06, хотя в коде задана формально дата 01.02.2006. Есть подозрение что ошибка связана именно с усечением года в дате. Как перенастроить или изменить формат даты не знаю

[Advisor]

Цитата:

Сообщение от ksandr

В том то и проблема, дата задана хитро, чтобы не стояло на первом месте дата или месяц по идее экспорт должен прокатывать. Напрягает то что в сообщении ошибки выдаётся дата 01.02.06, хотя в коде задана формально дата 01.02.2006. Есть подозрение что ошибка связана именно с усечением года в дате. Как перенастроить или изменить формат даты не знаю

так у функции Format есть множество параметров.

[ksandr]

функция Format увы не прокатывает. Попробовал вставить в лоб текстовую переменную- 01.02.2006, пишет туже ошибку. Народ неужели никто не сталкивался с экспортом даты в DBF ?

[Dolter_imported]

Попробуй 'ГГГММДД' - без разделителей
либо cast('ГГГММДД' as datetime)

[art06]

Мне кажется , что вам необходимо написать так:

date_str := '20060201'; - тип text
simvol - это текстовая константа ' (верхняя запятая)


DBFConn.Execute('insert into XXXXX.DBF(XXXXXX) values( CONVERT(datetime,'+simvol
date_str + simvol + ' ))' );

[ksandr]

Цитата:

Сообщение от Dolter

Попробуй 'ГГГММДД' - без разделителей
либо cast('ГГГММДД' as datetime)

Не совсем понял что такое cast ?

Цитата:

Сообщение от art

Мне кажется , что вам необходимо написать так:

date_str := '20060201'; - тип text
simvol - это текстовая константа ' (верхняя запятая)


DBFConn.Execute('insert into XXXXX.DBF(XXXXXX) values( CONVERT(datetime,'+simvol
date_str + simvol + ' ))' );

Вопрос тот же что за функция Convert в Nav не нашёл ?

Посмотрел формат даты в настройках винды. Форма dd.MM.yyyy Соотвественно строка типа 01012006 должна прокатывать без проблем Неужели никто не пробывал

[art06]

А, разве в Navsion есть "insert into" ??? INSERT INTO ... VALUES - это инструкция sql запроса. Если вы пытаетсь с помощью insert into добавить запись, то необходимо использовать CONVERT для конвертации даты. CONVERT - это часть sql запроса. И к стандартным функциям Nav не имеет никакого отношения.

[bird_imported]

Цитата:

Сообщение от ksandr

Не совсем понял что такое cast ?
Вопрос тот же что за функция Convert в Nav не нашёл ?

Это функции языка T-SQL, только вопрос в том, поддерживаются ли эти функции в движке dBASE?

[Dolter_imported]

Цитата:

Сообщение от Bird

Цитата:

Сообщение от ksandr

Не совсем понял что такое cast ?
Вопрос тот же что за функция Convert в Nav не нашёл ?

Это функции языка T-SQL, только вопрос в том, поддерживаются ли эти функции в движке dBASE?

так... тогда скажите, плз, что есть DBFConn ? если это Automation, который 'Microsoft ActiveX Data Objects 2.8 Library'.Connection, то собсно convert поддерживается практически всеми драйверами.
Насчет cast не помню, кажется кто-то не "держал" эту функцию...
И запись строкового представления 'YYYYMMDD' в поле типа date или datetime по любому записывает именно дату.

[ksandr]

DBFConn.Execute('insert into XXXXX.DBF(D_SCHF) values(cast('+FORMAT(DateExport)+' as datetime) )');

в таком варианте не прокатывает, пишет что ошибка в синтаксиса (пропущен оператор) в выражении запроса 'cast (20060102 as datetime)'


для функции convert пишет, неопределённая функция Convert в выражении.

DBFConn - 'Microsoft ActiveX Data Objects 2.6 Library'.Connection

[konrad_imported]

А у меня прекрасно пишет дату. Привожу кусочки кода:

DBFBase Automation 'Microsoft ActiveX Data Objects 2.8 Library'.Connection
PERS Automation 'Microsoft ActiveX Data Objects 2.8 Library'.Recordset
CREATE(DBFBase);
DBFBase.Open('DRIVER=Microsoft dBASE Driver (*.dbf);DRIVERID=277;DBQ=' + FilePath);
FileName:='PERS0001.dbf';
CREATE(PERS);
PERS.Open(FileName,DBFBase,2,3);
PERS.AddNew;
IF Employee."Birth Date"<>0D THEN
PERS.Fields().Item('DateRog').Value :=Employee."Birth Date";
PERS.Update;
PERS.Close();
CLEAR(PERS);

[Dolter_imported]

Цитата:

Сообщение от ksandr

DBFConn.Execute('insert into XXXXX.DBF(D_SCHF) values(cast('+FORMAT(DateExport)+' as datetime) )');

в таком варианте не прокатывает, пишет что ошибка в синтаксиса (пропущен оператор) в выражении запроса 'cast (20060102 as datetime)'


для функции convert пишет, неопределённая функция Convert в выражении.

DBFConn - 'Microsoft ActiveX Data Objects 2.6 Library'.Connection

DBFConn.Execute('insert into XXXXX.DBF(D_SCHF) values(cast('''+FORMAT(DateExport)+''' as datetime) )');

передавай строковое таки значение...

[nickolasz]

Я делаю так:
str cmdtext;
LoginProperty LP;
Connection connection;
Statement stmt;
;

LP = new LoginProperty();
LP.setDSN("Файлы dBASE");
connection = new OdbcConnection(LP);

cmdtext = " Insert into XXXX (DDD1) ";
cmdtext += strfmt("VALUES ('%1'), transDate");
stmt.executeUpdate(cmdtext);

Работает. Нужно только указать в свойствах ODBC "Файлы dBASE" (в системе) путь до папки с файлом dbf.