Новости для бухгалтера, бухучет, налогообложение, отчетность, ФСБУ, прослеживаемость и маркировка, 1С:Бухгалтерия

Вход или Регистрация

Показывать по 10 20 40 сообщений
Новая тема Ответить
Письмо в техподдержку 1С
[Прочее]

Переименование элемента справочника

pol-ak
читатель
офлайн
Дата регистрации: 03.06.2003
Сообщений: 109
Пост №1
 
07.05.2004 13:54

"Вроде бы все просто: нужно в справочнике Договора изменить название единственного договора "Основной договор" на другое. <br><br><br><br>Процедура Сформировать() <br><br>К=СоздатьОбъект("Справочник.Контрагенты");<br><br>Дог=СоздатьОбъект("Справочник.Договоры");<br><br>Если К.Выбрать("Выберите контрагента","""")>0 Тогда<br><br> Контр=К.ТекущийЭлемент();<br><br> Дог.ИспользоватьВладельца(Контр); <br><br> Если Дог.НайтиПоНаименованию("Основной договор")=1 Тогда<br><br> Дог.ТекущийЭлемент().Наименование="Акт приема-передачи № ";<br><br> Дог.Записать();<br><br> КонецЕсли;                         <br><br>КонецЕсли;<br><br>КонецПроцедуры<br><br><br><br>Не изменяет! Что не так делаю?<br><br>"

arsik000
читатель
офлайн
Дата регистрации: 07.05.2004
Сообщений: 2
Пост №2
 
07.05.2004 14:21

"А ищет ли процедура договор по наименованию? Потому что наименование-то не "Основной договор", а "Основной договор       " и сколько-то там пробелов...<br><br>Я обычно использую нечто типа <br><br>Дог.ИспользоватьВладельца(Контр); <br><br>Дог.ВыбратьЭлементы();<br><br>Пока Дог.ПолучитьЭлемент()=1 Цикл<br><br>Если СокрЛП(Дог.Наименование)="Основной договор" Тогда<br><br>Дог.Наименование="Акт приема-передачи № "; <br><br>Дог.Записать(); <br><br>Прервать;<br><br>КонецЕсли; <br><br>КонецЦикла;<br><br><br><br>Дольше немного, но зато наверняка!<br><br>"

pol-ak
читатель
офлайн
Дата регистрации: 03.06.2003
Сообщений: 109
Пост №3
 
07.05.2004 15:15

Отладчик показывает, что элемент найден

pol-ak
читатель
офлайн
Дата регистрации: 03.06.2003
Сообщений: 109
Пост №4
 
07.05.2004 15:27

"При таком способе выдает ошибку<br><br>Дог.Наименование="Акт приема-передачи № "; <br><br>{D:\1C77_NP\30_04_04\PR_SOUZ\EXTFORMS\ТЕСТ.ERT(23)}: Изменено Наименование! Может быть нарушена последовательность выборки"

mangelka
читатель
офлайн
Дата регистрации: 11.12.2003
Сообщений: 301
Пост №5
 
07.05.2004 21:49

"а если попробовать следующее:<br><br>Процедура Сформировать() <br><br>К=СоздатьОбъект("Справочник.Контрагенты"); <br><br>Дог=СоздатьОбъект("Справочник.Договоры"); <br><br>Дог1=СоздатьОбъект("Справочник.Договоры"); <br><br>Если К.Выбрать("Выберите контрагента","""")>0 Тогда <br><br>Контр=К.ТекущийЭлемент(); <br><br>Дог.ИспользоватьВладельца(Контр); <br><br>Если Дог.НайтиПоНаименованию("Основной договор")=1 Тогда <br><br>Дог1.НайтиЭлемент(Дог.ТекущийЭлемент());<br><br>Дог1.Наименование="Акт приема-передачи № "; <br><br>Дог1.Записать(); <br><br>КонецЕсли; <br><br>КонецЕсли; <br><br>КонецПроцедуры <br><br><br><br><br><br>"

pol-ak
читатель
офлайн
Дата регистрации: 03.06.2003
Сообщений: 109
Пост №6
 
11.05.2004 15:02

Спасибо, все получилось через Дог1.

Duh
читатель
офлайн
Дата регистрации: 16.05.2003
Сообщений: 40
Пост №7
 
12.05.2004 12:30

"Попробуй вместо "Дог.ТекущийЭлемент().Наименование="Акт приема-передачи № ";" написать "Дог.Наименование="Акт приема-передачи № ";" - такие случаи медецине известны :) помогает"

Показывать по 10 20 40 сообщений

Читают тему:

Быстрый переход
Для технических специалистов
  • Книга жалоб и предложений по работе сайта
  • Для технических специалистов
  • Представление регламентированной отчетности
  • Говорильня
  • Бухгалтерский учет: обсуждаем проекты нормативных актов и рекомендаций по ведению учета от БМЦ
  • Новый порядок применения ККТ (онлайн кассы с передачей сведений в ФНС)
  • Интернет-конференция: Оформление командировок по новым правилам
  • МАРКИРОВКА
  • ЕГАИС
  • Учет, налогообложение, автоматизация