Мне нужно сделать задание:
есть справочник "СписокВрачей", у него табличная часть "ДоступноеВремяПриема" с единственным реквизитом "ВремяПриема"
есть документ, в который нужно автоматически вписать значение реквизита "ВремяПриема" исходя от выбора приема "ранее" или "позднее"
при вводе специальности врача подставляется самое раннее/позднее время приема
есть справочник "СписокВрачей", у него табличная часть "ДоступноеВремяПриема" с единственным реквизитом "ВремяПриема"
есть документ, в который нужно автоматически вписать значение реквизита "ВремяПриема" исходя от выбора приема "ранее" или "позднее"
при вводе специальности врача подставляется самое раннее/позднее время приема
Прикрепленные файлы:
По теме из базы знаний
Ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
(4) Код ручками пишется.
Напиши шаги, которые ты бы хотел осуществить в своем коде. Например, так:
0. Юзер выбирает врача.
1. Юзер вводит время.
2. Юзер выбирает ранее или позднее.
3. Программа выбирает первое время перед или после.
4. Для этого программа обходит таблицу в временем внутри врача. Это цикл. Для каждого Строка ИЗ Врач.ДоступноеВремяПриема...
6. Если время приема меньше времени, то запоминаем время ранее - временная переменная.
7. Если время приема больше и переменная времяпозднее пустая, то запоминаем в этой переменной время приема.
8. Заканчиваем цикл.
9. Если ранее, то время приема = времяранее. Иначе время приема = времяпозднее.
Ну вот как-то так и пишутся программы...
Напиши шаги, которые ты бы хотел осуществить в своем коде. Например, так:
0. Юзер выбирает врача.
1. Юзер вводит время.
2. Юзер выбирает ранее или позднее.
3. Программа выбирает первое время перед или после.
4. Для этого программа обходит таблицу в временем внутри врача. Это цикл. Для каждого Строка ИЗ Врач.ДоступноеВремяПриема...
6. Если время приема меньше времени, то запоминаем время ранее - временная переменная.
7. Если время приема больше и переменная времяпозднее пустая, то запоминаем в этой переменной время приема.
8. Заканчиваем цикл.
9. Если ранее, то время приема = времяранее. Иначе время приема = времяпозднее.
Ну вот как-то так и пишутся программы...
(14) Да кто его, хочет ли он вообще учиться на программиста? У нас, например, в ВУЗе был предмет "Локальные вычислительные сети". И будущих бухгалтеров, у кого специальность "Бух учет и аудит", заставляли изучать "кабеля". Потому что с точки зрения будущей бухгалтерши это именно "кабеля" какие-то.
Я не вижу в этом проблемы. Пойдет работать маркетологом, недвижимость продавать, хотя учится на программиста. А страна как-нибудь переживет. У страны есть президент. Это его головная боль.
Я не вижу в этом проблемы. Пойдет работать маркетологом, недвижимость продавать, хотя учится на программиста. А страна как-нибудь переживет. У страны есть президент. Это его головная боль.
(27)
Вообще-то это был сарказм, растолковываю его смысл: человека некуда послать потому, что он везде уже был - и "в", и "на" ;-)
совершенство превосходство.
Ибо кто может может помочь стать лучше? Пральна, только тот, кто сам лучше - ну не может это сделать тот, кто сам хуже!
Ну просто ты хоченшь вот так все знать, везде быть и не быть никуда посланым.
Ну, я так и думал.
Вообще-то это был сарказм, растолковываю его смысл: человека некуда послать потому, что он везде уже был - и "в", и "на" ;-)
И тебя это бесит.
Меня давно уже ничто и никто не бесит, даже такие вот столичные павлины. которые якобы "помогают стать лучше", а на самом деле - демонстрируют свое Ибо кто может может помочь стать лучше? Пральна, только тот, кто сам лучше - ну не может это сделать тот, кто сам хуже!
Кубань - никуда не деть.
Ой, не надо нас никуда девать! У нас тут вода в море теплее, чем у вас воздух, я вчера свой километр проплыл, потом борщеца рубанул - мне даже сраться с самовлюбленным москвичом было лениво. :-P
(19)
Виноваты учителя которые обучают в стиле "а ты сам догадайся". Конечно, 1сники тупые. При таком стиле обучения это неудивительно. Он научится писать код, но только если ему 5-10 раз подскажут. Нужен же ему какой-то образец кода от которого отталкиваться. Опять же, если ему это интересно.
Мы даже не знаем что у них там за универ. Может они там изобразительное искусство изучают в качестве основного предмета.
Это просто предлог чтобы прокачать самооценку за чужой счет. То что автор должен сам догадаться.
Так вот значит кто виноват в том, что 1Сники тупые. Я так и думал.
Виноваты учителя которые обучают в стиле "а ты сам догадайся". Конечно, 1сники тупые. При таком стиле обучения это неудивительно. Он научится писать код, но только если ему 5-10 раз подскажут. Нужен же ему какой-то образец кода от которого отталкиваться. Опять же, если ему это интересно.
Мы даже не знаем что у них там за универ. Может они там изобразительное искусство изучают в качестве основного предмета.
Это просто предлог чтобы прокачать самооценку за чужой счет. То что автор должен сам догадаться.
Такой код:
ТипВремя = Новый ОписаниеТипов("Дата", , , Новый КвалификаторыДаты(ЧастиДаты.Время));
ТаблицаВремяПриема = Новый ТаблицаЗначений;
ТаблицаВремяПриема.Колонки.Добавить("ВремяПриема", ТипВремя);
// заполяем тестовую таблицу значений
Для Час = 9 По 23 Цикл
НовСтр = ТаблицаВремяПриема.Добавить();
НовСтр.ВремяПриема = Дата(1, 1, 1, Час, 0, 0);
НовСтр = ТаблицаВремяПриема.Добавить();
НовСтр.ВремяПриема = Дата(1, 1, 1, Час, 30, 0);
КонецЦикла;
ТекущееВремя = Дата(1, 1, 1, Час(ТекущаяДатаСеанса()), Минута(ТекущаяДатаСеанса()), Секунда(ТекущаяДатаСеанса()));
//ВыборПриема = "ранее";
ВыборПриема = "позднее";
БлижайшееВремяПриема = '00010101';
ИндексПоследнейСтроки = ТаблицаВремяПриема.Количество()-1;
// последнюю строку пропускаем чтобы не было ошибки. ИндексПоследнейСтроки-1
Для i = 0 По ИндексПоследнейСтроки-1 Цикл
ВремяРанее = ТаблицаВремяПриема[i].ВремяПриема;
ВремяПозднее = ТаблицаВремяПриема[i+1].ВремяПриема;
// проверяем что текущее время входит в текущий интервал времени, между ВремяРанее и ВремяПозднее
Если ТекущееВремя>=ВремяРанее и ТекущееВремя<=ВремяПозднее Тогда
Если ВыборПриема = "ранее" и ТекущееВремя>ВремяРанее Тогда
БлижайшееВремяПриема = ВремяРанее;
ИначеЕсли ВыборПриема = "позднее" и ТекущееВремя<ВремяПозднее Тогда
БлижайшееВремяПриема = ВремяПозднее;
КонецЕсли;
КонецЕсли;
КонецЦикла;
Сообщить("БлижайшееВремяПриема "+Формат(БлижайшееВремяПриема, "ДЛФ=T"));
Показать
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот