8.х БП Провоки при создании атоматическом создании документа

Тема в разделе ""1С:Бухгалтерия БП"", создана пользователем Lilit, 1 ноя 2009.

  1. TopicStarter Overlay
    Lilit
    Offline

    Lilit

    Регистрация:
    11 сен 2007
    Сообщения:
    33
    Симпатии:
    0
    Баллы:
    1
    С бух. раньше не работала, нужно сделать следующее: наладить обмен данными с базы магазина в типовую бух 8.1 вер 1.6. Выгрузка готова в ней данные о документах созданных в магазине за день. на основании этго файла должны в бух формироваться соответсвующие документы. Сами документы формирую, а вот провоки по ним не делаются, если создать такой документ ручками. проводки встанут, а если автоматом, то нет. Подскажите чтонужно добавить, чтобы и при автоматическом формировании работали проводки.
    Код:
    Если ВидД="Выручка" тогда
    НомерПКОвМагазине = Отрезать(Стр);
    СуммаВыручки = Отрезать(Стр);
    НовДокПКО = Документы.ПриходныйКассовыйОрдер.СоздатьДокумент();			
    НовДокПКО.Дата = ТекущаяДата();
    НовДокПКО.ВидОперации=Перечисления.ВидыОперацийПКО.ПриходДенежныхСредствРозничнаяВыручка;
    НовДокПКО.Организация = Справочники.Организации.НайтиПоНаименованию("1111");
    НовДокПКО.СтавкаНДС = Перечисления.СтавкиНДС.БезНДС;
    НовДокПКО.СуммаДокумента = СуммаВыручки;
    НовДокПКО.СтатьяДвиженияДенежныхСредств=Справочники.СтатьиДвиженияДенежныхСредств.НайтиПоНаименованию("Розничная выручка").ПолучитьОбъект();
    НовДокПКО.ОтражатьВНалоговомУчете = Истина;
    НовДокПКО.ВалютаДокумента = справочники.Валюты.НайтиПоКоду(643);
    НовДокПКО.СчетКасса = ПланыСчетов.Хозрасчетный.КассаОрганизации;
    НовДокПКО.Контрагент = Справочники.Склады.НайтиПоНаименованию("Магазин");
    Расшифровка = НовДокПко.РасшифровкаПлатежа.Добавить();
    Расшифровка.СуммаПлатежа = СуммаВыручки;
    Расшифровка.СтавкаНДС = Перечисления.СтавкиНДС.БезНДС;
    Расшифровка.СтатьяДвиженияДенежныхСредств=Справочники.СтатьиДвиженияДенежныхСредств.НайтиПоНаименованию("Розничная выручка").ПолучитьОбъект();
    НовДокПКО.Записать(РежимЗаписиДокумента.Проведение);
    КонецЕсли;
    
    кусочек кода, где создается сам док.
  2. tirk
    Offline

    tirk Опытный в 1С

    Регистрация:
    1 сен 2008
    Сообщения:
    1.142
    Симпатии:
    0
    Баллы:
    26
    если не пишит никаких ошибок... то попробуй

    НовДокПКО.Записать(РежимЗаписиДокумента.Проведение,РежимПроведенияДокумента.Неоперативный);
  3. TopicStarter Overlay
    Lilit
    Offline

    Lilit

    Регистрация:
    11 сен 2007
    Сообщения:
    33
    Симпатии:
    0
    Баллы:
    1
    Вот скрин сделанного дока руками и второй автоматом...

    Вложения:

  4. BabySG
    Offline

    BabySG Администраторы Команда форума Администратор

    Регистрация:
    10 июн 2007
    Сообщения:
    11.853
    Симпатии:
    12
    Баллы:
    29
    ТЧ Расшифровка платежа заполняй :)

Поделиться этой страницей