Заказы на доработку 1С (сервис удаленной работы)

Хранилище

База знаний
Неназначенных незавершенных заказов: 2
Бесплатные отчеты, обработки, конфигурации, внешние компоненты для 1С Статьи, описание работы, методики по работе с 1С

Здравствуйте, гость ( Вход | Зарегистрироваться )



> Отображение элемента ''Кнопка'' на форме          
meyson Подменю пользователя
сообщение 29.05.13, 13:09
Сообщение #1

Молчаливый
*
Группа: Пользователи
Сообщений: 7
Спасибо сказали: 0 раз
Рейтинг: 0

Есть 1с 7.7
Получил просьбу сделать кнопку печать для документа договор.
Сделал.
Все хорошо печатает и тд.
А теперь бухгалтер хочет чтобы кнопка появляльсь на форме только когда выбран определенный тип договора
Подскажите очень надо.


 ! 

Правила: 4, 5
 


Сообщение отредактировал Vofka - 29.05.13, 13:22

Мичман Харитонов Подменю пользователя
сообщение 29.05.13, 13:12
Сообщение #2

Завсегдатай
****
Группа: Пользователи
Сообщений: 164
Из: м. Кам'янське
Спасибо сказали: 26 раз
Рейтинг: 0

Можно использовать свойства кнопки.
Форма.Кнопка.Видимость(), Форма.Кнопка.Доступность()

meyson Подменю пользователя
сообщение 29.05.13, 13:18
Сообщение #3

Молчаливый
*
Группа: Пользователи
Сообщений: 7
Спасибо сказали: 0 раз
Рейтинг: 0

Цитата(Мичман Харитонов @ 29.05.13, 13:12) *
Можно использовать свойства кнопки.
Форма.Кнопка.Видимость(), Форма.Кнопка.Доступность()

Тоесть я так понимаю что поумолчанию написать что оно невидимо
а если тип договора такой то то оно видимо

Мичман Харитонов Подменю пользователя
сообщение 29.05.13, 13:33
Сообщение #4

Завсегдатай
****
Группа: Пользователи
Сообщений: 164
Из: м. Кам'янське
Спасибо сказали: 26 раз
Рейтинг: 0

Ну да, в процедуре ПриОткрытии() можно прописать видимость-невидимость кнопки.
И то же самое должно отрабатывать при смене вида договора.

meyson Подменю пользователя
сообщение 29.05.13, 13:34
Сообщение #5

Молчаливый
*
Группа: Пользователи
Сообщений: 7
Спасибо сказали: 0 раз
Рейтинг: 0

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

mister-x Подменю пользователя
сообщение 29.05.13, 14:09
Сообщение #6

...
Иконка группы
Модератору Про1С (за заслуги в 2011 году)
Группа: Местный
Сообщений: 3477
Из: Тернопіль
Спасибо сказали: 1417 раз
Рейтинг: 0

краще повішати процедуру-функцію на реквізит "ВидДоговора", якщо це бух. для управління доступністю-видимістю

Сообщение отредактировал mister-x - 29.05.13, 14:12

meyson Подменю пользователя
сообщение 29.05.13, 16:26
Сообщение #7

Молчаливый
*
Группа: Пользователи
Сообщений: 7
Спасибо сказали: 0 раз
Рейтинг: 0

Пробовал вот так
Процедура ПриОткрытии()  
    
    глПроверкаДатыДок(Контекст,"Открытие");
    ПриЗаписиПерепроводить(1);
    Форма.кФирма.Доступность(глИспользуетсяРазделительУчета);
    Форма.кПравоваяПоддержка.Видимость(глВидимостьПравовойПоддержки);
    спВидДоговора = СоздатьОбъект("СписокЗначений");
    спВидДоговора.ДобавитьЗначение("Договір поставки");
    спВидДоговора.ДобавитьЗначение("Договір купівлі-продажу");
    спВидДоговора.ДобавитьЗначение("Договір купівлі-продажу Піонерський квартал");    
    спВидДоговора.ДобавитьЗначение("Договір комісії");
    спВидДоговора.ДобавитьЗначение("Договір оренди");
    спВидДоговора.ДобавитьЗначение("Договір бартерної поставки");
    спВидДоговора.ДобавитьЗначение("Договір консигнації");
    спВидДоговора.ДобавитьЗначение("Договір поруки");
    спВидДоговора.ДобавитьЗначение("Договір доручення");
    спВидДоговора.ДобавитьЗначение("Договір довірчого управління");
    спВидДоговора.ДобавитьЗначение("Договір відповідального зберігання");
    спВидДоговора.ДобавитьЗначение("Договір складського зберігання");
    спВидДоговора.ДобавитьЗначение("Договір про надання посередницьких послуг");
    спВидДоговора.ДобавитьЗначение("Договір про виконання роботи");
    спВидДоговора.ДобавитьЗначение("Договір про надання послуг");
    спВидДоговора.ДобавитьЗначение("Договір про інформаційно-довідкове обслуговування");
    спВидДоговора.ДобавитьЗначение("Договір поставки оптової партії");
    
    Если ВидДоговора="Договір купівлі-продажу Піонерський квартал" Тогда
         Форма.кПечать.Доступность(1);
    КонецЕсли;
    
        
КонецПроцедуры


но при выборе она доступной неделается

Сообщение отредактировал Vofka - 29.05.13, 16:26

Ardi Подменю пользователя
сообщение 29.05.13, 17:26
Сообщение #8

Живет на форуме
***********
Гений телепатии и социального моделирования
Группа: Пользователи
Сообщений: 4121
Из: Киев
Спасибо сказали: 957 раз
Рейтинг: 0

Цитата
Форма.кПечать.Видимость(1);


И ещё при переключении между слоями НеВидимость нужно устанавливать.

Сообщение отредактировал Ardi - 29.05.13, 17:27


Signature
Услуги 1С программиста 8.2, 7.7 (Плохо, дорого, очередь). Киев.

Домовик Подменю пользователя
сообщение 29.05.13, 18:21
Сообщение #9

Ветеран
Иконка группы
Группа: Местный
Сообщений: 975
Из: Киев
Спасибо сказали: 168 раз
Рейтинг: 0

нет приОткрытии() процедура не годится. так как в форме вы потом можете изменить значение видДоговора. В ней можно прописать доступность, но все равно еще в другом месте тоже нужно это же сделать.



нужно так как вам предложил МистерХ, или как в формах типовых конфигураций через текстовое поле на форме модуля, с формулой УстДоступность() и в этой функции прописывать.

Сообщение отредактировал Домовик - 29.05.13, 18:47

meyson Подменю пользователя
сообщение 29.05.13, 19:01
Сообщение #10

Молчаливый
*
Группа: Пользователи
Сообщений: 7
Спасибо сказали: 0 раз
Рейтинг: 0

может у кого-то есть пример
был бы очень благодарен

Домовик Подменю пользователя
сообщение 29.05.13, 19:16
Сообщение #11

Ветеран
Иконка группы
Группа: Местный
Сообщений: 975
Из: Киев
Спасибо сказали: 168 раз
Рейтинг: 0

в конфигурации Бух учет дла Укр кусок кода:

Функция УстДоступность()
    Форма.кПравоваяПоддержка.Видимость(глВидимостьПравовойПоддержки);
    Форма.УказанаОтгрузка.Доступность(0);
    Форма.кФирма.Доступность(глИспользуетсяРазделительУчета);
    Форма.СуммаО.Доступность(0);
    Форма.НДСО.Доступность(0);
    Если СчетУчета.Выбран() = 1 Тогда
        Если СчетУчета.Валютный = 1 Тогда
            Форма.ОперационнаяКР.Видимость(1);
        Иначе
            Форма.ОперационнаяКР.Видимость(0);
        КонецЕсли;
    Иначе
        Форма.ОперационнаяКР.Видимость(0);
    КонецЕсли;
    Если Счет.Выбран() = 1 Тогда
        Если Счет.КоличествоСубконто() = 0 Тогда
            Форма.Субконто.Доступность(0);
            Форма.Заказ.Доступность(0);
            Если (ПустоеЗначение(Заказ) = 0) или (ПустоеЗначение(Субконто) = 0) Тогда
                Заказ = 0; Субконто = 0;
            КонецЕсли;
        ИначеЕсли Счет.КоличествоСубконто() = 1 Тогда











найдите это поле формы в Банковской выписке.

Сообщение отредактировал Домовик - 29.05.13, 19:17

Спасибо сказали: meyson,

Мичман Харитонов Подменю пользователя
сообщение 30.05.13, 7:58
Сообщение #12

Завсегдатай
****
Группа: Пользователи
Сообщений: 164
Из: м. Кам'янське
Спасибо сказали: 26 раз
Рейтинг: 0

Цитата(Мичман Харитонов @ 29.05.13, 14:33) *
Ну да, в процедуре ПриОткрытии() можно прописать видимость-невидимость кнопки.
И то же самое должно отрабатывать при смене вида договора.

Что, все прочли только первую строчку?
А, ладно. Забейте.
44000000.gif

Спасибо сказали: Домовик,

meyson Подменю пользователя
сообщение 30.05.13, 9:04
Сообщение #13

