Форум программистов, компьютерный форум, киберфорум
1С: Собственные программы
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск  
 
 
Рейтинг 4.83/35: Рейтинг темы: голосов - 35, средняя оценка - 4.83
0 / 0 / 0
Регистрация: 21.05.2014
Сообщений: 81
1C 8.x

1С 8.1 Конфигурирование Как достать данные из Табличной части справочника?

21.05.2014, 14:25. Показов 7772. Ответов 73
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Доброго дня!!! Подскажите пожалуйста!!! У меня Существует справочник Преподаватели и в табличной части представлены предметы, по которым преподает препод их может быть несколько! Мне необходимо в Документ УстановлениеОценок в реквизите Предмет выбрать какой один предмет из этой табличной части. Возможно ли это сделать?
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
21.05.2014, 14:25
Ответы с готовыми решениями:

Данные из табличной части справочника
Добрый день, уважаемые форумчане! Очередной новичок, прошу не сердиться, а помочь! Требуется из табличной части справочника, рис 1,...

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

Как сделать ссылку реквизита табличной части справочника
Я недавний пользователь 1с. И я решил сделать на нём диплом (Библиотека). В процессе возник вопрос над которым мучаюсь второй день: Как...

73
0 / 0 / 0
Регистрация: 21.05.2014
Сообщений: 81
22.05.2014, 13:39  [ТС]
Студворк — интернет-сервис помощи студентам
[/1C][/1C] спасибо вам огромное. все работает. Я счастлива.
Самое плохое что это не все мои проблемы.
Есть документ Оплата обучения он вводится на основании документа Экзаменационный лист. Мне нужно чтобы Скидка устанавливалась автоматически. то есть если все 5 то она 15% , 5 и 4 10%, если тройки то скидки нет.

Извините меня, но с этим можете помочь?
0
Эксперт 1С
 Аватар для GreenkA
3066 / 2013 / 526
Регистрация: 25.06.2009
Сообщений: 6,964
22.05.2014, 13:45
ksyshechka, а при расчете скидок даты никак не влияют? Т.е. для документа Оплата обучения и установки скидки берутся данные по всем документам УстановлениеОценок?
0
0 / 0 / 0
Регистрация: 21.05.2014
Сообщений: 81
22.05.2014, 13:50  [ТС]
На оплату обучения влияют только оценки из Документа Экзаменационный лист. А с датой я не разбиралась. Смысл в том что в 1 семестре нету скидки так как студент только стал учиться, во 2 семестре скидка на основании сессии за 1 семестр.
0
Эксперт 1С
 Аватар для GreenkA
3066 / 2013 / 526
Регистрация: 25.06.2009
Сообщений: 6,964
22.05.2014, 13:55
ksyshechka, а почему бы не создать реквизит в документе Оплата обучения - Скидка и при обработке заполнения автоматически её рассчитывать и заполнять. Далее на форме документа Оплата обучения для поля Скидка убрать Доступность(нечего руками изменять) и заполнять из соответствующего(возможно скрытого) реквизита документа.
Просто в случае, если документ сохранят, а далее захотят ещё корректировать, не возникнет необходимости рассчитывать скидку заново. Плюс, если ввод не на основании Экз. листа, то Скидка автоматом = 0.
1
0 / 0 / 0
Регистрация: 21.05.2014
Сообщений: 81
22.05.2014, 14:02  [ТС]
я понимаю что это прописывается в обработке проведения. Данные из Экзаменационного листа хранятся в Регистре накопления Результаты сессии обороты. и тут у меня проблема именно с кодом как прописать получение скидки автоматически
0
Эксперт 1С
 Аватар для GreenkA
3066 / 2013 / 526
Регистрация: 25.06.2009
Сообщений: 6,964
22.05.2014, 14:09
ksyshechka, я про ОбработкуЗаполнения(вызывается при вводе на основании Экз. листа), а не про обработку проведения.
Про учет регистра: я у вас и спросила, что с датами? Регистр накопления у вас оборотный, можно было бы рассматривать обороты за период. Можно конечно отбирать и по регистратору... Но как-то... смысл тогда в регистре, если учитывается один документ, можно брать данные сразу из него.
0
0 / 0 / 0
Регистрация: 21.05.2014
Сообщений: 81
22.05.2014, 14:28  [ТС]
С датами темный лес. я не знаю как мне их учитывать.
0
Эксперт 1С
 Аватар для GreenkA
3066 / 2013 / 526
Регистрация: 25.06.2009
Сообщений: 6,964
22.05.2014, 14:42
Лучший ответ Сообщение было отмечено ksyshechka как решение

Решение

ладно, через основание.
1. Добавляем в док ОплатаОбучения реквизит Скидка(число), выносить на форму не обязательно.
2. Для документа ОплатаОбучения в модуле объекта пишем:
1C
1
2
3
4
5
6
7
8
9
10
Процедура ОбработкаЗаполнения(Основание)
... 
    Если Основание.ТабличнаяЧасть1.НайтиСтроки(Новый Структура("Оценка",3)).Количество() > 0 Тогда
        Скидка = 0;   
    ИначеЕсли Основание.ТабличнаяЧасть1.НайтиСтроки(Новый Структура("Оценка",4)).Количество() > 0 Тогда
        Скидка = 10;  
    ИначеЕсли Основание.ТабличнаяЧасть1.Количество() > 0 Тогда
        Скидка = 15;  
    КонецЕсли;
КонецПроцедуры
3. В форме этого же документа для поля Скидка убираем доступность. Для события редактирования ТЧ пишем:
1C
1
2
3
4
5
Процедура ТабличнаяЧасть1ПриНачалеРедактирования(Элемент, НоваяСтрока, Копирование)
    Если НоваяСтрока Тогда
        Элемент.ТекущиеДанные.Скидка = Скидка;
    КонецЕсли;
КонецПроцедуры
1
0 / 0 / 0
Регистрация: 21.05.2014
Сообщений: 81
22.05.2014, 15:00  [ТС]
[/1C][/1C] Спасибо, отладка прошла хорошо, но в Итого ничего нет.
Студент = Основание.Студент;
у меня основание не оценка
0
Эксперт 1С
 Аватар для GreenkA
3066 / 2013 / 526
Регистрация: 25.06.2009
Сообщений: 6,964
22.05.2014, 15:04
ksyshechka, а прописали ваш расчет где-нибудь??
1C
1
РаботаСоСкидкой.РассчитатьСкидку(СтрокаТабличнойЧасти);
1
0 / 0 / 0
Регистрация: 21.05.2014
Сообщений: 81
22.05.2014, 15:10  [ТС]
ТабличнаяЧасть1ПриНачалеРедактирования вот здесь прописала расчет скидки. но теперь ошибка что Итого поле не является значение объектного типа
0
Эксперт 1С
 Аватар для GreenkA
3066 / 2013 / 526
Регистрация: 25.06.2009
Сообщений: 6,964
22.05.2014, 15:11
ksyshechka, весь текст процедуры покажите
1
0 / 0 / 0
Регистрация: 21.05.2014
Сообщений: 81
22.05.2014, 15:19  [ТС]
1C
1
2
3
4
5
6
Процедура ТабличнаяЧасть1ПриНачалеРедактирования(Элемент, НоваяСтрока, Копирование)
    Если НоваяСтрока Тогда
        Элемент.ТекущиеДанные.Скидка = Скидка;
        РаботаСоСкидкой.РассчитатьСкидку(Скидка);
    КонецЕсли;
КонецПроцедуры
0
Модератор
Эксперт 1С
 Аватар для Dethmontt
4032 / 2977 / 594
Регистрация: 10.03.2011
Сообщений: 11,701
Записей в блоге: 1
22.05.2014, 16:11
1C
1
РаботаСоСкидкой.РассчитатьСкидку(Элемент.ТекущиеДанные);
0
0 / 0 / 0
Регистрация: 21.05.2014
Сообщений: 81
22.05.2014, 18:20  [ТС]
Все равно скидка не считается вот код в обработке
1C
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Процедура ОбработкаЗаполнения(Основание)
    //{{__КОНСТРУКТОР_ВВОД_НА_ОСНОВАНИИ
    // Данный фрагмент построен конструктором.
    // При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!
    Если ТипЗнч(Основание) = Тип("ПланВидовХарактеристикСсылка.СвойстваСтудентов") Тогда
        // Заполнение шапки
    ИначеЕсли ТипЗнч(Основание) = Тип("ДокументСсылка.ЭкзаменационныйЛист") Тогда
        // Заполнение шапки
        Студент = Основание.Студент;
        Если Основание.ТабличнаяЧасть1.НайтиСтроки(Новый Структура("Оценка",3)).Количество() > 0 Тогда
        Скидка = 0; 
    ИначеЕсли Основание.ТабличнаяЧасть1.НайтиСтроки(Новый Структура("Оценка",4)).Количество() > 0 Тогда
        Скидка = 10;    
    ИначеЕсли Основание.ТабличнаяЧасть1.Количество() > 0 Тогда
        Скидка = 15; 
    КонецЕсли; 
    КонецЕсли;
    //}}__КОНСТРУКТОР_ВВОД_НА_ОСНОВАНИИ
КонецПроцедуры
0
Эксперт 1С
 Аватар для GreenkA
