Переменные часть — и

vuza3 ТаблицаДанных.ПолучитьСтрокуПоНомеру(НомерСтрокиГруппировки);
ТаблицаДанных.ОценкаБУ = ОценкаБУ;
ТаблицаДанных.НПР = НПР;
ТаблицаДанных.КВР = КВР;

ИначеЕсли ВидАктивов = Перечисление.ВидыАктивовИобязательств.ДоходыБудущихПериодов Тогда

БухИтНУ.Опции(1,);
БухИтНУ.ВыполнитьЗапрос(,ВыбДата — 1,"98.2, НПР.98, КВР.98");

ТаблицаДанных.НоваяСтрока();
ТаблицаДанных.Субк1 = ВидАктивов;
ТаблицаДанных.Субк2 = "";
ТаблицаДанных.Субк3 = "«;
ТаблицаДанных.Группировка = 0;
ТаблицаДанных.МаскаСчета = „98“;
Если БухИтНУ.ПолучитьСчет(,СчетПоКоду(„98.2“)) = 1 Тогда
ТаблицаДанных.ОценкаБУ = БухИтНУ.СКК(„С“) — БухИтНУ.СКД(„С“);
КонецЕсли;
ТаблицаДанных.ОценкаНУ = 0;
Если БухИтНУ.ПолучитьСчет(,СчетПоКоду(„НПР.98“)) = 1 Тогда
ТаблицаДанных.НПР = БухИтНУ.СКК(„С“) — БухИтНУ.СКД(„С“);
КонецЕсли;
Если БухИтНУ.ПолучитьСчет(,СчетПоКоду(„КВР.98“)) = 1 Тогда
ТаблицаДанных.КВР = БухИтНУ.СКК(„С“) — БухИтНУ.СКД(„С“);
КонецЕсли;
ТаблицаДанных.НПРсальдо = ТаблицаДанных.НПР;
ТаблицаДанных.КВРсальдо = ТаблицаДанных.КВР;

ИначеЕсли ВидАктивов = Перечисление.ВидыАктивовИобязательств.УбыткиПрошлыхПериодов Тогда

БухИтНУ.Опции(1,);
БухИтНУ.ВыполнитьЗапрос(,ВыбДата — 1,»Н11, НПР.УП, КВР.УП");

ТаблицаДанных.НоваяСтрока();
ТаблицаДанных.Субк1 = ВидАктивов;
ТаблицаДанных.Субк2 = "";
ТаблицаДанных.Субк3 = "";
ТаблицаДанных.Группировка = 0;
ТаблицаДанных.МаскаСчета = «УП»;
ТаблицаДанных.ОценкаБУ = 0;
Если БухИтНУ.ПолучитьСчет(,СчетПоКоду(«Н11»)) = 1 Тогда
ТаблицаДанных.ОценкаНУ = БухИтНУ.СКД(«С») — БухИтНУ.СКК(«С»);
КонецЕсли;
Если БухИтНУ.ПолучитьСчет(,СчетПоКоду(«НПР.УП»)) = 1 Тогда
ТаблицаДанных.НПР = БухИтНУ.СКД(«С») — БухИтНУ.СКК(«С»);
КонецЕсли;
Если БухИтНУ.ПолучитьСчет(,СчетПоКоду(«КВР.УП»)) = 1 Тогда
ТаблицаДанных.КВР = БухИтНУ.СКД(«С») — БухИтНУ.СКК(«С»);
КонецЕсли;
ТаблицаДанных.НПРсальдо = ТаблицаДанных.НПР;
ТаблицаДанных.КВРсальдо = ТаблицаДанных.КВР;

ИначеЕсли ВидАктивов = Перечисление.ВидыАктивовИобязательств.НедостачиПотери Тогда

Связанные записи

Оставить комментарий

Это не спам.
сделано dimoning.ru