Спасибо за розъяснение. Впредь постараюсь быть более внимательным.

По теме моего поста. Причина нашлась.
я указал неверный параметр в: "Тип Параметра команды: СправочникСсылка.ІсторіяЗміни", а необходимо было: "Тип Параметра команды:СправочникСсылка.ТМЦ"

Надеюсь кому-нибудь это пригодится....

Vofka @ Вчера, 16:20 ,
Vofka,
Добрый день. Как-то не очень у меня получается с темами. Вы уж простите. Приведите пример коррекного натисания. буду благодарен и в дальнейшем попробую не нарушать правила.

Дополнение к теме:
Создал команду:

&НаКлиенте
Процедура ОбработкаКоманды(ПараметрКоманды, ПараметрыВыполненияКоманды)
    відбір=Новый Структура("ТМЦ",ПараметрКоманды);
    параметри=Новый Структура("Отбор",відбір);
    ОткрытьФорму("Справочник.ІсторіяЗміни.Форма.ФормаСписка", параметри, ПараметрыВыполненияКоманды.Источник, ПараметрыВыполненияКоманды.Уникальность, ПараметрыВыполненияКоманды.Окно);
КонецПроцедуры

Пытаюсь прикрутить эту команду на панель навигации элемента справочника, ничего не получаэтся.
параметры команды:
1. Группа:Панель навигации формы.Перейти
2. Тип Параметра команды: СправочникСсылка.ІсторіяЗміни

В настройках панели навигации элемента справочника команда отсутствует.
Подскажите, может ошибся где-то?

Добрый день уважаемое сообщество.
Использую 1с83, самописная конфа.
Есть справочник с некоторыми реквизитами. необходимо в форме списка справочника показывать только те элементы, которые соотвецтвуют условию. Например: справочник "ТМЦ" имеет реквизит "Цвет" тип реквизита перечисление.синий. Необходимо при открытии формы списка этого справочника видеть только те "ТМЦ" у которых реквизит "Цвет" = "Синий".
Подскажите в какую сторону смотреть.

Товариство, дякую за допомогу.
Вийшов з ситуації таким чином.

кон=Формат(нач,"ЧГ=100");

Доброго часу, шановне товариство.
Користуюст 1с8,3 конфа самописна

Є такий код:

кодНовий=0;
    Пока Выборка.Следующий() Цикл
        кодНовий=кодНовий+1;
        сообщить(Прав((сокрЛП("0000"+кодНовий)),4)+" - "+стрЗаменить(кодНовий," ","")+"   кількість-"+стрДлина(Прав((сокрЛП("0000"+кодНовий)),4)));
    КонецЦикла;

В результаті дії цього коду отримую:
0001 - 1 кількість-4
0002 - 2 кількість-4
0003 - 3 кількість-4
0004 - 4 кількість-4
***
0997 - 997 кількість-4
0998 - 998 кількість-4
0999 - 999 кількість-4
 000 - 1 000 кількість-4
 001 - 1 001 кількість-4
***
 521 - 1 521 кількість-4
522 - 1 522 кількість-4
 523 - 1 523 кількість-4
 524 - 1 524 кількість-4
 525 - 1 525 кількість-4
 
Запитання: чому при значенні кодНовий>999 значення виразу Прав((сокрЛП("0000"+кодНовий)),4) перетворюється на 3 символи, хоче знячення виразу стрДлина(Прав((сокрЛП("0000"+кодНовий)),4))=4

Поясніть в чому тут помилка. Зачасно дякую за Ваші відповіді.

Благодарю. Действительно помогло.

Добрый день уважаемое сообщество.
Использую 1с (8.3.12.1440). Конфигурация самописная.
Был создан справочник. один из реквизитов этого справочника имеет такие свойства:
Тип: Строка
Длина:0
Допустимая длина: переменная
Неограниченная длина: True
Использование: Для элемента
Полнотекстовой поиск:Использовать
История данных: Использовать

В форме списка этого справочника, при попытке упорядочить элементы за этим реквизитом выпадает ошибка: "Нельзя упорядочить список по колонке "Адреса"! Выберете другую колонку для упорядочивания. "
Упорядочить по другим полям не составляет проблемы. Включая и по полям реквизитов с такими же свойствами.
Как решить эту проблему?
Буду благодарен за помощь.

Добрый день уважаемое сообщество.
1с8.2 самописная.
Как узнать MAC адрес компьютера, с которого заходил пользователь? А также записать этот МАК в справочник.

Огромное спасибо.Все получилось как надо.

Очищаю в каждом Если..КонецЕсли отбора для того чтоб отбор работал не один раз.Если не очищать то при наложении еще раз отбора он не срабатывает.

Vofka @ Вчера, 21:08 ,
Vofka @ Вчера, 21:08 ,
Помещаю отбор в Если...КонецЕсли

Процедура Відбір()
Если ЗначениеЗаполнено(ВідбірМодель) Тогда
ТекЭлементОтбора = Список.Отбор.Элементы;
ТекЭлементОтбора.Очистить();

ЭлементОтбора = Список.Отбор.Элементы.Добавить(Тип("ЭлементОтбораКомпоновкиДанных"));
ЭлементОтбора.РежимОтображения =  РежимОтображенияЭлементаНастройкиКомпоновкиДанных.Недоступный;
ЭлементОтбора.ЛевоеЗначение = Новый ПолеКомпоновкиДанных("МодельТранспортногоЗасобу");
ЭлементОтбора.ВидСравнения = ВидСравненияКомпоновкиДанных.Равно;
ЭлементОтбора.ПравоеЗначение = ВідбірМодель;
ЭлементОтбора.Использование = Истина;
КонецЕсли;
Если  ЗначениеЗаполнено(ВідбірПідрозділ) Тогда
ТекЭлементОтбора = Список.Отбор.Элементы;
ТекЭлементОтбора.Очистить();

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

ЭлементОтбора = Список.Отбор.Элементы.Добавить(Тип("ЭлементОтбораКомпоновкиДанных"));
ЭлементОтбора.РежимОтображения =  РежимОтображенияЭлементаНастройкиКомпоновкиДанных.Недоступный;
ЭлементОтбора.ЛевоеЗначение = Новый ПолеКомпоновкиДанных("СпосібНадходження");
ЭлементОтбора.ВидСравнения = ВидСравненияКомпоновкиДанных.Равно;
ЭлементОтбора.ПравоеЗначение = ВідбірНадходження;
ЭлементОтбора.Использование = Истина;
КонецЕсли;

Но при выборе следующего отбора первый отбор не работает

1С:Підприємство 8.3 (8.3.12.1440)

Добрый день уважаемое сообщество. Нужна помощь.Конфигурация самописная.
Делаю Отбор на форме списка.По трём реквизитам. При отборе срабатывает только 1 раз. Второй отбор уже не срабатывает.

Код

&НаСервере
Процедура ВстановитиВідбірМодель()
    Если ЗначениеЗаполнено(ВідбірМодель) Тогда
//ТекЭлементОтбора = Список.Отбор.Элементы;
//ТекЭлементОтбора.Очистить();

ЭлементОтбора = Список.Отбор.Элементы.Добавить(Тип("ЭлементОтбораКомпоновкиДанных"));
ЭлементОтбора.РежимОтображения =  РежимОтображенияЭлементаНастройкиКомпоновкиДанных.Недоступный;
ЭлементОтбора.ЛевоеЗначение = Новый ПолеКомпоновкиДанных("МодельТранспортногоЗасобу");
ЭлементОтбора.ВидСравнения = ВидСравненияКомпоновкиДанных.Равно;
ЭлементОтбора.ПравоеЗначение = ВідбірМодель;
ЭлементОтбора.Использование = Истина;

ИначеЕсли ЗначениеЗаполнено(ВідбірПідрозділ) Тогда
//ТекЭлементОтбора = Список.Отбор.Элементы;
//ТекЭлементОтбора.Очистить();

ЭлементОтбора = Список.Отбор.Элементы.Добавить(Тип("ЭлементОтбораКомпоновкиДанных"));
ЭлементОтбора.РежимОтображения =  РежимОтображенияЭлементаНастройкиКомпоновкиДанных.Недоступный;
ЭлементОтбора.ЛевоеЗначение = Новый ПолеКомпоновкиДанных("Підрозділ");
ЭлементОтбора.ВидСравнения = ВидСравненияКомпоновкиДанных.Равно;
ЭлементОтбора.ПравоеЗначение = ВідбірПідрозділ;
ЭлементОтбора.Использование = Истина;


ИначеЕсли ЗначениеЗаполнено(ВідбірНадходження) Тогда
//ТекЭлементОтбора = Список.Отбор.Элементы;
//ТекЭлементОтбора.Очистить();

ЭлементОтбора = Список.Отбор.Элементы.Добавить(Тип("ЭлементОтбораКомпоновкиДанных"));
ЭлементОтбора.РежимОтображения =  РежимОтображенияЭлементаНастройкиКомпоновкиДанных.Недоступный;
ЭлементОтбора.ЛевоеЗначение = Новый ПолеКомпоновкиДанных("СпосібНадходження");
ЭлементОтбора.ВидСравнения = ВидСравненияКомпоновкиДанных.Равно;
ЭлементОтбора.ПравоеЗначение = ВідбірНадходження;
ЭлементОтбора.Использование = Истина;

Иначе 
ТекЭлементОтбора = Список.Отбор.Элементы;
ТекЭлементОтбора.Очистить();
КонецЕсли;
КонецПроцедуры

Так же делаю и по другому реквизиту :

&НаСервере
Процедура ВстановитиВідбірНадходження()
    Если ЗначениеЗаполнено(ВідбірНадходження) Тогда
ТекЭлементОтбора = Список.Отбор.Элементы;
ТекЭлементОтбора.Очистить();

ЭлементОтбора = Список.Отбор.Элементы.Добавить(Тип("ЭлементОтбораКомпоновкиДанных"));
ЭлементОтбора.РежимОтображения =  РежимОтображенияЭлементаНастройкиКомпоновкиДанных.Недоступный;
ЭлементОтбора.ЛевоеЗначение = Новый ПолеКомпоновкиДанных("СпосібНадходження");
ЭлементОтбора.ВидСравнения = ВидСравненияКомпоновкиДанных.Равно;
ЭлементОтбора.ПравоеЗначение = ВідбірНадходження;
ЭлементОтбора.Использование = Истина;
ИначеЕсли ЗначениеЗаполнено(ВідбірМодель) Тогда
//ТекЭлементОтбора = Список.Отбор.Элементы;
//ТекЭлементОтбора.Очистить();

ЭлементОтбора = Список.Отбор.Элементы.Добавить(Тип("ЭлементОтбораКомпоновкиДанных"));
ЭлементОтбора.РежимОтображения =  РежимОтображенияЭлементаНастройкиКомпоновкиДанных.Недоступный;
ЭлементОтбора.ЛевоеЗначение = Новый ПолеКомпоновкиДанных("МодельТранспортногоЗасобу");
ЭлементОтбора.ВидСравнения = ВидСравненияКомпоновкиДанных.Равно;
ЭлементОтбора.ПравоеЗначение = ВідбірМодель;
ЭлементОтбора.Использование = Истина;
ИначеЕсли ЗначениеЗаполнено(ВідбірПідрозділ) Тогда
//ТекЭлементОтбора = Список.Отбор.Элементы;
//ТекЭлементОтбора.Очистить();

ЭлементОтбора = Список.Отбор.Элементы.Добавить(Тип("ЭлементОтбораКомпоновкиДанных"));
ЭлементОтбора.РежимОтображения =  РежимОтображенияЭлементаНастройкиКомпоновкиДанных.Недоступный;
ЭлементОтбора.ЛевоеЗначение = Новый ПолеКомпоновкиДанных("Підрозділ");
ЭлементОтбора.ВидСравнения = ВидСравненияКомпоновкиДанных.Равно;
ЭлементОтбора.ПравоеЗначение = ВідбірПідрозділ;
Иначе
ТекЭлементОтбора = Список.Отбор.Элементы;
ТекЭлементОтбора.Очистить();
КонецЕсли;
КонецПроцедуры

1С:Підприємство 8.3 (8.3.12.1440)

Добрый день уважаемое сообщество. Нужна помощь.Конфигурация самописная.
Делаю Отбор на форме списка.По трём реквизитам. При отборе срабатывает только 1 раз. Второй отбор уже не срабатывает.

Код

&НаСервере
Процедура ВстановитиВідбірМодель()
    Если ЗначениеЗаполнено(ВідбірМодель) Тогда
//ТекЭлементОтбора = Список.Отбор.Элементы;
//ТекЭлементОтбора.Очистить();

