3
Standart
08.08.16
✎
15:15
|
Для сч=1 по 31 цикл
текКод = сокрЛП( ПолучитьАтрибут("ЧасыКод_"+Формат(сч,"Ч(0)2.0")) );
Если (текКод="Я") или (текКод="ЯВ") или (текКод="8од")тогда
Дней = Дней+1;
Часов=Часов+ПолучитьАтрибут("ЧасыОсн_"+Формат(сч,"Ч(0)2.0"));
ЧасовВеч=ЧасовВеч+ПолучитьАтрибут("ЧасыВеч_"+Формат(сч,"Ч(0)2.0"));
ЧасовНоч =ЧасовНоч+ПолучитьАтрибут("ЧасыНоч_"+Формат(сч,"Ч(0)2.0"));
Если СписПразд.НайтиЗначение(сч) <> 0 Тогда
ЧасовПраздники= ЧасовПраздники+ ПолучитьАтрибут("ЧасыОсн_"+Формат(сч,"Ч(0)2.0"));
КонецЕсли;
иначеЕсли ПустаяСтрока(текКод)=1 тогда
;
иначеЕсли (текКод<>"В")и(текКод<>"Я")и(текКод<>"-")и(текКод<>"8од") тогда
НеявокДни = НеявокДни+1;
Если текКод="Б" Тогда
ЧасовБольн=ЧасовБольн+ПолучитьАтрибут("ЧасыОсн_"+Формат(сч,"Ч(0)2.0"));
КонецЕсли;
КонецЕсли;
КонецЦикла;
|
|