|
Групповое присвоение ШК через номенклатуру | ☑ | ||
---|---|---|---|---|
0
pnamik
01.03.15
✎
23:31
|
самописная, 1С8.0.18.2
Через номенклатуру какой процедурой (через групповые обработки) можно присвоить сразу нескольким товарам ШК? http://prntscr.com/6bhon7 в самой конфе получение ШК для товара происходит через форму элемента с помощью процедуры (которая в случае выше бездействует) Процедура кнСгенерироватьНажатие(Элемент) ПрефискШтрихКода = Лев(Константы.ПрефиксыШтрихКодаШтучногоТовара.Получить(),2); ПрефискШтрихКода = СтрЗаменить(ПрефискШтрихКода," ","0"); ЭлементыФормы.ТекШтрихКод.Маска = обСформироватьМаскуШтрихКода(ВидШтрихКода); ТекШтрихКод = обСформироватьШтрихкод(ПрефискШтрихКода,Код,ВидШтрихКода); Если ЭтоНовый() = Ложь Тогда ОбновитьИзображениеЭтикетки(ТекМакет); КонецЕсли; КонецПроцедуры |
|||
1
zulu_mix
01.03.15
✎
23:43
|
обработку напиши делов то
|
|||
2
pnamik
01.03.15
✎
23:44
|
(1) это как раз не умею, начинающий я
|
|||
3
zulu_mix
01.03.15
✎
23:47
|
тогда как начинающему, тебе напишу со скидкой. за ммм... 5 тыщщ рублей
|
|||
4
pnamik
01.03.15
✎
23:50
|
(3) время 23.50
|
|||
5
zulu_mix
01.03.15
✎
23:53
|
и то правда. пойду спать.
|
|||
6
pnamik
01.03.15
✎
23:54
|
(5) правильно, раз помог, потом начал нести чушь... про 5. пора спать.
|
|||
7
pnamik
02.03.15
✎
12:56
|
ни у кого нет обработки для 8,0, или же кто может подсказать?
|
|||
8
Dmitriy_76
02.03.15
✎
13:00
|
(7) обСформироватьШтрихкод() тут какой код?
|
|||
9
Garykom
гуру
02.03.15
✎
13:01
|
(7) на цену в (3) скидка 20%
|
|||
10
nordbox
02.03.15
✎
13:06
|
(0) А обоснуй эту хотелку если конечно сможешь???
В чем смысл таких танцев???? |
|||
11
Garykom
гуру
02.03.15
✎
13:13
|
(10) у него самописка...какой может быть универсальный обработка для 8.0 ? ))
|
|||
12
nordbox
02.03.15
✎
13:20
|
(11) а что ты у меня про ето спрашиваешь? )))
Это вопрос к (0) это он там какие то непонятные заклинания над базой делает. |
|||
13
nordbox
02.03.15
✎
13:21
|
+12 наверное хочет большую красную кнопку на весь экран "СДЕЛАТЬ ВСЁ"
|
|||
14
Garykom
гуру
02.03.15
✎
13:25
|
(13) дык уже делаю... Внешняя обработка "Сделать ВСЕ" ))
|
|||
15
nordbox
02.03.15
✎
13:28
|
(14) Ну извини, я не видел раньше )))
|
|||
16
pnamik
02.03.15
✎
13:43
|
(10) после загрузки из эксель товары появляются в папке со сквозной нумерацией типа 1, 2, 3. этих товаров иногда бывает очень много. Каждый товар открыть в номенклатуре и присвоить шк , это долго. вот поэтому и нужно , чтобы сразу шк присвоили прямо в номенклатуре после сформирования прих.накладной
|
|||
17
Garykom
гуру
02.03.15
✎
13:51
|
(16) исправь загрузку из екселя...
|
|||
18
nordbox
02.03.15
✎
13:52
|
(16) Ну пункт первый это то что ШК генирить можно при загрузке.
Пункт второй у загружаемой номенклатуру у же может быть ШК пункт третий ШК присваевается ед измерения далее по тексту |
|||
19
pnamik
02.03.15
✎
13:59
|
(18) пути реализации мне непонятны. понимаю, что в обработке можно сразу кнопку сгенерировать шк. только таким образом, чтобы было в формате базы, чтобы не присвоил одинаковых шк, если уже товар есть в базе, присвоил (брал из базы) старый шк или предлагал пользователю выбирать, что делать. в общем это теория
|
|||
20
pnamik
02.03.15
✎
14:01
|
думаю, не в загрузке, а в номенклатуре это можно осуществить, но как? придется много много читать и тренироваться похоже
|
|||
21
nordbox
02.03.15
✎
14:06
|
Ты сам то понял????
>>>присвоил (брал из базы) старый шк или предлагал пользователю выбирать Накладная 100500 позиций???? ШК присваевается по другому Есть Номенклатура ей подчинен Ед измерения у него ШК Товар Штук ШК 123 Товар Бут ШК 321 Товар Литр ШК 555 Товар КвадратныйКубоЛитр ШК 777 Посмотри как в УТ сделано, просто и сердито. |
|||
22
nordbox
02.03.15
✎
14:07
|
у тебя юзверь поле первой накладной
>>или предлагал пользователю выбирать Озвереет и пошлет тебя в далекое сексуальное путешествие |
|||
23
nordbox
02.03.15
✎
14:08
|
+ а плюс еще у разных поставщиков одного товара может быть разный ШК
|
|||
24
nordbox
02.03.15
✎
14:08
|
+партии разные
|
|||
25
nordbox
02.03.15
✎
14:09
|
Ты в торговле вообще работал когда нибудь?????
|
|||
26
pnamik
02.03.15
✎
14:20
|
(25) ты чего сердишься? если не знаешь нашу самописку. причем тут ут? упп? или еще какая то конфа? успокойся. дай знать я тебе постараюсь объяснить как устроена наша конфа
|
|||
27
hhhh
02.03.15
✎
14:25
|
(26) выкладывай уже свою конфу.
|
|||
28
Garykom
гуру
02.03.15
✎
14:27
|
(27) не надо...я же если увижу (любопытство заставит) что там ужас потом не засну ;)
|
|||
29
pnamik
02.03.15
✎
14:55
|
(27) зачем?
|
|||
30
pnamik
02.03.15
✎
14:56
|
(28) к конфе прилагается колыбельная
|
|||
31
Garykom
гуру
02.03.15
✎
14:59
|
(30) а с каким размером эта "колыбельная"?
|
|||
32
pnamik
02.03.15
✎
15:01
|
(31) размеры разные, каждому свое как говорится
|
|||
33
pnamik
02.03.15
✎
15:02
|
если есть желание помочь или подсказать, пожалуйста, буду рад
|
|||
34
nordbox
02.03.15
✎
15:18
|
pnamik, тут твоя база колыбельная не нужна
ты cf выложи а тут уж разберемся )) |
|||
35
BigShmax
02.03.15
✎
15:19
|
(26) - если не знаешь нашу самописку. причем тут ут? упп? или еще какая то конфа? успокойся. дай знать я тебе постараюсь объяснить как устроена наша конфа
(29) и как осуществить (33) не понятно. |
|||
36
nordbox
02.03.15
✎
15:21
|
(0) +34 тут телепатов нет
|
|||
37
nordbox
02.03.15
✎
15:27
|
(0) Анекдот есть:
....Нам на бронепоезд установили радиостанцию ... -Василий Иваныч, а радиостанция на лампах или на транзисторах? -Для тупых повторяю, на бронепоезде... У тебя вот эти произведения где???? >>обСформироватьМаскуШтрихКода(ВидШтрихКода); >>обСформироватьШтрихкод(ПрефискШтрихКода,Код,ВидШтрихКода); |
|||
38
pnamik
02.03.15
✎
15:29
|
я же выложил ту процедуру,с помощью которой товар получает шк в форме элемента. просил помочь осуществить то же самое для группы товаров. если нужна еще другая часть, которая могла бы помочь вам, чтобы мне подсказали, готов.
|
|||
39
nordbox
02.03.15
✎
15:31
|
Ты выложил кнСгенерироватьНажатие(Элемент)
Это ни о чём........ Вот где находятся ФИЗИЧЕСКИ в КАКОМ МОДУЛЕ то что я у тебя спросил???? или я догадаться должен???? |
|||
40
nordbox
02.03.15
✎
15:32
|
а лучше CF давай если не оч большой, мыло в подмыльнице есть
|
|||
41
nordbox
02.03.15
✎
15:34
|
где и в каком виду у тебя хранятся ШК
тоже догадываться???? |
|||
42
nordbox
02.03.15
✎
15:37
|
если надумаешь CF отправлять его размер сначала озвуч
|
|||
43
palpetrovich
02.03.15
✎
16:09
|
(0) нарисуй обработку, в поцедуру кнопки код:
Процедура КнопкаЗаполнитьШК(Кнопка) Номенклатура = Справочники.Номенклатура; Отбор = Новый Структура("ШтрихКод"); Отбор.ШтрихКод = 0; // если ШтрихКод числовой Выборка = Номенклатура.Выбрать(,,Отбор); Пока Выборка.Следующий() Цикл Объект = Выборка.ПолучитьОбъект(); ПрефискШтрихКода = Лев(Константы.ПрефиксыШтрихКодаШтучногоТовара.Получить(),2); ПрефискШтрихКода = СтрЗаменить(ПрефискШтрихКода," ","0"); //ВидШтрихКода = .....хз, что тут у тебя, сакм придумай Объект.ШтрихКод = обСформироватьШтрихкод(ПрефискШтрихКода,Объект.Код,ВидШтрихКода); Попытка Объект.Записать(); Исключение КонецПопытки; КонецЦикла; КонецПроцедуры если "ШтрихКод" - это реквизит спраовчника Номенклатура и он числовой + ты сможешь самостоятельно присвоить ВидШтрихКода верное значение - будет тебе щасте :) |
|||
44
pnamik
02.03.15
✎
16:43
|
(43) вот умница. пока нету возможности проверить. вечером обязательно проверю. и сообщу. это реальная попытка в помощи.
|
|||
45
pnamik
02.03.15
✎
16:49
|
(42) нашел в конфе в общем модуле несколько функций по шк. вечером если вариант (43) не получится, выложу эти функции
|
|||
46
pnamik
02.03.15
✎
17:02
|
вот они
Функция обСформироватьШтрихкод(Префикс, ПредвКод, ВидШтрихКода) Экспорт Если ВидШтрихКода = Неопределено ИЛИ обЗначениеНеЗаполнено(ВидШтрихКода) Тогда ВидШтрихКода = Перечисления.ВидыШтрихКодов.EAN13; КонецЕсли; ДлинаШтрихКода = обПолучитьДлинуШтрихКода(ВидШтрихКода); ИспКолво = ДлинаШтрихКода-СтрДлина(Строка(Префикс))-1; Штрихкод = СимволыВЦифры(Прав(СокрЛП(ПредвКод), ИспКолво)); Штрихкод = Строка(Префикс) + обДополнитьСтрокуЛ(Штрихкод, "0", ИспКолво); Возврат Штрихкод + обКонтрольныйСимволEAN(Штрихкод, ВидШтрихКода); КонецФункции // глСформироватьШтрихкод() Функция обПолучитьДлинуШтрихКода(ВидШтрихКода) Экспорт Результат = 0; Если ВидШтрихКода = Перечисления.ВидыШтрихКодов.EAN8 Тогда Результат = 8; ИначеЕсли ВидШтрихКода = Перечисления.ВидыШтрихКодов.EAN13 Тогда Результат = 13; ИначеЕсли ВидШтрихКода = Перечисления.ВидыШтрихКодов.EAN128 Тогда Результат = 128; ИначеЕсли ВидШтрихКода = Перечисления.ВидыШтрихКодов.CODE128 Тогда Результат = 128; Иначе Результат = 0; КонецЕсли; Возврат Результат; КонецФункции // обПолучитьДлинуШтрихКода() // Функция позволяет сформировать маску ввода штрих-кода // // Параметры // ВидШтрихКода – Перечисления.ВидыШтрихКодов // // Возвращаемое значение: // Строка – маская для ввода штрих-кода в элементе управления формы // Функция обСформироватьМаскуШтрихКода(ВидШтрихКода) Экспорт Если ВидШтрихКода = Неопределено Тогда ВидШтрихКода = Перечисления.ВидыШтрихКодов.EAN13; КонецЕсли; ДлинаШтрихКода = обПолучитьДлинуШтрихКода(ВидШтрихКода); стр = ""; Для сч =1 По ДлинаШтрихКода Цикл стр = стр +"9"; КонецЦикла; Результат = стр; Возврат Результат; КонецФункции // обСформироватьМаскуШтрихКода() |
|||
47
pnamik
02.03.15
✎
18:33
|
реализовал как в картинке (0) через групповые обработки "Установить ШК". присвоил процедуру (43)
выдал ошибку, к сожалению {Справочник.Номенклатура.Форма.ФормаСписка(606)}: Поле объекта недоступно для записи (Отбор) Отбор = Новый Структура("ШтрихКод") |
|||
48
pnamik
02.03.15
✎
18:45
|
еще одна ошибка
если это обработка {Форма.Форма(7)}: Ошибка при вызове метода контекста (Выбрать): Недопустимое значение параметра (параметр номер "3") Выборка = Номенклатура.Выбрать(,,Отбор); по причине: Недопустимое значение параметра (параметр номер "3") |
|||
49
palpetrovich
02.03.15
✎
18:49
|
(48) :) ...ну сделай так
Номенклатура = Справочники.Номенклатура; Выборка = Номенклатура.Выбрать(); Пока Выборка.Следующий() Цикл если СокрЛП(Выборка.Штрихкод) <> "" тогда продолжить; КонецЕсли; Объект = Выборка.ПолучитьОбъект(); ПрефискШтрихКода = Лев(Константы.ПрефиксыШтрихКодаШтучногоТовара.Получить(),2); ПрефискШтрихКода = СтрЗаменить(ПрефискШтрихКода," ","0"); Объект.ШтрихКод = обСформироватьШтрихкод(ПрефискШтрихКода,Объект.Код); Попытка Объект.Записать(); Исключение КонецПопытки; КонецЦикла; |
|||
50
pnamik
02.03.15
✎
19:33
|
немного переделал, так выдавал ошибко (фактические параметры и т.д.)
Номенклатура = Справочники.Номенклатура; Выборка = Номенклатура.Выбрать(); Пока Выборка.Следующий() Цикл если СокрЛП(Выборка.ТекШтрихкод) <> "" тогда продолжить; КонецЕсли; Объект = Выборка.ПолучитьОбъект(); ПрефискШтрихКода = Лев(Константы.ПрефиксыШтрихКодаШтучногоТовара.Получить(),2); ПрефискШтрихКода = СтрЗаменить(ПрефискШтрихКода," ","0"); ВидШтрихКода = Перечисления.ВидыШтрихКодов.EAN13; Объект.ТекШтрихКод = обСформироватьШтрихкод(ПрефискШтрихКода,Объект.Код,ВидШтрихКода); Попытка Объект.Записать(); Исключение КонецПопытки; КонецЦикла; это также выдает ошибку {Форма.Форма(13)}: Ошибка при установке значения атрибута контекста (ТекШтрихКод): Реквизит недоступен для группы Объект.ТекШтрихКод = обСформироватьШтрихкод(ПрефискШтрихКода,Объект.Код,ВидШтрихКода); |
|||
51
pnamik
02.03.15
✎
19:33
|
наверно, какой-то цикл нужно для группы, типа если этаГруппа, то пропустить, и только для товаров присвоить шк
|
|||
52
nordbox
02.03.15
✎
19:46
|
(51) Вот смотрю на тебя и думаю.....
ты в жизни такой же???? за тебя уже все сделали, неужели так трудно залезть в синтакс помощник.....??????? ЭтоГруппа (IsFolder) Использование: Только чтение. Описание: Тип: Булево. Позволяет определить, является ли элемент справочника группой. Доступность: Сервер, толстый клиент, внешнее соединение. Примечание: Истина - элемент является группой; Ложь - элемент не является группой. |
|||
53
pnamik
02.03.15
✎
20:14
|
Не помогает
Если ДанныеСтроки.ЭтоГруппа = Ложь Тогда Объект.ТекШтрихКод = обСформироватьШтрихкод(ПрефискШтрихКода,Объект.Код,ВидШтрихКода); КонецЕсли; ошибка {Справочник.Номенклатура.Форма.ФормаСписка(615)}: Значение не является значением объектного типа (ЭтоГруппа) Если ДанныеСтроки.ЭтоГруппа = Ложь Тогда |
|||
54
nordbox
02.03.15
✎
20:22
|
ооооо..... как все запущенно....
Ну приделай уж куда нибудь Выборка.Ссылка.ЭтоГруппа=Истина можешь Ложь приделать, можешь НЕ (Выборка.Ссылка.ЭтоГруппа) и т.д. в зависимости от извращенности |
|||
55
nordbox
02.03.15
✎
20:24
|
+54 в своем коде можешь
Объект.ЭтоГруппа=Истина |
|||
56
nordbox
02.03.15
✎
20:25
|
+55
Если Объект.ЭтоГруппа = Ложь Тогда Объект.ТекШтрихКод = обСформироватьШтрихкод(ПрефискШтрихКода,Объект.Код,ВидШтрихКода); КонецЕсли; |
|||
57
pnamik
02.03.15
✎
21:03
|
Эта процедура уже не дает никаких ошибок, также и ничего не делает.
Процедура ДействияФормыУстановитьШК(Кнопка, ДанныеСтроки) Номенклатура = Справочники.Номенклатура; Выборка = Номенклатура.Выбрать(); Пока Выборка.Следующий() Цикл если СокрЛП(Выборка.ТекШтрихкод) <> "" тогда продолжить; КонецЕсли; Объект = Выборка.ПолучитьОбъект(); ПрефискШтрихКода = Лев(Константы.ПрефиксыШтрихКодаШтучногоТовара.Получить(),2); ПрефискШтрихКода = СтрЗаменить(ПрефискШтрихКода," ","0"); ВидШтрихКода = Перечисления.ВидыШтрихКодов.EAN13; Если Объект.ЭтоГруппа = Ложь Тогда Объект.ТекШтрихКод = обСформироватьШтрихкод(ПрефискШтрихКода,Объект.Код,ВидШтрихКода); КонецЕсли; Попытка Объект.Записать(); Исключение КонецПопытки; КонецЦикла; КонецПроцедуры |
|||
58
nordbox
02.03.15
✎
21:18
|
Ну хоршо
Вот при выполнении этого кода что будет у тебя на экране??? Номенклатура = Справочники.Номенклатура; Выборка = Номенклатура.Выбрать(); Пока Выборка.Следующий() Цикл Объект = Выборка.ПолучитьОбъект(); Сообщить(Объект.ТекШтрихКод); Сообщить(Объект.Наименование); КонецЦикла; |
|||
59
pnamik
02.03.15
✎
21:22
|
служебные сообщения, проверяет, по-моему, шк
|
|||
60
pnamik
02.03.15
✎
21:22
|
часть сл.сообщении
Юбка женская RED ROSE 2000000602134 Юбка женская S&T 2000000602141 Юбка женская S&T 2000000602158 Юбка женская S&T 2000000602165 Юбка женская S&T 2000000302713 Юбка женская TSL 2000000505190 Юбка женская б/т.м. Юбки детские Юбки детские (торговые марки) Юбки детские K&S Юбки детские TIGABEAR Юбки детские ZHONG QING YISHENG Юбки женские Юбки женские (без торговых марок) Юбки женские (торговые марки) Юбки женские BEAUTYO Юбки женские FRANCOIS ST.CHARLES Юбки женские K&S Юбки женские LONG JIA YI Юбки женские MEI REN FANG Юбки женские NEW Юбки женские RED ROSE Юбки женские S&T 2000000309170 Яйцеварка (6 подставок+1 сеператор) МВ Ящики для инструментов |
|||
61
pnamik
02.03.15
✎
21:24
|
видно, что есть группы, есть товары со шк
|
|||
62
nordbox
02.03.15
✎
21:26
|
НУ Ииииии????????
Мысли есть?????? Номенклатура = Справочники.Номенклатура; Выборка = Номенклатура.Выбрать(); Пока Выборка.Следующий() Цикл Объект = Выборка.ПолучитьОбъект(); Если Объект.ЭтоГруппа=Ложь Тогда ПрефискШтрихКода = Лев(Константы.ПрефиксыШтрихКодаШтучногоТовара.Получить(),2); ПрефискШтрихКода = СтрЗаменить(ПрефискШтрихКода," ","0"); ВидШтрихКода = Перечисления.ВидыШтрихКодов.EAN13; Объект.ТекШтрихКод = обСформироватьШтрихкод(ПрефискШтрихКода,Объект.Код,ВидШтрихКода); Попытка Объект.Записать(); Исключение КонецПопытки; Сообщить(Объект.ТекШтрихКод); Сообщить(Объект.Наименование); КонецЕсли КонецЦикла; |
|||
63
Garykom
гуру
02.03.15
✎
21:38
|
(62) настоящему программисту 1С даже исходники программы (сама конфа) не нужны чтобы допилить эту программу (конфу) ))
|
|||
64
nordbox
02.03.15
✎
21:46
|
(63) я уже не знаю что ему надо?????
тут все по очереди сначала клещами из него вытягивали что и как, а потом по очереди ему в разных вариантах решения дали. Тут даже на школьную программу не тянет |
|||
65
pnamik
02.03.15
✎
21:47
|
(62) ты молодец, хоть немного нервничал, наверно из-за моих скудных знаний по 1С. Эта процедура проверяет всех товаров каждый раз. Все равно тебе спасибо, все благие мысли к тебе направляю. Но изначально задача была другая. через номенклатуру для определенных товаров, как в картинке,
http://prntscr.com/6bv0cl присвоить шк через групповые обработки-установит шк. Как добиться успеха? |
|||
66
pnamik
02.03.15
✎
21:49
|
(64) когда знаешь что-то, тебе кажется, что это просто, почему другие не знают. не все также сильны в 1С, как ты, или другие участники форума, которые, иногда действительно, подсказывая, учат, делают доброе дело, а порой, открыто предлагают решения.
|
|||
67
pnamik
02.03.15
✎
21:50
|
то, что здесь пишется, в теории понимаю, а как реализовать??? Практики нет, опыта нет... поздно начал 1С
|
|||
68
nordbox
02.03.15
✎
21:59
|
(65) Замени
Если Объект.ЭтоГруппа=Ложь Тогда на Если (Объект.ЭтоГруппа=Ложь) И (СокрЛП(Строка(Объект.ТекШтрихКод))="") Тогда И будет тебе счастье |
|||
69
pnamik
02.03.15
✎
22:04
|
(68) ничего не происходит, не присваивает шк
|
|||
70
nordbox
02.03.15
✎
22:07
|
Входит в условие,
Сделай так по драконовски: в место (СокрЛП(Строка(Объект.ТекШтрихКод))="") (СтрДлина(Объект.ТекШтрихКод))<13) |
|||
71
pnamik
02.03.15
✎
22:11
|
исправил так
Если (Объект.ЭтоГруппа = Ложь)И(СтрДлина(Объект.ТекШтрихКод))<13) Тогда выдал ошибку {Справочник.Номенклатура.Форма.ФормаСписка(609,65)}: Ожидается ключевое слово 'Тогда' ('Then') Если (Объект.ЭтоГруппа = Ложь)И(СтрДлина(Объект.ТекШтрихКод))<13<<?>>)Тогда |
|||
72
nordbox
02.03.15
✎
22:12
|
детский сад
(СтрДлина(Объект.ТекШтрихКод)<13) |
|||
73
pnamik
02.03.15
✎
22:18
|
(72) пока ты писал, пробовал разные варианты, не дошел до скобки, ты уже указал. присваивает тем, кого помечал. вот результат.
http://prntscr.com/6bvkoc СПАСИБО ТЕБЕ. |
|||
74
nordbox
02.03.15
✎
22:36
|
(73) Только это не правильно ))))
Ты учти что с такой проверкой Если Объект.ЭтоГруппа=Ложь Тогда Эта обормотка у тебя будет переприсваивать ШК всем подряд, даже той ной у которой он есть и будет присваивать именно ЕАN13 А если у тебя там например EAN8 уже у номенклатуры есть он его тоже EAN13 впиндюрит |
|||
75
nordbox
02.03.15
✎
22:38
|
+74 Тебе нужна проверка на наличие вообще какого либо ШК у номенклатуры.
Тут целое поле деятельности, поспи, а это будет тебе завтрашнее домашнее задание ))) |
|||
76
pnamik
02.03.15
✎
22:56
|
(74) да... он присваивает не только тем, кого помечал, всем тем, у кого меньше 13. Половинчатый получается результат. В любом случае, помог в чем-то разобраться, немного учил, это уже хорошо. завтра не надеюсь на чудо в моих знаниях, но тем не менее, попробую тренироваться условиями, чтобы только для данной группы присвоение ШК было. т.к. из эксель все товары перемещаются в одну группу.
|
|||
77
nordbox
03.03.15
✎
07:34
|
(76) попробуй
(СокрЛП(Строка(Объект.ТекШтрихКод.Значение))="") |
|||
78
palpetrovich
03.03.15
✎
10:10
|
мля, какой-такой ТекШтрихКод? замени:
Объект.ТекШтрихКод = обСформироватьШтрихкод(ПрефискШтрихКода,Объект.Код); на Объект.ШтрихКод = обСформироватьШтрихкод(ПрефискШтрихКода,Объект.Код); |
|||
79
pnamik
03.03.15
✎
11:55
|
(77) ошибку выдает
{Справочник.Номенклатура.Форма.ФормаСписка(610)}: Значение не является значением объектного типа (Значение) Если (Объект.ЭтоГруппа=Ложь) И (СокрЛП(Строка(Объект.ТекШтрихКод.Значение))="") Тогда |
|||
80
palpetrovich
03.03.15
✎
12:10
|
(79) если реквизит таки ТекШтрихКод:
Номенклатура = Справочники.Номенклатура; Выборка = Номенклатура.Выбрать(); Пока Выборка.Следующий() Цикл Если Объект.ЭтоГруппа тогда Продолжить; КонецЕсли; Если СокрЛП(Выборка.ТекШтрихКод) <> "" тогда Продолжить; КонецЕсли; Объект = Выборка.ПолучитьОбъект(); ПрефискШтрихКода = Лев(Константы.ПрефиксыШтрихКодаШтучногоТовара.Получить(),2); ПрефискШтрихКода = СтрЗаменить(ПрефискШтрихКода," ","0"); Объект.ТекШтрихКод = обСформироватьШтрихкод(ПрефискШтрихКода,Объект.Код); Попытка Объект.Записать(); Исключение КонецПопытки; КонецЦикла; |
|||
81
pnamik
03.03.15
✎
12:15
|
(80) ошибка {Справочник.Номенклатура.Форма.ФормаСписка(609)}: Значение не является значением объектного типа (ЭтоГруппа)
Если Объект.ЭтоГруппа тогда |
|||
82
nordbox
03.03.15
✎
12:18
|
Если Выборка.ЭтоГруппа тогда
|
|||
83
palpetrovich
03.03.15
✎
12:20
|
(82) да, объекта там еще нет, эт ошибка копи-пасте
надо "Если Выборка.ЭтоГруппа тогда" |
|||
84
pnamik
03.03.15
✎
12:32
|
Совместиными усилиями получилось процедура следующая, которая ничего не делает. никаких изменений
Номенклатура = Справочники.Номенклатура; Выборка = Номенклатура.Выбрать(); Пока Выборка.Следующий() Цикл Если Выборка.ЭтоГруппа тогда Продолжить; КонецЕсли; Если СокрЛП(Выборка.ТекШтрихКод) <> "" тогда Продолжить; КонецЕсли; Объект = Выборка.ПолучитьОбъект(); ПрефискШтрихКода = Лев(Константы.ПрефиксыШтрихКодаШтучногоТовара.Получить(),2); ПрефискШтрихКода = СтрЗаменить(ПрефискШтрихКода," ","0"); ВидШтрихКода = Перечисления.ВидыШтрихКодов.EAN13; Объект.ТекШтрихКод = обСформироватьШтрихкод(ПрефискШтрихКода,Объект.Код,ВидШтрихКода); Попытка Объект.Записать(); Исключение КонецПопытки; КонецЦикла; //Сообщить(Объект.ТекШтрихКод); //Сообщить(Объект.Наименование); |
|||
85
pnamik
03.03.15
✎
12:33
|
Закомеентирован по причине ошибки
{Справочник.Номенклатура.Форма.ФормаСписка(625)}: Значение не является значением объектного типа (ТекШтрихКод) Сообщить(Объект.ТекШтрихКод); |
|||
86
palpetrovich
03.03.15
✎
12:38
|
(85) млин, безнадега...
в общем так, если хочешь получить результат - в меню конофигуратора выбери: конфигурация - сохранить конфигурацию в файл и полученный файл выложи на какой-нить файлообменник ссылку на него - сюда |
|||
87
pnamik
03.03.15
✎
12:40
|
Заменил строку
Если СокрЛП(Выборка.ТекШтрихКод) <> "" тогда на Если СокрЛП(Строка(Выборка.ТекШтрихКод))="" тогда присвоила обработка шк всем, кому хотела, в том числе помеченным. |
|||
88
pnamik
03.03.15
✎
12:41
|
(86) могу дать доступ тв
|
|||
89
nordbox
03.03.15
✎
12:42
|
palpetrovich, там стопудово проблема
в Если СокрЛП(Выборка.ТекШтрихКод) <> "" тогда Там надо получить Этот ШК сначала а потом Обрезать его надо для сравнения, а в данном случае обрезается напрямую реквизит про cf я его уже просил: партизан..... |
|||
90
pnamik
03.03.15
✎
12:42
|
(89) дам доступ прям к базе
|
|||
91
pnamik
03.03.15
✎
12:43
|
312 263 519
1663 |
|||
92
palpetrovich
03.03.15
✎
12:51
|
(91) захожу
|
|||
93
palpetrovich
03.03.15
✎
12:53
|
отпусти мышку :)
|
|||
94
palpetrovich
03.03.15
✎
12:59
|
(91) Извини, мне твои телодвижения смотреть по ТВ неинтересно. Не хочешь - как хочешь
|
|||
95
nordbox
03.03.15
✎
13:09
|
palpetrovich, дык это мы в двоем там были что ли?
|
|||
96
nordbox
03.03.15
✎
13:10
|
)))) это уже групповух называется )))
|
|||
97
Garykom
гуру
03.03.15
✎
13:14
|
(96) ка вы могли...бедного ТС... вдвоем...
)) |
|||
98
palpetrovich
03.03.15
✎
13:40
|
(95) а, вон оно что :) ну что, результат есть? кста, успел заметить, ТекШтрихКод - таки реквизит ...забавно кто-то назвал
|
|||
99
nordbox
03.03.15
✎
13:44
|
ага, сделал ему
там дел на 5 мин )))) |
|||
100
pnamik
03.03.15
✎
13:46
|
(89) умница сделал. Теперь голову ломаю как заставить обработку импортизЭксель заставить переместить товары в номенклатуру без ШК. моя обработка переносит только тогда когда хоть какая-то нумерация есть. Обработка УстановитьШК присваивает тем, у кого нет шк (поле пустое). а обработка импортизЭксель переносит те товары, поле шк котор непустой. дилемма.
|
|||
101
palpetrovich
03.03.15
✎
13:48
|
(99) кто-б сомневался :)
(100) по-ходу ты тупо ищешь кто-б за тебя поработал |
|||
102
nordbox
03.03.15
✎
13:49
|
(100) Сдается мне что ты не мужского рода племени )))))
|
|||
103
pnamik
03.03.15
✎
13:50
|
(101) нет не ищу. просто проблема была озвучил. какой "полуавтомат" был, такой же остался. Только с другой стороны. Но это не означает, что недовольный я . Наоборот очень даже, научился чему.
(102) с чего вдруг? |
|||
104
pnamik
03.03.15
✎
13:58
|
константировал, что nordbox помог, поблагодарил, и при этом я от начальной проблемы не избавился. Хотел автоматизировать процесс, описал ситуацию, поместил картинки. не получилось просто
|
|||
105
nordbox
03.03.15
✎
14:03
|
(104) Почему не мужского роду племени???? )))))
Песня о настоящем индейце http://www.youtube.com/watch?v=SvqR_jbeil4 )))) |
|||
106
nordbox
03.03.15
✎
14:14
|
>>> а обработка импортизЭксель переносит те товары, поле шк котор непустой. дилемма.
У тебя уже ответ есть на этот вопрос, напрягай мозги )))) а то точно таксу за такие вопросы брать будем ))) |
|||
107
pnamik
03.03.15
✎
14:15
|
(105) улыбнуло
|
|||
108
pnamik
03.03.15
✎
14:18
|
(106) про таксу погорячился наверно. мозги не те наверно, кроме приглашения еще раз ничего не приходит в голову
|
|||
109
pnamik
03.03.15
✎
14:30
|
9557
|
|||
110
nordbox
03.03.15
✎
15:21
|
(109) Ты чо делаешь то?????????
вообще с дуба рухнул??????? комп снесут меньше чем за 30 секунд для этого в личке есть майл |
|||
111
pnamik
03.03.15
✎
15:31
|
(110) поступил по совету друзей. отправил
|
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |