Версия для печати темы (https://pro1c.org.ua/index.php?s=b3cd6960bfb2233b32151a5dbd67260d&showtopic=50192)

Нажмите сюда для просмотра этой темы в обычном формате

Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7 _ Программирование в 1С Предприятие 8.3 _ Помогите Найти Разность ДАТ!

Автор: Кирилл659 30.01.19, 21:17

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





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

Также прилагаю скрин с конфигуратора:

Автор: Егор Динин 30.01.19, 21:31

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

Пример

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


//Пример использования    
ВремяОжидания= РазностьВремени(Время1, Время2);

Автор: takefive 31.01.19, 13:54

Кирилл659 @ Вчера, 21:17 * ,
если тип реквизитов дата:

Объект.Реквизит3 = Дата(1,1,1) + (Объект.Реквизит2 - Объект.Реквизит1);


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

Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7
https://pro1c.org.ua