|
mumbyr23
|
|
Вывод на печать таблицы значений "в горизонтальном виде"06.12.2010, 13:50. Показов 38881. Ответов 21
Метки нет (Все метки)
Доброго дня!
1С 7.7 Конфигурация собственная. Просьба помочь разобраться в следующем: В документе, задавая в каждой строке реквизиты определяем периоды выполнения тех или иных работ, в разрезе 30-минутных отрезков. Сформированная таблица значений получается примерно такая Использованный код (на который хватало мозгов) следующий: Код ( (Unknown Language)): Процедура Печать() Таб=СоздатьОбъект("Таблица"); Если Табл1=1 Тогда Таб.ИсходнаяТаблица("ПутевойЖурнал1"); ИначеЕсли Табл1=0 Тогда Таб.ИсходнаяТаблица("ПутевойЖурнал2"); КонецЕсли; Таб.ВывестиСекцию("Отчет"); ТЗ=СоздатьОбъект("ТаблицаЗначений"); ТЗ.НоваяКолонка("Дата"); ТЗ.НоваяКолонка("Час"); ТЗ.НоваяКолонка("Мин"); ТЗ.НоваяКолонка("ВР"); ВыбратьСтроки(); Пока ПолучитьСтроку()=1 Цикл Начало = (ПриходЧасов*2+ПриходМинут/30); Для Сч = 0 по ((ОтходДата-ПриходДата)*24+ОтходЧасов-ПриходЧасов+(ОтходМинут-ПриходМинут)/60)*2 Цикл ТЗ.НоваяСтрока(); ТЗ.Дата = ПриходДата+ЦЕЛ((Сч+Начало)/48); ТЗ.Час = ЦЕЛ((Сч+Начало)/2-24*ЦЕЛ((Сч+Начало)/48)); ТЗ.Мин = ((Сч+Начало)-2*ЦЕЛ((Сч+Начало)/2))*30; ТЗ.ВР = ВидРабот; КонецЦикла; КонецЦикла; ТЗ.Свернуть("Дата,ВР,Час,Мин",""); ТЗ.ВыбратьСтроки(); Пока ТЗ.ПолучитьСтроку()=1 Цикл Таб.ВывестиСекцию("Строка"); КонецЦикла; Таб.ТолькоПросмотр(1); Таб.Показать("ПутевойЖурнал"); КонецПроцедуры Как сделать чтобы получилось выводить на печать таблицу следующего вида? Спасибо заранее всем откликнувшимся! |
|
| 06.12.2010, 13:50 | |
|
Ответы с готовыми решениями:
21
|
|
0 / 0 / 0
Регистрация: 24.12.2008
Сообщений: 1,399
|
|||
| 10.12.2010, 23:28 | |||
Ну сейчас та же сумма, только в рублях)
0
|
|||
|
0 / 0 / 0
Регистрация: 07.07.2008
Сообщений: 1,401
|
||
| 11.12.2010, 07:10 | ||
0
|
||
| 11.12.2010, 07:10 | |
|
Вывод значений в виде таблицы Вывод значений функции в виде таблицы
Вывод значений в виде ровной таблицы. Проблемы с табуляцией Печать таблицы в книжном виде Искать еще темы с ответами Или воспользуйтесь поиском по форуму: |
|
Новые блоги и статьи
|
|||
|
Копировать Windows на новый диск на UEFI
damix 17.10.2026
https:/ / uriesk. wordpress. com/ 2016/ 11/ 01/ move-window-10-to-ssd-on-a-uefi-dualboot-system-with-basic-linux-tools/
TL DR
Вставляем диск, а старый подключаем через переходник, грузимся с лайва. . .
|
ИИ не может найти нужный язык в списке
Supersumestria 05.10.2026
Я ему даю вот такое изображение и прошу найти и подчеркнуть немецкий язык.
Возвращает он вот это:
https:/ / i. **********/ vqBWLe2. png
Нужную строчку в 3й колонке просто выдумал. .
Это. . .
|
Новая последняя моя музыка в SUNO
zorxor 05.10.2026
Здравствуйте, дорогие мои друзья! С большой радостью я хотел бы представить вам свою новую последнею музыку, которую сгенерировала мне по моей просьбе нейросеть SUNO. С уважением, zorxor.
Это. . .
|
Программный домашний кинотеатр
russiannick 27.09.2026
Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js.
В помощники взял Яндекс-Алису.
Было создано три зала на разные интересы.
исторические и ретро
сериал Хичкок. . .
|
|
Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого
zorxor 21.09.2026
Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .
|
Мобильное приложение ColorStep
pavlinmavlin 17.09.2026
Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#.
Название изменил на ColorStep.
Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .
|
Запрет дублирования строк в табличной части
Maks 13.09.2026
Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами:
- ВидТО (СправочникСсылка. ВидыТО);
- ВидГСМ. . .
|
Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр.
Jin X 06.09.2026
Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр.
Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала.
Ниже прикреплён. . .
|