Молчаливый
*
Группа: Пользователи
Сообщений: 7
Спасибо сказали: 0 раз
Рейтинг: 0

Скопировал в форму Договор поле формы УстДоступность() с формы Банковская выписка
в модуль формы добавил

и ничего
при выборе договора кнопка как ни была активна так и осталась


 ! 

Научитесь вставлять картинки, потому что в следующий раз удалю! И код приводить можно прямо в посте, а не на фотографиях
 


Сообщение отредактировал Vofka - 30.05.13, 9:15

Домовик Подменю пользователя
сообщение 30.05.13, 9:35
Сообщение #14

Ветеран
Иконка группы
Группа: Местный
Сообщений: 975
Из: Киев
Спасибо сказали: 168 раз
Рейтинг: 0

Цитата(Мичман Харитонов @ 30.05.13, 4:58) *
Что, все прочли только первую строчку?
А, ладно. Забейте.

все прочли. автору пытаемся объяснить.


Автор, пишем перед условием Сообщить(ВидДоговора); и смотрим в Предприятии, что покажет. Всередине условия - Сообщить("зашли в условие");

что вы присваиваете переменной ВидДоговора? Где?







volodya1122 Подменю пользователя
сообщение 30.05.13, 10:57
Сообщение #15

Оратор
Иконка группы
Группа: Местный
Сообщений: 336
Из: Тернопіль
Спасибо сказали: 133 раз
Рейтинг: 135.7

Цитата(meyson @ 29.05.13, 17:26) *
Если ВидДоговора="Договір купівлі-продажу Піонерський квартал" Тогда


Можливо я задаю тупе питання, але все ж:
1. У вас дійсно при виборі договору є вид договору "Договір купівлі-продажу Піонерський квартал" , або це два різні види договору?
2. Вид Договору у Вас це "строка" (тобто можна після вибору договору в цій графі дописати любі символи. Наприклад "Договір купівлі-продажу Піонерський квартал і ще мій текст");

Спробуйте такі варіанти:
 Если Строка(ВидДоговора)=....
Если СокрЛП(ВидДоговора)=....
Если СокрЛП(Строка(ВидДоговора))=...

Спасибо сказали: meyson,

meyson Подменю пользователя
сообщение 30.05.13, 14:16
Сообщение #16

Молчаливый
*
Группа: Пользователи
Сообщений: 7
Спасибо сказали: 0 раз
Рейтинг: 0

Цитата(volodya1122 @ 30.05.13, 10:57) *
Можливо я задаю тупе питання, але все ж:
1. У вас дійсно при виборі договору є вид договору "Договір купівлі-продажу Піонерський квартал" , або це два різні види договору?
2. Вид Договору у Вас це "строка" (тобто можна після вибору договору в цій графі дописати любі символи. Наприклад "Договір купівлі-продажу Піонерський квартал і ще мій текст");

Спробуйте такі варіанти:
 Если Строка(ВидДоговора)=....
Если СокрЛП(ВидДоговора)=....
Если СокрЛП(Строка(ВидДоговора))=...

Всем спасибо с меня icon_beer17.gif
решение
Функция УстДоступность() 
   Если СокрЛП(ВидДоговора)="Договір купівлі-продажу Піонерський квартал" Тогда
         Форма.кПечать.Доступность(1);  
   иначе        
              Форма.кПечать.Доступность(0);  
   КонецЕсли;  
КонецФункции



 ! 

Ну ознакомьтесь с правилами, в конце то концов! Выделяйте код!
 


Обещаю выполнять все правила!!!

Сообщение отредактировал Vofka - 30.05.13, 13:31

Sharzem Подменю пользователя
сообщение 30.05.13, 20:24
Сообщение #17

Оратор
Иконка группы
Группа: Местный
Сообщений: 298
Спасибо сказали: 98 раз
Рейтинг: 99.1

Цитата(meyson @ 29.05.13, 14:34) *
нашел птички в свойсвах кнопки, сделать невидимым и сделать недопустимым, поставил да в форме оно пропало а куда что дописать чтоб эти свойства менялись при выборе нужного мне договора


Цитата(meyson @ 29.05.13, 14:09) *


СнимиТЕ птичку в свойствах кнопки "сделать недоступным".
В функции УстДоступность() добавь, а точнее продолжи условие:
 Иначе Форма.кнПечать.Доступность(0)

и будет счастье.

Сообщение отредактировал Vofka - 30.05.13, 20:31


Signature
То, что для одного человека константа, для другого - переменная. (Алан.Дж.Перлис)

Не нашли ответа на свой вопрос?
Зарегистрируйтесь и задайте новый вопрос.


Ответить Новая тема
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 

RSS Текстовая версия Сейчас: 25.04.24, 12:23
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!