БланкСШаблоном [20.04.2006] "Сведения о движении нефинансовых активов";

-- Зона авто-идентификации отчета
Ф_ОКУД: STRING = '0503768';
Ф_ИНСТР_КОД: STRING = '33н';
Ф_РЕД_КОД: STRING = '139н';
Ф_ДЕЙСТВ_С: DATE = 01.01.2014;
Ф_ДЕЙСТВ_ПО: DATE = 01.01.2015;
-- конец зоны авто-идентификации отчета

var ДН:D=РАБ.ПАРАМ_ОТЧ.ДН;
var ДК:D=РАБ.ПАРАМ_ОТЧ.ДК;

var УслВал:S=РАБ.ПАРАМ_ОТЧ.УслВал;
var Вал :S=РАБ.ПАРАМ_ОТЧ.Вал;
var Вал_:S=Вал;
var Показатель:S=РАБ.ПАРАМ_ОТЧ.Показатель;

var ОбщУслВД:S=РАБ.ПАРАМ_ОТЧ.ОбщУслВД;
var ВД:S=РАБ.ПАРАМ_ОТЧ.ВД;
var НаимВД:S=РАБ.ПАРАМ_ОТЧ.ВД_;

ЕдИзм:I=РАБ.ПАРАМ_ОТЧ.ЕдИзм;
var ЕдИзм_:S=РАБ.ПАРАМ_ОТЧ.ЕдИзм_;
var ОКЕИ:S=РАБ.ПАРАМ_ОТЧ.ОКЕИ;

var Точн:I=РАБ.ПАРАМ_ОТЧ.Точн;

var ОбщУслАн  :S=РАБ.ПАРАМ_ОТЧ.ОбщУслАн;
var ОбщУслКД  :S=РАБ.ПАРАМ_ОТЧ.ОбщУслКД;
var ОбщУслКР  :S=РАБ.ПАРАМ_ОТЧ.ОбщУслКР;
var ОбщУслКИФД:S=РАБ.ПАРАМ_ОТЧ.ОбщУслКИФД;
var ОбщУслБС  :S=РАБ.ПАРАМ_ОТЧ.ОбщУслБС;
var ОбщУслВБС :S=РАБ.ПАРАМ_ОТЧ.ОбщУслВБС;
ВидДеятельности :i;
var ОбщУслВД_ЗАБ:S=РАБ.ПАРАМ_ОТЧ.ОбщУслВД_ЗАБ;

var РазрывСтр:s='----------------------------------- Разрыв страницы -----------------------------------';
УчетРазрывПеред_с2:l;
УчетРазрывПеред_с3:l;
УчетРазрывПеред_с4:l;
УчетРазрывПеред_с5:l;
УчетРазрывПеред_с6:l;
УчетРазрывПеред_с7:l;
Упр_с1:l;
Упр_с2:l;
Упр_с3:l;
Упр_с3_105:l;
Упр_с3_105_:l=Упр_с2 и Упр_с3_105;
Упр_с4:l;
Упр_с5:l;
Упр_с6:l;
Упр_с7:l;
Упр_Раздел1:l=Упр_с1 или Упр_с2 или Упр_с3;

УпрРазрыв_с1_с2:l=УчетРазрывПеред_с2 и Упр_с2 и Упр_с1;
УпрРазрыв_с2_с3:l=УчетРазрывПеред_с3 и Упр_с3 и (Упр_с1 или Упр_с2);
УпрРазрыв_с3_с4:l=УчетРазрывПеред_с4 и Упр_с4 и (Упр_с1 или Упр_с2 или Упр_с3);
УпрРазрыв_с4_с5:l=УчетРазрывПеред_с5 и Упр_с5 и (Упр_с1 или Упр_с2 или Упр_с3 или Упр_с4);
УпрРазрыв_с5_с6:l=УчетРазрывПеред_с6 и Упр_с6 и (Упр_с1 или Упр_с2 или Упр_с3 или Упр_с4 или Упр_с5);
УпрРазрыв_с6_с7:l=УчетРазрывПеред_с7 и Упр_с7 и (Упр_с1 или Упр_с2 или Упр_с3 или Упр_с4 или Упр_с5 или Упр_с6);
Func НаименованиеФормулы(v:i):s;
  if v=0:^'+оборот ';
   | v=1:^'+остаток';
   | v=2:^'-оборот ';
   | v=3:^'-остаток';
--   | v=4:^'+оборот искл внпр';
--   | v=5:^'-оборот искл внпр';
   | true:^'';
  fi;
end;

var ФлНастройки:l;
var УчетВНПР:l=[true];
НастройкиПоУмолчанию:i;--0=не были загружены; 1=уже загружены; -1=не загружены и не нужны для загрузки
var RГ4С011; var RГ5С011; var RГ6С011; var RГ7С011=RГ4С011+RГ5С011-RГ6С011;  SRГ4С011:s; SRГ5С011:s; SRГ6С011:s; ARГ4С011:s; ARГ5С011:s; ARГ6С011:s;  FRГ4С011_:i; FRГ5С011_:i; FRГ6С011_:i;  var FRГ4С011:s=НаименованиеФормулы(FRГ4С011_); var FRГ5С011:s=НаименованиеФормулы(FRГ5С011_); var FRГ6С011:s=НаименованиеФормулы(FRГ6С011_);
var RГ4С012; var RГ5С012; var RГ6С012; var RГ7С012=RГ4С012+RГ5С012-RГ6С012;  SRГ4С012:s; SRГ5С012:s; SRГ6С012:s; ARГ4С012:s; ARГ5С012:s; ARГ6С012:s;  FRГ4С012_:i; FRГ5С012_:i; FRГ6С012_:i;  var FRГ4С012:s=НаименованиеФормулы(FRГ4С012_); var FRГ5С012:s=НаименованиеФормулы(FRГ5С012_); var FRГ6С012:s=НаименованиеФормулы(FRГ6С012_);
var RГ4С013; var RГ5С013; var RГ6С013; var RГ7С013=RГ4С013+RГ5С013-RГ6С013;  SRГ4С013:s; SRГ5С013:s; SRГ6С013:s; ARГ4С013:s; ARГ5С013:s; ARГ6С013:s;  FRГ4С013_:i; FRГ5С013_:i; FRГ6С013_:i;  var FRГ4С013:s=НаименованиеФормулы(FRГ4С013_); var FRГ5С013:s=НаименованиеФормулы(FRГ5С013_); var FRГ6С013:s=НаименованиеФормулы(FRГ6С013_);
var RГ4С014; var RГ5С014; var RГ6С014; var RГ7С014=RГ4С014+RГ5С014-RГ6С014;  SRГ4С014:s; SRГ5С014:s; SRГ6С014:s; ARГ4С014:s; ARГ5С014:s; ARГ6С014:s;  FRГ4С014_:i; FRГ5С014_:i; FRГ6С014_:i;  var FRГ4С014:s=НаименованиеФормулы(FRГ4С014_); var FRГ5С014:s=НаименованиеФормулы(FRГ5С014_); var FRГ6С014:s=НаименованиеФормулы(FRГ6С014_);
var RГ4С015; var RГ5С015; var RГ6С015; var RГ7С015=RГ4С015+RГ5С015-RГ6С015;  SRГ4С015:s; SRГ5С015:s; SRГ6С015:s; ARГ4С015:s; ARГ5С015:s; ARГ6С015:s;  FRГ4С015_:i; FRГ5С015_:i; FRГ6С015_:i;  var FRГ4С015:s=НаименованиеФормулы(FRГ4С015_); var FRГ5С015:s=НаименованиеФормулы(FRГ5С015_); var FRГ6С015:s=НаименованиеФормулы(FRГ6С015_);
var RГ4С016; var RГ5С016; var RГ6С016; var RГ7С016=RГ4С016+RГ5С016-RГ6С016;  SRГ4С016:s; SRГ5С016:s; SRГ6С016:s; ARГ4С016:s; ARГ5С016:s; ARГ6С016:s;  FRГ4С016_:i; FRГ5С016_:i; FRГ6С016_:i;  var FRГ4С016:s=НаименованиеФормулы(FRГ4С016_); var FRГ5С016:s=НаименованиеФормулы(FRГ5С016_); var FRГ6С016:s=НаименованиеФормулы(FRГ6С016_);
var RГ4С017; var RГ5С017; var RГ6С017; var RГ7С017=RГ4С017+RГ5С017-RГ6С017;  SRГ4С017:s; SRГ5С017:s; SRГ6С017:s; ARГ4С017:s; ARГ5С017:s; ARГ6С017:s;  FRГ4С017_:i; FRГ5С017_:i; FRГ6С017_:i;  var FRГ4С017:s=НаименованиеФормулы(FRГ4С017_); var FRГ5С017:s=НаименованиеФормулы(FRГ5С017_); var FRГ6С017:s=НаименованиеФормулы(FRГ6С017_);
var RГ4С018; var RГ5С018; var RГ6С018; var RГ7С018=RГ4С018+RГ5С018-RГ6С018;  SRГ4С018:s; SRГ5С018:s; SRГ6С018:s; ARГ4С018:s; ARГ5С018:s; ARГ6С018:s;  FRГ4С018_:i; FRГ5С018_:i; FRГ6С018_:i;  var FRГ4С018:s=НаименованиеФормулы(FRГ4С018_); var FRГ5С018:s=НаименованиеФормулы(FRГ5С018_); var FRГ6С018:s=НаименованиеФормулы(FRГ6С018_);
var RГ4С051;              var RГ6С051; var RГ7С051=RГ4С051+RГ6С051;          SRГ4С051:s;             SRГ6С051:s; ARГ4С051:s;             ARГ6С051:s;  FRГ4С051_:i;              FRГ6С051_:i;  var FRГ4С051:s=НаименованиеФормулы(FRГ4С051_);                                                var FRГ6С051:s=НаименованиеФормулы(FRГ6С051_);
var RГ4С052;              var RГ6С052; var RГ7С052=RГ4С052+RГ6С052;          SRГ4С052:s;             SRГ6С052:s; ARГ4С052:s;             ARГ6С052:s;  FRГ4С052_:i;              FRГ6С052_:i;  var FRГ4С052:s=НаименованиеФормулы(FRГ4С052_);                                                var FRГ6С052:s=НаименованиеФормулы(FRГ6С052_);
var RГ4С053;              var RГ6С053; var RГ7С053=RГ4С053+RГ6С053;          SRГ4С053:s;             SRГ6С053:s; ARГ4С053:s;             ARГ6С053:s;  FRГ4С053_:i;              FRГ6С053_:i;  var FRГ4С053:s=НаименованиеФормулы(FRГ4С053_);                                                var FRГ6С053:s=НаименованиеФормулы(FRГ6С053_);
var RГ4С054;              var RГ6С054; var RГ7С054=RГ4С054+RГ6С054;          SRГ4С054:s;             SRГ6С054:s; ARГ4С054:s;             ARГ6С054:s;  FRГ4С054_:i;              FRГ6С054_:i;  var FRГ4С054:s=НаименованиеФормулы(FRГ4С054_);                                                var FRГ6С054:s=НаименованиеФормулы(FRГ6С054_);
var RГ4С055;              var RГ6С055; var RГ7С055=RГ4С055+RГ6С055;          SRГ4С055:s;             SRГ6С055:s; ARГ4С055:s;             ARГ6С055:s;  FRГ4С055_:i;              FRГ6С055_:i;  var FRГ4С055:s=НаименованиеФормулы(FRГ4С055_);                                                var FRГ6С055:s=НаименованиеФормулы(FRГ6С055_);
var RГ4С056;              var RГ6С056; var RГ7С056=RГ4С056+RГ6С056;          SRГ4С056:s;             SRГ6С056:s; ARГ4С056:s;             ARГ6С056:s;  FRГ4С056_:i;              FRГ6С056_:i;  var FRГ4С056:s=НаименованиеФормулы(FRГ4С056_);                                                var FRГ6С056:s=НаименованиеФормулы(FRГ6С056_);
var RГ4С057;              var RГ6С057; var RГ7С057=RГ4С057+RГ6С057;          SRГ4С057:s;             SRГ6С057:s; ARГ4С057:s;             ARГ6С057:s;  FRГ4С057_:i;              FRГ6С057_:i;  var FRГ4С057:s=НаименованиеФормулы(FRГ4С057_);                                                var FRГ6С057:s=НаименованиеФормулы(FRГ6С057_);
var RГ4С058;              var RГ6С058; var RГ7С058=RГ4С058+RГ6С058;          SRГ4С058:s;             SRГ6С058:s; ARГ4С058:s;             ARГ6С058:s;  FRГ4С058_:i;              FRГ6С058_:i;  var FRГ4С058:s=НаименованиеФормулы(FRГ4С058_);                                                var FRГ6С058:s=НаименованиеФормулы(FRГ6С058_);
var RГ4С070; var RГ5С070; var RГ6С070; var RГ7С070=RГ4С070+RГ5С070-RГ6С070;  SRГ4С070:s; SRГ5С070:s; SRГ6С070:s; ARГ4С070:s; ARГ5С070:s; ARГ6С070:s;  FRГ4С070_:i; FRГ5С070_:i; FRГ6С070_:i;  var FRГ4С070:s=НаименованиеФормулы(FRГ4С070_); var FRГ5С070:s=НаименованиеФормулы(FRГ5С070_); var FRГ6С070:s=НаименованиеФормулы(FRГ6С070_);
var RГ4С080; var RГ5С080; var RГ6С080; var RГ7С080=RГ4С080+RГ5С080-RГ6С080;  SRГ4С080:s; SRГ5С080:s; SRГ6С080:s; ARГ4С080:s; ARГ5С080:s; ARГ6С080:s;  FRГ4С080_:i; FRГ5С080_:i; FRГ6С080_:i;  var FRГ4С080:s=НаименованиеФормулы(FRГ4С080_); var FRГ5С080:s=НаименованиеФормулы(FRГ5С080_); var FRГ6С080:s=НаименованиеФормулы(FRГ6С080_);
var RГ4С110; var RГ5С110; var RГ6С110; var RГ7С110=RГ4С110+RГ5С110-RГ6С110;  SRГ4С110:s; SRГ5С110:s; SRГ6С110:s; ARГ4С110:s; ARГ5С110:s; ARГ6С110:s;  FRГ4С110_:i; FRГ5С110_:i; FRГ6С110_:i;  var FRГ4С110:s=НаименованиеФормулы(FRГ4С110_); var FRГ5С110:s=НаименованиеФормулы(FRГ5С110_); var FRГ6С110:s=НаименованиеФормулы(FRГ6С110_);
var RГ4С120;              var RГ6С120; var RГ7С120=RГ4С120+RГ6С120;          SRГ4С120:s;             SRГ6С120:s; ARГ4С120:s;             ARГ6С120:s;  FRГ4С120_:i;              FRГ6С120_:i;  var FRГ4С120:s=НаименованиеФормулы(FRГ4С120_);                                                var FRГ6С120:s=НаименованиеФормулы(FRГ6С120_);
var RГ4С130; var RГ5С130; var RГ6С130; var RГ7С130=RГ4С130+RГ5С130-RГ6С130;  SRГ4С130:s; SRГ5С130:s; SRГ6С130:s; ARГ4С130:s; ARГ5С130:s; ARГ6С130:s;  FRГ4С130_:i; FRГ5С130_:i; FRГ6С130_:i;  var FRГ4С130:s=НаименованиеФормулы(FRГ4С130_); var FRГ5С130:s=НаименованиеФормулы(FRГ5С130_); var FRГ6С130:s=НаименованиеФормулы(FRГ6С130_);
var RГ4С151; var RГ5С151; var RГ6С151; var RГ7С151=RГ4С151+RГ5С151-RГ6С151;  SRГ4С151:s; SRГ5С151:s; SRГ6С151:s; ARГ4С151:s; ARГ5С151:s; ARГ6С151:s;  FRГ4С151_:i; FRГ5С151_:i; FRГ6С151_:i;  var FRГ4С151:s=НаименованиеФормулы(FRГ4С151_); var FRГ5С151:s=НаименованиеФормулы(FRГ5С151_); var FRГ6С151:s=НаименованиеФормулы(FRГ6С151_);
var RГ4С152; var RГ5С152; var RГ6С152; var RГ7С152=RГ4С152+RГ5С152-RГ6С152;  SRГ4С152:s; SRГ5С152:s; SRГ6С152:s; ARГ4С152:s; ARГ5С152:s; ARГ6С152:s;  FRГ4С152_:i; FRГ5С152_:i; FRГ6С152_:i;  var FRГ4С152:s=НаименованиеФормулы(FRГ4С152_); var FRГ5С152:s=НаименованиеФормулы(FRГ5С152_); var FRГ6С152:s=НаименованиеФормулы(FRГ6С152_);
var RГ4С153; var RГ5С153; var RГ6С153; var RГ7С153=RГ4С153+RГ5С153-RГ6С153;  SRГ4С153:s; SRГ5С153:s; SRГ6С153:s; ARГ4С153:s; ARГ5С153:s; ARГ6С153:s;  FRГ4С153_:i; FRГ5С153_:i; FRГ6С153_:i;  var FRГ4С153:s=НаименованиеФормулы(FRГ4С153_); var FRГ5С153:s=НаименованиеФормулы(FRГ5С153_); var FRГ6С153:s=НаименованиеФормулы(FRГ6С153_);
var RГ4С170; var RГ5С170; var RГ6С170; var RГ7С170=RГ4С170+RГ5С170-RГ6С170;  SRГ4С170:s; SRГ5С170:s; SRГ6С170:s; ARГ4С170:s; ARГ5С170:s; ARГ6С170:s;  FRГ4С170_:i; FRГ5С170_:i; FRГ6С170_:i;  var FRГ4С170:s=НаименованиеФормулы(FRГ4С170_); var FRГ5С170:s=НаименованиеФормулы(FRГ5С170_); var FRГ6С170:s=НаименованиеФормулы(FRГ6С170_);
var RГ4С191; var RГ5С191; var RГ6С191; var RГ7С191=RГ4С191+RГ5С191-RГ6С191;  SRГ4С191:s; SRГ5С191:s; SRГ6С191:s; ARГ4С191:s; ARГ5С191:s; ARГ6С191:s;  FRГ4С191_:i; FRГ5С191_:i; FRГ6С191_:i;  var FRГ4С191:s=НаименованиеФормулы(FRГ4С191_); var FRГ5С191:s=НаименованиеФормулы(FRГ5С191_); var FRГ6С191:s=НаименованиеФормулы(FRГ6С191_);
var RГ4С192; var RГ5С192; var RГ6С192; var RГ7С192=RГ4С192+RГ5С192-RГ6С192;  SRГ4С192:s; SRГ5С192:s; SRГ6С192:s; ARГ4С192:s; ARГ5С192:s; ARГ6С192:s;  FRГ4С192_:i; FRГ5С192_:i; FRГ6С192_:i;  var FRГ4С192:s=НаименованиеФормулы(FRГ4С192_); var FRГ5С192:s=НаименованиеФормулы(FRГ5С192_); var FRГ6С192:s=НаименованиеФормулы(FRГ6С192_);
var RГ4С193; var RГ5С193; var RГ6С193; var RГ7С193=RГ4С193+RГ5С193-RГ6С193;  SRГ4С193:s; SRГ5С193:s; SRГ6С193:s; ARГ4С193:s; ARГ5С193:s; ARГ6С193:s;  FRГ4С193_:i; FRГ5С193_:i; FRГ6С193_:i;  var FRГ4С193:s=НаименованиеФормулы(FRГ4С193_); var FRГ5С193:s=НаименованиеФормулы(FRГ5С193_); var FRГ6С193:s=НаименованиеФормулы(FRГ6С193_);
var RГ4С194; var RГ5С194; var RГ6С194; var RГ7С194=RГ4С194+RГ5С194-RГ6С194;  SRГ4С194:s; SRГ5С194:s; SRГ6С194:s; ARГ4С194:s; ARГ5С194:s; ARГ6С194:s;  FRГ4С194_:i; FRГ5С194_:i; FRГ6С194_:i;  var FRГ4С194:s=НаименованиеФормулы(FRГ4С194_); var FRГ5С194:s=НаименованиеФормулы(FRГ5С194_); var FRГ6С194:s=НаименованиеФормулы(FRГ6С194_);
var RГ4С195; var RГ5С195; var RГ6С195; var RГ7С195=RГ4С195+RГ5С195-RГ6С195;  SRГ4С195:s; SRГ5С195:s; SRГ6С195:s; ARГ4С195:s; ARГ5С195:s; ARГ6С195:s;  FRГ4С195_:i; FRГ5С195_:i; FRГ6С195_:i;  var FRГ4С195:s=НаименованиеФормулы(FRГ4С195_); var FRГ5С195:s=НаименованиеФормулы(FRГ5С195_); var FRГ6С195:s=НаименованиеФормулы(FRГ6С195_);
var RГ4С196; var RГ5С196; var RГ6С196; var RГ7С196=RГ4С196+RГ5С196-RГ6С196;  SRГ4С196:s; SRГ5С196:s; SRГ6С196:s; ARГ4С196:s; ARГ5С196:s; ARГ6С196:s;  FRГ4С196_:i; FRГ5С196_:i; FRГ6С196_:i;  var FRГ4С196:s=НаименованиеФормулы(FRГ4С196_); var FRГ5С196:s=НаименованиеФормулы(FRГ5С196_); var FRГ6С196:s=НаименованиеФормулы(FRГ6С196_);
var RГ4С197; var RГ5С197; var RГ6С197; var RГ7С197=RГ4С197+RГ5С197-RГ6С197;  SRГ4С197:s; SRГ5С197:s; SRГ6С197:s; ARГ4С197:s; ARГ5С197:s; ARГ6С197:s;  FRГ4С197_:i; FRГ5С197_:i; FRГ6С197_:i;  var FRГ4С197:s=НаименованиеФормулы(FRГ4С197_); var FRГ5С197:s=НаименованиеФормулы(FRГ5С197_); var FRГ6С197:s=НаименованиеФормулы(FRГ6С197_);
var RГ4С198; var RГ5С198; var RГ6С198; var RГ7С198=RГ4С198+RГ5С198-RГ6С198;  SRГ4С198:s; SRГ5С198:s; SRГ6С198:s; ARГ4С198:s; ARГ5С198:s; ARГ6С198:s;  FRГ4С198_:i; FRГ5С198_:i; FRГ6С198_:i;  var FRГ4С198:s=НаименованиеФормулы(FRГ4С198_); var FRГ5С198:s=НаименованиеФормулы(FRГ5С198_); var FRГ6С198:s=НаименованиеФормулы(FRГ6С198_);
var RГ4С199; var RГ5С199; var RГ6С199; var RГ7С199=RГ4С199+RГ5С199-RГ6С199;  SRГ4С199:s; SRГ5С199:s; SRГ6С199:s; ARГ4С199:s; ARГ5С199:s; ARГ6С199:s;  FRГ4С199_:i; FRГ5С199_:i; FRГ6С199_:i;  var FRГ4С199:s=НаименованиеФормулы(FRГ4С199_); var FRГ5С199:s=НаименованиеФормулы(FRГ5С199_); var FRГ6С199:s=НаименованиеФормулы(FRГ6С199_);
var RГ4С230; var RГ5С230; var RГ6С230; var RГ7С230=RГ4С230+RГ5С230-RГ6С230;  SRГ4С230:s; SRГ5С230:s; SRГ6С230:s; ARГ4С230:s; ARГ5С230:s; ARГ6С230:s;  FRГ4С230_:i; FRГ5С230_:i; FRГ6С230_:i;  var FRГ4С230:s=НаименованиеФормулы(FRГ4С230_); var FRГ5С230:s=НаименованиеФормулы(FRГ5С230_); var FRГ6С230:s=НаименованиеФормулы(FRГ6С230_);
var RГ4С250; var RГ5С250; var RГ6С250; var RГ7С250=RГ4С250+RГ5С250-RГ6С250;  SRГ4С250:s; SRГ5С250:s; SRГ6С250:s; ARГ4С250:s; ARГ5С250:s; ARГ6С250:s;  FRГ4С250_:i; FRГ5С250_:i; FRГ6С250_:i;  var FRГ4С250:s=НаименованиеФормулы(FRГ4С250_); var FRГ5С250:s=НаименованиеФормулы(FRГ5С250_); var FRГ6С250:s=НаименованиеФормулы(FRГ6С250_);

