, вручную это зделать невозможно), а все мои попытки оканчивались зависанием приложения! Зарание спасибо!!!!
Полная версия: Как заполнить справочник?
"1C-PRO" - форум по 1C > Форумы по платформе "1С:Предприятие 8.x" > (8.х) Отчеты и обработки для платформы "1С:Предприятие 8.x"
Добрый день! Я переносил данные из 7.7 в 8.0 УПП, в справочнике номенклатуры отразилось только наименование и полное наименование, подскажите пожалуйста какую нибудь процедурку либо обработку с помощью которой я смог бы заполнить вид номенклатуры и базовую ед. хранения у всех позиций сразу (там 12 500 элементов , вручную это зделать невозможно), а все мои попытки оканчивались зависанием приложения! Зарание спасибо!!!!
, вручную это зделать невозможно), а все мои попытки оканчивались зависанием приложения! Зарание спасибо!!!!
структуру справочника покажи, или это стандартная упп? если да то кину обработку или код, как тебе удобнее?
Большое спасибо, что откликнулись на мою просьбу! Да, это стандартная УПП! Буду очень признателен за обработку!
какой вид и какую базовую ед ставить?
Вид - товар (СправочникСсылка.ВидыНоменклатуры) и Базовая еденица - шт. (СправочникСсылкаКласификаторЕдиницИзмерения).
попробуй, я не проверял...
Большое спасибо за обработку, но у меня справочник содержит и группы, а для групп реквизиты "Базовая ед. и вид" не доступны, и обработка отказывается работать, если не сложно могли бы вы подсказать что нужно дописать?
возьми в попытку исключение конецпопытки
Код
пока выборка.Следующий() цикл
попытка
об = выборка.ПолучитьОбъект();
об.БазоваяЕдиницаИзмерения = справочники.КлассификаторЕдиницИзмерения.НайтиПоНаименованию("шт");
об.ВидНоменклатуры = справочники.ВидыНоменклатуры.НайтиПоНаименованию("Товары");
об.Записать();
исключение
конецпопытки;
конеццикла;
попытка
об = выборка.ПолучитьОбъект();
об.БазоваяЕдиницаИзмерения = справочники.КлассификаторЕдиницИзмерения.НайтиПоНаименованию("шт");
об.ВидНоменклатуры = справочники.ВидыНоменклатуры.НайтиПоНаименованию("Товары");
об.Записать();
исключение
конецпопытки;
конеццикла;
Все получилось! Огромнейшее спасибо!
Подскажите, пожалуста, если не сложно, как сделать так что бы эта ж обработка заполняла каждую группу по отдельности. (Выбрал папку, нажал кнопку, заполнил).
Цитата(1010011010 @ 27.9.2006, 15:42) 
возьми в попытку исключение конецпопытки
Код
пока выборка.Следующий() цикл
попытка
об = выборка.ПолучитьОбъект();
об.БазоваяЕдиницаИзмерения = справочники.КлассификаторЕдиницИзмерения.НайтиПоНаименованию("шт");
об.ВидНоменклатуры = справочники.ВидыНоменклатуры.НайтиПоНаименованию("Товары");
об.Записать();
исключение
конецпопытки;
конеццикла;
попытка
об = выборка.ПолучитьОбъект();
об.БазоваяЕдиницаИзмерения = справочники.КлассификаторЕдиницИзмерения.НайтиПоНаименованию("шт");
об.ВидНоменклатуры = справочники.ВидыНоменклатуры.НайтиПоНаименованию("Товары");
об.Записать();
исключение
конецпопытки;
конеццикла;
Мдаааа... Если "профессионалы" предлагают такой код... Неудивительно что много недовольных клиентов...
это чтобы легче было человеку сделать... о правильности не кто не говорил
Цитата
Мдаааа... Если "профессионалы" предлагают такой код... Неудивительно что много недовольных клиентов...
+1
Цитата
это чтобы легче было человеку сделать... о правильности не кто не говорил
Ну и будет он везде потом, попытки вставлять...
ЭтоГруппа - очень сложно что ли? ИМХО даже проще...
Цитата
Подскажите, пожалуста, если не сложно, как сделать так что бы эта ж обработка заполняла каждую группу по отдельности. (Выбрал папку, нажал кнопку, заполнил).
Кидаешь на форму реквизит тип Спр. ссылка номеклатура
в обработке пишешь:
Код
Выборка = Справочники.Номенклатура.Выбрать(<Твой реквизит>);
для выбратьИерархически() также.
хы... умники нашлись... сначала помогите людям, а потом говорите....
а про потом будет вставлять... врятли... если он будет заниматься эской.. то будет изучать... и сам все поймет.
а так у него это была разовая операция..
лекарство от вредности: зачем в базе сиквела индексируются бинарные поля?
а про потом будет вставлять... врятли... если он будет заниматься эской.. то будет изучать... и сам все поймет.
а так у него это была разовая операция..
лекарство от вредности: зачем в базе сиквела индексируются бинарные поля?
Доброго дня, посоветуйте пожалуста, что делать, (я все с той же номенклатурой)! как заполнить поля с надписью еденица хранения для отчетов и еденица хранения для остатков с помощью какой нибудь оброботки? Дело в том что эти поля заполняются в том случае когда выбрана базовая еденица хранения и нажата кнопка "записать" или "ок" пользователем в самой форме. Заранее спасибо!
есть групповая обработка справочников и документов, посмотри у себя, не найдешь, кинь в личку, сделаю пост на форуме с ней позже
Цитата(1010011010 @ 23.10.2006, 8:27)
есть групповая обработка справочников и документов, посмотри у себя, не найдешь, кинь в личку, сделаю пост на форуме с ней позже
Как с помощью этой обработки заполнить поля с надписью еденица хранения для отчетов и еденица хранения для остатков? Не получается изменить реквизит еденица хранения для отчетов и еденица хранения для остатков.
Цитата(dryunya @ 17.11.2006, 12:26)
Как с помощью этой обработки заполнить поля с надписью еденица хранения для отчетов и еденица хранения для остатков? Не получается изменить реквизит еденица хранения для отчетов и еденица хранения для остатков.
Лови кусочек кода.
Код
НайденнаяСсылка = СпрНоменклатура.НайтиПоКоду(Код);
Если НайденнаяСсылка = СпрНоменклатура.ПустаяСсылка() Тогда
НовыйЭл = СпрНоменклатура.СоздатьЭлемент();
НовыйЭл.Родитель = НайденнаяГруппа.Ссылка;
НовыйЭл.Код = Код;
НовыйЭл.Артикул = Артикул;
НовыйЭл.Наименование = Наименование;
НовыйЭл.НаименованиеПолное = НаименованиеПолное;
НовыйЭл.ВалютаТов=Константы.ВалютаУправленческогоУчета.Получить();
НовыйЭл.НомерГТД = ГТД;
НовыйЭл.ВестиУчетПоСериям = Истина;
НовыйЭл.ВестиПартионныйУчетПоСериям = Истина;
НовыйЭл.БазоваяЕдиницаИзмерения = ПолучитьЗначениеПоУмолчанию(глТекущийПользователь, "ОсновнаяЕдиницаПоКлассификатору");
НовыйЭл.СтавкаНДС = ПолучитьЗначениеПоУмолчанию(глТекущийПользователь, "ОсновнаяСтавкаНДС");
НовыйЭл.ТипШтрихкода = ПланыВидовХарактеристик.ТипыШтрихкодов.EAN13;
НовыйЭл. Бренд=НайденныйБренд;
НовыйЭл. СтранаПроисхождения = СтранаПроисхождения;
НовыйЭл. НомБренд = НомБренд;
НовыйЭл. Аналог1 = Аналог1;
НовыйЭл. Аналог2 = Аналог2;
НовыйЭл. Аналог3 = Аналог3;
НовыйЭл. ТаможКод = ТаможКод;
НовыйЭл. ТаможКод1 = ТаможКод1;
НовыйЭл. ЦенаПост = ЦенаПост;
НовыйЭл. ЦенаБаза = ЦенаБаза;
НовыйЭл.Наценка = Наценка;
НовыйЭл.Вес = Вес;
НовыйЭл.Производитель = Производитель;
НовыйЭл.ШтукВЯчейке = ШтукВЯчейке;
НовыйЭл.РазмерЯчейки = РазмерЯчейки;
Если Хранение <> "CHAOTIC" Тогда
НовыйЭл.ДлительноеХранение = Истина;
НовыйЭл.Комментарий = Хранение;
КонецЕсли;
НовыйЭл.Записать();
ВыборкаЕдиниц = Справочники.ЕдиницыИзмерения.Выбрать(, НовыйЭл.Ссылка);
Если ВыборкаЕдиниц.Следующий() Тогда
НайденнаяЕдиница = ВыборкаЕдиниц.Ссылка;
Иначе
НайденнаяЕдиницаОбъект = Справочники.ЕдиницыИзмерения.СоздатьЭлемент();
НайденнаяЕдиницаОбъект.Наименование = НовыйЭл.БазоваяЕдиницаИзмерения.Наименование;
НайденнаяЕдиницаОбъект.ЕдиницаПоКлассификатору = НовыйЭл.БазоваяЕдиницаИзмерения;
НайденнаяЕдиницаОбъект.Коэффициент = 1;
НайденнаяЕдиницаОбъект.Вес = Вес;
НайденнаяЕдиницаОбъект.Владелец = НовыйЭл.Ссылка;
Попытка
НайденнаяЕдиницаОбъект.Записать();
Исключение
Сообщить("Не удалось записать единицу хранения остатков: " + ОписаниеОшибки(), СтатусСообщения.Важное);
Продолжить;
КонецПопытки;
НайденнаяЕдиница = НайденнаяЕдиницаОбъект.Ссылка;
КонецЕсли;
НовыйЭл.ЕдиницаХраненияОстатков = НайденнаяЕдиница;
НовыйЭл.ЕдиницаДляОтчетов = НовыйЭл.ЕдиницаХраненияОстатков;
НовыйЭл.Записать();
Сообщить("Загружен новый элемент №"+ТекСтрока+" : " + Наименование );
сорри за оффтоп
лекарство от вредности: зачем в базе сиквела индексируются бинарные поля?
для полнотекстового поиска?!
взято отсюда
Цитата(1010011010 @ 20.10.2006, 10:27)
лекарство от вредности: зачем в базе сиквела индексируются бинарные поля?
для полнотекстового поиска?!
Цитата
There is one other considerations for using Full-Text indexing on binary fields, such as word documents stored in a database. And that consideration is you must have a text field with the file extension (‘doc’ for word, for example). This is because the indexing needs to know what kind of file it is dealing with in order to parse the file and find the data. Out of the box, Sql Server can index text files, html files and Word documents. But it can be extended using IFilters.
взято отсюда
Добрый день!
Народ -помогите. Сис админ ушел- и все не раьотает. как убрать пароль сис. администратора?
Народ -помогите. Сис админ ушел- и все не раьотает. как убрать пароль сис. администратора?
Цитата(стрейч @ 20.12.2006, 15:42)
Добрый день!
Народ -помогите. Сис админ ушел- и все не раьотает. как убрать пароль сис. администратора?
Если есть доступ к конфигурации под твоим логином и паролем (или под чим нибудь другим), то тогда Пуск/Все программы/1с Предприятие/Конфигуратор/(Выбираешь Логин\ вводишь Пароль)/Попал в конфигуратор/Администрирование/Пользователи/(Ищешь запись админа, заходишь в нее)Удаляй пароль/После этого у админа не будет пароля....
Другой вариант позвонить бывшему админу и узнать у него пароль...
А по другому никак!!!
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.