0 / 0 / 0
Регистрация: 24.10.2019
Сообщений: 237

Заполнение табличной части документа

06.02.2021, 17:08. Показов 2900. Ответов 31
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Нужно сделать так что бы табличная часть услуг реквезит столбец записывался рандомными числами, у меня выдет ошибку(нужно что бы все услуги проходили через цикл и выдавался результат)
1C
1
2
3
4
5
6
7
8
9
10
11
&НаКлиенте
Процедура Отправить(Команда)
        ТекСтрока = Элементы.Услуги.ТекущиеДанные;
    Для каждого ТекСТрока из Элементы.Услуги Цикл
        Если ТекСтрока.Услуга = "TSH"  тогда
        ГСЧ = Новый ГенераторСлучайныхЧисел();
ТекСтрока.Результат  = ГСЧ.СлучайноеЧисло(0, 1000)   ;
КонецЕсли;
КонецЦикла;
 
КонецПроцедуры
Миниатюры
Заполнение табличной части документа  
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
06.02.2021, 17:08
Ответы с готовыми решениями:

Программное заполнение табличной части документа из табличной части справочника
Доброго! Ситуация, поставившая меня в тупик. Имеем 1с 8.2 УФ Имеем справочник "Работ" Имеем документ с табличной частью,...

Автоматическое заполнение табличной части документа из табличной части другого
Добрый день. Совсем недавно начал изучать 1С и пока не могу найти решения собственной задачи) Помогите с кодом. Есть документ...

Автоматическое заполнение табличной части документа при изменении реквизита этого документа
Здравствуйте. Делаю свою конфу на 1с 8.3.5. Добавил справочник "Сотрудники" и подчиненный ему справочник "КритерииОценки", где ...

31
Модератор
Эксперт 1С
 Аватар для Dethmontt
4032 / 2977 / 594
Регистрация: 10.03.2011
Сообщений: 11,701
Записей в блоге: 1
09.02.2021, 04:07
Студворк — интернет-сервис помощи студентам
Arakul777, простите конечно, но какой же ВЫ тугодум!
Цитата Сообщение от Arakul777 Посмотреть сообщение
&НаКлиенте
Процедура Отправить(Команда)
        ТекСтрока  = Элементы.Услуги.ТекущиеДанные;
    Для каждого ТекСтрока из Элементы.Услуги Цикл
        Если ТекСтрока.Услуга = Справочники.Услуги.НайтиПоНаименованию(" TSH")тогда
            ГСЧ = Новый ГенераторСлучайныхЧисел();
            ТекСтрока.Результат = ГСЧ.Случайноечисло(0,100);
        КонецЕсли;
        КонецЦикла;
КонецПроцедуры
Сделай вот так и не парь мозги больше форумчанам, детские ошибки не в состоянии исправить.
1C
1
2
3
4
5
6
7
8
9
10
11
&НаКлиенте
Процедура Отправить(Команда)
        ТекСтрока  = Элементы.Услуги.ТекущиеДанные;
    Для каждого ТекСтрока из Элементы.Услуги Цикл
        Если Строка(ТекСтрока.Услуга) = "TSH" тогда
            ГСЧ = Новый ГенераторСлучайныхЧисел();
            ТекСтрока.Результат = ГСЧ.Случайноечисло(0,100);
        КонецЕсли;
        КонецЦикла;
 
КонецПроцедуры

Не по теме:

А то боюсь еще придется объяснять как клиент-серверное приложение работает...

0
Модератор
Эксперт 1С
 Аватар для Yulunga
4774 / 969 / 270
Регистрация: 22.04.2013
Сообщений: 6,655
Записей в блоге: 1
09.02.2021, 07:00
Dethmontt, но своего-то добился? безо всяких непонятных гуглов
0
 Аватар для dggrom
198 / 158 / 45
Регистрация: 23.08.2014
Сообщений: 807
09.02.2021, 09:18
Dethmontt, мне кажется что его темы можно банить по причине дублей.
С этими услугами и одной и той же ошибкой уже тем 5-10 наверное.
0
0 / 0 / 0
Регистрация: 24.10.2019
Сообщений: 237
09.02.2021, 19:06  [ТС]
Ошибку выдает
Миниатюры
Заполнение табличной части документа  
0
Модератор
Эксперт 1С
 Аватар для Dethmontt
4032 / 2977 / 594
Регистрация: 10.03.2011
Сообщений: 11,701
Записей в блоге: 1
09.02.2021, 21:08
Цитата Сообщение от Dethmontt Посмотреть сообщение
Для каждого ТекСтрока из Элементы.Услуги Цикл
а если заменить на ?
1C
1
Для каждого ТекСтрока из Объект.Услуги Цикл
0
0 / 0 / 0
Регистрация: 24.10.2019
Сообщений: 237
09.02.2021, 21:14  [ТС]
Ошибка пропала но дело в том, что теперь поле результат не заполняется
0
Модератор
Эксперт 1С
 Аватар для Dethmontt
4032 / 2977 / 594
Регистрация: 10.03.2011
Сообщений: 11,701
Записей в блоге: 1
10.02.2021, 04:39
Цитата Сообщение от Arakul777 Посмотреть сообщение
Ошибка пропала но дело в том, что теперь поле результат не заполняется
Arakul777, 100% на тебе сглаз! Или порчу кто навел

Добавлено через 2 минуты
1C
1
2
3
4
5
6
7
8
9
10
11
12
&НаКлиенте
Процедура Отправить(Команда)
        ТекСтрока  = Элементы.Услуги.ТекущиеДанные;
    Для каждого ТекСтрока из Объект.Услуги Цикл
        Сообщить("Я сравниваю <"+Строка(ТекСтрока.Услуга)+"> с <TSH> вот что здесь может быть не так?");
        Если Строка(ТекСтрока.Услуга) = "TSH" тогда
            ГСЧ = Новый ГенераторСлучайныхЧисел();
            ТекСтрока.Результат = ГСЧ.Случайноечисло(0,100);
        КонецЕсли;
        КонецЦикла;
 
