Файл: Разработка регламента выполнения процесса «Складской учет» (Аналитическая часть).pdf

//Отказ = истина;

Возврат;

КонецЕсли;

Если  _{нтообороту} Фирма.БанковскийСчет.Пустая() Тогда

Предупреждение("Заполните  _далее банковский  _отказ счет  _отчет у фирмы!", 60, "Проведение.");

//Отказ = истина;

Возврат;

КонецЕсли;

Если  _также Контрагент.БанковскийСчет.Пустая() Тогда

Предупреждение("Заполните  _целей банковский  _{обладает} счет  _итер у контрагента!", 60, "Проведение.");

//Отказ = истина;

Возврат;

КонецЕсли;

// регистр  _{измерения} Взаиморасчеты  _rectu Приход

Движение = Движения.Взаиморасчеты.Добавить();

Движение.ВидДвижения = ВидДвиженияНакопления.Приход;

Движение.Период= Дата;

Движение.Фирма  _{реализована} = Фирма;

Движение.Контрагент = Контрагент;

Движение.Сделка= ЭтотОбъект.Ссылка;

Движение.Сумма  _{артамонова} = ЭтотОбъект.Сумма;

Движение = Движения.Банк.Добавить();

Движение.ВидДвижения= ВидДвиженияНакопления.Расход;

Движение.Период  _исте = Дата;

Движение.Фирма  _{баронов} = Фирма;

Движение.БанковскийСчет = Фирма.БанковскийСчет;

Движение.Сумма = ЭтотОбъект.Сумма;

Движение.КодОперации=

Перечисления.КодыОпераций.РасходПоБанку;

// регистр  _{обладает} Основной

//Движение = Движения.Основной.Добавить();

//Движение.СчетДт = ПланыСчетов.Основной.ТоварыНаСкладах;

//Движение.СчетКт =

ПланыСчетов.Основной.РасчетыСПоставщикамиВРублях;

//Движение.Период = Дата;

//Движение.Сумма = ТекСтрокаНоменклатура.Сумма;

//Движение.КоличествоДт = ТекСтрокаНоменклатура.Количество;

//Движение.СубконтоДт[ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.Номенклатура] = ТекСтрокаНоменклатура.Номенклатура;

//Движение.СубконтоКт[ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.Контрагенты] = Контрагент;

КонецПроцедуры

Документ.РасходПоБанку.Форма.ФормаДокумента.Форма.Модуль

Процедура  _выборе ПриОткрытии()

Если  _отказ ЭтотОбъект.ЭтоНовый() Тогда

КодОперации = Перечисления.КодыОпераций.РасходПоБанку;

КонецЕсли;  _{проведен}

КонецПроцедуры

Процедура  _{регистр} Печать(Кнопка)

ТабДок = Новый  _если ТабличныйДокумент;

Макет =

Документы.РасходПоБанку.ПолучитьМакет("МакетРасходПоБанку");

// Заголовок

Область = Макет.ПолучитьОбласть("Заголовок");

Область.Параметры.РасходПоБанкуСтрока  _исте

= "Расход  _{номенклатуры} по банку № " + ЭтотОбъект.Номер +  _{тютюник}