Форум программистов, компьютерный форум, киберфорум
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
 
Рейтинг 4.92/13: Рейтинг темы: голосов - 13, средняя оценка - 4.92
 Аватар для Svetik_003
0 / 0 / 0
Регистрация: 18.05.2023
Сообщений: 34
1C 8.x

Как отразить на форме документа видимость Подразделения в ТЧ расшифровка?

18.05.2023, 09:44. Показов 3260. Ответов 58

Студворк — интернет-сервис помощи студентам
Ребята всем привет! говорю сразу, я не программист, только учусь)
Работаю аналитиком в компании.
У меня такой вопрос.
Как включить видимость подразделения в тч расшифровка как без разбиения так и списком?

Вот как делаю я:

1. затащила документ в расширение
2. в модуле формы написала процедуру

1C
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Процедура СТ_УстановитьВидимостьДоступностьЭлементовРасшифровкиБезРазбиения()
                Если Объект.РасшифровкаПлатежа.Количество() Тогда
 
        ПоказыватьПодразделение = (Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПрочаяВыдачаДенежныхСредств) 
            ИЛИ ((Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ВыдачаДенежныхСредствПодотчетнику) 
                    И НЕ ЗначениеЗаполнено(Объект.РасшифровкаПлатежа[0].СТ_Проект));
        Элементы.РасшифровкаБезРазбиенияПодразделение.Видимость = ПоказыватьПодразделение;
        Элементы.РасшифровкаПлатежаПодразделение.Видимость = ПоказыватьПодразделение;
        Если ПоказыватьПодразделение И Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ВыдачаДенежныхСредствПодотчетнику Тогда
            Элементы.РасшифровкаБезРазбиенияПодразделение.Заголовок = "Подразделение (косв.)";
               КонецЕсли;
 
 
КонецПроцедуры

3. в процедуре ПриОткрытии добавила код:

1C
1
2
3
4
5
6
7
8
&После("ПриОткрытии")
&НаКлиенте
Процедура СТ_ПриОткрытииПосле(Отказ)
 
    УстановитьВидимостьДоступностьЭлементовРасшифровкиБезРазбиения();  
        
 
КонецПроцедуры

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

Ребятки, помогите пожалуйста!
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
18.05.2023, 09:44
Ответы с готовыми решениями:

ЗУП 3.1. Тест Профессионал. Для изменения наименования подразделения, в печатной форме ранее введенного документа
Доброго дня!!! 1. Достаточно изменить наименование подразделения в справочнике и заново сформировать печатную форму 2. Необходимо...

Как отразить изменения в Форме - в Таблице?
Уважаемые коллеги, Помогите, пожалуйста справиться с задачей (Access 2007): Я сформировал в БД таблицу, сделал удобную форму, начал...

Как отразить на форме последнюю запись с другой формы
Добрый день! сразу скажу, что Акцесс на уровне чайника, языков не знаю. Есть форма Трудовой договор, где можно выбрать сотрудника из уже...

58
 Аватар для Svetik_003
0 / 0 / 0
Регистрация: 18.05.2023
Сообщений: 34
18.05.2023, 18:09  [ТС]
Студворк — интернет-сервис помощи студентам
Ну что Вы, это Вам огромное спасибо!
Я буду очень ждать Вас!
0
Эксперт 1С
5356 / 1710 / 624
Регистрация: 16.01.2015
Сообщений: 7,178
18.05.2023, 22:04
Svetik_003, Вернулся. Разобрался. Реквизит Подразделение в Расшифровке платежа входит в состав нужных реквизитов только при заявке с хоз операцией Прочие и Депозиты. В остальных случаях нет в нужных. Поэтому все ненужное очищается.
Обходим:
1. Удаляем все ПриИзменении поля Подразделение в РасшифровкеБезРазбиения.
2. В модуле менеджера документа ЗаявкаНаРасходованиеДенежныхСредств заимствуем процедуру ПолучитьМассивыРеквизитов После. Код
1C
1
2
3
4
5
6
7
&После("ПолучитьМассивыРеквизитов")
Процедура СТ_ПолучитьМассивыРеквизитов(ХозяйственнаяОперация, ПеречислениеВБюджет, МассивВсехРеквизитов, МассивРеквизитовОперации)
    Индекс = МассивРеквизитовОперации.Найти("РасшифровкаПлатежа.Подразделение"); //проверяем есть ли реквизит в массиве операций
