Установка цен номенклатуры из Excel

Обработки - Обработка документов

Загрузка цен номенклатуры из Excel для 1C: УТ 8.1

Обработка загружает цены номенклатуры в документ "Установка цен номенклатуры". Без предварительного просмотра. Не работает с файлами 2007-2010 офиса (нужно сохранять в формате 97-2003).

Выбираем файл excel, указываем колонку номенклатуры и колонку цены, задаем тип цены, жмем Загрузить.

Особенности:

- Вид типа цены должен быть "Базовый".

- Если загружается номенклатура, которой нет в справочнике "Номенклатура", вылетает ошибка.

- При загрузке, поле "Единица" заполняется из реквизита номенклатуры ЕдиницаХраненияОстатков.

- При загрузке, поле "Валюта" заполняется за константы ВалютаРегламентированногоУчета.

- Проверял работоспособность только на "Управление торговлей", редакция 10.3.12.3.

Немного исправил обработку. Надеюсь, в лучшую сторону.

Если кому-нибудь подойдет, буду только рад.

Код открыт, удачи.

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

Наименование Файл Версия Размер
ЗагрузкаЦенИзExcel.epf
.epf 9,08Kb
09.12.10
242
.epf 9,08Kb 242 Скачать

См. также

Комментарии
1. Александр Гладких (yku) 262 09.09.10 12:26 Сейчас в теме
Мде. Скачал в надежде, что внутри хотя бы код будет красивый... Код оказался даже ужаснее интерфейса.
2. Андрей 1 (andrej260276) 53 10.09.10 08:19 Сейчас в теме
Рабочая обработка. За идею поставил плюс. Если кому не понравился код, пускай украшениями занимаются сами. Главное работоспособность. Я тоже часть кода исправил, но в целом идею сохранил. Спасибо!
3. Rusk Сухотеорин (Rusk51) 88 10.09.10 12:22 Сейчас в теме
4. Александр Гладких (yku) 262 10.09.10 15:36 Сейчас в теме
(2) Ну не знаю. Обработка может быть и нужная. И, возможно, её больше нигде нет (в чем я сомневаюсь). Но когда её выкладываешь можно хотя бы нажать ALT+SHIFT+F.

В целом идея хороша. Нет слов. Особенно хороши новаторские приемы в:
1. Организации интерфейса (вид формы при её разворачивании, и само расположение элементов формы)
2. Передачи параметров в процедуру из формы:
Форма=ПолучитьФорму("Форма");
ПутькФайлу=Форма.ПутькФайлу;
КодЦены=Форма.КодЦены;
3. Переприсвоения переменных:
КодЦены=Форма.КодЦены;
НазваниеЦены=КодЦены;
4. Поиска ссылки на элемент из ссылки по наименованию:
НоваяСтрока.ТипЦен = Справочники.ТипыЦенНоменклатуры.НайтиПоНаименованию(НазваниеЦены);

где НазваниеЦены = КодЦены, а КодЦены = Форма.КодЦены, а Форма.КодЦены имеет тип "СправочникСсылка.ТипыЦенНоменклатуры".

...
А если серьезно:
Я вовсе не ругаю автора за код, я его ругаю за то, что он такое ("ТАКОЕ!") имеет смеслость выкладывать на всеобщее обозрение прикрываясь "писал для себя". Конечно, понятно, что у автора еще мало опыта, и эта обработка для него знаменует некий "прорыв", но не стоит каждым таким "прорывом" делиться. Автору можно порекомендовать почитать 1Совские стандарты. Писались они опытными людьми, и создавались не на пустом месте.



5. Сергей . (1108) 201 10.09.10 16:12 Сейчас в теме
(4) Спасибо за здравую критику. Оправдываться не буду, действительно начинающий. Выложил только потому что не нашел подобных бесплатных обработок. Так как вопрос насущный, для многих пользователей, посчитал необходимым поделиться.
6. Андрей 1 (andrej260276) 53 10.09.10 16:20 Сейчас в теме
Вы правы насчёт кода. Полностью с Вами согласен! А, то что выложил, молодец за идею и смелость плюс. Я уверен, что после всех замечаний, автор будет обращать своё внимание на код и интерфейс, даже если он пишет ДЛЯ СЕБЯ. Ведь мы здесь для того, чтобы делиться опытом, мнением, информацией! Про книги правильный совет.
7. Эдуард (edyardg) 21 29.09.11 12:19 Сейчас в теме
Поставил плюс потому что пользуюсь!
Оставьте свое сообщение