gifts2017

Печать ценников в 1С:Торговля и Склад 7.7 (8 типов ценников)

Опубликовал Илья Курганников (host_kms) в раздел Печать - Ценники

Печать ценников с выбором из 8 типов ценников (начиная со среднего формируется штрих-код), с возможностью отбора по группе номенклатуры или с множественным фильтром, также отбор номенклатуры с остатками на складе больше нуля. Обработку можно использовать как внешнюю печатную форму для документов, у которых есть реквизит табличной части "Номенклатура".

Обработка работает на любых версиях конфигурации 1С:Торговля и Склад 9.2.

Обработка поставляется с открытым кодом.

 

Установка:

Для формирования штрих-кода нужно скопировать файл "BARCODE.OCX", например, в папку базы 1С, и зарегистрировать с помощью команды:
Нажать кнопку Пуск -> Выполнить и ввести команду "regsvr32 D:\BASE-1C\BARCODE.OCX" вместо "D:\BASE-1C\BARCODE.OCX", нужно указать ваш путь до компоненты "BARCODE.OCX".

Обработку можно использовать как внешнюю печатную форму для документов, у которых есть реквизит табличной части "Номенклатура", для этого необходимо скопировать обработку в папку PrnForms каталога базы - "D:\BASE-1C\ExtForms\PrnForms". В программе выбрать меню "Сервис" -> "Регистрация внешних печатных форм", в открывшейся форме выбрать вид документа, для которого Вы хотите использовать обработку. Нажать кнопку "Изменить" -> "Внести в список", после чего откроется форма "Выбор обработки печати". Найдите в списке файл "PechatCennikov.ert". Нажмите Открыть, введите название кнопки печати - "Печать ценников", нажмите ОК и закройте форму "Внешние печатные формы". В выбранном документе появится новая печатная форма, которую можно открыть, нажав на стрелочку рядом с кнопкой печати.

Скачать файлы

Наименование Файл Версия Размер
Печать ценников 22
.rar 57,48Kb
19.10.15
22
.rar 57,48Kb Скачать

См. также

Подписаться Добавить вознаграждение
Комментарии
1. Александр Рытов (Арчибальд) 14.09.09 10:15
Что нового? Форматы ценников? Или отбор номенклатуры? Чем лучше/проще/быстрее, чем все предыдущие ценники?
RomantiX; pers200590; +2 Ответить 1
2. Илья Курганников (host_kms) 14.09.09 10:28
(1) Форматы ценников, добавлен штрих-код
3. Станислав Шепталов (sCHTASS) 14.09.09 13:05
> Нажать кнопку Пуск -> Выполнить и ввести команду "regsvr32 D:\BASE-1C\BARCODE.OCX"

> вместо "D:\BASE-1C\BARCODE.OCX", нужно указать ваш путь до компоненты "BARCODE.OCX".

Не легче в обработке в процедуре ПриОткрытии() прописать нечто следующее:


