Как прописать код?

[Евгений27]

Теперь когда открывается сама форма ,Юридические данные присутствуют, после того как нажмешь и отожмешь флажок данные юр.лицо убираются .Как сделать так, что когда нажимаешь кнопку создать контрагента были только данные физ.лицо,а если планирует покупать как юр.лицо, то нажал сам флажок и данные появились ?

Сам код прописан вот так

Код Выделить Развернуть

&НаКлиенте
Процедура ПриОткрытии(Отказ)
    Элементы.НаименованиеОрганизации.Видимость = Объект.ЮрИлиФиз;
    Элементы.ГенеральныйДиректор.Видимость = Объект.ЮрИлиФиз;
    Элементы.ЮридическийАдрес.Видимость = Объект.ЮрИлиФиз;
    Элементы.ФактическийАдрес.Видимость = Объект.ЮрИлиФиз;
    Элементы.КонтактныйТелефон.Видимость = Объект.ЮрИлиФиз;
    Элементы.ЭлектроннаяПочтаОрганизации.Видимость = Объект.ЮрИлиФиз;
    Элементы.ОКПО.Видимость = Объект.ЮрИлиФиз;
    Элементы.ИНН.Видимость = Объект.ЮрИлиФиз;
    Элементы.КПП.Видимость = Объект.ЮрИлиФиз;
    Элементы.ОГРН.Видимость = Объект.ЮрИлиФиз;
    Элементы.КСчет.Видимость = Объект.ЮрИлиФиз;
    Элементы.РСчет.Видимость = Объект.ЮрИлиФиз;
КонецПроцедуры
Процедура ЮрИлиФизПриИзменении(Элемент)
    Элементы.НаименованиеОрганизации.Видимость = Объект.ЮрИлиФиз;
    Элементы.ГенеральныйДиректор.Видимость = Объект.ЮрИлиФиз;
    Элементы.ЮридическийАдрес.Видимость = Объект.ЮрИлиФиз;
    Элементы.ФактическийАдрес.Видимость = Объект.ЮрИлиФиз;
    Элементы.КонтактныйТелефон.Видимость = Объект.ЮрИлиФиз;
    Элементы.ЭлектроннаяПочтаОрганизации.Видимость = Объект.ЮрИлиФиз;
    Элементы.ОКПО.Видимость = Объект.ЮрИлиФиз;
    Элементы.ИНН.Видимость = Объект.ЮрИлиФиз;
    Элементы.КПП.Видимость = Объект.ЮрИлиФиз;
    Элементы.ОГРН.Видимость = Объект.ЮрИлиФиз;
    Элементы.КСчет.Видимость = Объект.ЮрИлиФиз;
    Элементы.РСчет.Видимость = Объект.ЮрИлиФиз;
   КонецПроцедуры

[Besart]

а ЮрИлиФиз какой тип данных?

Добавлено: 12 июл 2013, 20:39

Код Выделить Развернуть


&НаКлиенте
Процедура ПриОткрытии(Отказ)
УправлениеВидимостью();
КонецПроцедуры

&НаКлиенте
Процедура ЮрИлиФизПриИзменении(Элемент)
УправлениеВидимостью();
КонецПроцедуры

&НаКлиенте
Процедура УправлениеВидимостью()
Если Объект.ЮрФизЛицо = ПредопределенноеЗначение("Перечисление.ЮрФизЛицо.ЮрЛицо") Тогда
Элементы.НаименованиеОрганизации.Видимость = Истина;
//и т.д.
ИначеЕсли Объект.ЮрФизЛицо = ПредопределенноеЗначение("Перечисление.ЮрФизЛицо.ФизЛицо") Тогда
Элементы.НаименованиеОрганизации.Видимость = Ложь;
//и т.д.
КонецЕсли;
КонецПроцедуры