Имя: Пароль:
1C
1С v8
Переношу через корректировку регистр Остатки организаций но в бух. уч. не видно
0 Vladius
 
09.08.12
15:29
Подскажите что я делаю не так. Программно создаю документ корректировка записей регистров заполняю все нужные поля, ставлю счет учета БУ 281(Товары на складах). Документ сохраняется все появляется в регистрах, показываются остатки. Но при проведении реализации ошибка:

Бух. учет. Строка :1
Не списано 10 шт. товара 004.Актимель пит. черника-ежевика 100 гр, счет учета 281 , налог. назначение: Обл. НДС

Возможно вообще через корректировку этот документ заполнить?

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

ДокументКорректировка.Записать();
Пока ЗапросОст.Группировка() = 1 Цикл
НаборЗаписей=РегистрыНакопления.ТоварыОрганизаций.СоздатьНаборЗаписей();
НаборЗаписей.Отбор.Регистратор.Установить(ДокументКорректировка.Ссылка);
  ТабДв=НаборЗаписей.Добавить();
  ТабДв.Активность=Истина;
  ТабДв.ВидДвижения=ВидДвиженияНакопления.Приход;
  ТабДв.Номенклатура=Справочники.Номенклатура.НайтиПоНаименованию(ЗапросОст.Номенклатура.Наименование);
  ТабДв.Период=ДатаНачало;
  ТабДв.Склад=Справочники.Склады.НайтиПоНаименованию(ЗапросОст.Склад.Наименование);
  ТабДв.Количество=ЗапросОст.Остаток;
  ТабДв.Организация = Справочники.Организации.НайтиПоКоду("1");
  ТабДв.Качество = Справочники.Качество.Новый;
  ТабДв.СчетУчетаБУ = ПланыСчетов.Хозрасчетный.ТоварыНаСкладе;
НаборЗаписей.Записать(ложь);
Состояние("Добавляю остатки по номенклатуре: "+ЗапросОст.Номенклатура.Наименование);
КонецЦикла;
1 shuhard
 
09.08.12
15:30
(0)[Возможно вообще через корректировку этот документ заполнить? ]
вне всякого сомнения
2 Beduin
 
09.08.12
15:31
(0) После записи этого документа у тебя остаток появляется. Ты проверял?
3 shuhard
 
09.08.12
15:32
(1) + 1
   НовыйДок=Документы.КорректировкаЗаписейРегистров.СоздатьДокумент();
   НовыйДок.Дата=ДатаСрезаНДС;
   НовыйДок.Комментарий="Тестирование НДС";
   // НДС начисленный
   СтрокаТЧ=НовыйДок.ТаблицаРегистровНакопления.Добавить();
   СтрокаТЧ.Имя="НДСНачисленный";
   СтрокаТЧ.Представление="НДСНачисленный";
   ДвНДСНач=НовыйДок.Движения.НДСНачисленный;
   //
   Запрос=новый Запрос;
   Запрос.Текст="ВЫБРАТЬ
   |    НДСНачисленныйОстатки.Организация,
   |    НДСНачисленныйОстатки.СчетФактура,
   |    НДСНачисленныйОстатки.ВидЦенности,
   |    НДСНачисленныйОстатки.СтавкаНДС,
   |    НДСНачисленныйОстатки.Покупатель,
   |    НДСНачисленныйОстатки.ВидНачисления,
   |    НДСНачисленныйОстатки.ДоговорКонтрагента,
   |    НДСНачисленныйОстатки.НДСОстаток КАК НДС,
   |    НДСНачисленныйОстатки.СуммаБезНДСОстаток КАК СуммаБезНДС
   |ИЗ
   |    РегистрНакопления.НДСНачисленный.Остатки(&ДатаСрезаНДС, ) КАК НДСНачисленныйОстатки";
   запрос.УстановитьПараметр("ДатаСрезаНДС",ДатаСрезаНДС);
   ТЗРезультат = Запрос.Выполнить().Выгрузить();    
   ДвНДСНач.Загрузить(ТЗРезультат);
   Для Каждого СтрокаДвижений Из  ДвНДСНач Цикл
       
       СтрокаДвижений.Активность=Истина;
       СтрокаДвижений.ВидДвижения=ВидДвиженияНакопления.Расход;
       СтрокаДвижений.Период=ДатаСрезаНДС;
   КонецЦикла;
   // НДС начисленный
   СтрокаТЧ=НовыйДок.ТаблицаРегистровНакопления.Добавить();
   СтрокаТЧ.Имя="НДСПредъявленный";
   СтрокаТЧ.Представление="НДСПредъявленный";
   ДвНДСНач=НовыйДок.Движения.НДСПредъявленный;
   //
   Запрос=новый Запрос;
   Запрос.Текст="ВЫБРАТЬ
   |    НДСПредъвленныйОстатки.Организация,
   |    НДСПредъвленныйОстатки.СчетФактура,
   |    НДСПредъвленныйОстатки.ВидЦенности,
   |    НДСПредъвленныйОстатки.СтавкаНДС,
   |    НДСПредъвленныйОстатки.СчетУчетаНДС,
   |    НДСПредъвленныйОстатки.Поставщик,
   |    НДСПредъвленныйОстатки.ДоговорКонтрагента,
   |    НДСПредъвленныйОстатки.СуммаБезНДСОстаток КАК СуммаБезНДС,
   |    НДСПредъвленныйОстатки.НДСОстаток КАК НДС
   |ИЗ
   |    РегистрНакопления.НДСПредъявленный.Остатки(&ДатаСрезаНДС, ) КАК НДСПредъвленныйОстатки";
   запрос.УстановитьПараметр("ДатаСрезаНДС",ДатаСрезаНДС);
   ТЗРезультат = Запрос.Выполнить().Выгрузить();    
   ДвНДСНач.Загрузить(ТЗРезультат);
   Для Каждого СтрокаДвижений Из  ДвНДСНач Цикл
       
       СтрокаДвижений.Активность=Истина;
       СтрокаДвижений.ВидДвижения=ВидДвиженияНакопления.Расход;
       СтрокаДвижений.Период=ДатаСрезаНДС;
   КонецЦикла;
   НовыйДок.Записать();