Если Индекс = Неопределено Тогда // если нет добавляем
   МассивРеквизитовОперации.Добавить("РасшифровкаПлатежа.Подразделение");
КонецЕсли;
КонецПроцедуры
Все сохраняется
0
 Аватар для Svetik_003
0 / 0 / 0
Регистрация: 18.05.2023
Сообщений: 34
18.05.2023, 22:13  [ТС]
Настоящий мужчина! Сказал, вернусь и займусь этим, выполнил!
только у меня нет такой процедуры в модуле менеджера ПолучитьМассивыРеквизитов
0
Эксперт 1С
5356 / 1710 / 624
Регистрация: 16.01.2015
Сообщений: 7,178
18.05.2023, 22:16
Вот только меня берут сомнения правильно ли вы делаете. Не вникал, но судя по структуре документа Подразделение для которого резервируются деньги указывается на первой странице Основное в реквизите Путь: Объект.Подразделение
А то чем мы сейчас занимаемся (реквизит ТЧ Расш платежа.Подразделение) на форме озаглавлено как "Подразделение расходов". Возможно это одно и то же. Но тогда очень странно, городить огород с разным источиком одного и того же значения не в правилах 1С. Может это все же какое-то другое подразделение?. Если другое, то все что сейчас делаем яйца выеденного не стоит. Т.к. мы только показали на форме это подразделение и записали в ТЧ, но код который что-то делает учитывая это значение НЕ выполнился.
Еще раз. Я этого не знаю, просто предполагаю (все имхо) и задаю вам вопрос как пользователю. Ведь вы для чего-то делаете это назначение Подразделения расходов, значит преследуете какую-то цель

Добавлено через 1 минуту
Svetik_003, ))) А у меня нет комплексной, делал на УТ. Они очень похожи. Тогда ждите, сейчас найду и скачаю комплексную демо. Посмотрю где они эту проверку реквизитов запрятали
0
 Аватар для Svetik_003
0 / 0 / 0
Регистрация: 18.05.2023
Сообщений: 34
18.05.2023, 22:20  [ТС]
мне экономист сказала, что им нужно делить расходы по разным подразделениям.
Например есть Проект, и на него нужно раскидать расходы по разным подразделениям. Это им нужно для отчетов.

Добавлено через 2 минуты
они хотят это делать Списком...
Я тоже не понимаю, есть на закладке Основное - > Подразделение, а нет, говорит сейчас они каждый платеж делят по подразделения, а им нежно в одной платежке что бы можно было добавить разные подразделения и среди них разделить сумму расходов.

Добавлено через 59 секунд
Боже, какой мужчина! Я Вам очень благодарна!!!
0
Эксперт 1С
5356 / 1710 / 624
Регистрация: 16.01.2015
Сообщений: 7,178
18.05.2023, 22:22
Уверены что нет? Сейчас нашел в залежах своих баз Комплексную для Казахстана. Там есть такая процедура в модуле менеджера. Акцентирую МЕНЕДЖЕРА а не Объекта

Добавлено через 1 минуту
какая версия комплексной?
0
 Аватар для Svetik_003
0 / 0 / 0
Регистрация: 18.05.2023
Сообщений: 34
18.05.2023, 22:23  [ТС]
нету, я через поиск искала ...
Миниатюры
Как отразить на форме документа видимость Подразделения в ТЧ расшифровка?  
0
 Аватар для Svetik_003
0 / 0 / 0
Регистрация: 18.05.2023
Сообщений: 34
18.05.2023, 22:27  [ТС]
1С:Комплексная автоматизация 2 (2.5.11.86)

Добавлено через 3 минуты
я без дела не сижу, мне завтра нужно работу показать
Сижу читаю в интернете, статьи, форумы, но нет того, что могло бы помочь мне в решении этой проблемы. Один Вы у меня Ланселот ! Спасибо Вам!
0
Эксперт 1С
5356 / 1710 / 624
Регистрация: 16.01.2015
Сообщений: 7,178
18.05.2023, 22:38
Svetik_003, Достаточно дифирамбов ))). Просто сегодня день безделия. Заказы все сдал . Проверяют. А сидеть просто так скучно. Была бы нагрузка, фиг бы и я так занимался. А так просто интересно решить задачу ... на будущее может пригодиться. Качаю комплексную демо. Но 2.2ГГб, придется подождать

Добавлено через 3 минуты
А посмотрите модуль объекта ПередЗаписью. Есть там объявление массива МассивРеквизитовОперации?
0
 Аватар для Svetik_003
0 / 0 / 0
Регистрация: 18.05.2023
Сообщений: 34
18.05.2023, 22:39  [ТС]
Это не деферамбы, просто благодарность человеку, который не покидает в трудную минуту)
мне кажется, что сказать незнакомому человеку СПАСИБО не сложно, а когда человек погружается в твою проблему (как сейчас) это во истину дорогого стоит. Да и вообще, Вы молодец! Я очень благодарна Вам!
0
Эксперт 1С
5356 / 1710 / 624
Регистрация: 16.01.2015
Сообщений: 7,178
18.05.2023, 22:43
Процедура Заполнить массив реквизитов по хозяйственной операции - на вашем скрине. Похоже это то что нам надо Откройте ее. Дайте скрин кода где присутствует МассивРеквизитовОперации

Добавлено через 1 минуту
Цитата Сообщение от Svetik_003 Посмотреть сообщение
Я очень благодарна Вам!
Спасибо и не за что
0
 Аватар для Svetik_003
0 / 0 / 0
Регистрация: 18.05.2023
Сообщений: 34
18.05.2023, 22:43  [ТС]
Есть, я уже добавляла его Процедура ЗаполнитьИменаРеквизитовПоХозяйственнойО перации(Объект, МассивВсехРеквизитов, МассивРеквизитовОперации) Экспорт
в модель менеджера формы, поведение формы не изменилось

может быть в связке с другой процедурой он заработает.
Миниатюры
Как отразить на форме документа видимость Подразделения в ТЧ расшифровка?   Как отразить на форме документа видимость Подразделения в ТЧ расшифровка?  
0
Эксперт 1С
5356 / 1710 / 624
Регистрация: 16.01.2015
Сообщений: 7,178
18.05.2023, 22:51
Svetik_003, Точно. Это она. Заимствуем в расширение После и код
1C
1
2
3
4
    Индекс = МассивРеквизитовОперации.Найти("РасшифровкаПлатежа.Подразделение"); //проверяем есть ли реквизит в массиве операций
Если Индекс = Неопределено Тогда // если нет добавляем
   МассивРеквизитовОперации.Добавить("РасшифровкаПлатежа.Подразделение");
КонецЕсли;
Добавлено через 3 минуты
Тогда еще 40 мин закачки демо
0
 Аватар для Svetik_003
0 / 0 / 0
Регистрация: 18.05.2023
Сообщений: 34
18.05.2023, 22:59  [ТС]
тысячу моих извинений, что я Вас так озадачила
не совсем поняла Вас, заимствуем После, это Вы что имели ввиду?

Добавлено через 5 минут
исправила в модуле менеджера, все осталось по прежнему
0
Эксперт 1С
5356 / 1710 / 624
Регистрация: 16.01.2015
Сообщений: 7,178
18.05.2023, 23:03
Вот этот код должен быть в заимствованном модуле менеджера. В модуле менеджера правой кн мыши на этой процедуре и Добавить в расширение, на вопрос куда - После
1C
1
2
3
4
5
6
7
8
&После("ЗаполнитьИменаРеквизитовПоХозяйственнойОперации")
Процедура СТ_ЗаполнитьИменаРеквизитовПоХозяйственнойОперации(Объект, МассивВсехРеквизитов, МассивРеквизитовОперации) Экспорт
 
    Индекс = МассивРеквизитовОперации.Найти("РасшифровкаПлатежа.Подразделение"); //проверяем есть ли реквизит в массиве операций
Если Индекс = Неопределено Тогда // если нет добавляем
   МассивРеквизитовОперации.Добавить("РасшифровкаПлатежа.Подразделение");
КонецЕсли;
КонецПроцедуры
0
Эксперт 1С
5356 / 1710 / 624
Регистрация: 16.01.2015
Сообщений: 7,178
18.05.2023, 23:07
ТОгда ждем
Миниатюры
Как отразить на форме документа видимость Подразделения в ТЧ расшифровка?  
0
 Аватар для Svetik_003
0 / 0 / 0
Регистрация: 18.05.2023
Сообщений: 34
18.05.2023, 23:10  [ТС]
Вы мой герой!
0
 Аватар для Svetik_003
