Программа-упаковщик DBF-файлов

06.02.12

Разработка - Инструментарий разработчика

Не секрет, что при удалении из DBF-базы записи, она не удаляется, а просто помечается как удалённая...

Скачать исходный код

Наименование Файл Версия Размер
DBF-Packer 1.0.0.3
.zip 357,29Kb
60
.zip 357,29Kb 60 Скачать

Не секрет, что при удалении из DBF-базы записи, она не удаляется, а просто помечается как удалённая, при этом физически оставаясь на своём месте и занимая место. Понадобилось мне почистить очень разросшуюся за годы DBF-базу. Сделал это средствами 1С, но мне это показалось не очень удобным (так как сама из под себя 1С база не упакуется), и родилась идея реализовать сабж в отдельной утилите на Delphi. Программа перебирает все BDF-файлы в выбранной директории, упаковывает их, и удаляет соответствующие CDX-файлы. Требует BDE engine.

Прошу сильно не пинать - всего лишь проба пера на Дельфе.

Приветствуются дельные замечания, исправления и наставления на путь истинный, пустобрехи - "не зачет".

См. также

Консоль запросов

Инструментарий разработчика Платформа 1С v7.7 Конфигурации 1cv7 Абонемент ($m)

Консоль запросов к базе SQL, не требующая внешних компонент

10 стартмани

29.04.2015    21638    54    Gvozdod    8    

15

StartManager 1.4 - Развитие альтернативного стартера

Инструментарий разработчика Платформа 1С v7.7 Платформа 1С v8.3 Абонемент ($m)

Очередная редакция альтернативного стартера, являющегося продолжением StartManager 1.3. Спасибо всем, кто присылал свои замечания и пожелания, и тем, кто перечислял финансы на поддержку проекта. С учетом накопленного опыта, стартер был достаточно сильно переработан в плане архитектуры. В основном сделан упор на масштабируемость, для способности программы быстро адаптироваться к расширению предъявляемых требований (т.к. довольно часто просят добавить ту или иную хотелку). Было пересмотрено внешнее оформление, переработан существующий и добавлен новый функционал. В общем можно сказать, что стартер эволюционировал, по сравнению с предыдущей редакцией. Однако пока не всё реализовано, что планировалось, поэтому еще есть куда развиваться в плане функциональности.

1 стартмани

23.04.2014    166039    1868    Alexoniq    1596    

496

Tray Informer

Инструментарий разработчика Платформа 1С v7.7 Платформа 1С v8.3 Россия Абонемент ($m)

Согласитесь, что окно стандартное сообщений в 1С иногда приносит больше неудобств, чем пользы. И тем более разные "Предупредить"... Что с этим окном только не делают! Его отцепают от формы, делают маленьким, умудряются спрятать за границы экрана. А потом звонят программистам с претензией, что документ почему-то не проводится, отя ничего и не пишет. У вас такого не было? А вот у нас было и не раз )))

1 стартмани

04.09.2013    32935    61    O-Planet    78    

49

Изменение структуры баз 1С 7.7 без долгой реструктуризации. Часть 1. Справочники

Инструментарий разработчика Платформа 1С v7.7 Конфигурации 1cv7 Абонемент ($m)

На днях встретил вопрос на форуме про возможность внесения изменений в конфигурацию без долгого сохранения в рабочей базе большого объема. Вот решил поделиться опытом, как это делал я. База у нас была объемом порядка 120 Гб. К базе обращался сайт в режиме 24/7, поэтому важно было быстро сохранять изменения и желательно без последующего монопольного запуска для восстановления индексов и процедур и без отключения пользователей от базы. Это первая часть статьи и посвящена она справочникам. С одной стороны - это самый простой объект, с другой стороны, именно про справочник спрашивалось на форуме. Если статья будет востребована, то я напишу аналогичные про документы, регистры и может еще что.

1 стартмани

13.08.2013    21257    Reptile    5    

35

v7.7 1CDialogControls: Инструмент в помощь разработчику на 7.7.

Инструментарий разработчика Платформа 1С v7.7 Конфигурации 1cv7 Абонемент ($m)

Давным давно, когда я еще плотно писал на 7.7 работа с формами была мучительной и неудобной. Приходилось каждый элемент выкладывать, выравнивать на форме ручками, прописывать код в модуле. Иногда при разработке очередной формы приходила в голову мысль: "а где-то я уже похожее делал..." и начинался мучительный поиск подходящего кода в своих запасах........

1 стартмани

21.02.2013    18062    35    MarSeN    14    

16

[Разработчику] Любая таблица значений в OLAP

Инструментарий разработчика Платформа 1С v7.7 Конфигурации 1cv7 Абонемент ($m)

Анализируем различные данные в 1С, используя OLAP-технологии со всеми прелестями. Т.е. наглядное отображение данных, быстрые расчеты, горизонтальные и вертикальные группировки любой вложенности, удобная фильтрация, Drag'n'Drop и ещё много приятных вещей от MS. Обработка на входе принимает практически любую таблицу значений (ТЗ в которой колонкам указаны типы значений, строка, число и т.п.), на выходе имеем на форме 1С сводную таблицу и график по этой ТЗ, с которой работаем, как и в Excel со сводной таблицей и диаграммой. Взял за основу разработку «OLAP Анализ счёта» ( http://infostart.ru/public/14964/ ) от JohnyDeath и переделал под любую ТЗ. Опционально используется «Прогресс бар для 1С 77» (http://infostart.ru/public/14061/ ) от Gmix.

1 стартмани

21.12.2012    36129    51    venger    7    

23

Библиотека кода 1С 7.7 (накопленная за 8 лет)

Инструментарий разработчика Платформа 1С v7.7 Конфигурации 1cv7 Абонемент ($m)

Весь код на 1С 7.7, собранный для повторного использования за 8 лет работы.

10 стартмани

25.11.2012    35013    248    adhocprog    51    

70
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
104. Altair777 644 16.10.09 12:20 Сейчас в теме
87. Parazyte 37 16.10.09 12:06 Сейчас в теме
Если и возникнут какие-то ссылки на отсутствующие записи, то не по вине паковки-ДБФ, а по вине удаления записи из 1С без проверки связей.
+
92. vasilykushnir 63 16.10.09 12:11 Сейчас в теме
А все-таки мне жутко интересно: из трех минусятников неужели все пишут на Делфи?
+
95. Altair777 644 16.10.09 12:14 Сейчас в теме
(92) При минус от Че я уже говорил.... ;)
А минус от Чебурашки - это считай как поощрение :D
+
97. vasilykushnir 63 16.10.09 12:15 Сейчас в теме
+ к (92) К Чебуратору это не относится - он признанный тестер-гуру, ему по штату положенно критиковать (минус Че дороже стоит иного плюса ;) )
+
100. Арчибальд 2707 16.10.09 12:17 Сейчас в теме
(97) А мне он однажды плюс поставил :o . Это за десяток минусов считать? :o
+
107. vasilykushnir 63 16.10.09 12:22 Сейчас в теме
(100) Считай - он признал в тебе коллегу, а это очень высокое звание ;) Уже как высший офицерский состав :)
+
110. Abadonna 3958 16.10.09 12:25 Сейчас в теме
(107) Ха! Чебур у нас своенравный. Про мой плагин пишет мне, что это супер-пупер, но плюс ставить не будет ни за что, так как Тотал принципиально не юзает :D
+
115. vasilykushnir 63 16.10.09 12:32 Сейчас в теме
(110) Да, Че не сильно разбрачывается плюсами, но тем тем они ценные.
Чебура надо привязать к стулу перед монитором и во весь экран тотальник развернуть. И пива не давать, пока не проникнется... :D
+
119. Noy 1076 16.10.09 12:35 Сейчас в теме
113. Арчибальд 2707 16.10.09 12:29 Сейчас в теме
(107) Я по званию выше. А он круче. Хотя в армии это часто :|
+
93. Altair777 644 16.10.09 12:13 Сейчас в теме
to Parazyte
А ты хотел снести эту разработку... А тут весело :D
+
96. vip 16.10.09 12:15 Сейчас в теме
(93) Дык ты всех и развеселил.
+
98. Abadonna 3958 16.10.09 12:16 Сейчас в теме
Автору надо бы еще плюсиков подкинуть. Что б стал у человека рейтинг, и не возникло желания послать портал в известном направлении...
Parazyte; +1
103. vasilykushnir 63 16.10.09 12:19 Сейчас в теме
(98) Это правильно. А то заклевали бы парня почем зря и забил бы он на сайт со всеми приборами.... А такими кадрами (думающими, дерзающими и, как говорил Арчи, отважными) надо дорожить.
+
105. Abadonna 3958 16.10.09 12:20 Сейчас в теме
Автору: в следующий раз закладка "ADO"
TADOConnection;
TADODataSet;
TADOTable;
и т.д - будет совершенно независимый экзюк
wing; +1
108. Parazyte 37 16.10.09 12:24 Сейчас в теме
за (105) спасибо.
от (103) ваще расплавился от счастья :)
+
111. Арчибальд 2707 16.10.09 12:26 Сейчас в теме
(108 ) +103 Советую выложить иллюстрацию к 70 посту в качестве скриншота :D :D :D
+
116. Parazyte 37 16.10.09 12:33 Сейчас в теме
118. Арчибальд 2707 16.10.09 12:35 Сейчас в теме
(116) Извини уж, нафлудили... Зато в топе ленты держим ;)
+
120. Parazyte 37 16.10.09 12:37 Сейчас в теме
(118) ничё - норма, за то весело как ...
+
117. Abadonna 3958 16.10.09 12:35 Сейчас в теме
И пива не давать

Не, просто шурупами горнолыжные ботинки к лыжам привернуть ;)
+
121. vasilykushnir 63 16.10.09 12:54 Сейчас в теме
(117) Специально для Чебурашки:

Зима.
Горнолыжная трасса.
На склоне лыжник в полной экипировке: очки, шлем, модный костюм. Несется со склона и подпрыгнув на трамплине падает кубырем и врезается в дерево.
Встает: палки погнуты, лыжи поломаны, костюм в клочья, очки разбиты, все лицо в крови и не хватает зубов. Отряхивается, подымает взгляд обратно на вершину спуска и говорит: "Бл**ь! Все равно лучше чем на работе! "
+
123. CheBurator 3119 16.10.09 16:49 Сейчас в теме
(121) баян
анекдоты про горнолыжников и сноубордистов и вообще все про них смотри у меня tomba.infostart.ru
+
122. Parazyte 37 16.10.09 13:01 Сейчас в теме
125. Abadonna 3958 19.10.09 08:30 Сейчас в теме
(0)
1. Сделай через ADO
2. Сделай возможность выбора каталога, далее стандартный FindFirst, FindNext, чтобы сразу все *.dbf "замочить".
И будет классно, заодно и на Дельфе потренируешься ;)
+
126. Parazyte 37 19.10.09 10:14 Сейчас в теме
ок. спс за советы
+
127. volna 22.10.09 09:33 Сейчас в теме
В режиме "Упаковать" сделать анализ на присутствие индексного файла, если "Нет", то DBF удалить (перед упаковкой база загрузить в монопольном режиме). Желаю удачи.
+
128. Altair777 644 22.10.09 10:25 Сейчас в теме
(127) А вот этого я бы не делал
+
129. volna 22.10.09 12:19 Сейчас в теме
А по-точнее... 1с Бухгалтерия 7.7. БД сучествует с 1999 года. Был переход с 6.0 на 7.7. Свертка БИ. Тем самым остаются файлы DBF за прошедшие года. Итого накопилось 600 файлов. Просмотрев их, большенство это структура файла без записей. При запуске им не создаются индексные файлы. Кто подскажет что делать?
+
130. Altair777 644 22.10.09 12:21 Сейчас в теме
(129) просмотреть файл 1Cv7.DD и понять какие-же файлы от этой базы
+
131. Altair777 644 22.10.09 12:26 Сейчас в теме
+(130) или в Тотале остортировать по имени и посмотреть у кого есть индексы, а у кого нет.
Выделить файлы без индексов и перенести их в другую папку.

Иногда в некоторых конфигурациях создаются дополнительные файлы dbf.
Они не входят в саму конфигурацию, но используются в различных целях.
Я знаю.. сам когда-то такие делал :)
+
132. volna 22.10.09 14:56 Сейчас в теме
Да, я ручками так и сделала (А если автоматически?). После этого запустила вашу программу. Она сообщила сколько файлов упаковано. А где протокол?
+
133. Parazyte 37 23.10.09 16:01 Сейчас в теме
(132) Чтобы увидеть протокол, нужно пролистать МЕМО-поле, в котором сообщено количество обработанных файлов, ВВЕРХ стрелочками справа.
+
134. zfilin 2337 08.02.12 13:44 Сейчас в теме
Оставьте свое сообщение