CAHbOK @ Сегодня, 9:07
,
Заменить 91 на нужный счет
СчетЗатрат = СчетПоКоду("91");
// ======================================
Процедура УстСчетЗатрат()
Если глВосстановитьЗначение(,"ИспользоватьСчетаРасходов",Класс89)=Класс9 Тогда
Если ВидТМЦ = Перечисление.ВидыТМЦ.Услуга Тогда
СчетЗатрат = СчетПоКоду("949");
Иначе
СчетЗатрат = СчетПоКоду("91");
КонецЕсли;
Иначе
Если ВидТМЦ = Перечисление.ВидыТМЦ.Услуга Тогда
СчетЗатрат = СчетПоКоду("84");
ИначеЕсли ВидТМЦ = Перечисление.ВидыТМЦ.Материал Тогда
СчетЗатрат = СчетПоКоду("80.1");
ИначеЕсли ВидТМЦ = Перечисление.ВидыТМЦ.Полуфабрикат Тогда
СчетЗатрат = СчетПоКоду("80.2");
ИначеЕсли ВидТМЦ = Перечисление.ВидыТМЦ.Топливо Тогда
СчетЗатрат = СчетПоКоду("80.3");
ИначеЕсли ВидТМЦ = Перечисление.ВидыТМЦ.Стройматериал Тогда
СчетЗатрат = СчетПоКоду("80.5");
ИначеЕсли ВидТМЦ = Перечисление.ВидыТМЦ.Запчасти Тогда
СчетЗатрат = СчетПоКоду("80.6");
ИначеЕсли ВидТМЦ = Перечисление.ВидыТМЦ.Товар Тогда
СчетЗатрат = СчетПоКоду("80.8");
ИначеЕсли ВидТМЦ = Перечисление.ВидыТМЦ.Тара Тогда
СчетЗатрат = СчетПоКоду("80.4");
Иначе
СчетЗатрат = СчетПоКоду("80.9");
КонецЕсли;
КонецЕсли;
КонецПроцедуры