Перебор дат 1с8

@Denzo · Регистрация: 04.01.2014

Студворк — интернет-сервис помощи студентам

Друзья! Есть задача сделать в табличной части документа колонки с текстом даты(день)/день недели(сокр.). Пример: "24/пн". Ни чего не получается. На форме есть два поля с выбором дат С и ПО (Период).

1C
1
2
3
4
5
6
ДатаН = Формат(ДатаС, "ДЛФ=Д");
ДатаК = Формат(ДатаДо, "ДЛФ=Д");
    Для ТекДата = ДатаН ПО ДатаК Цикл
        ЭлементыФормы.ТЧГрафикаРаботы.Колонки.Дата1.ТекстШапки = ТекДень + "/" + (?????????);
    
    КонецЦикла;

Выдает ошибку о типах данных. Как можно решить такую задачу!

@1c-k · 24.08.2015, 23:02

Denzo, пойми, синтаксис-помощник - это не просто так там сделано, реально помогает очень сильно.
Посмотри методы табзначений, где и как выполняются. Там все расписано, стоит вникнуть раз и проблемы по большей части исчезают.

@Denzo · 24.08.2015, 23:29 **[ТС]**

1C
1
2
3
4
5
6
7
    КолДней = (ДатаДо-ДатаС)/86400;
    Для  ТекДень = 0 ПО КолДней Цикл
        ТекКолонка = Формат((ДатаС + 86400 * ТекДень), "ДФ=dd") + "/" + Формат((ДатаС + 86400 * ТекДень), "ДФ=ddd");
        Сообщить(ТекКолонка);
        НоваяКолонка = ЭлементыФормы.ТЧГрафикаРаботы.Колонки.Добавить("Колонка"+ТекДень);
        //НоваяКолонка.ТекстШапки = Формат((НачалоДня(ДатаС) + 86400 * ТекДень), "ДФ=dd") + "/" + Формат((НачалоДня(ДатаС) + 86400 * ТекДень), "ДФ=ddd");
            КонецЦикла;

Вот так практически работает, только мне не удается ТекКолонка засунуть в текст шапки. Ругается на неправильный параметр 1 Добавить

Добавлено через 1 минуту

1C
1
2
3
НоваяКолонка = ЭлементыФормы.ТЧГрафикаРаботы.Колонки.Добавить("Колонка"+Строка(ТекКолонка));
по причине:
Недопустимое значение параметра (параметр номер '1')

@1c-k · 24.08.2015, 23:39

Denzo, https://infostart.ru/public/296433/ здесь описано, как добавить колонку в управляемой форме.

@Denzo · 25.08.2015, 08:18 **[ТС]**

Последний вопрос! Как привязать добавленную колонку к ПеречилениюСсылка

1C
1
2
3
4
5
6
7
8
9
10
11
12
КолДней = (ДатаДо-ДатаС)/86400;
    Для  ТекДень = 0 ПО КолДней Цикл
        ТекКолонка = Формат((ДатаС + 86400 * ТекДень), "ДФ=dd") + "/" + Формат((ДатаС + 86400 * ТекДень), "ДФ=ddd");
        НоваяКолонка = ЭлементыФормы.ТЧГрафикаРаботы.Колонки.Добавить("Дата"+ТекДень,Новый ОписаниеТипов("ПеречислениеСсылка.ОтметкаГрафика"));
        НоваяКолонка.УстановитьЭлементУправления(Тип("ПолеВвод"));
        НоваяКолонка.ЭлементУправления.КнопкаВыбора = Истина;
        НоваяКолонка.ТекстШапки = ТекКолонка;
        НоваяКолонка.Ширина = 8;
        НоваяКолонка.Доступность = Истина;
        НоваяКолонка.Имя = "Дата"+ТекДень;
        НоваяКолонка.Данные = "Дата"+ТекДень; 
            КонецЦикла;

@1c-k · 25.08.2015, 08:23

Denzo, путькданным и на форме оно должно болтаться.

@Denzo · 25.08.2015, 09:10 **[ТС]**

не понятно?

Добавлено через 1 минуту
понял

Добавлено через 40 минут
Не невыодит!

@1c-k · 25.08.2015, 09:19

Denzo, я понимаю, что жаловаться здесь на то, что оно не работает клёво и всё такое.
Документация, отладчик в руки. Без этого программить невозможно и если не понимать, как этим пользоваться, то жалобы и дальше будут сыпаться.

Опять же, чтобы понять, что и куда - нужна конфигурация, её нет.

@Denzo · 26.08.2015, 22:05 **[ТС]**

Не могу удалить ненужные колонки и все.
Вроде читаешь вот так должно быть, а на деле не получается.

1C
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Процедура КоманднаяПанель1ИзменитьКолонки(Кнопка)
        
        КолонкиТЧ=Новый Массив;
        Для Каждого ТекКолонка Из ЭлементыФормы.ТЧГрафикаРаботы.Колонки Цикл
            КолонкиТЧ.Добавить(ТекКолонка.Имя);
            //Сообщить(ТекКолонка.Имя);
        КонецЦикла;
        ИмяКолонки = КолонкиТЧ.Найти("Сотрудник");
        КолонкиТЧ.Удалить(ИмяКолонки);
        ИмяКолонки = КолонкиТЧ.Найти("НомерСтроки");
        КолонкиТЧ.Удалить(ИмяКолонки);
        КолВоКолонок=КолонкиТЧ.Количество();
        
        Для К=0 По КолВоКолонок-1 Цикл
            Сообщить(К);
            ЭлементыФормы.ТЧГрафикаРаботы.Колонки.Удалить(КолонкиТЧ.Найти("Дата"+К));
 
        КонецЦикла;

Новые блоги и статьи Все статьи Все блоги /
Транскрипция 55-минутного видео через Whisper: WhisperDesktop облажался, спас Google Colab[ anaschu 01.06.2026 Понадобилось получить текст из свежезагруженного видео на YouTube. Казалось бы, задача на пять минут. Заняла полтора часа. Делюсь опытом — может кому пригодится последовательность решений. . . .	21 мат мед. Планы на развитие модели здравоСохранения anaschu 01.06.2026 AnyLogic: план развития симуляционной модели рабочего коллектива — динамический абсентеизм, реальные данные, три сценария сравнения Продолжаю серию постов о дискретно-событийной модели рабочего. . .	20. Мат мед. Абсентеизм как отдельный тип простоя anaschu 29.05.2026 Апдейт модели: исправленные баги, абсентеизм и новые механизмы Продолжаю развивать ранее описанную модель рабочего коллектива на AnyLogic. За последние несколько дней был проведён серьёзный. . .	19. здоровье, усталость и психотип работника влияют на производительность предприятия, и наоборот, производительность на здоровье, усталось и психотип anaschu 28.05.2026 Дискретно-событийная модель рабочего коллектива на AnyLogic: здоровье, выгорание, психотипы и микростимуляция Привет, коллеги. Хочу поделиться итогами нескольких недель работы над симуляционной. . .
"Прокси" для последовательного порта Eddy_Em 28.05.2026 Эту штуку написал я достаточно давно. Но сейчас вот понадобилось настроить датчик грозы, но при этом не отключать его от "метеодемона". Соответственно, надо запустить этот "прокси": метеодемон будет. . .	Рефакторинг программы уравнивания. Massaraksh7 26.05.2026 Пример по предыдущей записи в блоге. Но, надо заметить, что, во-первых, там оптимизация не только математики, но и работы с базой данных, и с графами, а во-вторых, это ещё не всё.	Использование TThread в Lazarus для математических вычислений. Massaraksh7 25.05.2026 Производя рефакторинг своих программ на предмет ускорения их работы, обратил внимание на такой аспект, как сокращение времени матвычислений. Дело в том, что приходится работать с большими матрицами. . .	Модель здравосохранения 18. Чем здоровее работник, тем быстрее выгорает anaschu 24.05.2026 Имитационная модель корпоративного здравоохранения: что показывает математика Сегодня в модели рабочего коллектива на AnyLogic появились три новые механики — выгорание через накопленную усталость,. . .

@1c-k 340 / 315 / 43 Регистрация: 20.08.2014 Сообщений: 1,242 Записей в блоге: 1
	24.08.2015, 23:02
	Denzo, пойми, синтаксис-помощник - это не просто так там сделано, реально помогает очень сильно. Посмотри методы табзначений, где и как выполняются. Там все расписано, стоит вникнуть раз и проблемы по большей части исчезают. 0

@1c-k 340 / 315 / 43 Регистрация: 20.08.2014 Сообщений: 1,242 Записей в блоге: 1
	24.08.2015, 23:39
	Denzo, https://infostart.ru/public/296433/ здесь описано, как добавить колонку в управляемой форме. 0

@1c-k 340 / 315 / 43 Регистрация: 20.08.2014 Сообщений: 1,242 Записей в блоге: 1
	25.08.2015, 08:23
	Denzo, путькданным и на форме оно должно болтаться. 0

@Denzo 0 / 0 / 0 Регистрация: 04.01.2014 Сообщений: 71
	25.08.2015, 09:10 [ТС]
	не понятно? Добавлено через 1 минуту понял Добавлено через 40 минут Не невыодит! 0

@1c-k 340 / 315 / 43 Регистрация: 20.08.2014 Сообщений: 1,242 Записей в блоге: 1
	25.08.2015, 09:19
	Denzo, я понимаю, что жаловаться здесь на то, что оно не работает клёво и всё такое. Документация, отладчик в руки. Без этого программить невозможно и если не понимать, как этим пользоваться, то жалобы и дальше будут сыпаться. Опять же, чтобы понять, что и куда - нужна конфигурация, её нет. 0