Нужно срочно перенести данные из ТиС в Розницу 2.2 стандарные правила не использую так как там много лишнего. Решил вопрос так: в ТиС сделал списание товаров, заполнил остатками, провел далее выбираю движения и заполняю данными в поступление товаров.

```1c
    ИскомыйРегистр = "ПартииНаличие";
    РегистрыДокумента = СоздатьОбъект("Регистр.ПартииНаличие");
    РегистрыДокумента.ВыбратьДвиженияДокумента(Источник);
    Таблица = СоздатьОбъект("ТаблицаЗначений");
    Таблица.НоваяКолонка("Номенклатура");
    Таблица.НоваяКолонка("КоличествоУпаковок");
    Таблица.НоваяКолонка("Количество");
    Таблица.НоваяКолонка("Сумма");
    Таблица.НоваяКолонка("СтавкаНДС");

    Таблица.НоваяКолонка("Цена");
    Таблица.НоваяКолонка("Упаковка");
    Пока РегистрыДокумента.ПолучитьДвижение() = 1 Цикл

    Если РегистрыДокумента.Вид() <> ИскомыйРегистр Тогда
    Продолжить;
    КонецЕсли;
    Если РегистрыДокумента.Приход = 1 Тогда
    Продолжить;
    КонецЕсли;

    Номенклатура = РегистрыДокумента.Номенклатура;
    Индекс = ЗначениеВСтрокуВнутр(Номенклатура.ТекущийЭлемент());

    Таблица.НоваяСтрока();
    Таблица.Номенклатура = Номенклатура;
    Таблица.Упаковка = Номенклатура.БазоваяЕдиница;
    Таблица.КоличествоУпаковок = РегистрыДокумента.Количество;
    Таблица.Количество = РегистрыДокумента.Количество;
    Таблица.Сумма = РегистрыДокумента.СуммаРуб;

    Если Таблица.КоличествоУпаковок = 0 Тогда
    Таблица.Цена = 0;
    Иначе
    Таблица.Цена = Таблица.Сумма / Таблица.КоличествоУпаковок;
    КонецЕсли;
    Таблица.СтавкаНДС = "БезНДС";;

    КонецЦикла;
    Таблица.Выгрузить(КоллекцияОбъектов,,,);
```

Поступление переносится отлично, осталось заполнить установку цен номенклатуры в рознице, но никак не могу выбрать розничную цену. Т.е. по сути нужно в этом цикле заменить закупочную цену на розничную.
Подскажите как можно это сделать?
---
Нет, не так: у Номенклатуры нет реквизита Цена.

Примерно так:

```1c
    РозничныйТипЦен=СоздатьОбъект("Справочник.ТипыЦен");
    РозничныйТипЦен.НайтиПоНаименованию("Розничные"); // или как там они у вас называются
    РозничнаяЦена=СоздатьОбъект("Справочник.Цены");
```

Это - в начале, до цикла. А внутри цикла:

```1c
    РозничнаяЦена.ИспользоватьВладельца(Номенклатура);
    Если РозничнаяЦена.НайтиПоРеквизиту("ТипЦен",РозничныйТипЦен,0) = 1 Тогда
    Таблица.Цена = РозничнаяЦена.Цена.Получить(НужнаяДата);
    КонецЕсли;
```

Код приблизительный.
---
но никак не могу выбрать розничную цену А она есть в вашей базе? Вы ее можете увидеть? Глазами? Если можете, то где, в каком отчете? Отсюда и надо плясать: смотреть, к каким данным обращается отчет и копировать код из него.

P.S. Вообще-то в регистре ПартииНаличие есть измерение ЦенаПрод "Цена продажи в вал. бух. учета. Для розничных продаж", но что там записано после ваших манипуляций с базой - ХЗ.
---
мОЖЕТ пригодится http://infostart.ru/public/16455/
---
спасибо погляжу.
---
Cooler, я пробовал вот так:

```1c
    ИскомыйРегистр = "ПартииНаличие";
    РегистрыДокумента = СоздатьОбъект("Регистр.ПартииНаличие");
    РегистрыДокумента.ВыбратьДвиженияДокумента(Источник);
    Таблица = СоздатьОбъект("ТаблицаЗначений");
    Таблица.НоваяКолонка("Номенклатура");

    Таблица.НоваяКолонка("Цена");

    Пока РегистрыДокумента.ПолучитьДвижение() = 1 Цикл

    Если РегистрыДокумента.Вид() <> ИскомыйРегистр Тогда
    Продолжить;
    КонецЕсли;
    Если РегистрыДокумента.Приход = 1 Тогда
    Продолжить;
    КонецЕсли;

    Номенклатура = РегистрыДокумента.Номенклатура;
    Индекс = ЗначениеВСтрокуВнутр(Номенклатура.ТекущийЭлемент());

    Таблица.НоваяСтрока();
    Таблица.Номенклатура = Номенклатура;

    Таблица.Цена = РегистрыДокумента.ЦенаПрод;

    КонецЦикла;
    Таблица.Выгрузить(КоллекцияОбъектов,,,);
```

Но так не работает, да мне кажется что не может быть все так просто :)
---
В смысле - как?
Цены Номенклатуры - это справочник в ТИС.
У него есть периодический реквизит - "цена".
Делаете поиск в справочнике Цен по реквизиту "ВидЦены" в рамках заданного владельца (на 7-ке, кажется, так же, как и на 8-ке, это называется НайтиПоРеквизиту) - и получаете значение периодического реквизита на текущую дату?
---
Так?

```1c
    Таблица.Цена = Номенклатура.Цена.НайтиПоРеквизиту("Розничные");
```
---
Нет, не так: у Номенклатуры нет реквизита Цена.

Примерно так:

```1c
    РозничныйТипЦен=СоздатьОбъект("Справочник.ТипыЦен");
    РозничныйТипЦен.НайтиПоНаименованию("Розничные"); // или как там они у вас называются
    РозничнаяЦена=СоздатьОбъект("Справочник.Цены");
```

Это - в начале, до цикла. А внутри цикла:

```1c
    РозничнаяЦена.ИспользоватьВладельца(Номенклатура);
    Если РозничнаяЦена.НайтиПоРеквизиту("ТипЦен",РозничныйТипЦен,0) = 1 Тогда
    Таблица.Цена = РозничнаяЦена.Цена.Получить(НужнаяДата);
    КонецЕсли;
```

Код приблизительный.
---
Огромное Вам спасибо! Все выгрузил наконец-то :)