Помощь - Поиск - Пользователи - Календарь
Полная версия этой страницы: Помогите Найти Разность ДАТ!
Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7 > Программисту > Программирование в 1С Предприятие 8.3
Кирилл659
Доброго времени суток Уважаемые форумчане!
Помогите пожалуйста! Уровень знаний 1С встроенного языка, если честно, на нуле.
Задача вычисления разницы между «Поле 2» и «Поле 1» и Записи в «Поле 3».
И данные отображать в формате Кол-во часов и минут.





Цитата(Кирилл659 @ 30.01.19, 21:09) необходимо зарегистрироваться для просмотра ссылки
Доброго времени суток Уважаемые форумчане!
Помогите пожалуйста! Уровень знаний 1С встроенного языка, если честно, на нуле.
Задача вычисления разницы между «Поле 2» и «Поле 1» и Записи в «Поле 3».
И данные отображать в формате Кол-во часов и минут.

Также прилагаю скрин с конфигуратора:
Егор Динин
Если вы из одной даты вычитаете другую, то получаете разницу дат в секундах.
3600 секунд = 1 час, так и считаете.

необходимо зарегистрироваться для просмотра ссылки
 Функция РазностьВремени(Время1, Время2);
    
    Разность = Время1 - Время2;
    
    Если Разность > 0 Тогда
        Часов = Цел(Разность / 3600);
        Минут = Цел((Разность - Часов * 3600) / 60);
        
        Возврат Дата(1, 1, 1, Часов, Минут, 0);
        
    Иначе
        Возврат Дата(1,1,1,0,0,0);
    КонецЕсли;
    
КонецФункции


//Пример использования    
ВремяОжидания= РазностьВремени(Время1, Время2);
takefive
Кирилл659 @ Вчера, 21:17 необходимо зарегистрироваться для просмотра ссылки ,
если тип реквизитов дата:
Объект.Реквизит3 = Дата(1,1,1) + (Объект.Реквизит2 - Объект.Реквизит1);


Кирилл659 @ Вчера, 21:17 необходимо зарегистрироваться для просмотра ссылки ,
строкой:
    Строки = СтрЗаменить(Формат(Объект.Реквизит3, "ДФ=ЧЧ:мм:сс"),":",Символы.ПС);
    ВремяСтрокой = "Время строкой:"
        + " " + СтрПолучитьСтроку(Строки,1) + " час. "
        + " " + СтрПолучитьСтроку(Строки,2) + " мин. "
        + " " + СтрПолучитьСтроку(Строки,3) + " сек.";
    Сообщить(ВремяСтрокой);
Для просмотра полной версии этой страницы, пожалуйста, пройдите по ссылке.