ЭлементОтбора = Список.Отбор.Элементы.Добавить(Тип("ЭлементОтбораКомпоновкиДанных"));
ЭлементОтбора.РежимОтображения =  РежимОтображенияЭлементаНастройкиКомпоновкиДанных.Недоступный;
ЭлементОтбора.ЛевоеЗначение = Новый ПолеКомпоновкиДанных("МодельТранспортногоЗасобу");
ЭлементОтбора.ВидСравнения = ВидСравненияКомпоновкиДанных.Равно;
ЭлементОтбора.ПравоеЗначение = ВідбірМодель;
ЭлементОтбора.Использование = Истина;

ИначеЕсли ЗначениеЗаполнено(ВідбірПідрозділ) Тогда
//ТекЭлементОтбора = Список.Отбор.Элементы;
//ТекЭлементОтбора.Очистить();

ЭлементОтбора = Список.Отбор.Элементы.Добавить(Тип("ЭлементОтбораКомпоновкиДанных"));
ЭлементОтбора.РежимОтображения =  РежимОтображенияЭлементаНастройкиКомпоновкиДанных.Недоступный;
ЭлементОтбора.ЛевоеЗначение = Новый ПолеКомпоновкиДанных("Підрозділ");
ЭлементОтбора.ВидСравнения = ВидСравненияКомпоновкиДанных.Равно;
ЭлементОтбора.ПравоеЗначение = ВідбірПідрозділ;
ЭлементОтбора.Использование = Истина;


ИначеЕсли ЗначениеЗаполнено(ВідбірНадходження) Тогда
//ТекЭлементОтбора = Список.Отбор.Элементы;
//ТекЭлементОтбора.Очистить();

ЭлементОтбора = Список.Отбор.Элементы.Добавить(Тип("ЭлементОтбораКомпоновкиДанных"));
ЭлементОтбора.РежимОтображения =  РежимОтображенияЭлементаНастройкиКомпоновкиДанных.Недоступный;
ЭлементОтбора.ЛевоеЗначение = Новый ПолеКомпоновкиДанных("СпосібНадходження");
ЭлементОтбора.ВидСравнения = ВидСравненияКомпоновкиДанных.Равно;
ЭлементОтбора.ПравоеЗначение = ВідбірНадходження;
ЭлементОтбора.Использование = Истина;

Иначе 
ТекЭлементОтбора = Список.Отбор.Элементы;
ТекЭлементОтбора.Очистить();
КонецЕсли;
КонецПроцедуры

Так же делаю и по другому реквизиту :

&НаСервере
Процедура ВстановитиВідбірНадходження()
    Если ЗначениеЗаполнено(ВідбірНадходження) Тогда
ТекЭлементОтбора = Список.Отбор.Элементы;
ТекЭлементОтбора.Очистить();

ЭлементОтбора = Список.Отбор.Элементы.Добавить(Тип("ЭлементОтбораКомпоновкиДанных"));
ЭлементОтбора.РежимОтображения =  РежимОтображенияЭлементаНастройкиКомпоновкиДанных.Недоступный;
ЭлементОтбора.ЛевоеЗначение = Новый ПолеКомпоновкиДанных("СпосібНадходження");
ЭлементОтбора.ВидСравнения = ВидСравненияКомпоновкиДанных.Равно;
ЭлементОтбора.ПравоеЗначение = ВідбірНадходження;
ЭлементОтбора.Использование = Истина;
ИначеЕсли ЗначениеЗаполнено(ВідбірМодель) Тогда
//ТекЭлементОтбора = Список.Отбор.Элементы;
//ТекЭлементОтбора.Очистить();

ЭлементОтбора = Список.Отбор.Элементы.Добавить(Тип("ЭлементОтбораКомпоновкиДанных"));
ЭлементОтбора.РежимОтображения =  РежимОтображенияЭлементаНастройкиКомпоновкиДанных.Недоступный;
ЭлементОтбора.ЛевоеЗначение = Новый ПолеКомпоновкиДанных("МодельТранспортногоЗасобу");
ЭлементОтбора.ВидСравнения = ВидСравненияКомпоновкиДанных.Равно;
ЭлементОтбора.ПравоеЗначение = ВідбірМодель;
ЭлементОтбора.Использование = Истина;
ИначеЕсли ЗначениеЗаполнено(ВідбірПідрозділ) Тогда
//ТекЭлементОтбора = Список.Отбор.Элементы;
//ТекЭлементОтбора.Очистить();