var RГ4С311; var RГ5С311; var RГ6С311; var RГ7С311=RГ4С311+RГ5С311-RГ6С311;  SRГ4С311:s; SRГ5С311:s; SRГ6С311:s; ARГ4С311:s; ARГ5С311:s; ARГ6С311:s;  FRГ4С311_:i; FRГ5С311_:i; FRГ6С311_:i;  var FRГ4С311:s=НаименованиеФормулы(FRГ4С311_); var FRГ5С311:s=НаименованиеФормулы(FRГ5С311_); var FRГ6С311:s=НаименованиеФормулы(FRГ6С311_);
var RГ4С312; var RГ5С312; var RГ6С312; var RГ7С312=RГ4С312+RГ5С312-RГ6С312;  SRГ4С312:s; SRГ5С312:s; SRГ6С312:s; ARГ4С312:s; ARГ5С312:s; ARГ6С312:s;  FRГ4С312_:i; FRГ5С312_:i; FRГ6С312_:i;  var FRГ4С312:s=НаименованиеФормулы(FRГ4С312_); var FRГ5С312:s=НаименованиеФормулы(FRГ5С312_); var FRГ6С312:s=НаименованиеФормулы(FRГ6С312_);
var RГ4С321;              var RГ6С321; var RГ7С321=RГ4С321+RГ6С321;          SRГ4С321:s;             SRГ6С321:s; ARГ4С321:s;             ARГ6С321:s;  FRГ4С321_:i;              FRГ6С321_:i;  var FRГ4С321:s=НаименованиеФормулы(FRГ4С321_);                                                var FRГ6С321:s=НаименованиеФормулы(FRГ6С321_);
var RГ4С322;              var RГ6С322; var RГ7С322=RГ4С322+RГ6С322;          SRГ4С322:s;             SRГ6С322:s; ARГ4С322:s;             ARГ6С322:s;  FRГ4С322_:i;              FRГ6С322_:i;  var FRГ4С322:s=НаименованиеФормулы(FRГ4С322_);                                                var FRГ6С322:s=НаименованиеФормулы(FRГ6С322_);
var RГ4С331; var RГ5С331; var RГ6С331; var RГ7С331=RГ4С331+RГ5С331-RГ6С331;  SRГ4С331:s; SRГ5С331:s; SRГ6С331:s; ARГ4С331:s; ARГ5С331:s; ARГ6С331:s;  FRГ4С331_:i; FRГ5С331_:i; FRГ6С331_:i;  var FRГ4С331:s=НаименованиеФормулы(FRГ4С331_); var FRГ5С331:s=НаименованиеФормулы(FRГ5С331_); var FRГ6С331:s=НаименованиеФормулы(FRГ6С331_);
var RГ4С332; var RГ5С332; var RГ6С332; var RГ7С332=RГ4С332+RГ5С332-RГ6С332;  SRГ4С332:s; SRГ5С332:s; SRГ6С332:s; ARГ4С332:s; ARГ5С332:s; ARГ6С332:s;  FRГ4С332_:i; FRГ5С332_:i; FRГ6С332_:i;  var FRГ4С332:s=НаименованиеФормулы(FRГ4С332_); var FRГ5С332:s=НаименованиеФормулы(FRГ5С332_); var FRГ6С332:s=НаименованиеФормулы(FRГ6С332_);
var RГ4С341; var RГ5С341; var RГ6С341; var RГ7С341=RГ4С341+RГ5С341-RГ6С341;  SRГ4С341:s; SRГ5С341:s; SRГ6С341:s; ARГ4С341:s; ARГ5С341:s; ARГ6С341:s;  FRГ4С341_:i; FRГ5С341_:i; FRГ6С341_:i;  var FRГ4С341:s=НаименованиеФормулы(FRГ4С341_); var FRГ5С341:s=НаименованиеФормулы(FRГ5С341_); var FRГ6С341:s=НаименованиеФормулы(FRГ6С341_);
var RГ4С342; var RГ5С342; var RГ6С342; var RГ7С342=RГ4С342+RГ5С342-RГ6С342;  SRГ4С342:s; SRГ5С342:s; SRГ6С342:s; ARГ4С342:s; ARГ5С342:s; ARГ6С342:s;  FRГ4С342_:i; FRГ5С342_:i; FRГ6С342_:i;  var FRГ4С342:s=НаименованиеФормулы(FRГ4С342_); var FRГ5С342:s=НаименованиеФормулы(FRГ5С342_); var FRГ6С342:s=НаименованиеФормулы(FRГ6С342_);
var RГ4С352; var RГ5С352; var RГ6С352; var RГ7С352=RГ4С352+RГ5С352-RГ6С352;  SRГ4С352:s; SRГ5С352:s; SRГ6С352:s; ARГ4С352:s; ARГ5С352:s; ARГ6С352:s;  FRГ4С352_:i; FRГ5С352_:i; FRГ6С352_:i;  var FRГ4С352:s=НаименованиеФормулы(FRГ4С352_); var FRГ5С352:s=НаименованиеФормулы(FRГ5С352_); var FRГ6С352:s=НаименованиеФормулы(FRГ6С352_);
var RГ4С362;              var RГ6С362; var RГ7С362=RГ4С362+RГ6С362;          SRГ4С362:s;             SRГ6С362:s; ARГ4С362:s;             ARГ6С362:s;  FRГ4С362_:i;              FRГ6С362_:i;  var FRГ4С362:s=НаименованиеФормулы(FRГ4С362_);                                                var FRГ6С362:s=НаименованиеФормулы(FRГ6С362_);
var RГ4С372; var RГ5С372; var RГ6С372; var RГ7С372=RГ4С372+RГ5С372-RГ6С372;  SRГ4С372:s; SRГ5С372:s; SRГ6С372:s; ARГ4С372:s; ARГ5С372:s; ARГ6С372:s;  FRГ4С372_:i; FRГ5С372_:i; FRГ6С372_:i;  var FRГ4С372:s=НаименованиеФормулы(FRГ4С372_); var FRГ5С372:s=НаименованиеФормулы(FRГ5С372_); var FRГ6С372:s=НаименованиеФормулы(FRГ6С372_);
var RГ4С412; var RГ5С412; var RГ6С412; var RГ7С412=RГ4С412+RГ5С412-RГ6С412;  SRГ4С412:s; SRГ5С412:s; SRГ6С412:s; ARГ4С412:s; ARГ5С412:s; ARГ6С412:s;  FRГ4С412_:i; FRГ5С412_:i; FRГ6С412_:i;  var FRГ4С412:s=НаименованиеФормулы(FRГ4С412_); var FRГ5С412:s=НаименованиеФормулы(FRГ5С412_); var FRГ6С412:s=НаименованиеФормулы(FRГ6С412_);
var RГ4С422; var RГ5С422; var RГ6С422; var RГ7С422=RГ4С422+RГ5С422-RГ6С422;  SRГ4С422:s; SRГ5С422:s; SRГ6С422:s; ARГ4С422:s; ARГ5С422:s; ARГ6С422:s;  FRГ4С422_:i; FRГ5С422_:i; FRГ6С422_:i;  var FRГ4С422:s=НаименованиеФормулы(FRГ4С422_); var FRГ5С422:s=НаименованиеФормулы(FRГ5С422_); var FRГ6С422:s=НаименованиеФормулы(FRГ6С422_);
var RГ4С432; var RГ5С432; var RГ6С432; var RГ7С432=RГ4С432+RГ5С432-RГ6С432;  SRГ4С432:s; SRГ5С432:s; SRГ6С432:s; ARГ4С432:s; ARГ5С432:s; ARГ6С432:s;  FRГ4С432_:i; FRГ5С432_:i; FRГ6С432_:i;  var FRГ4С432:s=НаименованиеФормулы(FRГ4С432_); var FRГ5С432:s=НаименованиеФормулы(FRГ5С432_); var FRГ6С432:s=НаименованиеФормулы(FRГ6С432_);