0 / 0 / 0
Регистрация: 18.05.2023
Сообщений: 34
18.05.2023, 23:20  [ТС]
ну и самый последний вопрос, я Вас замучала сегодня

почему, сумма по подразделению, 100 руб., я делю ка разные Подразделения, как того требует экономист, а в регистрах все равно отображается одно и тоже подразделение, которое указано на закладке общее?
Разве не должно делиться так же как указано в Списке, если я делю сумму поровну?
50 руб. на подразделение 1
50 руб. на подразделение 2

Буду очень благодарна за ответ!
Миниатюры
Как отразить на форме документа видимость Подразделения в ТЧ расшифровка?   Как отразить на форме документа видимость Подразделения в ТЧ расшифровка?   Как отразить на форме документа видимость Подразделения в ТЧ расшифровка?  

0
 Аватар для Svetik_003
0 / 0 / 0
Регистрация: 18.05.2023
Сообщений: 34
18.05.2023, 23:30  [ТС]
не вероятный Вы человек! Спасибо Вам огромное!
с большой буквы настоящий МУЖЧИНА!
0
Эксперт 1С
5356 / 1710 / 624
Регистрация: 16.01.2015
Сообщений: 7,178
18.05.2023, 23:58
Цитата Сообщение от Svetik_003 Посмотреть сообщение
а в регистрах все равно отображается одно и тоже подразделение, которое указано на закладке общее?
Вот об этом я и говорил в своем сообщении от 22.16 Даже все наладив, вы только выведете визуально Подразделение. Код распределения расходов не сработает. Вы ведь в таблице тоже принудительно сделали видимыми колонку Подразделение?

Добавлено через 12 минут
Svetik_003, Что-то не так сделали. У меня все сработало как надо
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
18.05.2023, 23:58
Помогаю со студенческими работами здесь

Видимость и не видимость кнопки на форме
Как, в Лазарус, сделать так, чтобы на форме кнопка сначала была не видна, а при наведении на то место, где должна быть кнопка она...

Как в форме СЗВ-6-3 за 2011 год отразить начисления по больничным листам?
Помогите плизз срочно нужно сдавать отчет! Ну тут возникает проблема... Не могу в форме СЗВ-6-3 за 2011 год отразить начисления по...

 При выборе подразделения, в табличной части автоматом должны заполняться текущие сотрудники выбранного подразделения,
При выборе подразделения, в табличной части автоматом должны заполняться текущие сотрудники выбранного подразделения, их должности, их...

Выполняет группировку по полю Тип подразделения таблице ПОДРАЗДЕЛЕНИЯ. Для каждой группы вычисляет минимальное и макс
8) Выполняет группировку по полю Тип подразделения таблице ПОДРАЗДЕЛЕНИЯ. Для каждой группы вычисляет минимальное и максимальное значения...

Отразить данные считанные из текстового документа на графике функции
Здравствуйте. Вообще не шарю :cry: Существует некая программа,которая выводит в консоль значения,записанные в текстовом документе. ...


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

Или воспользуйтесь поиском по форуму:
40
Ответ Создать тему
Новые блоги и статьи
Access
VikBal 11.12.2025
Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.
Новый ноутбук
volvo 07.12.2025
Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro
Музыка, написанная Искусственным Интеллектом
volvo 04.12.2025
Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .
От async/await к виртуальным потокам в Python
IndentationError 23.11.2025
Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .
Поиск "дружественных имён" СОМ портов
Argus19 22.11.2025
Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .
Сколько Государство потратило денег на меня, обеспечивая инсулином.
Programma_Boinc 20.11.2025
Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .
Ломающие изменения в C#.NStar Alpha
Etyuhibosecyu 20.11.2025
Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .
Мысли в слух
kumehtar 18.11.2025
Кстати, совсем недавно имел разговор на тему медитаций с людьми. И обнаружил, что они вообще не понимают что такое медитация и зачем она нужна. Самые базовые вещи. Для них это - когда просто люди. . .
Создание Single Page Application на фреймах
krapotkin 16.11.2025
Статья исключительно для начинающих. Подходы оригинальностью не блещут. В век Веб все очень привыкли к дизайну Single-Page-Application . Быстренько разберем подход "на фреймах". Мы делаем одну. . .
Фото: Daniel Greenwood
kumehtar 13.11.2025
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru