Не хорошо говорить про компетентность других, но вот когда 50% кода - вот такое...
- начинаешь тихо материться...
Извиняюсь, если кого обидел... Нервы...
Код |
---|
//определяем временную разницу
С=0;
Мин=Минута(ПрибытиеНаЗагрузку);
Ч=Час(ПрибытиеНаЗагрузку);
Д=День(ПрибытиеНаЗагрузку);
М=Месяц(ПрибытиеНаЗагрузку);
Г=Год(ПрибытиеНаЗагрузку);
КонМес=День(КонецМесяца(ПрибытиеНаЗагрузку));
КонГода=Месяц(КонецГода(ПрибытиеНаЗагрузку));
Дат=Дата(Г,М,Д,Ч,Мин,С);
Пока Дат<ОкончаниеВыгрузки Цикл
Мин=Мин+1;
Если Мин>59 Тогда
Мин=0;
Ч=Ч+1;
Если Ч>23 Тогда
Ч=0;
Д=Д+1;
Если Д>КонМес Тогда
Д=1;
М=М+1;
Если М>КонГода Тогда
М=1;
Г=Г+1;
КонецЕсли;
Дат=Дата(Г,М,Д,Ч,Мин,С);
КонМес=День(КонецМесяца(Дат));
КонГода=Месяц(КонецГода(Дат));
КонецЕсли;
КонецЕсли;
КонецЕсли;
Дат=Дата(Г,М,Д,Ч,Мин,С);
КолМинВыгрузки=КолМинВыгрузки+1;
КонецЦикла;
Показать полностью |
- начинаешь тихо материться...
Извиняюсь, если кого обидел... Нервы...
Ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
И скажите мне еще... Чем нужно думать, чтобы в регистре сведений сделать 60 измерений? И нафига на форме документа размещать менеджер набора записей этого регистра для возможности ручного редактирования, вместо задания табличной части и проведения?
ПС Я это все пощу - к тому, что, может, я совсем уже туплю, и чего-то не понимаю. Может, мир изменился, и подходы к программиированию? Тем более, в 8.1...
ПС Я это все пощу - к тому, что, может, я совсем уже туплю, и чего-то не понимаю. Может, мир изменился, и подходы к программиированию? Тем более, в 8.1...
Всяко бывает.
На партнерском диске ИТС выложена конфигурация для франчей "Регистрация подписок". Это не просто ужас. Не могу подобрать слов :)
Вполне понятно что она писалась в далеком 2004 году, но зачем её до сих пор "толкать" на диске?
На партнерском диске ИТС выложена конфигурация для франчей "Регистрация подписок". Это не просто ужас. Не могу подобрать слов :)
Вполне понятно что она писалась в далеком 2004 году, но зачем её до сих пор "толкать" на диске?
Да все понятно. Чел начал смотреть на 8-ку, естественно, ничего не понял, но заметил регистры сведений. Уже много раз обсуждалось, что в программеры 1С идет кто попало. В описании языка 7-ки 900 страниц, 8-ки - 3500. Конечно, никто и никогда его не прочтет.
Есть конфа "Оценка персонала". 1С:Совместно.. все дела.. Так вот там код страаашный.. Все на массивах, структур почти нет, половина на аглецком половина на нашем... как совместимо получали?
Самое забавное, что когда стаавил ее обновление, то в обработке обновления, в процедуре ИсправитьОшибки() тоже была ошибка... ;)
Самое забавное, что когда стаавил ее обновление, то в обработке обновления, в процедуре ИсправитьОшибки() тоже была ошибка... ;)
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот