Имя: Пароль:
1C
1С v8
Отсутсвуют проводки в созданом документе
,
0 antiteror91
 
05.02.14
23:44
Создал документ, провел его а проводок нету. объясните пожалуйста что не так?????
1 Torquader
 
05.02.14
23:52
Тут код нужно смотреть, особенно, в модуле документа.
2 antiteror91
 
05.02.14
23:56
ПроводкиБУ = Движения.Хозрасчетный;
Проводка = ПроводкиБУ.Добавить();
                Проводка.Период      = Дата;
                Проводка.Организация = СтрокаПродукция.Организация;
                Проводка.СчетДт = СтрокаПродукция.СчетУчета;
                Проводка.СчетКт = Выборка.Счет;
                ОбщегоНазначения.УстановитьСубконто(Проводка.СчетДт, Проводка.СубконтоДт, "Номенклатура",  СтрокаПродукция.ГотоваяПродукция);
                ОбщегоНазначения.УстановитьСубконто(Проводка.СчетДт, Проводка.СубконтоДт, "Склады",  СтрокаПродукция.Склад);
                Если Выборка.Счет = ПланыСчетов.Хозрасчетный.НакопленнаяСтоимостьПоГП Тогда
                    ОбщегоНазначения.УстановитьСубконто(Проводка.СчетКт, Проводка.СубконтоКт, "Номенклатура",  Выборка.Субконто1);    
                Иначе
                    ОбщегоНазначения.УстановитьСубконто(Проводка.СчетКт, Проводка.СубконтоКт, "СтатьиЗатрат",  Выборка.Субконто1);
                КонецЕсли;
                Если Выборка.Счет = ПланыСчетов.Хозрасчетный.ПрямыеМатериальныеЗатраты ИЛИ  Выборка.Счет = ПланыСчетов.Хозрасчетный.ПрочиеПрямыеЗатраты Тогда
                    ОбщегоНазначения.УстановитьСубконто(Проводка.СчетКт, Проводка.СубконтоКт, "Номенклатура",  Выборка.Субконто2);
                    ОбщегоНазначения.УстановитьСубконто(Проводка.СчетКт, Проводка.СубконтоКт, "Подразделения",  Выборка.Субконто3);
                ИначеЕсли Выборка.Счет = ПланыСчетов.Хозрасчетный.ПрочиеКПЗОсновногоПроизводстваПоСкладам ИЛИ Выборка.Счет = ПланыСчетов.Хозрасчетный.НакопленнаяСтоимостьПоГП ИЛИ Выборка.Счет = ПланыСчетов.Хозрасчетный.ПрочиеКПЗПоСкладам  Тогда
                    ОбщегоНазначения.УстановитьСубконто(Проводка.СчетКт, Проводка.СубконтоКт, "Подразделения",  Выборка.Субконто2);
                ИначеЕсли Выборка.Счет = ПланыСчетов.Хозрасчетный.ПроизводствоУслуг Тогда
                    ОбщегоНазначения.УстановитьСубконто(Проводка.СчетКт, Проводка.СубконтоКт, "НоменклатурныеГруппы",  Выборка.Субконто2);
                КонецЕсли;
                Проводка.Сумма = (СтрокаПродукция.Сумма/?(СуммаВсейГотовойПродукции = 0, 1, СуммаВсейГотовойПродукции))*Выборка.Остаток;

это движение по регистрам
3 antiteror91
 
05.02.14
23:57
может быть нужно ПроводкиБУ.Записать() но я нигде в других документах такого не видел.....
4 Torquader
 
06.02.14
00:12
После завершения обработки проведения без установки признака отказа система автоматически записывает все движения.
5 Torquader
 
06.02.14
00:18
А если Проводка.Активность=Истина; вставить ?
6 antiteror91
 
06.02.14
00:52
(5) не помогает....
7 PaulBC
 
06.02.14
02:57
Движения.Хозрасчетный.Записывать = Истина;
8 Рак-чикибряк
 
06.02.14
05:27
Как самый дубовый вариант,а Хозрасчетный указан в свойствах документа в движениях?
9 Kurbash
 
06.02.14
07:16
тупо предложу- агалки то стоят отражение в бу, ну?
10 Повелитель
 
06.02.14
07:33
(0) Положи свой код в процедуру ОбработкаПроведения
11 Повелитель
 
06.02.14
07:34
(0) И вообще выложи весь код из ОбработкаПроведения, может ты где нибудь после с наборомзаписей играешь