Уведомления
Очистить все
1С:Предприятие 8.x
1
Записи
1
Пользователи
0
Likes
352
Просмотры
Создатель темы 15/05/2021 4:25 дп
Функция 1
Функция РазницаВремени(ВремяНачала, ВремяОкончания) РазницаВрем = ВремяОкончания - ВремяНачала; Если РазницаВрем > 0 Тогда Часов = Цел(РазницаВрем / 3600); Минут = Цел((РазницаВрем - Часов * 3600) / 60); Секунд = РазницаВрем - Часов * 3600 - Минут * 60; Возврат "" + Часов + "ч. " + Минут + "м. " + Секунд + "с."; Иначе Возврат "" + РазницаВрем + "с."; КонецЕсли; КонецФункции
Функция 2
Функция ПолучитьВремяВыполненияСтрока(ВремяНачала) РазницаВСекундах = ТекущаяДата() - ВремяНачала; РазницаВМинутах = Цел(РазницаВСекундах / 60); РазницаВЧасах = Цел(РазницаВМинутах / 60); РазницаВДнях = Цел(РазницаВЧасах / 24); Возврат Строка(РазницаВДнях)+" дн. "+ Строка(РазницаВЧасах-РазницаВДнях*24)+" ч. "+Строка(РазницаВМинутах-РазницаВЧасах*60)+" мин. "+Строка(РазницаВСекундах-РазницаВМинутах*60)+" сек."; КонецФункции