VPF::Админы подскажите вы же профи!!??

bucdapuswert

Дата 27.7.2007, 08:08 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 30
Регистрация: 14.5.2007

Репутация: нет
Всего: нет

Помогите доделать код внешнего отчета???
У меня загружаются данные из одного файла в товар+склад. Товар загружается нормально,также как и единицы измерения номенклатуры в справочник ОКЕИ(классификатор единиц измерения),но проблема в том что эти единицы не заносятся в спр.Номенклатура из за того что их нет в справочнике
Единицы(единицы измерения номеклатуры).Вот помогите как их перенести в соответствии с товаром,т.е каждуму товару соответствует определенная группа единиц.

Это сообщение отредактировал(а) bucdapuswert - 2.8.2007, 12:57

Присоединённый файл ( Кол-во скачиваний: 4 )

out06.dbf 19,50 Kb

SaschaL

Дата 5.8.2007, 12:59 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 880
Регистрация: 13.12.2006
Где: Челябинская обл г .Нязепетровcк

Репутация: 8
Всего: 9

Проблема в том что вы сначала вытаетесь записать все полученные данные из файла в справочник не проверив ниличие значение "Единица измерения" в справочнике ОКЕИ
Я бы сделал следущее, вставил бы проверку на наличие значения в справочнике ОКЕИ например так:

Цитата

Пока ДБФ.ПолучитьСтроку()=1 цикл
          Если Спр.ОКЕИ.НайтиПоРеквизиту(ЕдИзм,ДБФ.ТекущаяСтрока())=0 тогда
                  Спр.ОКЕИ.Новый();
                  // далее идет заполнение элемента справочника ОКЕИ значениями недостающей единицы измерения
                  ................
                  Спр.ОКЕИ.Записать();
                  СПР.Номенклатура.Новый();
                  ................// заполнение элемента справочника номенклатура, уже непосредственно
                  Спр.Номенклатура.Записать();
          иначе
                  Спр.ОКЕИ.Записать();
                  СПР.Номенклатура.Новый();
                  ................// заполнение элемента справочника номенклатура, уже непосредственно
                  Спр.Номенклатура.Записать();
         КонецЕсли;
КонецЦикла;

Надеюсь я понятно описал ситуцию, если нет то пиши отвечу более подробно! Удачи smile

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| 1C: Предприятие, SAP, ERP и учётные системы \| Следующая тема »