[martyn]

Всем добрый!

Купили 1С - встал вопрос перекачки данных из собственной системы складского учета

Приходные накладные закачиваю и налоговые формирую.... на 281 счете вижу все проводки... но при перемещении товаров на НТТ ругается....

Делаю вручную - ввожу на основании приходного документа - все работает а автоматом - НИКАК.

 Контр.ПризнакСтруктПодр = Истина тогда 
                     докРН = Документы.ПеремещениеТоваров.СоздатьДокумент();
                     докРН.ВидОперации = Перечисления.ВидыОперацийПеремещениеТоваров["ТоварыПродукция"];
                     
                     ДокРН.Организация = Орг;
                     ДокРН.Дата = Дат;
                     ДокРН.НомерДок = Ном; //Добавлено мною поле НомерДок для поиска уже сделанных перемещений
                     ДокРН.ОтражатьВНалоговомУчете = Истина;                     
                     ДокРН.СкладОтправитель = Склад;                     
                     ДокРН.СкладПолучатель = Справочники.Склады.НайтиПоКоду(Контр.КодПоЕДРПОУ); //привязка кода склада к контрагенту по ЕДРПОУ 
                     ДокрН.Комментарий = "РН - " + Дат + " № " + Ном;
                     
                     ДокРН.СтатьяВаловыхРасходов = Справочники.СтатьиНалоговыхДеклараций.НайтиПоКоду("00037");                                                               
                     
                     НовСтрока = ДокРН.Товары.Добавить();
                     НовСтрока.Количество = СокрЛП(Excel.Cells(Row,13).Value);
                     НовСтрока.Коэффициент = 1;
                     НовСтрока.Цена = 1;
                     НовСтрока.ЦенаВРознице = СокрЛП(Excel.Cells(Row,9).Value)/СокрЛП(Excel.Cells(Row,13).Value);
                     
                     Сум=СокрЛП(Excel.Cells(Row,9).Value);
                     
                     НовСтрока.СуммаВРознице = Сум;
                     
                     Если СокрЛП(Excel.Cells(Row,10).Text) <> "0" Тогда 
                         НовСтрока.Номенклатура = ТоварСНДС;                         
                         НовСтрока.СтавкаНДСВРознице = НовСтрока.Номенклатура.СтавкаНДС;
                         НовСтрока.ЕдиницаИзмерения = ТоварСНДС.БазоваяЕдиницаИзмерения;                         
                     Иначе 
                         НовСтрока.Номенклатура = ТоварБезНДС;
                         НовСтрока.СтавкаНДСВРознице = НовСтрока.Номенклатура.СтавкаНДС;                         
                         НовСтрока.ЕдиницаИзмерения = ТоварБезНДС.БазоваяЕдиницаИзмерения;                         
                     КонецЕсли;
                     
                     НовСтрока.СчетУчетаБУ = ПланыСчетов.Хозрасчетный.ТоварыНаСкладе;
                     НовСтрока.НовыйСчетУчетаБУ = ПланыСчетов.Хозрасчетный.ТоварыВРозничнойТорговлеВПродажныхЦенахНТТ;
                     
                     НовСтрока.СтатьяПриростаУбылиЗапасов = Справочники.СтатьиНалоговыхДеклараций.НайтиПоКоду("00038");
                     НовСтрока.СтатьяПриростаУбылиЗапасовНовая = Справочники.СтатьиНалоговыхДеклараций.НайтиПоКоду("00037");
                     
                     НовСтрока.НалоговоеНазначение = Справочники.НалоговыеНазначенияАктивовИЗатрат.НайтиПоКоду("000001");
                     НовСтрока.НалоговоеНазначениеНовое = Справочники.НалоговыеНазначенияАктивовИЗатрат.НайтиПоКоду("000001");

                        ДокРН.Записать(РежимЗаписиДокумента.Запись);
            ДокРН.Записать(РежимЗаписиДокумента.Проведение);

не проводит - пишет

Бухгалтерский учет. Строка :1
Не списано 4 955,99 шт товара Товары в ассортименте (без НДС), счет учета 281
Налоговый учет. Строка :1
Не списано 4 955,99 шт товара Товары в ассортименте (без НДС), счет учета ЗА , налог. назначение: Хоз. д-сть, ст. прир.-уб. запасов :Товары на оптовых складах

[Vofka]

Ну здесь, наверное, всётаки вопрос не по программной части, а по пользовательской, поэтому тема переезжает.
По теме:
1. Точно остатков на счете 281 хватает?
2. Посмотрите аналитику по налоговому учету: с какой оприходовали и по какой пытаетесь списать.

[Zaval]

По логике, при перемещении в НТТ ТоварыВАссортименте должны приходоваться(в эту самую НТТ), а списываться должны вполне определенные товары с оптового склада.

[martyn]

вопрос решился до удивления просто и в тоже время глупо...........(((((((((

приход - 03.01.2011 0:00:00 и расход 03.01.2011 0:00:00 - на 281 до прихода ничего не было - вопрос решился добавлением к дате расхода 1 секунды.... ну не смогла 1С пусть в расход ..........

[Vofka]

Ну и что здесь глупого?