Имя: Пароль:
1C
1С v8
Делаю импорт данных в типовую бух 3. Не создаются проводки, но документы создаются
0 33554432
 
21.12.17
13:17
Помогите найти, что не доделано

        Док = Документы.ПриходныйКассовыйОрдер.СоздатьДокумент();
        Док.УстановитьНовыйНомер();
        Док.Дата = Выб.Дата;
        Док.ВидОперации = Перечисления.ВидыОперацийПКО.РозничнаяВыручка;
        Док.Организация = Справочники.Организации.НайтиПоНаименованию(Выб.Организация.Наименование, 0);
        Док.ПодразделениеОрганизации = НайтиПодразделение(Выб.Склад);
        Док.Контрагент = НайтиСклад(Выб.документоснование.Склад, Док.ПодразделениеОрганизации, );
        Док.ВалютаДокумента = Валюта;
        док.СчетКасса = планысчетов.хозрасчетный.кассаорганизации;
        Док.Комментарий = "#импорт из ДАЛИОН № " + Выб.Номер +" от " + Выб.Дата;
        док.СчетУчетаРасчетовСКонтрагентом= ПланыСчетов.Хозрасчетный.НайтиПоКоду("90.01");
        таблицаОКС= Выб.документоснование.товары.выгрузить();
        таблицаОКС.свернуть("СтавкаНДС","СуммаНДС,Сумма");        
        для каждого стр из ТаблицаОКС цикл
            НовРасш=док.РасшифровкаПлатежа.Добавить();
              НовРасш.СпособПогашенияЗадолженности=перечисления.СпособыПогашенияЗадолженности.Автоматически;
            НовРасш.СуммаПлатежа = стр.Сумма;
            НовРасш.СтавкаНДС = НайтиСтавкуНДС(стр.СтавкаНДС);
            НовРасш.СуммаНДС = стр.СуммаНДС;
            НовРасш.СтатьяДвиженияДенежныхСредств=справочники.СтатьиДвиженияДенежныхСредств.РозничнаяВыручка;
            НовРасш.СчетУчетаРасчетовСКонтрагентом = ПланыСчетов.Хозрасчетный.НайтиПоКоду("90.01");
            НовРасш.КратностьВзаиморасчетов=1;
            СчетУчетаРасчетовПоАвансам=ПланыСчетов.Хозрасчетный.РасчетыПоАвансамВыданным;
        конеццикла;    
        Док.СуммаДокумента=док.РасшифровкаПлатежа.Итог("СуммаПлатежа");
1 aka AMIGO
 
21.12.17
13:18
А что там про "РежимЗаписи.Проведение" было?
2 hhhh
 
21.12.17
13:19
(0) это тест такой? попрбуй

НовРасш.СуммаВзаиморасчетов
3 Prog111
 
21.12.17
13:32
Что-то я не понял - документ-то провёл?
4 Aleksey
 
21.12.17
13:33
А где договор?
5 hhhh
 
21.12.17
13:38
(0) курса валюты нет. В общем лучше выкинуть этот ваш кусок в мусор, какое-то дерьмо вы нам подсунули. Напишите по-новой лучше, и повдумчивее.
6 33554432
 
21.12.17
13:43
(4)
В качестве контрагента - склад. С ним нет договора
7 33554432
 
21.12.17
13:43
(3)
Это да, все проводится. По кнопке потом тоже перепровожу не помогает
8 33554432
 
21.12.17
13:53
Кстати, забил то же самое вручную, провел, проводок все равно нет
9 sonne666
 
21.12.17
13:58
(8) пко по розничной выручке не делает проводок вроде бы. Розничную выручку приходует ОРП.
10 mehfk
 
21.12.17
14:04
(9) ПКО, если Склад = Розничная торговая точка, то не делает, если НТТ, то делает.
11 Мимохожий Однако
 
21.12.17
14:12
ВидОперации другой возьми
12 33554432
 
21.12.17
14:27
(11)
Если вид операции на прочее поменять, то создаются. Но мне бухи говорят что это не правильно, хотят операцию розничная выручка и с проводками.
13 aka AMIGO
 
21.12.17
14:34
ДокПоступлениеТоваров = Документы.ПоступлениеТоваров.СоздатьДокумент();
            ДокПоступлениеТоваров.ХозяйственнаяОперация =
            Перечисления.ХозяйственныеОперации.Оприходование;
            ДокПоступлениеТоваров.Номер = Стр.НомерДок;
            ДокПоступлениеТоваров.Дата = ДатаНачПериода - 24*60*60;
//...................
            РежимЗаписи = РежимЗаписиДокумента.Проведение;
            ДокПоступлениеТоваров.Записать(РежимЗаписи);


Всё проводится на-ура..
14 aka AMIGO
 
21.12.17
14:35
Извините за г-код, если всё не так, как надо..
15 hhhh
 
21.12.17
14:38
(12) ну тип склада поменяй (10)
16 33554432
 
21.12.17
14:44
(15)
А есть ли  официальная инструкция по этому поводу, чтобы бухам передать?
17 hhhh
 
21.12.17
14:46
(16) по какому еще поводу? Что-то вы заработались.
18 piter3
 
21.12.17
14:46
(16) Т-8
Проблемы невозможно решaть нa том же уровне компетентности, нa котором они возникaют. Альберт Эйнштейн