Заказы на доработку 1С (сервис удаленной работы)

Хранилище

База знаний
Неназначенных незавершенных заказов: 3, свеженьких 3
Бесплатные отчеты, обработки, конфигурации, внешние компоненты для 1С Статьи, описание работы, методики по работе с 1С

Здравствуйте, гость ( Вход | Зарегистрироваться )

> Помогите Найти Разность ДАТ! , Найти разность дат в формате кол-во дней, кол-во часов.          
Кирилл659 Подменю пользователя
сообщение 30.01.19, 21:17
Сообщение #1

Молчаливый
*
Группа: Пользователи
Сообщений: 1
Спасибо сказали: 0 раз
Рейтинг: 0

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





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

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

Егор Динин Подменю пользователя
сообщение 30.01.19, 21:31
Сообщение #2

Почти крутой
Иконка группы
Группа: Местный
Сообщений: 1451
Из: Киев
Спасибо сказали: 534 раз
Рейтинг: 366.7

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

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


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


Сообщение отредактировал Vofka - 31.01.19, 9:28

takefive Подменю пользователя
сообщение 31.01.19, 13:54
Сообщение #3

Общительный
**
Группа: Пользователи
Сообщений: 42
Из: Днепропетровск
Спасибо сказали: 13 раз
Рейтинг: 13.9

Кирилл659 @ Вчера, 21:17 * ,
если тип реквизитов дата:
Объект.Реквизит3 = Дата(1,1,1) + (Объект.Реквизит2 - Объект.Реквизит1);


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


Signature
без свинга нет музыки...

Не нашли ответа на свой вопрос?
Зарегистрируйтесь и задайте новый вопрос.


Ответить Новая тема
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 

RSS Текстовая версия Сейчас: 23.08.19, 7:25
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!