var RГ4С450; var RГ5С450; var RГ6С450; var RГ7С450=RГ4С450+RГ5С450-RГ6С450;  SRГ4С450:s; SRГ5С450:s; SRГ6С450:s; ARГ4С450:s; ARГ5С450:s; ARГ6С450:s;  FRГ4С450_:i; FRГ5С450_:i; FRГ6С450_:i;  var FRГ4С450:s=НаименованиеФормулы(FRГ4С450_); var FRГ5С450:s=НаименованиеФормулы(FRГ5С450_); var FRГ6С450:s=НаименованиеФормулы(FRГ6С450_);
var RГ4С451; var RГ5С451; var RГ6С451; var RГ7С451=RГ4С451+RГ5С451-RГ6С451;  SRГ4С451:s; SRГ5С451:s; SRГ6С451:s; ARГ4С451:s; ARГ5С451:s; ARГ6С451:s;  FRГ4С451_:i; FRГ5С451_:i; FRГ6С451_:i;  var FRГ4С451:s=НаименованиеФормулы(FRГ4С451_); var FRГ5С451:s=НаименованиеФормулы(FRГ5С451_); var FRГ6С451:s=НаименованиеФормулы(FRГ6С451_);
var RГ4С452; var RГ5С452; var RГ6С452; var RГ7С452=RГ4С452+RГ5С452-RГ6С452;  SRГ4С452:s; SRГ5С452:s; SRГ6С452:s; ARГ4С452:s; ARГ5С452:s; ARГ6С452:s;  FRГ4С452_:i; FRГ5С452_:i; FRГ6С452_:i;  var FRГ4С452:s=НаименованиеФормулы(FRГ4С452_); var FRГ5С452:s=НаименованиеФормулы(FRГ5С452_); var FRГ6С452:s=НаименованиеФормулы(FRГ6С452_);
var RГ4С453; var RГ5С453; var RГ6С453; var RГ7С453=RГ4С453+RГ5С453-RГ6С453;  SRГ4С453:s; SRГ5С453:s; SRГ6С453:s; ARГ4С453:s; ARГ5С453:s; ARГ6С453:s;  FRГ4С453_:i; FRГ5С453_:i; FRГ6С453_:i;  var FRГ4С453:s=НаименованиеФормулы(FRГ4С453_); var FRГ5С453:s=НаименованиеФормулы(FRГ5С453_); var FRГ6С453:s=НаименованиеФормулы(FRГ6С453_);
var RГ4С460; var RГ5С460; var RГ6С460; var RГ7С460=RГ4С460+RГ5С460-RГ6С460;  SRГ4С460:s; SRГ5С460:s; SRГ6С460:s; ARГ4С460:s; ARГ5С460:s; ARГ6С460:s;  FRГ4С460_:i; FRГ5С460_:i; FRГ6С460_:i;  var FRГ4С460:s=НаименованиеФормулы(FRГ4С460_); var FRГ5С460:s=НаименованиеФормулы(FRГ5С460_); var FRГ6С460:s=НаименованиеФормулы(FRГ6С460_);
var RГ4С461; var RГ5С461; var RГ6С461; var RГ7С461=RГ4С461+RГ5С461-RГ6С461;  SRГ4С461:s; SRГ5С461:s; SRГ6С461:s; ARГ4С461:s; ARГ5С461:s; ARГ6С461:s;  FRГ4С461_:i; FRГ5С461_:i; FRГ6С461_:i;  var FRГ4С461:s=НаименованиеФормулы(FRГ4С461_); var FRГ5С461:s=НаименованиеФормулы(FRГ5С461_); var FRГ6С461:s=НаименованиеФормулы(FRГ6С461_);
var RГ4С462; var RГ5С462; var RГ6С462; var RГ7С462=RГ4С462+RГ5С462-RГ6С462;  SRГ4С462:s; SRГ5С462:s; SRГ6С462:s; ARГ4С462:s; ARГ5С462:s; ARГ6С462:s;  FRГ4С462_:i; FRГ5С462_:i; FRГ6С462_:i;  var FRГ4С462:s=НаименованиеФормулы(FRГ4С462_); var FRГ5С462:s=НаименованиеФормулы(FRГ5С462_); var FRГ6С462:s=НаименованиеФормулы(FRГ6С462_);
var RГ4С470; var RГ5С470; var RГ6С470; var RГ7С470=RГ4С470+RГ5С470-RГ6С470;  SRГ4С470:s; SRГ5С470:s; SRГ6С470:s; ARГ4С470:s; ARГ5С470:s; ARГ6С470:s;  FRГ4С470_:i; FRГ5С470_:i; FRГ6С470_:i;  var FRГ4С470:s=НаименованиеФормулы(FRГ4С470_); var FRГ5С470:s=НаименованиеФормулы(FRГ5С470_); var FRГ6С470:s=НаименованиеФормулы(FRГ6С470_);
var RГ4С471; var RГ5С471; var RГ6С471; var RГ7С471=RГ4С471+RГ5С471-RГ6С471;  SRГ4С471:s; SRГ5С471:s; SRГ6С471:s; ARГ4С471:s; ARГ5С471:s; ARГ6С471:s;  FRГ4С471_:i; FRГ5С471_:i; FRГ6С471_:i;  var FRГ4С471:s=НаименованиеФормулы(FRГ4С471_); var FRГ5С471:s=НаименованиеФормулы(FRГ5С471_); var FRГ6С471:s=НаименованиеФормулы(FRГ6С471_);
var RГ4С480; var RГ5С480; var RГ6С480; var RГ7С480=RГ4С480+RГ5С480-RГ6С480;  SRГ4С480:s; SRГ5С480:s; SRГ6С480:s; ARГ4С480:s; ARГ5С480:s; ARГ6С480:s;  FRГ4С480_:i; FRГ5С480_:i; FRГ6С480_:i;  var FRГ4С480:s=НаименованиеФормулы(FRГ4С480_); var FRГ5С480:s=НаименованиеФормулы(FRГ5С480_); var FRГ6С480:s=НаименованиеФормулы(FRГ6С480_);
var RГ4С481; var RГ5С481; var RГ6С481; var RГ7С481=RГ4С481+RГ5С481-RГ6С481;  SRГ4С481:s; SRГ5С481:s; SRГ6С481:s; ARГ4С481:s; ARГ5С481:s; ARГ6С481:s;  FRГ4С481_:i; FRГ5С481_:i; FRГ6С481_:i;  var FRГ4С481:s=НаименованиеФормулы(FRГ4С481_); var FRГ5С481:s=НаименованиеФормулы(FRГ5С481_); var FRГ6С481:s=НаименованиеФормулы(FRГ6С481_);
var RГ4С482; var RГ5С482; var RГ6С482; var RГ7С482=RГ4С482+RГ5С482-RГ6С482;  SRГ4С482:s; SRГ5С482:s; SRГ6С482:s; ARГ4С482:s; ARГ5С482:s; ARГ6С482:s;  FRГ4С482_:i; FRГ5С482_:i; FRГ6С482_:i;  var FRГ4С482:s=НаименованиеФормулы(FRГ4С482_); var FRГ5С482:s=НаименованиеФормулы(FRГ5С482_); var FRГ6С482:s=НаименованиеФормулы(FRГ6С482_);
var RГ4С483; var RГ5С483; var RГ6С483; var RГ7С483=RГ4С483+RГ5С483-RГ6С483;  SRГ4С483:s; SRГ5С483:s; SRГ6С483:s; ARГ4С483:s; ARГ5С483:s; ARГ6С483:s;  FRГ4С483_:i; FRГ5С483_:i; FRГ6С483_:i;  var FRГ4С483:s=НаименованиеФормулы(FRГ4С483_); var FRГ5С483:s=НаименованиеФормулы(FRГ5С483_); var FRГ6С483:s=НаименованиеФормулы(FRГ6С483_);
var RГ4С484; var RГ5С484; var RГ6С484; var RГ7С484=RГ4С484+RГ5С484-RГ6С484;  SRГ4С484:s; SRГ5С484:s; SRГ6С484:s; ARГ4С484:s; ARГ5С484:s; ARГ6С484:s;  FRГ4С484_:i; FRГ5С484_:i; FRГ6С484_:i;  var FRГ4С484:s=НаименованиеФормулы(FRГ4С484_); var FRГ5С484:s=НаименованиеФормулы(FRГ5С484_); var FRГ6С484:s=НаименованиеФормулы(FRГ6С484_);
var RГ4С490; var RГ5С490; var RГ6С490; var RГ7С490=RГ4С490+RГ5С490-RГ6С490;  SRГ4С490:s; SRГ5С490:s; SRГ6С490:s; ARГ4С490:s; ARГ5С490:s; ARГ6С490:s;  FRГ4С490_:i; FRГ5С490_:i; FRГ6С490_:i;  var FRГ4С490:s=НаименованиеФормулы(FRГ4С490_); var FRГ5С490:s=НаименованиеФормулы(FRГ5С490_); var FRГ6С490:s=НаименованиеФормулы(FRГ6С490_);
var RГ4С510; var RГ5С510; var RГ6С510; var RГ7С510=RГ4С510+RГ5С510-RГ6С510;  SRГ4С510:s; SRГ5С510:s; SRГ6С510:s; ARГ4С510:s; ARГ5С510:s; ARГ6С510:s;  FRГ4С510_:i; FRГ5С510_:i; FRГ6С510_:i;  var FRГ4С510:s=НаименованиеФормулы(FRГ4С510_); var FRГ5С510:s=НаименованиеФормулы(FRГ5С510_); var FRГ6С510:s=НаименованиеФормулы(FRГ6С510_);
var RГ4С511; var RГ5С511; var RГ6С511; var RГ7С511=RГ4С511+RГ5С511-RГ6С511;  SRГ4С511:s; SRГ5С511:s; SRГ6С511:s; ARГ4С511:s; ARГ5С511:s; ARГ6С511:s;  FRГ4С511_:i; FRГ5С511_:i; FRГ6С511_:i;  var FRГ4С511:s=НаименованиеФормулы(FRГ4С511_); var FRГ5С511:s=НаименованиеФормулы(FRГ5С511_); var FRГ6С511:s=НаименованиеФормулы(FRГ6С511_);
var RГ4С512; var RГ5С512; var RГ6С512; var RГ7С512=RГ4С512+RГ5С512-RГ6С512;  SRГ4С512:s; SRГ5С512:s; SRГ6С512:s; ARГ4С512:s; ARГ5С512:s; ARГ6С512:s;  FRГ4С512_:i; FRГ5С512_:i; FRГ6С512_:i;  var FRГ4С512:s=НаименованиеФормулы(FRГ4С512_); var FRГ5С512:s=НаименованиеФормулы(FRГ5С512_); var FRГ6С512:s=НаименованиеФормулы(FRГ6С512_);
var RГ4С520; var RГ5С520; var RГ6С520; var RГ7С520=RГ4С520+RГ5С520-RГ6С520;  SRГ4С520:s; SRГ5С520:s; SRГ6С520:s; ARГ4С520:s; ARГ5С520:s; ARГ6С520:s;  FRГ4С520_:i; FRГ5С520_:i; FRГ6С520_:i;  var FRГ4С520:s=НаименованиеФормулы(FRГ4С520_); var FRГ5С520:s=НаименованиеФормулы(FRГ5С520_); var FRГ6С520:s=НаименованиеФормулы(FRГ6С520_);
var RГ4С521; var RГ5С521; var RГ6С521; var RГ7С521=RГ4С521+RГ5С521-RГ6С521;  SRГ4С521:s; SRГ5С521:s; SRГ6С521:s; ARГ4С521:s; ARГ5С521:s; ARГ6С521:s;  FRГ4С521_:i; FRГ5С521_:i; FRГ6С521_:i;  var FRГ4С521:s=НаименованиеФормулы(FRГ4С521_); var FRГ5С521:s=НаименованиеФормулы(FRГ5С521_); var FRГ6С521:s=НаименованиеФормулы(FRГ6С521_);
var RГ4С522; var RГ5С522; var RГ6С522; var RГ7С522=RГ4С522+RГ5С522-RГ6С522;  SRГ4С522:s; SRГ5С522:s; SRГ6С522:s; ARГ4С522:s; ARГ5С522:s; ARГ6С522:s;  FRГ4С522_:i; FRГ5С522_:i; FRГ6С522_:i;  var FRГ4С522:s=НаименованиеФормулы(FRГ4С522_); var FRГ5С522:s=НаименованиеФормулы(FRГ5С522_); var FRГ6С522:s=НаименованиеФормулы(FRГ6С522_);
var RГ4С523; var RГ5С523; var RГ6С523; var RГ7С523=RГ4С523+RГ5С523-RГ6С523;  SRГ4С523:s; SRГ5С523:s; SRГ6С523:s; ARГ4С523:s; ARГ5С523:s; ARГ6С523:s;  FRГ4С523_:i; FRГ5С523_:i; FRГ6С523_:i;  var FRГ4С523:s=НаименованиеФормулы(FRГ4С523_); var FRГ5С523:s=НаименованиеФормулы(FRГ5С523_); var FRГ6С523:s=НаименованиеФормулы(FRГ6С523_);
var RГ4С524; var RГ5С524; var RГ6С524; var RГ7С524=RГ4С524+RГ5С524-RГ6С524;  SRГ4С524:s; SRГ5С524:s; SRГ6С524:s; ARГ4С524:s; ARГ5С524:s; ARГ6С524:s;  FRГ4С524_:i; FRГ5С524_:i; FRГ6С524_:i;  var FRГ4С524:s=НаименованиеФормулы(FRГ4С524_); var FRГ5С524:s=НаименованиеФормулы(FRГ5С524_); var FRГ6С524:s=НаименованиеФормулы(FRГ6С524_);
var RГ4С530; var RГ5С530; var RГ6С530; var RГ7С530=RГ4С530+RГ5С530-RГ6С530;  SRГ4С530:s; SRГ5С530:s; SRГ6С530:s; ARГ4С530:s; ARГ5С530:s; ARГ6С530:s;  FRГ4С530_:i; FRГ5С530_:i; FRГ6С530_:i;  var FRГ4С530:s=НаименованиеФормулы(FRГ4С530_); var FRГ5С530:s=НаименованиеФормулы(FRГ5С530_); var FRГ6С530:s=НаименованиеФормулы(FRГ6С530_);

var RГ4С540; var RГ5С540; var RГ6С540; var RГ7С540=RГ4С540+RГ5С540-RГ6С540;  SRГ4С540:s; SRГ5С540:s; SRГ6С540:s; ARГ4С540:s; ARГ5С540:s; ARГ6С540:s;  FRГ4С540_:i; FRГ5С540_:i; FRГ6С540_:i;  var FRГ4С540:s=НаименованиеФормулы(FRГ4С540_); var FRГ5С540:s=НаименованиеФормулы(FRГ5С540_); var FRГ6С540:s=НаименованиеФормулы(FRГ6С540_);
var RГ4С541; var RГ5С541; var RГ6С541; var RГ7С541=RГ4С541+RГ5С541-RГ6С541;  SRГ4С541:s; SRГ5С541:s; SRГ6С541:s; ARГ4С541:s; ARГ5С541:s; ARГ6С541:s;  FRГ4С541_:i; FRГ5С541_:i; FRГ6С541_:i;  var FRГ4С541:s=НаименованиеФормулы(FRГ4С541_); var FRГ5С541:s=НаименованиеФормулы(FRГ5С541_); var FRГ6С541:s=НаименованиеФормулы(FRГ6С541_);
var RГ4С542; var RГ5С542; var RГ6С542; var RГ7С542=RГ4С542+RГ5С542-RГ6С542;  SRГ4С542:s; SRГ5С542:s; SRГ6С542:s; ARГ4С542:s; ARГ5С542:s; ARГ6С542:s;  FRГ4С542_:i; FRГ5С542_:i; FRГ6С542_:i;  var FRГ4С542:s=НаименованиеФормулы(FRГ4С542_); var FRГ5С542:s=НаименованиеФормулы(FRГ5С542_); var FRГ6С542:s=НаименованиеФормулы(FRГ6С542_);
var RГ4С543; var RГ5С543; var RГ6С543; var RГ7С543=RГ4С543+RГ5С543-RГ6С543;  SRГ4С543:s; SRГ5С543:s; SRГ6С543:s; ARГ4С543:s; ARГ5С543:s; ARГ6С543:s;  FRГ4С543_:i; FRГ5С543_:i; FRГ6С543_:i;  var FRГ4С543:s=НаименованиеФормулы(FRГ4С543_); var FRГ5С543:s=НаименованиеФормулы(FRГ5С543_); var FRГ6С543:s=НаименованиеФормулы(FRГ6С543_);
var RГ4С544; var RГ5С544; var RГ6С544; var RГ7С544=RГ4С544+RГ5С544-RГ6С544;  SRГ4С544:s; SRГ5С544:s; SRГ6С544:s; ARГ4С544:s; ARГ5С544:s; ARГ6С544:s;  FRГ4С544_:i; FRГ5С544_:i; FRГ6С544_:i;  var FRГ4С544:s=НаименованиеФормулы(FRГ4С544_); var FRГ5С544:s=НаименованиеФормулы(FRГ5С544_); var FRГ6С544:s=НаименованиеФормулы(FRГ6С544_);
var RГ4С545; var RГ5С545; var RГ6С545; var RГ7С545=RГ4С545+RГ5С545-RГ6С545;  SRГ4С545:s; SRГ5С545:s; SRГ6С545:s; ARГ4С545:s; ARГ5С545:s; ARГ6С545:s;  FRГ4С545_:i; FRГ5С545_:i; FRГ6С545_:i;  var FRГ4С545:s=НаименованиеФормулы(FRГ4С545_); var FRГ5С545:s=НаименованиеФормулы(FRГ5С545_); var FRГ6С545:s=НаименованиеФормулы(FRГ6С545_);
var RГ4С546; var RГ5С546; var RГ6С546; var RГ7С546=RГ4С546+RГ5С546-RГ6С546;  SRГ4С546:s; SRГ5С546:s; SRГ6С546:s; ARГ4С546:s; ARГ5С546:s; ARГ6С546:s;  FRГ4С546_:i; FRГ5С546_:i; FRГ6С546_:i;  var FRГ4С546:s=НаименованиеФормулы(FRГ4С546_); var FRГ5С546:s=НаименованиеФормулы(FRГ5С546_); var FRГ6С546:s=НаименованиеФормулы(FRГ6С546_);
var RГ4С547; var RГ5С547; var RГ6С547; var RГ7С547=RГ4С547+RГ5С547-RГ6С547;  SRГ4С547:s; SRГ5С547:s; SRГ6С547:s; ARГ4С547:s; ARГ5С547:s; ARГ6С547:s;  FRГ4С547_:i; FRГ5С547_:i; FRГ6С547_:i;  var FRГ4С547:s=НаименованиеФормулы(FRГ4С547_); var FRГ5С547:s=НаименованиеФормулы(FRГ5С547_); var FRГ6С547:s=НаименованиеФормулы(FRГ6С547_);

var RГ4С550; var RГ5С550; var RГ6С550; var RГ7С550=RГ4С550+RГ5С550-RГ6С550;  SRГ4С550:s; SRГ5С550:s; SRГ6С550:s; ARГ4С550:s; ARГ5С550:s; ARГ6С550:s;  FRГ4С550_:i; FRГ5С550_:i; FRГ6С550_:i;  var FRГ4С550:s=НаименованиеФормулы(FRГ4С550_); var FRГ5С550:s=НаименованиеФормулы(FRГ5С550_); var FRГ6С550:s=НаименованиеФормулы(FRГ6С550_);
var RГ4С551; var RГ5С551; var RГ6С551; var RГ7С551=RГ4С551+RГ5С551-RГ6С551;  SRГ4С551:s; SRГ5С551:s; SRГ6С551:s; ARГ4С551:s; ARГ5С551:s; ARГ6С551:s;  FRГ4С551_:i; FRГ5С551_:i; FRГ6С551_:i;  var FRГ4С551:s=НаименованиеФормулы(FRГ4С551_); var FRГ5С551:s=НаименованиеФормулы(FRГ5С551_); var FRГ6С551:s=НаименованиеФормулы(FRГ6С551_);
var RГ4С552; var RГ5С552; var RГ6С552; var RГ7С552=RГ4С552+RГ5С552-RГ6С552;  SRГ4С552:s; SRГ5С552:s; SRГ6С552:s; ARГ4С552:s; ARГ5С552:s; ARГ6С552:s;  FRГ4С552_:i; FRГ5С552_:i; FRГ6С552_:i;  var FRГ4С552:s=НаименованиеФормулы(FRГ4С552_); var FRГ5С552:s=НаименованиеФормулы(FRГ5С552_); var FRГ6С552:s=НаименованиеФормулы(FRГ6С552_);
var RГ4С553; var RГ5С553; var RГ6С553; var RГ7С553=RГ4С553+RГ5С553-RГ6С553;  SRГ4С553:s; SRГ5С553:s; SRГ6С553:s; ARГ4С553:s; ARГ5С553:s; ARГ6С553:s;  FRГ4С553_:i; FRГ5С553_:i; FRГ6С553_:i;  var FRГ4С553:s=НаименованиеФормулы(FRГ4С553_); var FRГ5С553:s=НаименованиеФормулы(FRГ5С553_); var FRГ6С553:s=НаименованиеФормулы(FRГ6С553_);
var RГ4С554; var RГ5С554; var RГ6С554; var RГ7С554=RГ4С554+RГ5С554-RГ6С554;  SRГ4С554:s; SRГ5С554:s; SRГ6С554:s; ARГ4С554:s; ARГ5С554:s; ARГ6С554:s;  FRГ4С554_:i; FRГ5С554_:i; FRГ6С554_:i;  var FRГ4С554:s=НаименованиеФормулы(FRГ4С554_); var FRГ5С554:s=НаименованиеФормулы(FRГ5С554_); var FRГ6С554:s=НаименованиеФормулы(FRГ6С554_);
var RГ4С555; var RГ5С555; var RГ6С555; var RГ7С555=RГ4С555+RГ5С555-RГ6С555;  SRГ4С555:s; SRГ5С555:s; SRГ6С555:s; ARГ4С555:s; ARГ5С555:s; ARГ6С555:s;  FRГ4С555_:i; FRГ5С555_:i; FRГ6С555_:i;  var FRГ4С555:s=НаименованиеФормулы(FRГ4С555_); var FRГ5С555:s=НаименованиеФормулы(FRГ5С555_); var FRГ6С555:s=НаименованиеФормулы(FRГ6С555_);
var RГ4С556; var RГ5С556; var RГ6С556; var RГ7С556=RГ4С556+RГ5С556-RГ6С556;  SRГ4С556:s; SRГ5С556:s; SRГ6С556:s; ARГ4С556:s; ARГ5С556:s; ARГ6С556:s;  FRГ4С556_:i; FRГ5С556_:i; FRГ6С556_:i;  var FRГ4С556:s=НаименованиеФормулы(FRГ4С556_); var FRГ5С556:s=НаименованиеФормулы(FRГ5С556_); var FRГ6С556:s=НаименованиеФормулы(FRГ6С556_);
var RГ4С557; var RГ5С557; var RГ6С557; var RГ7С557=RГ4С557+RГ5С557-RГ6С557;  SRГ4С557:s; SRГ5С557:s; SRГ6С557:s; ARГ4С557:s; ARГ5С557:s; ARГ6С557:s;  FRГ4С557_:i; FRГ5С557_:i; FRГ6С557_:i;  var FRГ4С557:s=НаименованиеФормулы(FRГ4С557_); var FRГ5С557:s=НаименованиеФормулы(FRГ5С557_); var FRГ6С557:s=НаименованиеФормулы(FRГ6С557_);

var RГ4С560; var RГ5С560; var RГ6С560; var RГ7С560=RГ4С560+RГ5С560-RГ6С560;  SRГ4С560:s; SRГ5С560:s; SRГ6С560:s; ARГ4С560:s; ARГ5С560:s; ARГ6С560:s;  FRГ4С560_:i; FRГ5С560_:i; FRГ6С560_:i;  var FRГ4С560:s=НаименованиеФормулы(FRГ4С560_); var FRГ5С560:s=НаименованиеФормулы(FRГ5С560_); var FRГ6С560:s=НаименованиеФормулы(FRГ6С560_);
var RГ4С561; var RГ5С561; var RГ6С561; var RГ7С561=RГ4С561+RГ5С561-RГ6С561;  SRГ4С561:s; SRГ5С561:s; SRГ6С561:s; ARГ4С561:s; ARГ5С561:s; ARГ6С561:s;  FRГ4С561_:i; FRГ5С561_:i; FRГ6С561_:i;  var FRГ4С561:s=НаименованиеФормулы(FRГ4С561_); var FRГ5С561:s=НаименованиеФормулы(FRГ5С561_); var FRГ6С561:s=НаименованиеФормулы(FRГ6С561_);
var RГ4С562; var RГ5С562; var RГ6С562; var RГ7С562=RГ4С562+RГ5С562-RГ6С562;  SRГ4С562:s; SRГ5С562:s; SRГ6С562:s; ARГ4С562:s; ARГ5С562:s; ARГ6С562:s;  FRГ4С562_:i; FRГ5С562_:i; FRГ6С562_:i;  var FRГ4С562:s=НаименованиеФормулы(FRГ4С562_); var FRГ5С562:s=НаименованиеФормулы(FRГ5С562_); var FRГ6С562:s=НаименованиеФормулы(FRГ6С562_);
var RГ4С563; var RГ5С563; var RГ6С563; var RГ7С563=RГ4С563+RГ5С563-RГ6С563;  SRГ4С563:s; SRГ5С563:s; SRГ6С563:s; ARГ4С563:s; ARГ5С563:s; ARГ6С563:s;  FRГ4С563_:i; FRГ5С563_:i; FRГ6С563_:i;  var FRГ4С563:s=НаименованиеФормулы(FRГ4С563_); var FRГ5С563:s=НаименованиеФормулы(FRГ5С563_); var FRГ6С563:s=НаименованиеФормулы(FRГ6С563_);
var RГ4С564; var RГ5С564; var RГ6С564; var RГ7С564=RГ4С564+RГ5С564-RГ6С564;  SRГ4С564:s; SRГ5С564:s; SRГ6С564:s; ARГ4С564:s; ARГ5С564:s; ARГ6С564:s;  FRГ4С564_:i; FRГ5С564_:i; FRГ6С564_:i;  var FRГ4С564:s=НаименованиеФормулы(FRГ4С564_); var FRГ5С564:s=НаименованиеФормулы(FRГ5С564_); var FRГ6С564:s=НаименованиеФормулы(FRГ6С564_);
var RГ4С565; var RГ5С565; var RГ6С565; var RГ7С565=RГ4С565+RГ5С565-RГ6С565;  SRГ4С565:s; SRГ5С565:s; SRГ6С565:s; ARГ4С565:s; ARГ5С565:s; ARГ6С565:s;  FRГ4С565_:i; FRГ5С565_:i; FRГ6С565_:i;  var FRГ4С565:s=НаименованиеФормулы(FRГ4С565_); var FRГ5С565:s=НаименованиеФормулы(FRГ5С565_); var FRГ6С565:s=НаименованиеФормулы(FRГ6С565_);
var RГ4С566; var RГ5С566; var RГ6С566; var RГ7С566=RГ4С566+RГ5С566-RГ6С566;  SRГ4С566:s; SRГ5С566:s; SRГ6С566:s; ARГ4С566:s; ARГ5С566:s; ARГ6С566:s;  FRГ4С566_:i; FRГ5С566_:i; FRГ6С566_:i;  var FRГ4С566:s=НаименованиеФормулы(FRГ4С566_); var FRГ5С566:s=НаименованиеФормулы(FRГ5С566_); var FRГ6С566:s=НаименованиеФормулы(FRГ6С566_);
var RГ4С567; var RГ5С567; var RГ6С567; var RГ7С567=RГ4С567+RГ5С567-RГ6С567;  SRГ4С567:s; SRГ5С567:s; SRГ6С567:s; ARГ4С567:s; ARГ5С567:s; ARГ6С567:s;  FRГ4С567_:i; FRГ5С567_:i; FRГ6С567_:i;  var FRГ4С567:s=НаименованиеФормулы(FRГ4С567_); var FRГ5С567:s=НаименованиеФормулы(FRГ5С567_); var FRГ6С567:s=НаименованиеФормулы(FRГ6С567_);