КонецПроцедуры
Добавлено через 1 минуту

Не по теме:

Yulunga, а представляешь сколько бы нам пришлось разбираться с НайтиПоНаименованию() когда он 2 строки сравнить не может?

0
Модератор
Эксперт 1С
 Аватар для Yulunga
4774 / 969 / 270
Регистрация: 22.04.2013
Сообщений: 6,655
Записей в блоге: 1
10.02.2021, 07:08
Dethmontt, ну да, я понимаю, что все мы с нетерпением ждём, когда умный булгахтер переименует услугу TSH в ТСШ или в ТэСэАш и всё перестанет работать и мы опять увидим 7 тем на форуме, что мы плохо подсказываем и никак не можем сказать правильно )))
0
0 / 0 / 0
Регистрация: 24.10.2019
Сообщений: 237
10.02.2021, 08:06  [ТС]
Я ни разу не сказал что вы плохо мне помогли, я благодарен за любую помощь
0
Модератор
Эксперт 1С
 Аватар для Yulunga
4774 / 969 / 270
Регистрация: 22.04.2013
Сообщений: 6,655
Записей в блоге: 1
10.02.2021, 10:18
Arakul777, просто очень (от слова глобально) туго идёт
ощущение, что ты не хочешь понимать и разбираться самому. а это - главное, что может быть. отсутствие знаний компенсируется желанием найти ответ
если тебе напишут - ты не запомнишь. это написано стотыщ раз. желательно самому
0
0 / 0 / 0
Регистрация: 24.10.2019
Сообщений: 237
10.02.2021, 15:12  [ТС]
Спасибо за предоставленную помощь, позже скажу срабрюотало ли все или нет

Добавлено через 4 часа 29 минут
Все работает, хотел бы выразить огромную благодарность, извините если потратил ваше нервы и время
0
Модератор
Эксперт 1С
 Аватар для Yulunga
4774 / 969 / 270
Регистрация: 22.04.2013
Сообщений: 6,655
Записей в блоге: 1
10.02.2021, 15:37
Arakul777, спрашивай.
так-то по работе больше нервов уходит )
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
10.02.2021, 15:37

Заполнение табличной части документа
Всем привет. Народ, помогите пожалуйста. Такой вопрос: создал документ, добавил туда табличную часть, добавил кнопку для заполнения...

1c 7.7 Заполнение табличной части документа
Здраствуйте, есть проблема с конфигурацией(Кредитной фирмы) по практическому заданию. Есть документ (Выдача) в котором должно быть...

Заполнение Табличной части документа
Здравствуйте! Заполняю табличную часть документа из справочника Номенклатура. Нужно, чтобы при выборе номенклатуры автоматически выбирались...

Заполнение справочника из табличной части документа
Всем привет! Имеется документ ПоступлениеКартриджей у него есть табличная часть Заправки. В табличной части есть реквизит...

Заполнение табличной части документа из запроса
Здравствуйте! Просмотрела много подобных тем, но все равно не получается (версия 8.3). У меня есть справочник &quot;Задачи&quot; из...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
32
Ответ Создать тему
Опции темы

Новые блоги и статьи
Программа опроса у.з. расходомера SLS-720F
Argus19 02.09.2026
Программа опроса у. з. расходомера SLS-720F Программа опрашивает один раз в минуту три ультразвуковых расходомера SLS-720F через интерфейс RS-485 по протоколу Modbus RTU. Опрашиваются регистры. . .
Hyper-V: Компьютер должен поддерживать доверенный платформенный модуль 2.0.
Maks 31.08.2026
При установке Windows 11 на виртуальную машину Hyper-V 2-го поколения вылезла такая ошибка: Решение: в параметрах виртуальной машины, в разделе "Безопасность" (Security) активировать флаг. . .
Архитектура биовида Стива в Майнкрафте: Зачем бонобо кубический каннибализм
anaschu 30.08.2026
Кубический Вагинокапитализм в Minecraft: Математический инвариант ОДУ и рок Стивов-бонобо Главная задача разработанной «Модели Всего» — наглядно продемонстрировать наличие системной «судьбы». . .
Оттачиваю умение писать js программы.
russiannick 30.08.2026
Проектом выходного дня стало написание Книги шифров Виженера. Итогом стала версия 200, синий туман. Синий туман назван так, потому что замораживает текст под собой. Нажатие синих кнопок управляют. . .
мат медиц модель 30. презентация проекта
anaschu 27.08.2026
хоп хоп хоп хидахоп, а я кладую))
Как у меня протекала болезнь
zorxor 27.08.2026
Здравствуйте, друзья! Эта запись блога предназначена именно для вас - для моих дорогих друзей, которые знали меня лично. Чтобы ответить на вопрос - а что же со мной произошло на самом деле? Я учился. . .
Нашел вот забавное видео о измерениях. Лучшее что я видел на эту тему
kumehtar 26.08.2026
ILETXiw9bMQ Основная суть и тезисы по измерениям: 0D (Нулевое измерение): точка, не имеющая длины, ширины, высоты или объема. Объект не может перемещаться в 0D. 1D (Первое измерение):. . .
[EasyBuilder Pro] Памятка по разработке для панелей Weintek
ФедосеевПавел 26.08.2026
Памятка по разработке для панелей Weintek ВВЕДЕНИЕ Ранее, при реализации проектов основное внимание уделял разработке управляющей программы для контроллера, а панели оператора доставалось время. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru