импорт себестоимости и розничной цены Номенклатуры в автоматическом режиме

Внимание! Данный форум является модерируемым.
Для получения к нему доступа необходимо зарегистрироваться или авторизоваться на сайте.

Страницы: 1
RSS
импорт себестоимости и розничной цены Номенклатуры в автоматическом режиме
 
Добрый день всем!
Подскажите, пожалуйста, как в АА в автоматическом режиме сделать начальный ввод розничной цены и себестоимости для номенклатуры?
Иммется БД на access, переносим в АА Номенклатурные позиции(экспортируем в EXCEL, потом собственная обработка  импорта из excel), хотелось бы также перенести цены (свои а не контрагентов), вводить в ручную >4000 позиций совсем не хочется, а ничего толкового в голову не приходит, как при вводе Номенклатуры, вводить для неё цены в автоматическом режиме. Или уже после того, как ввели всю номенклатуру, ввести для неё цены - себестоимость и розницу.
 
Что имеется под понятием "автоматически"? Для этого надо вводить документы изменения цен. Собственно как то из другой учетной системы эти цены должны быть выгружены, а при загрузке их формировать соответствующие документы.
 
Автоматически - я имел ввиду, что выгрузили цены, например, в excel, есть колонка наименования номенклатуры, и есть колонка с ценой. Как эти цены из колонки excel загрузить в АА программным методом или через визард? Т.е. не в ручную по каждому наименованию, а для всех позиций сразу.
Изменено: tugayenko - 29.06.2010 11:32:14
 
Воспользуйтесь обработкой "Загрузка данных из табличного документа". Позволяет грузить практически все ;). В вычислениях можно использовать такие конструкции, например:

Фрагмент для поиска номенклатуры по составному значению из 2-х колонок XLS - 5 и 6 колонки)
Код
Арт = СокрЛП(ТекстыЯчеек[5]) + СокрЛП(ТекстыЯчеек[6]);
Ном = Справочники.Номенклатура.НайтиПоРеквизиту(""Артикул"",Арт);
Если Ном.Пустая() Тогда
   Предупреждение(""Номенклатура с каталожным номером: "" + Арт + "" отсутствует в базе! Введите ее в справочник и повторите загрузку!"",5);   
   Сообщить(""Номенклатура с каталожным номером: "" + Арт + "" отсутствует в базе! Введите ее в справочник и повторите загрузку!"");
Иначе
   Результат = Ном;   
КонецЕсли;


или так
Фрагмент создания и подстановки ГТД (ГТД в текущей колонке, страна в 15-й колонке) - при загрузке приходной накладной

Код
НаименованиеГТД = СокрЛП(ТекстЯчейки);
Если НЕ ПустаяСтрока(НаименованиеГТД) Тогда
   НаименованиеСтраны = СокрЛП(ТекстыЯчеек[15]);
   Страна = Справочники.КлассификаторСтранМира.НайтиПоНаименованию(НаименованиеСтраны);
   Если Страна.Пустая() Тогда
      Предупреждение(""Отсутствует страна: "" + НаименованиеСтраны,5);
      Сообщить(""Отсутствует страна: "" + НаименованиеСтраны +"" введите ее в справочник и повторите загрузку!"");
   Иначе
      Запрос = Новый Запрос(""ВЫБРАТЬ
      |   ГТД.Ссылка
      |ИЗ
      |   Справочник.ГТД КАК ГТД
      |ГДЕ
      |   ГТД.Наименование = &Наименование
      |   И ГТД.Страна = &Страна
      |
      |СГРУППИРОВАТЬ ПО
      |   ГТД.Ссылка"");
      Запрос.УстановитьПараметр(""Наименование"", НаименованиеГТД);
      Запрос.УстановитьПараметр(""Страна"", Страна);   
      Рез = Запрос.Выполнить();
      Если Рез.Пустой() Тогда
         НовыйГТД = Справочники.ГТД.СоздатьЭлемент();
         НовыйГТД.Наименование = СокрЛП(НаименованиеГТД);
         НовыйГТД.Страна = Страна;
         НовыйГТД.Записать();
         Результат = НовыйГТД.Ссылка;
      Иначе
         Выборка = Рез.Выбрать();
         Выборка.Следующий();
         Результат = Выборка.Ссылка;
      КонецЕсли; 
   КонецЕсли; 
КонецЕсли;
 
Владимир, спасибо! именно это и спрашивал.
Уточняю, т.е. это код можно писать прямо в обработке на закладке "Настройка" в колонке "Выражение" выставив режим загрузки "Вычислять"?
 
Совершенно верно
Страницы: 1
Читают тему
Поддержка отраслевых решений «1С-Рарус»
Услуги 1С