SГ1С461:s; SГ2С461:s; SГ3С461:s;
SГ1С462:s; SГ2С462:s; SГ3С462:s;
SГ1С471:s; SГ2С471:s; SГ3С471:s;


var RГ4С010=RГ4С011+RГ4С012+RГ4С013+RГ4С014+RГ4С015+RГ4С016+RГ4С017+RГ4С018;
var RГ5С010=RГ5С011+RГ5С012+RГ5С013+RГ5С014+RГ5С015+RГ5С016+RГ5С017+RГ5С018;
var RГ6С010=RГ6С011+RГ6С012+RГ6С013+RГ6С014+RГ6С015+RГ6С016+RГ6С017+RГ6С018;
var RГ7С010=RГ4С010+RГ5С010-RГ6С010;

var RГ4С050=RГ4С051+RГ4С052+RГ4С053+RГ4С054+RГ4С055+RГ4С056+RГ4С057+RГ4С058;
var RГ6С050=RГ6С051+RГ6С052+RГ6С053+RГ6С054+RГ6С055+RГ6С056+RГ6С057+RГ6С058;
var RГ7С050=RГ4С050+RГ6С050;

var RГ4С150=RГ4С151+RГ4С152+RГ4С153;
var RГ5С150=RГ5С151+RГ5С152+RГ5С153;
var RГ6С150=RГ6С151+RГ6С152+RГ6С153;
var RГ7С150=RГ4С150+RГ5С150-RГ6С150;

var RГ4С190=RГ4С191+RГ4С192+RГ4С193+RГ4С194+RГ4С195+RГ4С196+RГ4С197+RГ4С198+RГ4С199;
var RГ5С190=RГ5С191+RГ5С192+RГ5С193+RГ5С194+RГ5С195+RГ5С196+RГ5С197+RГ5С198+RГ5С199;
var RГ6С190=RГ6С191+RГ6С192+RГ6С193+RГ6С194+RГ6С195+RГ6С196+RГ6С197+RГ6С198+RГ6С199;
var RГ7С190=RГ4С190+RГ5С190-RГ6С190;


var RГ4С310=RГ4С010; var RГ5С310=RГ5С010; var RГ6С310=RГ6С010; var RГ7С310=RГ7С010;
var RГ4С320=RГ4С050;                      var RГ6С320=RГ6С050; var RГ7С320=RГ7С050;
var RГ4С330=RГ4С070; var RГ5С330=RГ5С070; var RГ6С330=RГ6С070; var RГ7С330=RГ7С070;
var RГ4С340=RГ4С080; var RГ5С340=RГ5С080; var RГ6С340=RГ6С080; var RГ7С340=RГ7С080;
var RГ4С350=RГ4С110; var RГ5С350=RГ5С110; var RГ6С350=RГ6С110; var RГ7С350=RГ7С110;
var RГ4С360=RГ4С120;                      var RГ6С360=RГ6С120; var RГ7С360=RГ7С120;
var RГ4С370=RГ4С130; var RГ5С370=RГ5С130; var RГ6С370=RГ6С130; var RГ7С370=RГ7С130;
var RГ4С380=RГ4С150; var RГ5С380=RГ5С150; var RГ6С380=RГ6С150; var RГ7С380=RГ7С150;
var RГ4С390=RГ4С170; var RГ5С390=RГ5С170; var RГ6С390=RГ6С170; var RГ7С390=RГ7С170;
var RГ4С410=RГ4С190; var RГ5С410=RГ5С190; var RГ6С410=RГ6С190; var RГ7С410=RГ7С190;
var RГ4С420=RГ4С230; var RГ5С420=RГ5С230; var RГ6С420=RГ6С230; var RГ7С420=RГ7С230;
var RГ4С430=RГ4С250; var RГ5С430=RГ5С250; var RГ6С430=RГ6С250; var RГ7С430=RГ7С250;

2-- Переменные и массивы бланка
var ОтчGUID:S;

var NumWorkLine[]:i;
var NumNoWorkLine[]:i;
var AccNumWorkLine[]:s;
var temps[]:s;
var BufКБК[]:S;

2--
2-- Объекты бланка
СекцРазрыв_с1_с2:section;
СекцРазрыв_с2_с3:section;
СекцРазрыв_с3_с4:section;
СекцРазрыв_с4_с5:section;
СекцРазрыв_с5_с6:section;
СекцРазрыв_с6_с7:section;

СекцСтр1:section;
СекцСтр2:section;
СекцСтр3:section;
СекцСтр3_105:section;
СекцСтр3_1:section;
СекцСтр4:section;
СекцСтр5:section;
СекцСтр6:section;
СекцСтр7:section;

btnНастройки :Object;
btnВосстановитьНастройки:Object;
ФлУчетВНПР:Object;
2--
2-- Процедуры и функции

Proc ОчисткаПолей;

  ClearVariable(RГ4С011); ClearVariable(RГ5С011); ClearVariable(RГ6С011);
  ClearVariable(RГ4С012); ClearVariable(RГ5С012); ClearVariable(RГ6С012);
  ClearVariable(RГ4С013); ClearVariable(RГ5С013); ClearVariable(RГ6С013);
  ClearVariable(RГ4С014); ClearVariable(RГ5С014); ClearVariable(RГ6С014);
  ClearVariable(RГ4С015); ClearVariable(RГ5С015); ClearVariable(RГ6С015);
  ClearVariable(RГ4С016); ClearVariable(RГ5С016); ClearVariable(RГ6С016);
  ClearVariable(RГ4С017); ClearVariable(RГ5С017); ClearVariable(RГ6С017);
  ClearVariable(RГ4С018); ClearVariable(RГ5С018); ClearVariable(RГ6С018);
  ClearVariable(RГ4С051);                         ClearVariable(RГ6С051);
  ClearVariable(RГ4С052);                         ClearVariable(RГ6С052);
  ClearVariable(RГ4С053);                         ClearVariable(RГ6С053);
  ClearVariable(RГ4С054);                         ClearVariable(RГ6С054);
  ClearVariable(RГ4С055);                         ClearVariable(RГ6С055);
  ClearVariable(RГ4С056);                         ClearVariable(RГ6С056);
  ClearVariable(RГ4С057);                         ClearVariable(RГ6С057);
  ClearVariable(RГ4С058);                         ClearVariable(RГ6С058);
  ClearVariable(RГ4С070); ClearVariable(RГ5С070); ClearVariable(RГ6С070);
  ClearVariable(RГ4С080); ClearVariable(RГ5С080); ClearVariable(RГ6С080);
  ClearVariable(RГ4С110); ClearVariable(RГ5С110); ClearVariable(RГ6С110);
  ClearVariable(RГ4С120);                         ClearVariable(RГ6С120);
  ClearVariable(RГ4С130); ClearVariable(RГ5С130); ClearVariable(RГ6С130);
  ClearVariable(RГ4С151); ClearVariable(RГ5С151); ClearVariable(RГ6С151);
  ClearVariable(RГ4С152); ClearVariable(RГ5С152); ClearVariable(RГ6С152);
  ClearVariable(RГ4С153); ClearVariable(RГ5С153); ClearVariable(RГ6С153);
  ClearVariable(RГ4С170); ClearVariable(RГ5С170); ClearVariable(RГ6С170);
  ClearVariable(RГ4С191); ClearVariable(RГ5С191); ClearVariable(RГ6С191);
  ClearVariable(RГ4С192); ClearVariable(RГ5С192); ClearVariable(RГ6С192);
  ClearVariable(RГ4С193); ClearVariable(RГ5С193); ClearVariable(RГ6С193);
  ClearVariable(RГ4С194); ClearVariable(RГ5С194); ClearVariable(RГ6С194);
  ClearVariable(RГ4С195); ClearVariable(RГ5С195); ClearVariable(RГ6С195);
  ClearVariable(RГ4С196); ClearVariable(RГ5С196); ClearVariable(RГ6С196);
  ClearVariable(RГ4С197); ClearVariable(RГ5С197); ClearVariable(RГ6С197);
  ClearVariable(RГ4С198); ClearVariable(RГ5С198); ClearVariable(RГ6С198);
  ClearVariable(RГ4С199); ClearVariable(RГ5С199); ClearVariable(RГ6С199);
  ClearVariable(RГ4С230); ClearVariable(RГ5С230); ClearVariable(RГ6С230);
  ClearVariable(RГ4С250); ClearVariable(RГ5С250); ClearVariable(RГ6С250);


ClearVariable(RГ4С311); ClearVariable(RГ5С311); ClearVariable(RГ6С311);
ClearVariable(RГ4С312); ClearVariable(RГ5С312); ClearVariable(RГ6С312);
ClearVariable(RГ4С321);                         ClearVariable(RГ6С321);
ClearVariable(RГ4С322);                         ClearVariable(RГ6С322);
ClearVariable(RГ4С331); ClearVariable(RГ5С331); ClearVariable(RГ6С331);
ClearVariable(RГ4С332); ClearVariable(RГ5С332); ClearVariable(RГ6С332);
ClearVariable(RГ4С341); ClearVariable(RГ5С341); ClearVariable(RГ6С341);
ClearVariable(RГ4С342); ClearVariable(RГ5С342); ClearVariable(RГ6С342);
ClearVariable(RГ4С352); ClearVariable(RГ5С352); ClearVariable(RГ6С352);
ClearVariable(RГ4С362);                         ClearVariable(RГ6С362);
ClearVariable(RГ4С372); ClearVariable(RГ5С372); ClearVariable(RГ6С372);
ClearVariable(RГ4С412); ClearVariable(RГ5С412); ClearVariable(RГ6С412);
ClearVariable(RГ4С422); ClearVariable(RГ5С422); ClearVariable(RГ6С422);
ClearVariable(RГ4С432); ClearVariable(RГ5С432); ClearVariable(RГ6С432);



ClearVariable(RГ4С450); ClearVariable(RГ5С450); ClearVariable(RГ6С450);
ClearVariable(RГ4С451); ClearVariable(RГ5С451); ClearVariable(RГ6С451);
ClearVariable(RГ4С452); ClearVariable(RГ5С452); ClearVariable(RГ6С452);
ClearVariable(RГ4С453); ClearVariable(RГ5С453); ClearVariable(RГ6С453);
ClearVariable(RГ4С460); ClearVariable(RГ5С460); ClearVariable(RГ6С460);
ClearVariable(RГ4С461); ClearVariable(RГ5С461); ClearVariable(RГ6С461);
ClearVariable(RГ4С462); ClearVariable(RГ5С462); ClearVariable(RГ6С462);
ClearVariable(RГ4С470); ClearVariable(RГ5С470); ClearVariable(RГ6С470);
ClearVariable(RГ4С471); ClearVariable(RГ5С471); ClearVariable(RГ6С471);
ClearVariable(RГ4С480); ClearVariable(RГ5С480); ClearVariable(RГ6С480);
ClearVariable(RГ4С481); ClearVariable(RГ5С481); ClearVariable(RГ6С481);
ClearVariable(RГ4С482); ClearVariable(RГ5С482); ClearVariable(RГ6С482);
ClearVariable(RГ4С483); ClearVariable(RГ5С483); ClearVariable(RГ6С483);
ClearVariable(RГ4С484); ClearVariable(RГ5С484); ClearVariable(RГ6С484);
ClearVariable(RГ4С490); ClearVariable(RГ5С490); ClearVariable(RГ6С490);
ClearVariable(RГ4С510); ClearVariable(RГ5С510); ClearVariable(RГ6С510);
ClearVariable(RГ4С511); ClearVariable(RГ5С511); ClearVariable(RГ6С511);
ClearVariable(RГ4С512); ClearVariable(RГ5С512); ClearVariable(RГ6С512);
ClearVariable(RГ4С520); ClearVariable(RГ5С520); ClearVariable(RГ6С520);
ClearVariable(RГ4С521); ClearVariable(RГ5С521); ClearVariable(RГ6С521);
ClearVariable(RГ4С522); ClearVariable(RГ5С522); ClearVariable(RГ6С522);
ClearVariable(RГ4С523); ClearVariable(RГ5С523); ClearVariable(RГ6С523);
ClearVariable(RГ4С524); ClearVariable(RГ5С524); ClearVariable(RГ6С524);
ClearVariable(RГ4С530); ClearVariable(RГ5С530); ClearVariable(RГ6С530);

ClearVariable(RГ4С540); ClearVariable(RГ5С540); ClearVariable(RГ6С540);
ClearVariable(RГ4С541); ClearVariable(RГ5С541); ClearVariable(RГ6С541);
ClearVariable(RГ4С542); ClearVariable(RГ5С542); ClearVariable(RГ6С542);
ClearVariable(RГ4С543); ClearVariable(RГ5С543); ClearVariable(RГ6С543);
ClearVariable(RГ4С544); ClearVariable(RГ5С544); ClearVariable(RГ6С544);
ClearVariable(RГ4С545); ClearVariable(RГ5С545); ClearVariable(RГ6С545);
ClearVariable(RГ4С546); ClearVariable(RГ5С546); ClearVariable(RГ6С546);
ClearVariable(RГ4С547); ClearVariable(RГ5С547); ClearVariable(RГ6С547);

ClearVariable(RГ4С550); ClearVariable(RГ5С550); ClearVariable(RГ6С550);
ClearVariable(RГ4С551); ClearVariable(RГ5С551); ClearVariable(RГ6С551);
ClearVariable(RГ4С552); ClearVariable(RГ5С552); ClearVariable(RГ6С552);
ClearVariable(RГ4С553); ClearVariable(RГ5С553); ClearVariable(RГ6С553);
ClearVariable(RГ4С554); ClearVariable(RГ5С554); ClearVariable(RГ6С554);
ClearVariable(RГ4С555); ClearVariable(RГ5С555); ClearVariable(RГ6С555);
ClearVariable(RГ4С556); ClearVariable(RГ5С556); ClearVariable(RГ6С556);
ClearVariable(RГ4С557); ClearVariable(RГ5С557); ClearVariable(RГ6С557);

ClearVariable(RГ4С560); ClearVariable(RГ5С560); ClearVariable(RГ6С560);
ClearVariable(RГ4С561); ClearVariable(RГ5С561); ClearVariable(RГ6С561);
ClearVariable(RГ4С562); ClearVariable(RГ5С562); ClearVariable(RГ6С562);
ClearVariable(RГ4С563); ClearVariable(RГ5С563); ClearVariable(RГ6С563);
ClearVariable(RГ4С564); ClearVariable(RГ5С564); ClearVariable(RГ6С564);
ClearVariable(RГ4С565); ClearVariable(RГ5С565); ClearVariable(RГ6С565);
ClearVariable(RГ4С566); ClearVariable(RГ5С566); ClearVariable(RГ6С566);
ClearVariable(RГ4С567); ClearVariable(RГ5С567); ClearVariable(RГ6С567);


--SГ1С461:s; SГ2С461:s; SГ3С461:s;
--SГ1С462:s; SГ2С462:s; SГ3С462:s;
--SГ1С471:s; SГ2С471:s; SГ3С471:s;


end;
Proc iniNumWorkLine;
  var t:i;
  t=0;
  ClearVariable(NumWorkLine);
  ClearVariable(NumNoWorkLine);
  ClearVariable(AccNumWorkLine);
  t=t+1;NumNoWorkLine[t]=051;
  t=t+1;NumNoWorkLine[t]=052;
  t=t+1;NumNoWorkLine[t]=053;
  t=t+1;NumNoWorkLine[t]=054;
  t=t+1;NumNoWorkLine[t]=055;
  t=t+1;NumNoWorkLine[t]=056;
  t=t+1;NumNoWorkLine[t]=057;
  t=t+1;NumNoWorkLine[t]=058;
  t=t+1;NumNoWorkLine[t]=120;
  t=t+1;NumNoWorkLine[t]=320;
  t=t+1;NumNoWorkLine[t]=321;
  t=t+1;NumNoWorkLine[t]=322;
  t=t+1;NumNoWorkLine[t]=360;
  t=t+1;NumNoWorkLine[t]=362;
  t=0;
  t=t+1;NumWorkLine[t]=011;AccNumWorkLine[t]='*.101.?1.???';
  t=t+1;NumWorkLine[t]=012;AccNumWorkLine[t]='*.101.?2.???';
  t=t+1;NumWorkLine[t]=013;AccNumWorkLine[t]='*.101.?3.???';
  t=t+1;NumWorkLine[t]=014;AccNumWorkLine[t]='*.101.?4.???';
  t=t+1;NumWorkLine[t]=015;AccNumWorkLine[t]='*.101.?5.???';
  t=t+1;NumWorkLine[t]=016;AccNumWorkLine[t]='*.101.?6.???';
  t=t+1;NumWorkLine[t]=017;AccNumWorkLine[t]='*.101.?7.???';
  t=t+1;NumWorkLine[t]=018;AccNumWorkLine[t]='*.101.?8.???';
--  t=t+1;NumWorkLine[t]=019;AccNumWorkLine[t]='*.101.09.???';
  t=t+1;NumWorkLine[t]=051;AccNumWorkLine[t]='*.104.?1.???';
  t=t+1;NumWorkLine[t]=052;AccNumWorkLine[t]='*.104.?2.???';
  t=t+1;NumWorkLine[t]=053;AccNumWorkLine[t]='*.104.?3.???';
  t=t+1;NumWorkLine[t]=054;AccNumWorkLine[t]='*.104.?4.???';
  t=t+1;NumWorkLine[t]=055;AccNumWorkLine[t]='*.104.?5.???';
  t=t+1;NumWorkLine[t]=056;AccNumWorkLine[t]='*.104.?6.???';
  t=t+1;NumWorkLine[t]=057;AccNumWorkLine[t]='*.104.?7.???';
  t=t+1;NumWorkLine[t]=058;AccNumWorkLine[t]='*.104.?8.???';
  t=t+1;NumWorkLine[t]=070;AccNumWorkLine[t]='*.106.?1.???';
  t=t+1;NumWorkLine[t]=080;AccNumWorkLine[t]='*.107.?1.???';
  t=t+1;NumWorkLine[t]=110;AccNumWorkLine[t]='*.102.??.???';
  t=t+1;NumWorkLine[t]=120;AccNumWorkLine[t]='*.104.?9.???';
  t=t+1;NumWorkLine[t]=130;AccNumWorkLine[t]='*.106.?2.???';
  t=t+1;NumWorkLine[t]=151;AccNumWorkLine[t]='*.103.?1.???';
  t=t+1;NumWorkLine[t]=152;AccNumWorkLine[t]='*.103.?2.???';
  t=t+1;NumWorkLine[t]=153;AccNumWorkLine[t]='*.103.?3.???';
  t=t+1;NumWorkLine[t]=170;AccNumWorkLine[t]='*.106.?3.???';
  t=t+1;NumWorkLine[t]=191;AccNumWorkLine[t]='*.105.?1.???';
  t=t+1;NumWorkLine[t]=192;AccNumWorkLine[t]='*.105.?2.???';
  t=t+1;NumWorkLine[t]=193;AccNumWorkLine[t]='*.105.?3.???';
  t=t+1;NumWorkLine[t]=194;AccNumWorkLine[t]='*.105.?4.???';
  t=t+1;NumWorkLine[t]=195;AccNumWorkLine[t]='*.105.?5.???';
  t=t+1;NumWorkLine[t]=196;AccNumWorkLine[t]='*.105.?6.???';
  t=t+1;NumWorkLine[t]=197;AccNumWorkLine[t]='*.105.?7.???';
  t=t+1;NumWorkLine[t]=198;AccNumWorkLine[t]='*.105.?8.???';
  t=t+1;NumWorkLine[t]=199;AccNumWorkLine[t]='*.105.?9.???';
  t=t+1;NumWorkLine[t]=230;AccNumWorkLine[t]='*.106.?4.???';
  t=t+1;NumWorkLine[t]=250;AccNumWorkLine[t]='*.107.?3.???';


  t=t+1;NumWorkLine[t]=311;AccNumWorkLine[t]='*.101.1?.???';
  t=t+1;NumWorkLine[t]=312;AccNumWorkLine[t]='*.101.2?.???';
  t=t+1;NumWorkLine[t]=321;AccNumWorkLine[t]='*.104.1?.410';
  t=t+1;NumWorkLine[t]=322;AccNumWorkLine[t]='*.104.2?.410';

  t=t+1;NumWorkLine[t]=331;AccNumWorkLine[t]='*.106.11.???';
  t=t+1;NumWorkLine[t]=332;AccNumWorkLine[t]='*.106.21.???';
  t=t+1;NumWorkLine[t]=341;AccNumWorkLine[t]='*.107.11.???';
  t=t+1;NumWorkLine[t]=342;AccNumWorkLine[t]='*.107.21.???';

  t=t+1;NumWorkLine[t]=352;AccNumWorkLine[t]='*.102.2?.???';
  t=t+1;NumWorkLine[t]=362;AccNumWorkLine[t]='*.104.29.420';
  t=t+1;NumWorkLine[t]=372;AccNumWorkLine[t]='*.106.22.???';
  t=t+1;NumWorkLine[t]=412;AccNumWorkLine[t]='*.105.2?.???';
  t=t+1;NumWorkLine[t]=422;AccNumWorkLine[t]='*.106.24.???';
  t=t+1;NumWorkLine[t]=432;AccNumWorkLine[t]='*.107.23.???';

  t=t+1;NumWorkLine[t]=450;AccNumWorkLine[t]='ЗАБ.01!';
  t=t+1;NumWorkLine[t]=451;AccNumWorkLine[t]='ЗАБ.01.101.1?|ЗАБ.01.103!';
  t=t+1;NumWorkLine[t]=452;AccNumWorkLine[t]='ЗАБ.01.103!';
  t=t+1;NumWorkLine[t]=453;AccNumWorkLine[t]='ЗАБ.01.101.3?';
  t=t+1;NumWorkLine[t]=460;AccNumWorkLine[t]='ЗАБ.02!';
  t=t+1;NumWorkLine[t]=461;AccNumWorkLine[t]='';
  t=t+1;NumWorkLine[t]=462;AccNumWorkLine[t]='';
  t=t+1;NumWorkLine[t]=470;AccNumWorkLine[t]='ЗАБ.03!';
  t=t+1;NumWorkLine[t]=471;AccNumWorkLine[t]='';
  t=t+1;NumWorkLine[t]=480;AccNumWorkLine[t]='ЗАБ.05!';
  t=t+1;NumWorkLine[t]=481;AccNumWorkLine[t]='ЗАБ.05.101.??';
  t=t+1;NumWorkLine[t]=482;AccNumWorkLine[t]='ЗАБ.05.101.2?';
  t=t+1;NumWorkLine[t]=483;AccNumWorkLine[t]='ЗАБ.05.105.??';
  t=t+1;NumWorkLine[t]=484;AccNumWorkLine[t]='ЗАБ.05.105.2?';
  t=t+1;NumWorkLine[t]=490;AccNumWorkLine[t]='ЗАБ.07!';

  t=t+1;NumWorkLine[t]=510;AccNumWorkLine[t]='ЗАБ.21!';
  t=t+1;NumWorkLine[t]=511;AccNumWorkLine[t]='ЗАБ.21.101.2?';
  t=t+1;NumWorkLine[t]=512;AccNumWorkLine[t]='ЗАБ.21.101.3?';

  t=t+1;NumWorkLine[t]=520;AccNumWorkLine[t]='ЗАБ.22!';
  t=t+1;NumWorkLine[t]=521;AccNumWorkLine[t]='ЗАБ.22.101.??';
  t=t+1;NumWorkLine[t]=522;AccNumWorkLine[t]='ЗАБ.22.101.2?';
  t=t+1;NumWorkLine[t]=523;AccNumWorkLine[t]='ЗАБ.22.105.??';
  t=t+1;NumWorkLine[t]=524;AccNumWorkLine[t]='ЗАБ.22.105.2?';
  t=t+1;NumWorkLine[t]=530;AccNumWorkLine[t]='ЗАБ.23!';

  t=t+1;NumWorkLine[t]=540;AccNumWorkLine[t]='ЗАБ.24!';
  t=t+1;NumWorkLine[t]=541;AccNumWorkLine[t]='ЗАБ.24.101.??';
  t=t+1;NumWorkLine[t]=542;AccNumWorkLine[t]='ЗАБ.24.101.1?';
  t=t+1;NumWorkLine[t]=543;AccNumWorkLine[t]='ЗАБ.24.101.2?';
  t=t+1;NumWorkLine[t]=544;AccNumWorkLine[t]='ЗАБ.24.102.??';
  t=t+1;NumWorkLine[t]=545;AccNumWorkLine[t]='ЗАБ.24.102.2?';
  t=t+1;NumWorkLine[t]=546;AccNumWorkLine[t]='ЗАБ.24.105.??';
  t=t+1;NumWorkLine[t]=547;AccNumWorkLine[t]='ЗАБ.24.105.2?';


  t=t+1;NumWorkLine[t]=550;AccNumWorkLine[t]='ЗАБ.25!';
  t=t+1;NumWorkLine[t]=551;AccNumWorkLine[t]='ЗАБ.25.101.??';
  t=t+1;NumWorkLine[t]=552;AccNumWorkLine[t]='ЗАБ.25.101.1?';
  t=t+1;NumWorkLine[t]=553;AccNumWorkLine[t]='ЗАБ.25.101.2?';
  t=t+1;NumWorkLine[t]=554;AccNumWorkLine[t]='ЗАБ.25.102.??';
  t=t+1;NumWorkLine[t]=555;AccNumWorkLine[t]='ЗАБ.25.102.2?';
  t=t+1;NumWorkLine[t]=556;AccNumWorkLine[t]='ЗАБ.25.105.??';
  t=t+1;NumWorkLine[t]=557;AccNumWorkLine[t]='ЗАБ.25.105.2?';

  t=t+1;NumWorkLine[t]=560;AccNumWorkLine[t]='ЗАБ.26!';
  t=t+1;NumWorkLine[t]=561;AccNumWorkLine[t]='ЗАБ.26.101.??';
  t=t+1;NumWorkLine[t]=562;AccNumWorkLine[t]='ЗАБ.26.101.1?';
  t=t+1;NumWorkLine[t]=563;AccNumWorkLine[t]='ЗАБ.26.101.2?';
  t=t+1;NumWorkLine[t]=564;AccNumWorkLine[t]='ЗАБ.26.102.??';
  t=t+1;NumWorkLine[t]=565;AccNumWorkLine[t]='ЗАБ.26.102.2?';
  t=t+1;NumWorkLine[t]=566;AccNumWorkLine[t]='ЗАБ.26.105.??';
  t=t+1;NumWorkLine[t]=567;AccNumWorkLine[t]='ЗАБ.26.105.2?';


--451
--452
--453
--461
--462


--471

--481
--482
--483
--484


--511
--512
--521
--522
--523
--524
--541
--542
--543
--544
--545
--546
--547

--551
--552
--553
--554
--555
--556
--557
--561
--562
--563
--564
--565
--566
--567

