Попытка
КомпонентABC = СоздатьОбъект("BARCODE.BarcodeCtrl.1");
Исключение
стрИмяФайлаКомпоненты = "BARCODE.OCX";
КомандаСистемы("regsvr32 """+КаталогИБ()+стрИмяФайлаКомпоненты+"""");
КонецПопытки;

pers200590; +1 Ответить
4. Сергей (Che) Коцюра (CheBurator) 14.09.09 20:15
Проще всего - взять у Трактора алгоритм формирования/отображения ШК без шрифтов и ВК
5. Сергей (Che) Коцюра (CheBurator) 14.09.09 20:16
самый маленький ценник у меня не в пикселях, а вразмерах этикетки типа 32 на 19 мм
6. Эд Хз (Tatar_Ed) 16.09.09 09:36
ПечНаименование = ТекЭлем.НаименованиеДляЦенника;
{\\SERVER\1\EXTFORMS\PECHATCENNIKOV.ERT(271)}: Поле агрегатного объекта не обнаружено (НаименованиеДляЦенника)

как быть?
7. Илья Курганников (host_kms) 16.09.09 10:14
(6) Обработка предназначена для 1С:Торговля и Склад 7.7 редакции 9.2, если вы используете отличную от заданной конфигурации, то обработка работать не будет. Проверьте в карточке номенклатуры поле "Наименование для ценника", если у Вас такого поля нет, обработка работать не будет.
8. Александр (Alex.Fox) 16.09.09 10:51
(7)"...Обработка предназначена для 1С:Торговля и Склад 7.7 редакции 9.2"
- открваем типовую ТиС 9.2 - к примеру последний(!) релиз 960 - и где мы там найдем "Наименование для ценника"????
Тогда хотя бы в описании обработки может быть стоит добавить - внесите реквизит в справочник, или другое нименование стоит использовать?
pers200590; +1 Ответить 1
9. Эд Хз (Tatar_Ed) 16.09.09 14:04
у мена 1С:Торговля и Склад 7.7 редакции 9.2, релиз я думаю не имеет значения. Нет такого поля (наименование для ценника) в наименовании товара.
10. Илья Курганников (host_kms) 17.09.09 14:54
(8)(9) Исправил "Наименование для ценника" на "Наименование"
11. Эд Хз (Tatar_Ed) 17.09.09 16:17
Нужно добавить возможность выбора фирмы. И если мы выбираем тип цен, то для чего нам снова предлагать выбор справочника? Так же и при выборе ТМЦ. Нужно доделать, может многим пригодиться.
12. Илья Курганников (host_kms) 21.09.09 05:33
(11) Добавлена возможность выбора фирмы для печати на ценнике. Выбор справочника исправлено.
13. Федор Поркин (sss72) 16.10.09 21:27
Спасибо ВАМ большое!! перерыл тут все, корректно заработала только ваша компонента.
14. VOVA KOCHET (XYHXYZ) 26.10.09 20:25
:D Спасибо БОЛЬШОЕ!!! Наконец-то получил то, что хотел.
15. Дмитрий (arnage40) 08.12.09 23:24
16. ank-t (ekater2003@yandex.ru) 28.01.10 14:50
Прошу помощи с установкой, ни хрена не получаеться, если можно пошагово кто-нибудь опишите. :cry: Спасибо!
svic; Sub2001; Shader; savina04; +4 Ответить
17. vadim Popov (chyxer) 08.09.10 06:47
Не выводит на печать, поле товарные ценники пустое, где допустил ошибку подскажите :!:
18. KereberoS (KereberoS) 21.09.10 02:40
Форма.Закладки.УстановитьЗначение(2, Врем,?(глМножественныйФильтрЗадан<<?>>(ТаблицаМФ)=1,"(!) ","")+"Множественный фильтр");
{E:\MYDOC\PECHATCENNIKOV.ERT(45)}: Функция не обнаружена (глМножественныйФильтрЗадан)
Форма.Закладки.УстановитьЗначение(2, Врем,?(глМножественныйФильтрЗадан(ТаблицаМФ)<<?>>=1,"(!) ","")+"Множественный фильтр");
{E:\MYDOC\PECHATCENNIKOV.ERT(45)}: Неопознанный оператор
ВыбФирма = глЗначениеПоУмолчанию<<?>>("ОсновнаяФирма");
{E:\MYDOC\PECHATCENNIKOV.ERT(136)}: Функция не обнаружена (глЗначениеПоУмолчанию)
глПриСменеСтрокиТаблицыМФ<<?>>(1,ТекСтрокаВТаблице,Контекст); // записываем изменения если они были
{E:\MYDOC\PECHATCENNIKOV.ERT(141)}: Процедура не обнаружена (глПриСменеСтрокиТаблицыМФ)
НетОш = НетОш * глФильтрПоПеременнойЗапроса<<?>>(ТаблицаМФ, "Номенклатура", ВыбТМЦ, "ВыбТМЦ", ТекстЗапроса, , "СвойстваНоменклатуры");
{E:\MYDOC\PECHATCENNIKOV.ERT(248)}: Функция не обнаружена (глФильтрПоПеременнойЗапроса)
ПечЦена = глФРМ(Запрос.Цена, ВыбТипЦен.Валюта<<?>>);
{E:\MYDOC\PECHATCENNIKOV.ERT(272)}: Недостаточно фактических параметров
глПриСменеСтрокиТаблицыМФ<<?>>( 0, 1, Контекст);
{E:\MYDOC\PECHATCENNIKOV.ERT(403)}: Процедура не обнаружена (глПриСменеСтрокиТаблицыМФ)
глПриСменеСтрокиТаблицыМФ<<?>>(1,ТекСтрокаВТаблице,Контекст); // записываем изменения если они были
{E:\MYDOC\PECHATCENNIKOV.ERT(417)}: Процедура не обнаружена (глПриСменеСтрокиТаблицыМФ)
глДобавитьВТаблицуМФ<<?>>(ТаблицаМФ,"Справочник","Номенклатура", "Номенклатура", "По номенклатуре");
{E:\MYDOC\PECHATCENNIKOV.ERT(479)}: Процедура не обнаружена (глДобавитьВТаблицуМФ)
глДобавитьВТаблицуМФ<<?>>(ТаблицаМФ,"Справочник","ЗначенияСвойств", "Номенклатура", "По свойствам номенклатуры");
{E:\MYDOC\PECHATCENNIKOV.ERT(480)}: Процедура не обнаружена (глДобавитьВТаблицуМФ)


Видимо, не совсем уже и универсальная обработка.. :(
19. Тимур Салихов (salichow) 22.10.10 19:34
Что ето он пишет

Если глЕстьРеквизитМнЧ("Номенклатура",Докум.Вид()) = 0 Тогда
{Обработка.ПечатьЦенников.Форма.Модуль(390)}: Значение не представляет агрегатный объект (Вид)
20. Анатолий Корж (Толеген) 26.01.11 04:16
А можно сделать выбор товара в приходе?
21. ROOT ROOT (ROOTOMSK) 11.05.11 13:43
Как вставить штрих код в ценник в 1С:Торговля и Склад 7.7 7.70.877
помогите pci911@yandex.ru
22. Сергей (Che) Коцюра (CheBurator) 11.05.11 13:50
(21)
1. цена вопроса?
2. посмотри как сделано в типовой ТиС 9.2
23. Владислав (Vadeus) 28.08.11 08:20
Опишите пожалуста по подробней как регистрировать BARCODE.OCX" а то у меня вобще пустой лист выходит если можно то на мыло 1c.ru@mail.ru
24. Владислав (Vadeus) 29.08.11 07:51
KereberoS пишет:

Форма.Закладки.УстановитьЗначение(2, Врем,?(глМножественныйФильтрЗадан<<?>>(ТаблицаМФ)=1,"(!) ","")+"Множественный фильтр");

{E:\MYDOC\PECHATCENNIKOV.ERT(45)}: Функция не обнаружена (глМножественныйФильтрЗадан)

Форма.Закладки.УстановитьЗначение(2, Врем,?(глМножественныйФильтрЗадан(ТаблицаМФ)<<?>>=1,"(!) ","")+"Множественный фильтр");

{E:\MYDOC\PECHATCENNIKOV.ERT(45)}: Неопознанный оператор

ВыбФирма = глЗначениеПоУмолчанию<<?>>("ОсновнаяФирма");

{E:\MYDOC\PECHATCENNIKOV.ERT(136)}: Функция не обнаружена (глЗначениеПоУмолчанию)

глПриСменеСтрокиТаблицыМФ<<?>>(1,ТекСтрокаВТаблице,Контекст); // записываем изменения если они были

{E:\MYDOC\PECHATCENNIKOV.ERT(141)}: Процедура не обнаружена (глПриСменеСтрокиТаблицыМФ)

НетОш = НетОш * глФильтрПоПеременнойЗапроса<<?>>(ТаблицаМФ, "Номенклатура", ВыбТМЦ, "ВыбТМЦ", ТекстЗапроса, , "СвойстваНоменклатуры");

{E:\MYDOC\PECHATCENNIKOV.ERT(248)}: Функция не обнаружена (глФильтрПоПеременнойЗапроса)

ПечЦена = глФРМ(Запрос.Цена, ВыбТипЦен.Валюта<<?>>);

{E:\MYDOC\PECHATCENNIKOV.ERT(272)}: Недостаточно фактических параметров

глПриСменеСтрокиТаблицыМФ<<?>>( 0, 1, Контекст);

{E:\MYDOC\PECHATCENNIKOV.ERT(403)}: Процедура не обнаружена (глПриСменеСтрокиТаблицыМФ)

глПриСменеСтрокиТаблицыМФ<<?>>(1,ТекСтрокаВТаблице,Контекст); // записываем изменения если они были

{E:\MYDOC\PECHATCENNIKOV.ERT(417)}: Процедура не обнаружена (глПриСменеСтрокиТаблицыМФ)

глДобавитьВТаблицуМФ<<?>>(ТаблицаМФ,"Справочник","Номенклатура", "Номенклатура", "По номенклатуре");

{E:\MYDOC\PECHATCENNIKOV.ERT(479)}: Процедура не обнаружена (глДобавитьВТаблицуМФ)

глДобавитьВТаблицуМФ<<?>>(ТаблицаМФ,"Справочник","ЗначенияСвойств", "Номенклатура", "По свойствам номенклатуры");

{E:\MYDOC\PECHATCENNIKOV.ERT(480)}: Процедура не обнаружена (глДобавитьВТаблицуМФ)





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

Помогите пожалуста с обработкой никак не могу дать ей толк я не силён в програмировании
25. Дмитрий Крайнов (reshenie) 30.08.11 00:07
Vadeus пишет:

Опишите пожалуста по подробней как регистрировать BARCODE.OCX" а то у меня вобще пустой лист выходит если можно то на мыло 1c.ru@mail.ru

В командной строке запустить команду: regsvr32 BARCODE.OCX
Путь к BARCODE.OCX надо прописать...
26. Дмитрий Крайнов (reshenie) 30.08.11 00:07
Vadeus пишет:
Помогите пожалуста с обработкой никак не могу дать ей толк я не силён в програмировании

Какая конфигурация используется?
27. Олег Широков (shoa77) 18.09.11 10:31
28. Иван Васильев (LevSon) 28.09.11 09:53
Спасибо, клиентам очень понравился ценник со штрих-кодом среднего размера.
29. Сергей Бурыка (BurSer) 30.09.11 08:23
Спасибо, пригодится в хозяйстве.
30. Андрей Козлов (AndreyMurom) 21.10.11 09:08
31. Александр Новиков (makkao) 10.11.11 20:11
блят!!! ебаные админы, жлобы , нах!!!! ввели какую то валюту сайта!!!! раньше хоть по одной разработке в сутки можно было взять... Пяздой не подавитесь ??? infostart.ru всегда уважал за доступность и помощь в вопросах 1С.
А ща блеать аж противно заходить на страницу жлобов ! ЖАЛЬ... Ну оч. жаль расставаться с Вашим ресурсом. Удачи Вам и процветания !!! Счастье не всегда в бабле, на своем примере - я всегда делюсь инфой и разными полезностями с остальными юэерами бесплатно и только этому рад, что могу помочь хоть чем-то и хоть в каком-то вопросе...
Пока ! С уважением Makkao.
nuke-nv; NFXrus; r_strizh; talych; tipik; +5 Ответить
32. alexey t (tipik) 13.11.11 01:04
makkao пишет:

блят!!! ебаные админы, жлобы , нах!!!! ввели какую то валюту сайта!!!! раньше хоть по одной разработке в сутки можно было взять... Пяздой не подавитесь ??? infostart.ru всегда уважал за доступность и помощь в вопросах 1С.

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

Пока ! С уважением Makkao.

Я с тобой полностью согласен, жлобы
33. Елена Емельянова (kovireshad) 23.12.11 09:20
Спасибо, понравились ценники и мне и руководству
34. Антон Вокинк (shustrij74) 12.01.12 00:59
Печать ценников Торговля+Склад, редакция 9.2
скачал файлик раз архивировал вставил
c:\Documents and Settings\UserXP\Рабочий стол\торговля\DB\ExtForms\

потом в номенклатуре жму вн. ценники выходит тот же самый стандартный ценник
в ценнике так и не магу разобраться который день сижу
1 описание -есть
2 розничная цена
3 оптовая цена
4 код товара
5 дата
6 штрихкод
7 картиночка--тоже надо но не так критично
этикетка штих кд и краткое название


подскажите кто сможет
35. Антон Вокинк (shustrij74) 12.01.12 02:02
спасибо кстати за работу а тут часто на вопросы отвечают ? или денюшку нужно платить
36. Антон Вокинк (shustrij74) 12.01.12 20:52
ребяты может кто подскажет вроде не трудный вопрос но не выходит
37. Алексей Константинов (alexk-is) 12.01.12 21:14
(34) Наверное, нужно положить в PrnForms

Может быть это в чем-то поможет
http://infostart.ru/public/67695/
38. Антон Вокинк (shustrij74) 14.01.12 00:29
...ам спасибо за помощь--вроде разобрались запечатало,но
не хватает одной вещи нужно чтобы в ценнике печаталось оптовая цена и розничная
если есть кто умельцы добавить только код программный
в модуле сами подрисуем формы
спасибо за помощь тем кто откликнется
и с праздниками 1с знатоки
39. esoldatov 14.03.12 15:03
Спасибо за обработку, сделано отлично...
40. highlander highlander (highlander) 26.10.13 17:39
Классная и удобная вещь - спасибо!
41. Иван Васильев (LevSon) 25.04.14 07:37
Спасибо, очень нужная вещь для нашей торговой организации оказалась.
42. Иван Васильев (LevSon) 25.04.14 07:40
Самый нужный ценник со штрих-кодами, было бы классно, если бы еще и шртих-код тут же автоматом проставлялся
torgul12345; +1 Ответить