Имя: Пароль:
1C
1С v8
не заполняется программно ПКО 1С УПП 1.3
,
0 makkut
 
20.12.17
09:53
никак не удается заполнить документ ПКО без проведения только записать.

ОбъектПКО                                 = Документы.ПриходныйКассовыйОрдер.СоздатьДокумент();
            ОбъектПКО.Дата                            = СтруктураСмена.ДатаОкончания;
            ОбъектПКО.ВидОперации                     = Перечисления.ВидыОперацийПКО.ОплатаПокупателя;
            ОбъектПКО.Организация                    = Справочники.Организации.НайтиПоКоду("000000001");
            ОбъектПКО.ОтражатьВБухгалтерскомУчете    = Истина;
            ОбъектПКО.ОтражатьВУправленческомУчете    = Истина;
            ОбъектПКО.ОтраженоВОперУчете            = Истина;
            ОбъектПКО.ОтражатьВНалоговомУчете        = Истина;
            ОбъектПКО.Оплачено                        = Истина;
            ОбъектПКО.Касса                            = Справочники.Кассы.НайтиПоНаименованию("АГЗС №15");
            ОбъектПКО.Контрагент                    = Справочники.Контрагенты.НайтиПоНаименованию("Розничная продажа по ваучерам");
            ОбъектПКО.ДоговорКонтрагента            = Справочники.ДоговорыКонтрагентов.НайтиПоНаименованию("Р-12/2017 от 01.12.2017");
            ОбъектПКО.ВалютаДокумента                = Справочники.Валюты.НайтиПоКоду("643");
            ОбъектПКО.ВалютаВзаиморасчетовПодотчетника = Справочники.Валюты.НайтиПоКоду("643");
                        ОбъектПКО.КурсДокумента                    = "1";
            ОбъектПКО.Комментарий                    = "Излишняя оплата (подлежащая возврату покупателю) при совершении розничной реализации. ";
            ОбъектПКО.СтавкаНДС                        = Перечисления.СтавкиНДС.НДС18;
            //ОбъектПКО.Подразделение                    = Ресурс;
            ОбъектПКО.СтатьяДвиженияДенежныхСредств = Справочники.СтатьиДвиженияДенежныхСредств.НайтиПоКоду("000000003");
            ОбъектПКО.СуммаДокумента                 = СуммаВозвратаПКО;


заполняется как то криво, не видит валюту, договор, статью, НДС, не считает НДС.
Что не так делаю?
1 Гипервизор
 
20.12.17
09:56
Забыли про ТЧ РасшифровкаПлатежа.
2 makkut
 
20.12.17
10:01
(1) Т.е сначала нужно добавить строку в табличную часть? Вроде при таком виде операции не видно самой табл части.
3 Гипервизор
 
20.12.17
10:05
(2) Все дело в переключателе без разбиения/списком. А так-то заполняется ТЧ.
4 makkut
 
20.12.17
10:08
(3) Большое спасибо, буду пробовать
5 makkut
 
20.12.17
10:20
(3) все заполняет но не считает НДС( ....
6 makkut
 
20.12.17
10:23
что то с курсом не то
7 Гипервизор
 
20.12.17
10:24
(5) Как считаете?
8 makkut
 
20.12.17
10:33
(7) просто заполняю как число, думаю должно это поле просчитаться, ну по крайней мере так в режиме предприятия, как только я вбиваю заново курс то всё считается

            ТЧПКО                                    = ОбъектПКО.РасшифровкаПлатежа.Добавить();
            ТЧПКО.ДоговорКонтрагента                = Справочники.ДоговорыКонтрагентов.НайтиПоНаименованию("Р-12/2017 от 01.12.2017");
            ТЧПКО.КурсВзаиморасчетов                = Число(1);
            ТЧПКО.СуммаПлатежа                        = Число(500);
            ТЧПКО.СуммаВзаиморасчетов                = Число(500);
            ТЧПКО.СтавкаНДС                            = Перечисления.СтавкиНДС.НДС18;
            ТЧПКО.СтатьяДвиженияДенежныхСредств        = Справочники.СтатьиДвиженияДенежныхСредств.НайтиПоКоду("000000003");
            ТЧПКО.СчетУчетаРасчетовСКонтрагентом    = ПланыСчетов.Хозрасчетный.РасчетыСПокупателямиИЗаказчиками;
            ТЧПКО.СчетУчетаРасчетовПоАвансам        = ПланыСчетов.Хозрасчетный.РасчетыПоАвансамПолученным;
9 prostoya
 
20.12.17
10:33
(6) Может забыли заполнить помимо курса, КратностьВзаиморасчетов?
10 prostoya
 
20.12.17
10:37
(8) А нет у вас расчета ндс...
11 Гипервизор
 
20.12.17
10:40
(8) А зачем через Число? Просто = 500 чем плохо?
Кратность забыли, да.
Но дело не в том. Не вижу расчет НДС. Так с чего бы ему самому считаться?
12 makkut
 
20.12.17
10:41
(10) понятно, т.е надо самому в поле просчитать формулой
вбил кратность ничего не поменялось.
13 makkut
 
20.12.17
10:41
буду пробовать...
14 Гипервизор
 
20.12.17
10:49
Ну можно воспользоваться типовыми плюшками УПП.
УправлениеДенежнымиСредствами.ПересчитатьСуммуНДС(СтрокаПлатеж);
15 makkut
 
20.12.17
11:02
(14) по формуле ТЧПКО.СуммаНДС = Число(500)/118 * 18 ;
считает, а по этой процедуре чет не получается