3066 / 2013 / 526
Регистрация: 25.06.2009
Сообщений: 6,964
22.05.2014, 18:21
ksyshechka, конфу плиз
0
0 / 0 / 0
Регистрация: 21.05.2014
Сообщений: 81
22.05.2014, 18:26  [ТС]
База
Вложения
Тип файла: rar 1Cv8.rar (204.0 Кб, 3 просмотров)
0
Эксперт 1С
 Аватар для GreenkA
3066 / 2013 / 526
Регистрация: 25.06.2009
Сообщений: 6,964
22.05.2014, 18:31
ksyshechka, ну так вы расчет повесили на что? на поля, которые на итог никак не влияют(кроме Скидки). Но я ещё раз говорю, что нужно убрать возможность редактирования Скидки в ТЧ, и Итога тоже!
Единственное изменяемое значимое поле для расчета - КОплате. Поэтому
1C
1
2
3
4
Процедура ТабличнаяЧасть1КоплатеПриИзменении(Элемент)
СтрокаТабличнойЧасти = ЭлементыФормы.ТабличнаяЧасть1.ТекущиеДанные;
РаботаСоСкидкой.РассчитатьСкидку(СтрокаТабличнойЧасти);
КонецПроцедуры
1
0 / 0 / 0
Регистрация: 21.05.2014
Сообщений: 81
22.05.2014, 18:40  [ТС]
Все добавила при изменении к оплате, не получается . итого пусто поле. Может это потому что оценок по предметам много а не одна. ?
0
Эксперт 1С
 Аватар для GreenkA
3066 / 2013 / 526
Регистрация: 25.06.2009
Сообщений: 6,964
22.05.2014, 18:43
ksyshechka, а почему у меня получается?)
Вложения
Тип файла: rar 1Cv8.rar (118.2 Кб, 3 просмотров)
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
22.05.2014, 18:43

Как вывести поле из строки табличной части справочника в реквизит документа?
Есть справочник ФизЛица с таблчной частью образование и документ Учет с реквизитом-образование (не в табл части). нужно как-то проверить: ...

Как получить значение реквизита одного справочника и перенести их в реквизит табличной части другого
Добрый день, очень сильно нужна помощь.... Есть справочник "ВидыУслуг", реквизит "Тариф" Есть справочник...

Очистка табличной части справочника
Как производить очистку записей табл части раз в месяц? ТекущаяСтрока=Элементы.Штрафы.ТекущиеДанные; Если День(ТекущаяДата())=29...

Заполнение табличной части из справочника
Всем доброго времени суток! Я только начинаю работу на 1С 8.2. У меня такая проблема: существует заполненный данными справочник...

Запрос по табличной части справочника
Добрый день. Начинаю изучать 8ку поэтому прошу прощения за глупые вопросы. Есть справочник, а в нем табл. часть с последовательностью...


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

Или воспользуйтесь поиском по форуму:
40
Ответ Создать тему
Новые блоги и статьи
мат медиц модель 30. презентация проекта
anaschu 27.08.2026
хоп хоп хоп хидахоп, а я кладую))
Как у меня протекала болезнь
zorxor 27.08.2026
Здравствуйте, друзья! Эта запись блога предназначена именно для вас - для моих дорогих друзей, которые знали меня лично. Чтобы ответить на вопрос - а что же со мной произошло на самом деле? Я учился. . .
Нашел вот забавное видео о измерениях. Лучшее что я видел на эту тему
kumehtar 26.08.2026
ILETXiw9bMQ Основная суть и тезисы по измерениям: 0D (Нулевое измерение): точка, не имеющая длины, ширины, высоты или объема. Объект не может перемещаться в 0D. 1D (Первое измерение):. . .
[EasyBuilder Pro] Памятка по разработке для панелей Weintek
ФедосеевПавел 26.08.2026
Памятка по разработке для панелей Weintek ВВЕДЕНИЕ Ранее, при реализации проектов основное внимание уделял разработке управляющей программы для контроллера, а панели оператора доставалось время. . .
Модель по догадкам
anaschu 25.08.2026
Прошло две недели. Я уже рассказывал, как разговаривал с сотрудниками у сортировки и как понял, что главная ветка — не про приёмку, а про отбор. Но тогда я думал, что понял механику. На этой неделе я. . .
Запись в регистр сведений независимо от заполненности табличной части
Maks 25.08.2026
Реализация из решения ниже выполнена на нетиповом документе с несколькими табличными частями, разработанного в КА2. Задача: Обеспечить запись документа в регистр сведений независимо от. . .
Ноутбук Альфария
kumehtar 24.08.2026
Встретился тут в сети ноутбук Альфария, примарха Альфа-Легиона. Хотя возможно, это ноутбук Омегона, разумеется. Ну как вам?
Мастера простых решений
DevAlt 23.08.2026
В сишарп стэках winforms, да и wpf существует сложная система связывания источниках данных и элементов формы(текстовые поля и метки), опирается все это на технологию событий и мета. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru