Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
18 мая 2024, 21:47

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

Автор mashencev_anton, 18 авг 2014, 09:36

0 Пользователей и 1 гость просматривают эту тему.

mashencev_anton

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

Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| ШтрихкодыДокументов.Документ
|ИЗ
| Справочник.ШтрихкодыДокументов КАК ШтрихкодыДокументов
|ГДЕ
| ШтрихкодыДокументов.Код = &Штрихкод" ;

Запрос.УстановитьПараметр("Штрихкод", готрез);

Результат = Запрос.Выполнить();

ВыборкаДетальныеЗаписи = Результат.Выбрать();

Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
Штрихкод=ВыборкаДетальныеЗаписи.Документ;
КонецЦикла;
   ОткрытьЗначение(Штрихкод);
Если ТипЗнч(Штрихкод)=Тип("ДокументСсылка.ГлобусРасчетЗаказаПокупателя") Тогда
штрихкод.ПриложениеПодписано=Истина;
КонецЕсли;
   
    КонецЕсли;
                 
КонецПроцедуры


В итоге пишет вот что
{ЖурналДокументов.ОбщийСписокДокументов.Форма.ФормаСписка.Форма(27)}: Поле объекта недоступно для записи (ПриложениеПодписано)
            штрихкод.ПриложениеПодписано=Истина;

TreeDogNight

В свойствах элемента формы не включено свойство "ТолькоПросмотр"?
Cегодня не все могут провести завтрашним числом. Вернее, не только лишь все - мало кто может это сделать.

mashencev_anton

Цитата: TreeDogNight от 18 авг 2014, 12:03
В свойствах элемента формы не включено свойство "ТолькоПросмотр"?
Исправился)))
Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
Штрихкод=ВыборкаДетальныеЗаписи.Документ;
    Если ТипЗнч(Штрихкод)=Тип("ДокументСсылка.ГлобусРасчетЗаказаПокупателя") Тогда
     ШТ=ВыборкаДетальныеЗаписи.документ.ПолучитьОбъект();
     ШТ.ПриложениеПодписано=Истина;
     ШТ.Записать(РежимЗаписиДокумента.Запись);
  КонецЕсли;   
КонецЦикла;
ОткрытьЗначение(Штрихкод);   

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск