Функция Сортировка в Windows 10

пользователь
Регистрация: 30.09.2014

Добрый день!

Почему в Windows 10 не работает функция СОРТИРОВКА?
При ее использовании вылезает ошибка.
Как в таком случае отсортировать Базу данных?

С уважением.

модератор
Регистрация: 06.09.2007

Вероятнее всего, неправильно сконфигурировано окружение Инфо-Бухгалтера:
1. Папка NET DIR для BDE
2. Временная папка
3. Рабочая папка программы.
В описании пути к папкам не должно быть русских букв, пробелов и символов пунктуации.

Если Вы уверены, что все сконфигурировано правильно,
то выложите пример кода и таблицу, которую сортируете.

пользователь
Регистрация: 30.09.2014

Переменные среды и папка с программой+ ошибка:

http://images.vfl.ru/ii/1488539141/2afea0d8/16312310.png

BDE:

http://images.vfl.ru/ii/1488539256/01882e7c/16312326.png

Ошибка при сортировки любых таблиц, в т.ч. и Инфо-Бухгалтера.

Вот пример кода:

файл=ДИР_DBF+"\kbk.dbf"

База=SQL_ОТКРЫТЬ(файл)
Н=БД_РЕДАКТОР(База)
База.СОРТИРОВКА("KOD")
База.ЗАКРЫТЬ

С уважением

дилер
Регистрация: 01.12.2005

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

Пример использования
СОЗДАТЬ ( бд, ТИП_БД )
бд.ОТКРЫТЬ ( ДИР_DBF+"\mmt.dbf" )
бд.СОРТИРОВКА ("Рlace", "Code_place")
ном_зап = БД_РЕДАКТОР ( бд, "Редактирование базы данных АМТС",
[*"Place":"Название нас.пункта", "Code_place":"Код нас.пункта"],
ДА, ДА, ДА )
бд.ЗАКРЫТЬ
--------------------------------------------------------------------------------

пользователь
Регистрация: 30.09.2014

Раньше таких проблем не было. Много бланков работало хорошо и с БД_РЕДАКТОР и без этого. У нас на двух компьютерах поставили Window 10. Все бланки с функцией СОРТИРОВКА перестали работать, выдавая одну и туже ошибку.

Евгений, я взяла Ваш код в чистый бланк, даже немного упростила его:

СОЗДАТЬ ( бд, ТИП_БД )
бд.ОТКРЫТЬ ( ДИР_DBF+"\kbk.dbf" )
бд.СОРТИРОВКА ("KOD")
бд.ЗАКРЫТЬ

Ничего не изменилось - та же ошибка. Фалы меняла kbk.dbf на другие - штатные ИБ из папки ZP или OS

На Windows 7 - всё хорошо

С уважением

пользователь
Регистрация: 30.09.2014

Я так понимаю, не со всеми реализациями Windows 10 всё корректно работает. Антивирус тоже отключила - не помогло. Windows, регулярно автоматически обновляется

Подскажите по альтернативе:

Получилось отсортировать так:


Fl=ДИР_DBF+"\KBK.DBF"
тс=SQL_ЗАПРОС("SELECT * FROM '"+Fl+"' ORDER BY KOD")

Как теперь таблицу тс сохранить в файл, или ещё лучше заменить ею исходный файл,
в данном случае - это ДИР_DBF+"\KBK.DBF"

С уважением

дилер
Регистрация: 01.12.2005

Взял кусок кода из редактора DB и DBF

СОЗДАТЬ(СП,ТИП_СПИСОК)
СП.ДОБАВИТЬ("SELECT * FROM '"+файл+"' ORDER BY "+поле!1)
Запрос=SQL_ЗАПРОС(СП)
Запрос.ЗАПИСАТЬ(файл)
Запрос.ЗАКРЫТЬ

Могу редактор прислать. Можно сортировать, удалять поля, добавлять поля и прочее. Всего 15 функций.
И ещё, есть просто редактор с вызовом Excel, он без функций.