4 Vladius
 
09.08.12
15:40
(2) Я же написал выше. Остатки есть, в регистрах все есть. Даже когда в подбор заходу в реализации показывает остаток. Ругается только когда провожу по Бух. По упр. уч. ошибок не выдает.
5 mikecool
 
09.08.12
15:46
(4) по бух очень интересуют при проведении счета остатков
6 zoom_4x
 
09.08.12
17:33
Конфигурация, как я понимаю, Управление торговым предприятием для Украины. Сделай оборотно-сальдовую по 281 счету, добавь группировку Налоговое назначение доходов и затрат и посмотри, а если ли остаток 10 шт. товара 004.Актимель пит. черника-ежевика 100 гр, с указанным налог. назначением: Обл. НДС. Если нет, то тогда документ Реализация товаров и услуг и не будет проводится, так как документ делает движения и по регистру бухгалтерии Хозрасчетный, и данного товара с указанными свойствами в остатке там, по видимому, не наблюдается.
7 Vladius
 
10.08.12
17:38
(6) Через документ корректировка не получается так как он не делает движения по бух. регистру, пришлось писать перенос остатков через док. оприходование.
8 zmaximka
 
10.08.12
22:56
Вообще то только корректировки регистра товары организаций не достаточно. Нужны еще партии как минимум
9 Vladius
 
11.08.12
15:42
(8) Партии не нужны. Нужны товары на складах и товары организаций.
10 zmaximka
 
11.08.12
16:43
А ты в курсе что остаток товара как раз по партиям смотрится?
12 undertaker
 
11.08.12
16:47
какой интересный способ

ТабДв.Номенклатура=Справочники.Номенклатура.НайтиПоНаименованию(ЗапросОст.Номенклатура.Наименование);
ТабДв.Склад=Справочники.Склады.НайтиПоНаименованию(ЗапросОст.Склад.Наименование);
13 Нуф-Нуф
 
11.08.12
16:50
ужаснах
14 zmaximka
 
11.08.12
16:50
Посмотри какие регистры двигает док оприходование товаров и двигай их все
15 undertaker
 
11.08.12
16:52
вот это

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

и вот это

НаборЗаписей.Записать(ложь);

надо вынести ЗА цикл
16 undertaker
 
11.08.12
16:53
а регистр бухгалтерии разве не надо двигать?
17 zmaximka
 
11.08.12
16:55
(16) не обязательно. Будут отрицательные остатки в рб.
18 undertaker
 
11.08.12
16:56
будут, но может как раз из за этого ошибка то выходит при проведении реализации. может там проверка еще по РБ?
19 zmaximka
 
11.08.12
16:57
В типовых конфах утп и упп при традиционном учете остатки по регистрам партий проверяются
20 undertaker
 
11.08.12
16:57
и походу именно об этом как раз говорят фразы "Бух. учет" и "налог. назначение: Обл. НДС"
21 undertaker
 
11.08.12
16:59
(19) ну в любом случае не хватает какого то регистра, потому как в этом нет разреза "налог. назначение"
22 undertaker
 
11.08.12
17:00
и похоже это все таки "Бухгалтерия для Украины"
23 undertaker
 
11.08.12
17:04
(19) в типовых конфигурациях УТ и УПП остатки проверяются и по товарам организации в том числе
24 zmaximka
 
11.08.12
17:05
А вообще рекомендую автору почитать про методику ввода начальных остатков, а не изобретать велосипед
25 zmaximka
 
11.08.12
17:07
(23) кстати да. Если бы партий не хватало то писало бы мол не списано по партиям
26 LepovV
 
11.08.12
17:43
Странно. Не получилось исправить. Что же делать???
27 undertaker
 
11.08.12
19:18
а как исправлял то? Регистр бухгалтерии заполнял (или по какому там проверка не проходит)?
28 Ctyd
 
11.08.12
20:14
сделай это через оприходования товаров на склад.. в счета учета поставь 00. и не мучай себе голову.