ЭлементОтбора = Список.Отбор.Элементы.Добавить(Тип("ЭлементОтбораКомпоновкиДанных"));
ЭлементОтбора.РежимОтображения =  РежимОтображенияЭлементаНастройкиКомпоновкиДанных.Недоступный;
ЭлементОтбора.ЛевоеЗначение = Новый ПолеКомпоновкиДанных("Підрозділ");
ЭлементОтбора.ВидСравнения = ВидСравненияКомпоновкиДанных.Равно;
ЭлементОтбора.ПравоеЗначение = ВідбірПідрозділ;
Иначе
ТекЭлементОтбора = Список.Отбор.Элементы;
ТекЭлементОтбора.Очистить();
КонецЕсли;
КонецПроцедуры

К сожалению при попытке пометить на удаление, реакции никакой. эту процедуру при удалении 1с-ка не замечает.

sava1 @ Сегодня, 11:10 ,
Суть в том что, роли раздаются направо и налево, а вот некоторые объекты должны быть стабильно не изменяемые.
А вот на счет "ректально" пожалуйста поподробнее...

Есть продолжение данной темы.
Как запретить програмно обычное и интерактисное удаление справочников и документов?

Вышел с ситуации так:

в модуле документа прописал:

Процедура ОбработкаУдаленияПроведения(Отказ)
    Сообщить("Відміна проведення ЗАБОРОНЕНА! Зверніться до Адміністратора!");
    Отказ = Истина;
КонецПроцедуры

Если кому интересно, дальше можно ставить любое условие.

1с8.3 Самописная. Клиент-сервер.
Добрый день, Уважаемое сообщество.
Столкнулся с вопросом. Как запретить пользователю отменять проводку (програмно), не используя роли?

ed.kharkov @ Сегодня, 11:33 ,
Велике дякую! Все працює.

1С:Підприємство 8.3 (8.3.12.1440)
Доброго дня шановне товариство !
Конфігурація самописна . У мене є два документи.В документах роблю реквізит "Документ"- ДокументСсилка. І моя головна задача при вводі на підставі другого документа в реквізиті "Документ" щоб підтягувалось документ який "виступає підставою для", тобто в документі1 ми додаємо на підставі документ2 і в реквізиті "документ" в документі 2 нам підтягується що це Документ1 000000001 від дати.
Робив так в документі2 який вводиться на підставі :

Процедура ОбработкаЗаполнения(ДанныеЗаполнения, ТекстЗаполнения, СтандартнаяОбработка)
        Если ТипЗнч(ДанныеЗаполнения) = Тип("ДокументСсылка.ВведенняВиведенняТранспортногоЗасобуНаПідприємство") Тогда
      Документ = ДанныеЗаполнения.Документ.Ссылка;    
      ТранспортнийЗасіб = ДанныеЗаполнения.ТранспортнийЗасіб;
         КонецЕсли;
КонецПроцедуры

+ В цьому документі2 реквізит "Документ "-Заповнювати з даних заповнення.
А далі в документі1 прописав:

Процедура ПослеЗаписи(ПараметрыЗаписи)
    Объект.Документ =  Объект.Ссылка;
КонецПроцедуры

Результат :Коли створюю в документ1 та заповнюю рекізити пишу "записати" 2 рази і тоді при вводі на підставі документ2 все працює .Якщо один раз записати то нічого не передається в форму документа2 при виклику на підставі документ2 реквізит "Документ" пустий.
Дуже прошу Вашої допомоги!

Я окончательно, и надеюсь, не бесповоротно запутался...
Расскажу о задаче с самого начала...

Есть документ: с реквизитом товар и реквизитами в табличной части комментарий и фото.
Этих фото, может быть любое количество.
Привязка этих фото должна идти к созданному документу(этому самому) так как через день будет создан еще один документ
уже с новыми фото(актуальными). Но через какое-то время, будет необходимо просмотреть все старые документы.
По-скольку, я только начинаю учить 1с83 мне многое не понятно.(до этого писал на 1с77)
Пожалуйста, помогите нубу. Желательно сначала.

У спільноти ще є пропозиції?

Prospero @ Вчера, 16:58 ,
Доброгодня.
Ви корректно зрозуміли мою ззадачу. А ось як її реалізувати?
Буду надзвичайно вдячний Вам за допомогу.

Prospero @ Сегодня, 0:38 ,
В принцыпе нет, если их потом можно розвернуть в большие.

А можно по подробнее...
Я только учусь сисать на 8 версии.

Є такий скрін:

В полі №1 необхідно бачити фотографію, яку ми загружаємо з диску.