--  t=t+1;NumWorkLine[t]=320;AccNumWorkLine[t]='*.108.01.???';
--  t=t+1;NumWorkLine[t]=330;AccNumWorkLine[t]='*.104.10.???';
--  t=t+1;NumWorkLine[t]=360;AccNumWorkLine[t]='*.108.02.???';
--  t=t+1;NumWorkLine[t]=370;AccNumWorkLine[t]='*.104.11.???';
--  t=t+1;NumWorkLine[t]=420;AccNumWorkLine[t]='*.108.03.???';
--  t=t+1;NumWorkLine[t]=430;AccNumWorkLine[t]='*.104.12.???';
--  t=t+1;NumWorkLine[t]=440;AccNumWorkLine[t]='*.108.04.???';
--  t=t+1;NumWorkLine[t]=450;AccNumWorkLine[t]='*.108.05.???';
end;
Func ПолеДляРасчета(Поле: Строка): l;
 var tmpi:i;
 if substr(Поле,Length(Поле)-5,3)='Г5С':
    tmpi=int(SubStr(Поле,Length(Поле)-2,3));
    if tmpi<1:^false;fi;
    ^not SearchInArray(NumNoWorkLine,tmpi,true)>0;
  | true:^true;
 fi;

end;
Func ВзятьСчетПоПолю(Поле: Строка): s;
 var tmpi:i;
 tmpi=int(SubStr(Поле,Length(Поле)-2,3));
 if tmpi<1:^'';fi;
 tmpi=SearchInArray(NumWorkLine,tmpi,true);
 if tmpi<1:^'';fi;
 ^AccNumWorkLine[tmpi];
end;
Func ВосстановитьПоУмолчаниюУслФормулаГ4(Поле:s):i;  -- остаток
  if pos('.104.',ВзятьСчетПоПолю(Поле))>0:^3;fi;
  ^1;
end;
Func ВосстановитьПоУмолчаниюУслФормулаГ5(Поле:s):i;  -- поступление
  ^0;
end;
Func ВосстановитьПоУмолчаниюУслФормулаГ6(Поле:s):i;  -- выбытие
--  if pos('.104.',ВзятьСчетПоПолю(Поле))>0:^0;fi;
  ^2;
end;

Func ВосстановитьПоУмолчаниюУслФормула(Поле:s):i;
  var ss:s;
  ss=SubStr(Поле,1,4);
  if ss='FRГ4':^ВосстановитьПоУмолчаниюУслФормулаГ4(Поле);
   | ss='FRГ5':^ВосстановитьПоУмолчаниюУслФормулаГ5(Поле);
   | ss='FRГ6':^ВосстановитьПоУмолчаниюУслФормулаГ6(Поле);
  fi;
end;

func ВыборФунк(Поле:s;v:i):i;
  var t:i;
  ClearVariable(temps);t=0;
  t=t+1;temps[t]='Восстановить по умолчанию='+НаименованиеФормулы(ВосстановитьПоУмолчаниюУслФормула(Поле));
  t=t+1;temps[t]=НаименованиеФормулы(t-2);
  t=t+1;temps[t]=НаименованиеФормулы(t-2);
  t=t+1;temps[t]=НаименованиеФормулы(t-2);
  t=t+1;temps[t]=НаименованиеФормулы(t-2);
  t=t+1;temps[t]=НаименованиеФормулы(t-2);
  t=t+1;temps[t]=НаименованиеФормулы(t-2);
  t=alternate('',temps);
  if t<1:^v;fi;
  if t=1:^ВосстановитьПоУмолчаниюУслФормула(Поле);fi;
  ^t-2;
end;
Func СчетУчетВНПР(сч:s):s;
  var ss:s;
     if not УчетВНПР:^сч;fi;
     ss=substr(сч,1,1);
     if ss='+' or ss='-':ss=SubStr(сч,2,255);
      | true:ss=сч;
     fi;
     ^format('(%0:s)/*&~(%1:s)',сч,ss);
end;
Func ВосстановитьПоУмолчаниюУслСчетГ4(Поле:s):s;
  var ss:s;
  ss=ВзятьСчетПоПолю(Поле);
--  if pos('.104.',ss)>0:ss='-'+ss;
--   |
--  fi;
  ^ss;
end;
Func ВосстановитьПоУмолчаниюУслСчетГ5(Поле:s):s;
  var ss:s;
  ss=ВзятьСчетПоПолю(Поле);
  if ss='':^ss;fi;
  if pos('.104.',ss)>0:ss='';
   | pos('RГ5С230',Поле)>0:ss='+'+ss;
--   | pos('RГ5С230',Поле)>0:ss='+'+ss+'/*&~*.104.??.???';
   | true:ss='+'+ss;
  fi;
  ^СчетУчетВНПР(ss);
end;
Func ВосстановитьПоУмолчаниюУслСчетГ6(Поле:s):s;
  var ss:s;
  ss=ВзятьСчетПоПолю(Поле);
  if ss='':^ss;fi;
  --if pos('RГ6С230',Поле)>0:ss='-'+ss+'/*.105.??.???';^ss;
  if pos('.104.',ss)<1:ss='-'+ss;
  fi;
  ^СчетУчетВНПР(ss);
end;
Func ВосстановитьПоУмолчаниюУслСчет(Поле:s):s;
  var ss:s;
  ss=SubStr(Поле,1,4);
  if ss='ARГ4':^ВосстановитьПоУмолчаниюУслСчетГ4(Поле);
   | ss='ARГ5':^ВосстановитьПоУмолчаниюУслСчетГ5(Поле);
   | ss='ARГ6':^ВосстановитьПоУмолчаниюУслСчетГ6(Поле);
  fi;
end;

Func ВосстановитьПоУмолчаниюУслАналитГ4(Поле:s):s;
  if pos('.106.04.',ВзятьСчетПоПолю(Поле))>0:^'';fi;
--  if pos('.106.04.',ВзятьСчетПоПолю(Поле))>0:^'~(КОСГУ.2??|КОСГУ.1??)';fi;

  ^'';
end;
Func ВосстановитьПоУмолчаниюУслАналитГ5(Поле:s):s;
  if pos('.106.04.',ВзятьСчетПоПолю(Поле))>0:^'~(КОСГУ.27?|ДНФА?ВНПР.ХЭ)';fi;
--  if pos('.106.04.',ВзятьСчетПоПолю(Поле))>0:^'~(КОСГУ.2??|КОСГУ.1??|ДНФА?ВНПР.ХЭ)';fi;
  ^'';
end;
Func ВосстановитьПоУмолчаниюУслАналитГ6(Поле:s):s;
  if pos('.106.04.',ВзятьСчетПоПолю(Поле))>0:^'';fi;
--  if pos('.106.04.',ВзятьСчетПоПолю(Поле))>0:^'~(КОСГУ.2??|КОСГУ.1??)';fi;
  ^'';
end;
Func ВосстановитьПоУмолчаниюУслАналит(Поле:s):s;
  var ss:s;
  ss=SubStr(Поле,1,4);
  if ss='SRГ4':^ВосстановитьПоУмолчаниюУслАналитГ4(Поле);
   | ss='SRГ5':^ВосстановитьПоУмолчаниюУслАналитГ5(Поле);
   | ss='SRГ6':^ВосстановитьПоУмолчаниюУслАналитГ6(Поле);
  fi;
end;

--оборот
Proc ВосстановитьПоУмолчаниюУслПоле(Поле:s);
  var fieldname:s;
  if ПолеДляРасчета(Поле):
     fieldname=SubStr(Поле,Length(Поле)-6,7);
     PutVariableI('F'+fieldname+'_',ВосстановитьПоУмолчаниюУслФормула('F'+fieldname));
     PutVariableS('A'+fieldname,ВосстановитьПоУмолчаниюУслСчет   ('A'+fieldname));
     PutVariableS('S'+fieldname,ВосстановитьПоУмолчаниюУслАналит ('S'+fieldname));
  fi;
end;

Proc ВосстановитьПоУмолчаниюСтроку(iter:i);
  var fieldname:s;
  fieldname=format('%.3d',NumWorkLine[iter]);
  ВосстановитьПоУмолчаниюУслПоле('RГ4С'+fieldname);
  ВосстановитьПоУмолчаниюУслПоле('RГ5С'+fieldname);
  ВосстановитьПоУмолчаниюУслПоле('RГ6С'+fieldname);
end;
Proc ВосстановитьПоУмолчаниюВсе;
  var t,z:i;
  if НастройкиПоУмолчанию=0:НастройкиПоУмолчанию=1;fi;
  z=LengthOfArray(NumWorkLine);
  for t=1..z do
      ВосстановитьПоУмолчаниюСтроку(t);
  od;
end;
Proc РасчетПоля(Поле:s;ОбщУслКДКРКИФД:s;Показатель_:s;Rpt:s);
  var t,z,Графа:i;
  var v:n;
  var УслСч,УслАн:S;
  var ОбщУслАн_:S;
  var ss:S;

  if ПолеДляРасчета(Поле):
     УслСч=GetVariables('A'+Поле);
     УслАн=GetVariables('S'+Поле);
     z=GetVariablei('F'+Поле+'_');
     -------- пристыковка доп аналитики и счета -----------
               if not УслСч="": УслСч="("+УслСч+")"; 
--                  Графа=int(SubStr(Поле,3,1));
--                  if Графа=3 or Графа=6 or Графа=9:УслСч=Раб.Бюджет2005.Объединить(УслСч,ОбщУслБС ,"&");
--                   | true:                         УслСч=Раб.Бюджет2005.Объединить(УслСч,ОбщУслВБС,"&");
--                  fi;
               fi;
               УслСч=Раб.Бюджет2005.Объединить(УслСч,ОбщУслКДКРКИФД,"&");
               if not УслАн="" and not ОбщУслАн="": УслАн="("+УслАн+")"; ОбщУслАн_="("+ОбщУслАн+")"; else ОбщУслАн_=ОбщУслАн; fi;
               УслАн=Раб.Бюджет2005.Объединить(УслАн,ОбщУслАн_,"&");
               if pos('ЗАБ.',УслСч)>0:
                  УслАн=Раб.Бюджет2005.Объединить(УслАн,ОбщУслВД_ЗАБ,"&");
               fi;
               --if НеУчитЗаклПр: УслАн=Раб.Бюджет2005.Объединить(УслАн,Раб.Парам_Отч.ИсклЗакл,"&"); fi;
               if УслАн<>'':ss='{'+УслАн+'}';
                | true:ss=УслАн;
               fi;
               ss=УслСч+ss;
--               if Графа=5:ss='+'+ss;
--                | Графа=6:ss='-'+ss;
--               fi;


     ------------------------------------------------------
     if z<0:v=0;
      | z<4:
--        trace(ss);
        if Rpt='':
           if z=0:v= оборот (ss,ДН,ДК,Показатель_);
            | z=2:v=-оборот (ss,ДН,ДК,Показатель_);
            | z=1:v= остаток(ss,ДН,Показатель_);
            | z=3:v=-остаток(ss,ДН,Показатель_);
           fi;
         | true:
           if Показатель_<>"": Rpt=Rpt+' ('+Показатель_+')"';
            | true:            Rpt=Rpt+'"';
           fi;
           if z=0:Report(Rpt,ДН,ДК,УслСч,УслАн);
            | z=2:Report(Rpt,ДН,ДК,УслСч,УслАн);
            | z=1:Report(Rpt,1.1.100,ДК,УслСч,УслАн);
            | z=3:Report(Rpt,1.1.100,ДК,УслСч,УслАн);
           fi;
        fi;
      | z<6:
      | z>5:v=0;
     fi;
     if Rpt='':
        PutVariableN(Поле,V);
     fi;
  fi;
end;

Proc РасчетСтроки(iter:i;ОбщУслКДКРКИФД:s;Показатель_:s);
  var fieldname:s;
  fieldname=format('%.3d',NumWorkLine[iter]);
  РасчетПоля('RГ4С'+fieldname,ОбщУслКДКРКИФД,Показатель_,'');
  РасчетПоля('RГ5С'+fieldname,ОбщУслКДКРКИФД,Показатель_,'');
  РасчетПоля('RГ6С'+fieldname,ОбщУслКДКРКИФД,Показатель_,'');
end;
Proc Показать_скрыть_Настройки;
var i,j:i;
var ss:object;
  ФлНастройки=not ФлНастройки;
  btnНастройки.Caption=if(ФлНастройки,'Скрыть &настройки','Показать &настройки');
  btnВосстановитьНастройки.visible=ФлНастройки;
  ФлУчетВНПР.visible=ФлНастройки;
  for j=1..7 do
      if FindObject('СекцСтр'+str(j),ss):
         for i=5..8 do ss.Столбец(i, ColVisible, not ФлНастройки); od;
         for i=9..17 do ss.Столбец(i, ColVisible, ФлНастройки); od;
      fi;
      if j=2:
         if FindObject('СекцСтр3_1',ss):
            for i=5..8 do ss.Столбец(i, ColVisible, not ФлНастройки); od;
            for i=9..17 do ss.Столбец(i, ColVisible, ФлНастройки); od;
         fi;
         if FindObject('СекцСтр3_105',ss):
            for i=5..8 do ss.Столбец(i, ColVisible, not ФлНастройки); od;
            for i=9..17 do ss.Столбец(i, ColVisible, ФлНастройки); od;
         fi;
      fi;
  od;

end;

Proc Расчет_(field:s;rpt:s);
  var t,z,tm:i;
  var ll:l;
  var МаскаСчКБК,МаскаАнКБК,УслСч,УслАн:S;
  var КБК,КОСГУ:S;
  var Показатель_:S;
  var ОбщУслКДКРКИФД,ss:S;
  if ФлНастройки:Показать_скрыть_Настройки;fi;
  z=LengthOfArray(NumWorkLine);
if НастройкиПоУмолчанию=0:
   t=Вопрос('','Загрузить настройки по умолчанию?','Да;Нет',mtConfirmation);
   if t=1:НастройкиПоУмолчанию=1;ВосстановитьПоУмолчаниюВсе;--загрузка
    | true:t=Вопрос('Отказ от настроек по умолчанию...','Предлагать загрузить настройки по умолчанию при очередном расчете?','Да;Нет',mtConfirmation);
      if t=2:НастройкиПоУмолчанию=-1;fi;
   fi;
fi;
  tm=time;ll=true;
 ClearVariable(BufКБК);
 if ОбщУслКР="" and ОбщУслКД="":ОбщУслКДКРКИФД="";
  | true:
    if not ОбщУслКР="":
       КБК=Раб.Бюджет2005.ВзятьКодКБК(ОбщУслКР,"ФКР","КБК",False);
       КОСГУ=Раб.Бюджет2005.ВзятьКодКБК(ОбщУслКР,"ФКР","КОСГУ",False);
       МаскаСчКБК="("+КБК+"."+Раб.Бюджет2005.МаскаСч6+"."+КОСГУ+")";
   --    МаскаСчКБК="("+КБК+"."+Раб.Бюджет2005.МаскаСч6+"."+КОСГУ+"&"+ОбщУслВБС+")";
       МаскаАнКБК="ФКР."+КБК+"&КОСГУ."+КОСГУ;
      else
       МаскаСчКБК="("+Раб.Бюджет2005.МаскаФКР+")";
       МаскаСчКБК="";
       МаскаАнКБК="";
    fi;
       ОбщУслКДКРКИФД=МаскаСчКБК;
    if not ОбщУслКД="":
       КБК=Раб.Бюджет2005.ВзятьКодКБК(ОбщУслКД,"КД","КБК",False);
       КОСГУ=Раб.Бюджет2005.ВзятьКодКБК(ОбщУслКД,"КД","КОСГУ",False);
       МаскаСчКБК="("+КБК+"."+Раб.Бюджет2005.МаскаСч6+"."+КОСГУ+")";
       МаскаАнКБК="КД."+КБК+"&КОСГУ."+КОСГУ;
      else
       МаскаСчКБК="("+Раб.Бюджет2005.МаскаКД+")";
       МаскаАнКБК="";
    fi;
       ОбщУслКДКРКИФД=Раб.Бюджет2005.Объединить(ОбщУслКДКРКИФД,МаскаСчКБК,"|");
       ОбщУслКДКРКИФД="("+ОбщУслКДКРКИФД+")";
 fi;
 ОбщУслКДКРКИФД=Раб.Бюджет2005.Объединить(ОбщУслКДКРКИФД,ОбщУслВД,"&");

 if not Показатель="" and not Показатель=BaseCurrency: Показатель_="ВАЛ"; fi;
  if trim(field)='':
     ShowProgress(z,'Расчет...');
     for t=1..z do
         РасчетСтроки(t,if(NumWorkLine[t]>=450,'',ОбщУслКДКРКИФД),Показатель_);
         Progresspos(t);
     od;
     CloseProgress;
   | true:

     t=pos('С',field); 
     if t>0:
        t=int(SubStr(field,t+1,255));
     fi;
     if t>=450:
        РасчетПоля(field,'',Показатель_,rpt);
      | true:
        РасчетПоля(field,ОбщУслКДКРКИФД,Показатель_,rpt);
     fi;
--     РасчетПоля(field,ОбщУслКДКРКИФД,Показатель_,rpt);
  fi;
end;
var стр_Ит[]:S;
--=====Блок для взаимодействия=====
Proc Расчет;
  Расчет_('','');
end;

Func Готово:S;
   if Abs(RГ4С010)+Abs(RГ7С010)+Abs(RГ4С150)+Abs(RГ7С150)+Abs(RГ4С190)+Abs(RГ7С190)+Abs(RГ4С230)+Abs(RГ7С230)=0:
      ^"Отсутствуют остатки на балансе";
   fi;
   ^"";
end;

Proc ФормироватьXML;
var i,j:I;
  РАБ.XML.ОткрытьТэг("ВидОтчета",'КодФормы=0503768');
  РАБ.XML.ОткрытьТэг("Отчет",'');
  РАБ.XML.ОткрытьТэг("ПозицииОтчета",'');
  --ЗадатьСтр_Усл;
  for i= 1 .. LengthOfArray(NumWorkLine) do
     Раб.XML.ДОБАТТР("Стр",Str(NumWorkLine[i]));
     --значения
     Раб.XML.ДОБАТТР("Тип","R");
     for j=4..7 do
       Раб.XML.ДОБАТТР("Графа",Str(j));
       Раб.XML.ДОБАТТР("Вычислимое",if(j=7,"true","false"));
       Раб.XML.ФормированиеТэга("Позиция",Str(GetVariableN("RГ"+Format("%1d",j)+"С"+Str(NumWorkLine[i]) ),2),True,False,1);
     od;
  od;
  ClearVariable(Стр_Ит);
  Стр_Ит[1]="010";
  Стр_Ит[2]="050";
  Стр_Ит[3]="150";
  Стр_Ит[4]="190";
  Стр_Ит[5]="310";
  Стр_Ит[6]="320";
  Стр_Ит[7]="330";
  Стр_Ит[8]="340";
  Стр_Ит[9]="350";
  Стр_Ит[10]="360";
  Стр_Ит[11]="370";
  Стр_Ит[12]="380";
  Стр_Ит[13]="390";
  Стр_Ит[14]="410";
  Стр_Ит[15]="420";
  Стр_Ит[16]="430";

  for i= 1 .. LengthOfArray(Стр_Ит) do
     Раб.XML.ДОБАТТР("Стр",Стр_Ит[i]);
     Раб.XML.ДОБАТТР("Вычислимое","true");
     --значения
     Раб.XML.ДОБАТТР("Тип","R");
     for j=4..7 do
       Раб.XML.ДОБАТТР("Графа",Str(j));
       Раб.XML.ФормированиеТэга("Позиция",Str(GetVariableN("RГ"+Format("%1d",j)+"С"+Стр_Ит[i]),2),True,False,1);
     od;
  od;


  ClearVariable(Раб.XML.BufAtName);
  ClearVariable(Раб.XML.BufAtVal);

  РАБ.XML.ЗакрытьТэг;--ПозицииОтчета

  Раб.XML.ФормированиеТэга("КОД","0001",False,False,1);
  Раб.XML.ФормированиеТэга("ИМЯ","Баланс государственного (муниципального) учреждения",False,False,1);
  Раб.XML.ФормированиеТэга("КОММЕНТАРИЙ","",False,False,1);
  Раб.XML.ФормированиеТэга("ВЕРСИЯФОРМЫ","0",False,False,1);
  Раб.XML.ФормированиеТэга("ДАТА",DateToString(ДК),False,False,1);
  Раб.XML.ФормированиеТэга("НАЧАЛОПЕРИОДА",DateToString(ДН),False,False,1);
  Раб.XML.ФормированиеТэга("КОНЕЦПЕРИОДА",DateToString(ДК),False,False,1);
  Раб.XML.ФормированиеТэга("НАИМБЮДЖ","",False,False,1);
  Раб.XML.ФормированиеТэга("ВИДДЕЯТЕЛЬНОСТИ","",False,False,1);
  Раб.XML.ФормированиеТэга("ЕДИЗМ",Str(ЕдИзм),False,False,1);
  Раб.XML.ФормированиеТэга("ТОЧН",Str(Точн),False,False,1);
  Раб.XML.ФормированиеТэга("ОКЕИ",ОКЕИ,False,False,1);
  Раб.XML.ФормированиеТэга("ПОКАЗАТЕЛЬ",Показатель,False,False,1);
--  Раб.XML.ФормированиеТэга("ИМЯРУК",ФИОРук,False,False,1);
--  Раб.XML.ФормированиеТэга("ИМЯБУХ",ФИОБух,False,False,1);
--  Раб.XML.ФормированиеТэга("ИМЯРУКФЭО",ФИОРукФЭО,False,False,1);

--  Раб.XML.ФормированиеТэга("ДОЛЖНИСП",Исполнит_Должн,False,False,1);
--  Раб.XML.ФормированиеТэга("ИМЯИСП",Исполнит_РасшПодп,False,False,1);
--  Раб.XML.ФормированиеТэга("ТЕЛИСП",Исполнит_ТЕЛ,False,False,1);

--  Раб.XML.ФормированиеТэга("ДОЛЖНУПЛ",РукУполн_Должн,False,False,1);
--  Раб.XML.ФормированиеТэга("ИМЯУПЛ",РукУполн_РасшПодп,False,False,1);
--  Раб.XML.ФормированиеТэга("ЦЕНТБУХ",ЦентрБУХ,False,False,1);

  Раб.XML.ФормированиеТэга("НЕВЫГРУЖАТЬ","false",False,False,1);
  Раб.XML.ФормированиеТэга("СВОД","false",False,False,1);
  Раб.XML.ФормированиеТэга("СВОДСВОДА","false",False,False,1);
  Раб.XML.ФормированиеТэга("GUID_CREATE",GetGUID,False,False,1);
  Раб.XML.ФормированиеТэга("GUID_CURRENT","",False,False,1);

  РАБ.XML.ЗакрытьТэг;
  РАБ.XML.ЗакрытьТэг;
end;



2--
2-- События полей шаблона

Proc ПозицииОтчета_OnExit(FieldName: String; Iter: Integer);
--  ЗаписатьПоле(FieldName,false);
end;

Func Показатель_OnInput(FieldName: String; Iter: Integer): logical;
  return true;
end;

2--
2-- События объектов шаблона

func НастрФункцПриВходе(Поле: Строка; Итер: Целое): Логич;
var fieldname:s;
var V:i;
  fieldname=AsString(Шаблон.Поле)+'_';
  V=GetVariableI(fieldname);
  V=ВыборФунк(Поле,V);
  PutVariableI(fieldname,V);
  ^false ;
end;
proc btnПечать_OnClick(Sender: String);
  Раб.Настр_Печать.Prn('','','ТББ_ОТЧЕТЫ_БАЛАНС_33Н_0503768_000.cfg','',1);
end;


2--
2-- События шаблона

proc OnOpen(Create: Logical);
  iniNumWorkLine;
  ФлНастройки=false;
  Раб.Настр_Печать.Cfg("","ТББ_ОТЧЕТЫ_БАЛАНС_33Н_0503768_000.cfg");
  if not Упр_с1 and not Упр_с2 and not Упр_с3 and not Упр_с4 and not Упр_с5 and not Упр_с6 and not Упр_с7:
     Упр_с1=True;
     Упр_с2=True;
     Упр_с3=True;
     Упр_с3_105=false;
     Упр_с4=True;
     Упр_с5=True;
     Упр_с6=True;
     Упр_с7=True;
     УчетРазрывПеред_с2=true;
     УчетРазрывПеред_с3=true;
     УчетРазрывПеред_с5=true;
     УчетРазрывПеред_с6=true;
     УчетРазрывПеред_с4=false;
     УчетРазрывПеред_с7=false;
  fi;
end;

Proc OnClose(Destroy: Logical);
  ОчисткаПолей;
end;



Func РазрывСтр_ПриВходе(Поле: Строка; Итер: Целое): Логич;
  var СекцИмя:s;
  СекцИмя=AsString(шаблон.Name);
  if СекцИмя='СекцРазрыв_с1_с2':УчетРазрывПеред_с2=не(ВопрДаОтказ('Удалить разрыв?')=кмдВерно);
   | СекцИмя='СекцРазрыв_с2_с3':УчетРазрывПеред_с3=не(ВопрДаОтказ('Удалить разрыв?')=кмдВерно);
   | СекцИмя='СекцРазрыв_с3_с4':УчетРазрывПеред_с4=не(ВопрДаОтказ('Удалить разрыв?')=кмдВерно);
   | СекцИмя='СекцРазрыв_с4_с5':УчетРазрывПеред_с5=не(ВопрДаОтказ('Удалить разрыв?')=кмдВерно);
   | СекцИмя='СекцРазрыв_с5_с6':УчетРазрывПеред_с6=не(ВопрДаОтказ('Удалить разрыв?')=кмдВерно);
   | СекцИмя='СекцРазрыв_с6_с7':УчетРазрывПеред_с7=не(ВопрДаОтказ('Удалить разрыв?')=кмдВерно);
  fi;
  Возврат false;
end;

Func ПозицииОтчета_OnLookup(Sect: String; Row: Integer; Col: Integer; Cur: String): String;
  if ВопрДаОтказ('Восстановить настройку по кмолчанию?')=кмдВерно:
     ВосстановитьПоУмолчаниюУслПоле(AsString(шаблон.поле));
     шаблон.скрытьредактор(true);
  fi;
  Return Cur ;
end;


Func ПозицииОтчета_OnLookup_отчет(Sect: String; Row: Integer; Col: Integer; Cur: String): String;
     шаблон.скрытьредактор(true);
     расчет_(AsString(Template.Field),'"'+PlanVar("Общие")+'\Отчеты\Ф0503130.lst"."Расшифр');
  Return Cur ;
end;

Proc btnЗакрыть_OnClick(Sender: String);
  Close;
end;

Проц btnНастройки_OnClick(Отправитель: Строка);
  Показать_скрыть_Настройки;
end;


Проц btnРасчет_ПриНажатии(Отправитель: Строка);
  if not Упр_с1 and not Упр_с2 and not Упр_с3 and not Упр_с4 and not Упр_с5 and not Упр_с6 and not Упр_с7:
     Упр_с1=True;
     Упр_с2=True;
     Упр_с3=True;
     Упр_с4=True;
     Упр_с5=True;
     Упр_с6=True;
     Упр_с7=True;
  fi;
  Расчет_('','');
end;

Proc Перерасчет(Flag:L);
var Msg:S;
 if ДН>ДК: Message("Дата начада периода превышает дату окончания периода",mtError); Template.Field="ДК"; Exit; fi;
 if ДК=1.1.100: Message("Выберите отчетный период",mtError); Template.Field="ДК"; Exit; fi;
 if ВД="": Message("Выберите вид детятельности"); Template.Field="НаимВД"; Exit; fi;
 if Flag: Msg="Параметры отчета изменились."+Chr(13); else Msg=""; fi;
 if EnqOkCancel(Msg+'Выполнить расчет ?'+chr(13)+'Набранные вручную данные будут утеряны',mtWarning)=CmOk: Расчет_('',''); fi;
end;

Proc ПрисвоитьТочностьСекция(СекцияИмя:s);
var Obj:Object;
var cf:S;
var x,y,c,r,cc,rr:i;
 clearvariable(Точн);
 cf=",##0."+if(Точн<1,"",RepStr("0",Точн))+";;-";
   if FindObject(СекцияИмя,Obj):
      cc=AsInteger(Obj.ColsCount);
      rr=AsInteger(Obj.RowsCount);
      for r=4..rr do
       for c=5..8 do
        if Match(AsString(Obj.Cell(r,c,CellContents,"")),"R*"): Obj.Cell(r,c,CellFormat,cf); fi;
       od;
      od;
   fi;
end;

Proc ПрисвоитьТочность;
var tt:i;
 for tt=1..7 do
  ПрисвоитьТочностьСекция('СЕКЦСТР'+str(tt));
 od;
 ПрисвоитьТочностьСекция('СЕКЦСТР3_105');
 ПрисвоитьТочностьСекция('СЕКЦСТР3_1');
end;
Func ПарамОтч_onEnter(FieldName: String; Iter: Integer): logical;
var Flag:L;
 if FieldName="НаимВД": FieldName="ВД"; fi;
 Flag=РАБ.ПАРАМ_ОТЧ.Взять(FieldName,1);
-- ИсключитьТ1=ИсключитьТ1;
 if Flag or not ОтчGUID=РАБ.ПАРАМ_ОТЧ.ОтчGUID: ПрисвоитьТочность; Перерасчет(True); fi;
 Return False;
end;


Проц btnНастройкиСчитать_OnClick(Отправитель: Строка);
  ВосстановитьПоУмолчаниюВсе;
end;




Конец