Показано с 1 по 10 из 1531
Комбинированный просмотр
-
28.12.2009, 14:46 #1
- Регистрация
- 21.12.2009
- Сообщений
- 3
- Сказал(а) спасибо
- 0
- Поблагодарили 0 раз(а) в 0 сообщениях
непрокатывает
//Заведем ИспЛисты
СпрКвартиросъемщики=Созда� �ьОбъект("Справочник.Кварти росъемщики");
СпрИспЛисты=СоздатьОбъект( "Справочник.ИспЛисты");
ЗагрИспЛисты.ВыбратьСтрок� �();
Пока ЗагрИспЛисты.ПолучитьСтро� �у()>0 Цикл
Если СпрКвартиросъемщики.Найти� �оКоду(СокрЛП(ЗагрИспЛисты. КодВладельца),1)>0 Тогда //1
ТекВладелец=СпрКвартиросъ� �мщики.ТекущийЭлемент();
КонецЕсли;
СпрИспЛисты.ИспользоватьВ� �адельца();
//СпрИспЛисты.ИспользоватьВ� �аделец(ТекВладелец);
Если СпрИспЛисты.НайтиПоНаимен� �ванию("ФИО",СокрЛП(ЗагрИспЛ исты.ФИО),0)=1 Тогда
Иначе
//СпрИспЛисты.ИспользоватьВ� �адельца(СпрКвартиросъемщи ки);
//СпрИспЛисты.ИспользоватьВ� �аделец(ТекВладелец);
СпрИспЛисты.Новый();
СпрИспЛисты.ФИО=СокрЛП(Заг� �ИспЛисты.ФИО);
СпрИспЛисты.НомИЛ=СокрЛП(З� �грИспЛисты.НомИЛ);
СпрИспЛисты.ДатаИЛ=СокрЛП(� �агрИспЛисты.ДатаИЛ);
СпрИспЛисты.ОснДолг=СокрЛП (ЗагрИспЛисты.ОснДолг);
СпрИспЛисты.Проц=СокрЛП(За� �рИспЛисты.Проц);
СпрИспЛисты.ОплРанее=СокрЛ П(ЗагрИспЛисты.ОплРанее);
СпрИспЛисты.Записать();
Сообщить("Создан "+СпрИспЛисты.Наименование+ " Владелец "+СпрИспЛисты.Владелец);
КонецЕсли;
КонецЦикла;
все ровно пишет ошибка СпрИспЛисты.Записать();
Не выбран элемент справочника-хозяина! Элемент не может быть записан!
Похожие темы
-
Сайтостроение - общие вопросы
от IMPERIAL в разделе В помощь вебмастеруОтветов: 27Последнее сообщение: 25.09.2019, 09:46 -
Ubuntu - общие вопросы
от IMPERIAL в разделе LINUXОтветов: 42Последнее сообщение: 15.03.2017, 16:25 -
Canon PowerShot S2 IS Общие вопросы и проблемы
от IMPERIAL в разделе Цифровое изображениеОтветов: 5Последнее сообщение: 17.11.2009, 10:12
Социальные закладки