gifts2017

Учет канцтоваров для секретаря - тонкий клиент (без информационной базы, на файлах excel)

Опубликовал Сергей Космачев (ksnik) в раздел Обработки - Универсальные обработки

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

Учет канцтоваров для секретаря.
Назначение: Загрузка таблицы на форму управляемого приложения с программным созданием колонок таблицы (тонкий клиент) из файла Excel. Обработка добавляет для каждого файла новую колонку и рассчитывает общие итоги.
Формат файла загрузки:
- Номер магазина (ячейка с адресом "С1").
Вторая строчка - зарезервировано. Данные о канцтоварах начинаются с третьей строчки:
- Код (колонка)
- Наименование (колонка)
- Количество (колонка)

Автор:
Космачев Сергей

Скачать файлы

Наименование Файл Версия Размер
ksnikxii 22
.zip 33,09Kb
11.09.12
22
.zip 33,09Kb Скачать

См. также

PowerTools от 1 000
Подписаться Добавить вознаграждение
Комментарии
1. Максим Кузнецов (Makushimo) 12.09.12 06:51
"без использования базы данных"
а смысл ?
более удобный способ шаманить в екселе?
электролопата вместо экскаватора
2. Сергей Космачев (ksnik) 12.09.12 07:06
(1) Makushimo, можно конечно из экселя в эксель затягивать без 1ски, только на мой взгляд поиск элемента по наименованию в 1ске удобнее и печатная форма тоже. И если что возможностей для доработки больше.
3. Алексей Фурманов (Aleksey-29) 12.09.12 08:46
А как же лицензия на 1С? Занимать ее для работы в Эксель, по-моему, не практично!
4. Дмитрий Шерстобитов (DitriX) 12.09.12 11:20
5. Сергей Космачев (ksnik) 12.09.12 14:45
(3) Aleksey-29, это на тот случай, когда срочно требуется слепить несколько файлов excel в один сводный файл, программа позволяет обойтись меньшей кровью.
6. Вадим Никонов (V.Nikonov) 13.09.12 12:55
Ндаа
Написать код в 1с8 автору похоже легче, чем ознакомиться с расширенным набором функций Excel. Я бы понял вариацию, когда нужно обработать несколько таблиц *.xls, а есть только бесплатный OpenOffice...

Хотя, если абстрагироваться от конкретной реализации описанной в данном примере, то можно найти идею о хранении неких данных во внешнем хранилище (*.xls). Без модификации штатной конфигурации получить некие обработки с дополнительной информацией из внешнего хранилища...
Хотя чаще для таких целей используют *.dbf, но Excel есть свои прелести - готовая удобоваримая форма.
7. Алекс Ю (AlexO) 26.09.12 23:26
(2) ksnik,
и что, вот это работает именно НаКлиенте:
есть еще один кусочек - работа с табличным полем в тонком клиенте без вызова сервера
??
Если НЕ НоменклатураНайдена Тогда 
  НовСтрока = Объект.СписокЗагрузки.Добавить(); 
  НовСтрока.Код = СокрЛП(Формат(МассивКолонок.Получить(0).Получить(строкаТП),"ЧГ=0")); 
  НовСтрока.Наименование = СокрЛП(МассивКолонок.Получить(1).Получить(строкаТП));
  Если МассивКолонок.Получить(2).Получить(строкаТП) = ""
        ИЛИ МассивКолонок.Получить(2).Получить(строкаТП) = Неопределено Тогда
  Иначе
    НовСтрока.Количество = НовСтрока.Количество + Число(МассивКолонок.Получить(2).Получить(строкаТП)); 
    НовСтрока["м"+СокрЛП(ТекМагазин)] = Число(МассивКолонок.Получить(2).Получить(строкаТП)); 
  КонецЕсли;
КонецЕсли;
...Показать Скрыть
8. Сергей Космачев (ksnik) 27.09.12 00:34
(7) AlexO, в этой обработке не использовалась таблица значений, только табличное поле. Эта обработка полностью работает на клиенте без сервера. Процедура загрузки справочника номенклатуры в ней пока не используется, хотя в случае развития обработки может пригодиться. В первую очередь надо бы уйти от использования com-объекта, но не знаю когда на это будет время.
9. Денис Луцик (NAKIS) 18.12.13 14:38