125
Если Стр.д11="К" Тогда
Стр.Командировка=Стр.Командировка+1;
КонецЕсли;
Если Стр.д11="8" Тогда
Стр.ОтрабДней=Стр.ОтрабДней+1;
КонецЕсли;
ОбщийМодуль1.РассчитатьЧасы(Стр);
КонецПроцедуры
&НаКлиенте
Процедура Табельд12ПриИзменении(Элемент)
Стр= Элементы.Табель.ТекущиеДанные;
Если Стр.д12="Пр" Тогда
Стр.Прогул=Стр.Прогул+1;
КонецЕсли;
Если Стр.д12="П" Тогда
Стр.Праздничные=Стр.Праздничные+1;
КонецЕсли;
Если Стр.д12="В" Тогда
Стр.Выходные=Стр.Выходные+1;
КонецЕсли;
Если Стр.д12="О" Тогда
Стр.Отпуск=Стр.Отпуск+1;
КонецЕсли;
Если Стр.д12="Б" Тогда
Стр.Больничный=Стр.Больничный+1;
КонецЕсли;
Если Стр.д12="А" Тогда
Стр.Административные=Стр.Административные+1;
КонецЕсли;
Если Стр.д12="Д" Тогда
126
Стр.Декрет=Стр.Декрет+1;
КонецЕсли;
Если Стр.д12="К" Тогда
Стр.Командировка=Стр.Командировка+1;
КонецЕсли;
Если Стр.д12="8" Тогда
Стр.ОтрабДней=Стр.ОтрабДней+1;
КонецЕсли;
ОбщийМодуль1.РассчитатьЧасы(Стр);
КонецПроцедуры
&НаКлиенте
Процедура Табельд13ПриИзменении(Элемент)
Стр= Элементы.Табель.ТекущиеДанные;
Если Стр.д13="Пр" Тогда
Стр.Прогул=Стр.Прогул+1;
КонецЕсли;
Если Стр.д13="П" Тогда
Стр.Праздничные=Стр.Праздничные+1;
КонецЕсли;
Если Стр.д13="В" Тогда
Стр.Выходные=Стр.Выходные+1;
КонецЕсли;
Если Стр.д13="О" Тогда
Стр.Отпуск=Стр.Отпуск+1;
КонецЕсли;
Если Стр.д13="Б" Тогда
Стр.Больничный=Стр.Больничный+1;
КонецЕсли;
Если Стр.д13="А" Тогда
Стр.Административные=Стр.Административные+1;
КонецЕсли;
127
Если Стр.д13="Д" Тогда
Стр.Декрет=Стр.Декрет+1;
КонецЕсли;
Если Стр.д13="К" Тогда
Стр.Командировка=Стр.Командировка+1;
КонецЕсли;
Если Стр.д13="8" Тогда
Стр.ОтрабДней=Стр.ОтрабДней+1;
КонецЕсли;
ОбщийМодуль1.РассчитатьЧасы(Стр);
КонецПроцедуры
&НаКлиенте
Процедура Табельд14ПриИзменении(Элемент)
Стр= Элементы.Табель.ТекущиеДанные;
Если Стр.д14="Пр" Тогда
Стр.Прогул=Стр.Прогул+1;
КонецЕсли;
Если Стр.д14="П" Тогда
Стр.Праздничные=Стр.Праздничные+1;
КонецЕсли;
Если Стр.д14="В" Тогда
Стр.Выходные=Стр.Выходные+1;
КонецЕсли;
Если Стр.д14="О" Тогда
Стр.Отпуск=Стр.Отпуск+1;
КонецЕсли;
Если Стр.д14="Б" Тогда
Стр.Больничный=Стр.Больничный+1;
КонецЕсли;
Если Стр.д14="А" Тогда
128
Стр.Административные=Стр.Административные+1;
КонецЕсли;
Если Стр.д14="Д" Тогда
Стр.Декрет=Стр.Декрет+1;
КонецЕсли;
Если Стр.д14="К" Тогда
Стр.Командировка=Стр.Командировка+1;
КонецЕсли;
Если Стр.д14="8" Тогда
Стр.ОтрабДней=Стр.ОтрабДней+1;
КонецЕсли;
ОбщийМодуль1.РассчитатьЧасы(Стр);
КонецПроцедуры
&НаКлиенте
Процедура Табельд15ПриИзменении(Элемент)
Стр= Элементы.Табель.ТекущиеДанные;
Если Стр.д15="Пр" Тогда
Стр.Прогул=Стр.Прогул+1;
КонецЕсли;
Если Стр.д15="П" Тогда
Стр.Праздничные=Стр.Праздничные+1;
КонецЕсли;
Если Стр.д15="В" Тогда
Стр.Выходные=Стр.Выходные+1;
КонецЕсли;
Если Стр.д15="О" Тогда
Стр.Отпуск=Стр.Отпуск+1;
КонецЕсли;
Если Стр.д15="Б" Тогда
Стр.Больничный=Стр.Больничный+1;
КонецЕсли;
129
Если Стр.д15="А" Тогда
Стр.Административные=Стр.Административные+1;
КонецЕсли;
Если Стр.д15="Д" Тогда
Стр.Декрет=Стр.Декрет+1;
КонецЕсли;
Если Стр.д15="К" Тогда
Стр.Командировка=Стр.Командировка+1;
КонецЕсли;
Если Стр.д15="8" Тогда
Стр.ОтрабДней=Стр.ОтрабДней+1;
КонецЕсли;
ОбщийМодуль1.РассчитатьЧасы(Стр);
КонецПроцедуры
&НаКлиенте
Процедура Табельд16ПриИзменении(Элемент)
Стр= Элементы.Табель.ТекущиеДанные;
Если Стр.д16="Пр" Тогда
Стр.Прогул=Стр.Прогул+1;
КонецЕсли;
Если Стр.д16="П" Тогда
Стр.Праздничные=Стр.Праздничные+1;
КонецЕсли;
Если Стр.д16="В" Тогда
Стр.Выходные=Стр.Выходные+1;
КонецЕсли;
Если Стр.д16="О" Тогда
Стр.Отпуск=Стр.Отпуск+1;
КонецЕсли;
Если Стр.д16="Б" Тогда
130
Стр.Больничный=Стр.Больничный+1;
КонецЕсли;
Если Стр.д16="А" Тогда
Стр.Административные=Стр.Административные+1;
КонецЕсли;
Если Стр.д16="Д" Тогда
Стр.Декрет=Стр.Декрет+1;
КонецЕсли;
Если Стр.д16="К" Тогда
Стр.Командировка=Стр.Командировка+1;
КонецЕсли;
Если Стр.д16="8" Тогда
Стр.ОтрабДней=Стр.ОтрабДней+1;
КонецЕсли;
ОбщийМодуль1.РассчитатьЧасы(Стр);
КонецПроцедуры
&НаКлиенте
Процедура Табельд17ПриИзменении(Элемент)
Стр= Элементы.Табель.ТекущиеДанные;
Если Стр.д17="Пр" Тогда
Стр.Прогул=Стр.Прогул+1;
КонецЕсли;
Если Стр.д17="П" Тогда
Стр.Праздничные=Стр.Праздничные+1;
КонецЕсли;
Если Стр.д17="В" Тогда
Стр.Выходные=Стр.Выходные+1;
КонецЕсли;
Если Стр.д17="О" Тогда
Стр.Отпуск=Стр.Отпуск+1;
КонецЕсли;
131
Если Стр.д17="Б" Тогда
Стр.Больничный=Стр.Больничный+1;
КонецЕсли;
Если Стр.д17="А" Тогда
Стр.Административные=Стр.Административные+1;
КонецЕсли;
Если Стр.д17="Д" Тогда
Стр.Декрет=Стр.Декрет+1;
КонецЕсли;
Если Стр.д17="К" Тогда
Стр.Командировка=Стр.Командировка+1;
КонецЕсли;
Если Стр.д17="8" Тогда
Стр.ОтрабДней=Стр.ОтрабДней+1;
КонецЕсли;
ОбщийМодуль1.РассчитатьЧасы(Стр);
КонецПроцедуры
&НаКлиенте
Процедура Табельд18ПриИзменении(Элемент)
Стр= Элементы.Табель.ТекущиеДанные;
Если Стр.д18="Пр" Тогда
Стр.Прогул=Стр.Прогул+1;
КонецЕсли;
Если Стр.д18="П" Тогда
Стр.Праздничные=Стр.Праздничные+1;
КонецЕсли;
Если Стр.д18="В" Тогда
Стр.Выходные=Стр.Выходные+1;
КонецЕсли;
Если Стр.д18="О" Тогда
132
Стр.Отпуск=Стр.Отпуск+1;
КонецЕсли;
Если Стр.д18="Б" Тогда
Стр.Больничный=Стр.Больничный+1;
КонецЕсли;
Если Стр.д18="А" Тогда
Стр.Административные=Стр.Административные+1;
КонецЕсли;
Если Стр.д18="Д" Тогда
Стр.Декрет=Стр.Декрет+1;
КонецЕсли;
Если Стр.д18="К" Тогда
Стр.Командировка=Стр.Командировка+1;
КонецЕсли;
Если Стр.д18="8" Тогда
Стр.ОтрабДней=Стр.ОтрабДней+1;
КонецЕсли;
ОбщийМодуль1.РассчитатьЧасы(Стр);
КонецПроцедуры
&НаКлиенте
Процедура Табельд19ПриИзменении(Элемент)
Стр= Элементы.Табель.ТекущиеДанные;
Если Стр.д19="Пр" Тогда
Стр.Прогул=Стр.Прогул+1;
КонецЕсли;
Если Стр.д19="П" Тогда
Стр.Праздничные=Стр.Праздничные+1;
КонецЕсли;
Если Стр.д19="В" Тогда
Стр.Выходные=Стр.Выходные+1;
КонецЕсли;
133
Если Стр.д19="О" Тогда
Стр.Отпуск=Стр.Отпуск+1;
КонецЕсли;
Если Стр.д19="Б" Тогда
Стр.Больничный=Стр.Больничный+1;
КонецЕсли;
Если Стр.д19="А" Тогда
Стр.Административные=Стр.Административные+1;
КонецЕсли;
Если Стр.д19="Д" Тогда
Стр.Декрет=Стр.Декрет+1;
КонецЕсли;
Если Стр.д19="К" Тогда
Стр.Командировка=Стр.Командировка+1;
КонецЕсли;
Если Стр.д19="8" Тогда
Стр.ОтрабДней=Стр.ОтрабДней+1;
КонецЕсли;
ОбщийМодуль1.РассчитатьЧасы(Стр);
КонецПроцедуры
&НаКлиенте
Процедура Табельд20ПриИзменении(Элемент)
Стр= Элементы.Табель.ТекущиеДанные;
Если Стр.д20="Пр" Тогда
Стр.Прогул=Стр.Прогул+1;
КонецЕсли;
Если Стр.д20="П" Тогда
Стр.Праздничные=Стр.Праздничные+1;
КонецЕсли;
Если Стр.д20="В" Тогда
134
Стр.Выходные=Стр.Выходные+1;
КонецЕсли;
Если Стр.д20="О" Тогда
Стр.Отпуск=Стр.Отпуск+1;
КонецЕсли;
Если Стр.д20="Б" Тогда
Стр.Больничный=Стр.Больничный+1;
КонецЕсли;
Если Стр.д20="А" Тогда
Стр.Административные=Стр.Административные+1;
КонецЕсли;
Если Стр.д20="Д" Тогда
Стр.Декрет=Стр.Декрет+1;
КонецЕсли;
Если Стр.д20="К" Тогда
Стр.Командировка=Стр.Командировка+1;
КонецЕсли;
Если Стр.д20="8" Тогда
Стр.ОтрабДней=Стр.ОтрабДней+1;
КонецЕсли;
ОбщийМодуль1.РассчитатьЧасы(Стр);
КонецПроцедуры
&НаКлиенте
Процедура Табельд21ПриИзменении(Элемент)
Стр= Элементы.Табель.ТекущиеДанные;
Если Стр.д21="Пр" Тогда
Стр.Прогул=Стр.Прогул+1;
КонецЕсли;
Если Стр.д21="П" Тогда
Стр.Праздничные=Стр.Праздничные+1;
КонецЕсли;