Имя: Пароль:
1C
1С v8
Управление торговлей 10.3
, ,
0 Erhov_egor
 
23.04.12
06:04
Есть ли у кого нибудь загрузчик из Эксель, в общем загружаю в номенклатуру наименование кроме штрих-кода,потому что он в регистрах сведений сидит,простым загрузчиком он грузит отдельно в регистр,но там если даже наименования одинаковые а в одном единица измерений  или штрих код пуст то создает дубль
1 Omskdizel
 
23.04.12
06:24
Жееесть... Я думал такие тексты только в WoW бывают... Но на Мисте... Автор, давай еще!
2 Erhov_egor
 
23.04.12
06:26
Нормальный загрузчик с настройками есть нормальный?
3 Wobland
 
23.04.12
06:27
(2) с нормальными настройками?
4 Erhov_egor
 
23.04.12
06:40
я ж говорю записи двоятся при загрузке даже если наименования совпадают(Владелец),есть нормальный где проверяет на повтор владельца
5 Omskdizel
 
23.04.12
06:41
А что, руками не подковырнуть? Что-то сомнительно, что там много писанины.
6 Wobland
 
23.04.12
06:41
(4) у тебя там в регистре ещё куча измерений. откуда оно тебе знает, какие должны быть остальные? так что никаких задвоений. нарисуй уже свою, делов на 15 минут с тремя перекурами
7 KRV
 
23.04.12
06:43
когда двоятся двоятся загрузчик чтобы надо проверять или если есть то не создавать а то будет пыщЪ
8 Omskdizel
 
23.04.12
06:44
(7) +1! Вы изумительно излагаете!
9 Erhov_egor
 
23.04.12
06:45
я просто недавно сел на 8 был на 7, че то туговато с этим
10 Wobland
 
23.04.12
06:49
(9) держи заготовку. код из левой обработки, поправишь, если что

   Попытка
       Состояние("Загрузка Excel...");
       Excel=Новый COMОбъект("Excel.Application");
   Исключение
       Сообщить(ОписаниеОшибки());
       Возврат;
   КонецПопытки;
   Состояние("Открытие файла...");
   Попытка
       ExcelFile=Excel.Workbooks.Open(Файл);
   Исключение
       Сообщить(ОписаниеОшибки());
       Возврат;
   КонецПопытки;
   Состояние("Обработка файла...");
   Sheet=ExcelFile.Sheets(1);
   ПоследняяСтрока=Sheet.Cells.SpecialCells(11).Row;
   ЭлементыФормы.Индикатор.Значение=0;
   ЭлементыФормы.Индикатор.МаксимальноеЗначение=ПоследняяСтрока-8;
   Для стр=8 По ПоследняяСтрока Цикл
       ОбработкаПрерыванияПользователя();
       ЭлементыФормы.Индикатор.Значение=ЭлементыФормы.Индикатор.Значение+1;
       Артикул=СокрЛП(Sheet.Cells(стр, 1).Value);
       Если ЕстьУжеВрегистре() Тогда
           Продолжить;
       КонецЕсли;
   КонецЦикла;
11 Erhov_egor
 
23.04.12
07:03
ЕстьУжеВрегистре(), процедурку докинь а
12 Wobland
 
23.04.12
07:05
(11) это ж писать надо
13 Wobland
 
23.04.12
07:06
+(10) кстати, перед Продолжить, пожалуй, лучше ещё ругаться разными словами
14 zak555
 
23.04.12
07:28
(10) файл Excel откуда ? тоже выгружен из 1с ?
15 Wobland
 
23.04.12
07:30
(14) поставщик присылает
16 zak555
 
23.04.12
07:50
(15) скажи ему, что уже все в xml делают обмен =)
17 Wobland
 
23.04.12
07:57
(16) чтоб новую обработку загрузки писать? ну уж нет ;)
18 zak555
 
23.04.12
08:15
(17) писать откуда ?
19 Wobland
 
23.04.12
08:26
(18) моя твоя не понимай. всё настроено, отлажено, работает. перемен не хочу
20 Erhov_egor
 
23.04.12
08:27
(14)На счет этого я не знаю
21 Wobland
 
23.04.12
08:39
(20) надо бы ещё у зака поинтересоваться, кого он спрашивал ;)
22 Erhov_egor
 
23.04.12
12:45
там наименование совпадает,если единицаизмерения указана в 1с,то создается дубль,т.к. в стандартной обработке указывается владелец при установке,а как прописать что нужно по владельцу выбрать элемент че то не могу,
CсылкаНоменклатуры = Справочники.Номенклатура.НайтиПоНаименованию(ТекущиеДанные["Владелец"]); Результат=СсылкаНоменклатуры.ЕдиницаХраненияОстатков;
23 Erhov_egor
 
23.04.12
12:45
Возврат результат?
24 Erhov_egor
 
23.04.12
12:49
а то почему то не выводит в регистр ед.изм.
25 hhhh
 
23.04.12
13:05
CсылкаНоменклатуры = ТекущиеДанные["Владелец"];  не оно?
26 Erhov_egor
 
23.04.12
13:22
сейчас не могу глянуть база дома?может просто кто нибудь сталкивался с этим
27 hhhh
 
23.04.12
14:19
(26) но по идее правильно. ЕСли у вас 10000 номенклатур, то должно быть 10000 единиц измерения.
28 Erhov_egor
 
24.04.12
06:49
(27)я пользуюсь стандартной обработкой загрузкаизтабличногодокумента, но почему то в регистр не заносит ед.измерений,хотя пишу все как на сайте CсылкаНоменклатуры = Справочники.Номенклатура.НайтиПоНаименованию(ТекущиеДанные["Владелец"]); Результат=СсылкаНоменклатуры.ЕдиницаХраненияОстатков;
может ты сталкивался с этим?
29 Erhov_egor
 
28.04.12
13:22
Кто подскажет?
Я не хочу быть самым богатым человеком на кладбище. Засыпать с чувством, что за день я сделал какую-нибудь потрясающую вещь — вот что меня интересует. Стив Джобс