7.7 Регистр учёта операция выбытия имущества

Тема в разделе "Отчеты и обработки для "1С:Предприятие 7.7"", создана пользователем skurser, 26 окт 2010.

  1. TopicStarter Overlay
    skurser
    Offline

    skurser

    Регистрация:
    26 окт 2010
    Сообщения:
    39
    Симпатии:
    0
    Баллы:
    1
    Прошу сильно не пинать, я ещё новичок в этом деле. Так вот, при поступлении денег от столовой организации составлялся акт, в форме заполнения акта есть возможность поставить галочку "от услуг столовой" (кто и как добавил такую возможность не знаю ). В столовой установили кассовый аппарат, и теперь нужно оформлять приходный кассовый ордер, как можно добавить такую же возможность в форму приходного кассового ордера. Это нужно для формирования регистра учёта операций выбытия имущества непосредственно по столовой. На вкладке "Виды дохода" в окне "Регистр учёта операция выбытия имущества, работ услуг прав", есть пункт "Выручка от услуг столовой".
  2. Бухгалтерский угодник
    Offline

    Бухгалтерский угодник Администраторы Команда форума Администратор

    Регистрация:
    29 дек 2008
    Сообщения:
    21.520
    Симпатии:
    407
    Баллы:
    104
    Что за конфигурация? Очень похоже на самописку или на сильно измененную конфу. Не видел в штатных ничего подобного. Не проанализировав МДшник вам вряд-ли сможет кто-то вразумительно ответить на вопрос
  3. TopicStarter Overlay
    skurser
    Offline

    skurser

    Регистрация:
    26 окт 2010
    Сообщения:
    39
    Симпатии:
    0
    Баллы:
    1
    Вот, нашёл в модуле документа "оказание услуг" упоминание об услугах столовой.
    Код:
    Если (ВыручкаБезНалогов > 0) и (глНовыеПравилаВеденияНУ(ДатаДок) = 1) и (ТаблицаРеализации.ВидНоменклатуры.ТипНоменклатуры <> Перечисление.ТипыНоменклатуры.УслугаЕНВД) Тогда
    Операция.НоваяПроводка();
    Операция.НомерЖурнала = "НУ";
    Операция.СодержаниеПроводки = "Выручка от реализации";
    Операция.ПервичныйДокумент  = глПредставлениеПервичногоДокумента(Контекст);
    Если УслСтоловой=1 Тогда
    Операция.Кредит.Счет = СчН06_12;
    Иначе 	Операция.Кредит.Счет = СчН06_01;  
    КонецЕсли;
    
    Операция.Кредит.Номенклатура = ТаблицаРеализации.Услуга;
    Операция.Кредит.УсловияПоступленияИВыбытия = Перечисление.УсловияПоступленияИВыбытия.ЗаПлату;
    Операция.Кредит.Основание = Договор;
    Операция.Сумма = ВыручкаБезНалогов - СуммоваяРазница;
    
    глОтражениеСуммовыхРазницВНаловомУчете(Контекст, СуммоваяРазница, 0);
    КонецЕсли;
    
    
  4. Бухгалтерский угодник
    Offline

    Бухгалтерский угодник Администраторы Команда форума Администратор

    Регистрация:
    29 дек 2008
    Сообщения:
    21.520
    Симпатии:
    407
    Баллы:
    104
    Так что вы хотите добавить в ПКО?

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