Отправляет email-рассылки с помощью сервиса Sendsay

RFpro.ru: 1С для программиста

Подписаться Бесплатная «Золотая» новостная рассылка . Подписчиков 2.508 RSS
←   Июнь 2007   →
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30


За последние 60 дней ни разу не выходила


Открыта: 02-06-2005

Автор
Калашников О.А.

Статистика

2.508 подписчиков
0 за неделю
←   Все выпуски   →

RusFAQ.ru: 1С для программиста


РАССЫЛКИ ПОРТАЛА RUSFAQ.RU

/ КОМПЬЮТЕРЫ И ПО / Языки программирования / 1С для программиста

Выпуск № 527
от 21.06.2007, 15:05

Администратор:Калашников О.А.
В рассылке:Подписчиков: 405, Экспертов: 55
В номере:Вопросов: 1, Ответов: 4

Вопрос № 91609: 1С 7.7 Как мажно програмно перенисти элемент справочника с одной группы в группу Списаные Происходит это во время проведения документа ..

Вопрос № 91.609
1С 7.7
Как мажно програмно перенисти элемент справочника с одной группы в группу Списаные
Происходит это во время проведения документа

Приложение:

Отправлен: 16.06.2007, 12:02
Вопрос задал: Pycuk (статус: 1-ый класс)
Всего ответов: 4
Мини-форум вопроса >>> (сообщений: 2)
Отвечает: Андрей Тимофеев
Здравствуйте, Pycuk!
А дальше попробуйте добавить строку:
Спр.Записать();
Удачи.
Ответ отправил: Андрей Тимофеев (статус: 4-ый класс)
Ответ отправлен: 16.06.2007, 12:43
Отвечает: Шахрайчук Владимир Анатольевич
Здравствуйте, Pycuk!
Если Род.НайтиПоНаименованию("Списаные",0)=1 Тогда;
Спр.Родитель=Род.ТекущийЭлемент();
Спр.Записать()
Вот у Вас будет прикол, если есть 2 элемента с одинаковым наименованием.
Если Спр.НайтиЭлемент(Наименование) поможет Вам.
Ответ отправил: Шахрайчук Владимир Анатольевич (статус: Практикант)
Ответ отправлен: 16.06.2007, 13:10
Отвечает: Elric
Здравствуйте, Pycuk!

Весь Ваш код лучше заменить на тот, что у меня в Приложении.

А вообще, подумайте над орфографией. Иногда это играет неожиданную роль. Например, общеизвестно, что "Списанные" пишется с двумя "н". И все бы ничего, однако найдется ж пользователь который захочет "исправить ошибку" в названии группы справочника -- и все, программа не работает...

Приложение:

---------
Мирный атом в КАЖДЫЙ дом!

Ответ отправил: Elric (статус: Специалист)
Ответ отправлен: 16.06.2007, 23:06
Отвечает: Dmitry Stashenko
Здравствуйте, Pycuk!
Попробуй так:

Спр=СоздатьОбъект("Справочник.Картки");
Спр.ИспользоватьДату(ДатаДок,1);
Спр.НайтиПоНаименованию("Списаные");
Группа = Спр.ТекущийЭлемент();
ВыбратьСтроки();
Пока ПолучитьСтроку()=1 цикл
Спр.НайтиЭлемент(Наименование);
//я ж так понимаю, Наименование - реквизит документа Справочник.Картки
Спр.УстановитьАтрибут("Родитель", Группа);
Спр.Записать();
КонецЦикла;

Удачи
Ответ отправил: Dmitry Stashenko (статус: 5-ый класс)
Ответ отправлен: 18.06.2007, 10:39

Отправить вопрос экспертам этой рассылки

Приложение (если необходимо):

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

Обратите внимание!
Вопрос будет отправлен всем экспертам данной рассылки!
Для того, чтобы отправить вопрос выбранным экспертам этой рассылки или
экспертам другой рассылки портала RusFAQ.ru, зайдите непосредственно на RusFAQ.ru.


Форма НЕ работает в почтовых программах The BAT! и MS Outlook (кроме версии 2003+)!
Чтобы отправить вопрос, откройте это письмо в браузере или зайдите на сайт RusFAQ.ru.

© 2001-2007, Портал RusFAQ.ru, Россия, Москва.
Авторское право: ООО "Мастер-Эксперт Про"
Email: support@rusfaq.ru, тел.: +7 (926) 535-23-31
Хостинг: "Московский хостер"
Поддержка: "Московский дизайнер"
Авторские права | Реклама на портале
Версия системы: 4.52 от 02.05.2007 		Яндекс Rambler's Top100
RusFAQ.ru | MosHoster.ru | MosDesigner.ru | RusIRC.ru
Kalashnikoff.ru | RadioLeader.ru | RusFUCK.ru
В избранное