Как внести штрих-код в печатную форму #249854

Добрый день.Подскажите как внести штрих-код в печатную форму ТОРГ-12(в ТиС) или с чего начать и где посмотреть как это можно сделать. Возможно тема уже поднималась, но я не нашла по поиску то что мне нужно.Всем спасибо заранее.

натрави посик на слово "barcode.ocx"

ИМХО в Торг-12 лучше не надо - все-таки форма унифицированная, а вот в какую-либо произвольную - можно. Смотри как этикетки-наклейки печатаются.

копипаст - кратчайший путь.

Я это сделала, а дальше не совсем понимаю. То есть мне нужно чтобы в определенном поле печатался штрих-код из справочника номенклатура.

в свойствах объекта есть строчка Таб.ТекущийОбъект.Text=СокрЛП(Товар.Штрихкод)

Видимо глупый вопрос задала... А если коды номенклатуры занесены в иксель, и каждому коду соответствует свой штрих-код как в этом случае прописать штрих-код в форме?

Штрих-коды хранятся не в справочнике Номенклатура, а в справочнике Единицы измерения номенклатуры. Не понял ...

имхо, напротив, фсё ясно...

А мне не очень ясно, то есть у меня код товара лежит в икселе и там же соответствующий ему штрих-код, как мне прописать я пока не понимаю, то есть я должна при выборе товара, открыть икселевский файл найти там соответствующий ему код и штрих-код и прописать это в Доке Реализация.

А тебе не кажется, что умнее было бы перенести ШК в справочник единиц измерения ? Зачем хранить их в екселе ?

Наверное умнее(у меня не было подобных задач до этого).а как это сделать?

Воспользуйся шрифтом EAN-13 (GniVC) - идет в составе регламентированной отчетности, так же его можно скачать с сайта ГНИ.

У каждого товара есть ссылка на основную ед.измерения. В твоем случае проще будет вбить ШК из ексела в нее. А дальше используй штатные механизмы работы с ШК.

у меня штрих-код уже установлен- он EAN8a

и еще их 270 штук, в смысле товаров

а где почитать про штатные механизмы с ШК?

Все пропали...А я туплю страшно. Что дальше делать- вытащить номера штрих кода из справочника единицы, а потом вставить рисунок в печатную форму или как?

Покури вот это: там готовая процедура, которая из числа сделает собственно штрихкод

+ То есть, все что тебе останется вытащить штрихкод из справочника (все цифири кроме последней) и подсунуть этой процедуре. Шрифты которые прилагаются надо установить, они и есть ШК

Правда там EAN13, получится ли EAN8 не знаю. А вообще ты уверена что тебе нужно именно линии печатать, может просто цифры?

А можно и без OCX - написать специальным шрифтом

да, мне нужно линии печатать

см

А может все же вернуться к тому что у меня в икселе есть штрихкоды, не числа а именно линии с числами, и добавлять оттуда?

Галина, по этапам: 1. в форме в ячейку размещаете объект "картинка" 2. в свойствах объекта картинка в поле "текст" пишите ИсхТабл.ТекущийОбъект.Text=Докум.Номенклатура.БазоваяЕдиница.ШтрихКод естественно, что штрих код должен предварительно быть занесен в нужный справочник

По-моему там не то, пытался как-то прикрутить, может руки...

Н-да, но каков изврат :)

Спасибо Вам большое, сейчас попробую.

Галина. а  вы умеете работать с экселем по OLE- интерфейсу? Это задачка не проще, а сложнее... лучше один раз перекачать коды в 1с

К сожалению, не умею но очень хочу научиться, потому что много таких задач, которые можно решать экселем по OLE. Но я в данном случае набью коды вручную.

Торин  - Я сделала как Вы написали, но к сожалению штрих-код не появился в ячейке а там пропечатывается ИсхТабл.ТекущийОбъект.Text=Докум.Номенклатура.БазоваяЕдиница.ШтрихКод -

В справочник я занесла числа, а картинку штрих-кода сохранила в формате bmp

Торин, ну куда Вы пропали?

Ерунду он написал, имелось ввиду грузить из файла как я понял. Открой синтаксис-помощник, раздел картинка, там написано как это сделать.

Как-то добилась что картинка выходит, но также возникает ошибка пишет ИсхТабл.ТекущийОбъект.Text=Докум.Номенклатура.БазоваяЕдиница.ШтрихКод что переменная Докум НЕ НАЙДЕНА?

+ То есть для каждого ШК создаешь одноименный файл bmp (название - ШК в виде цифр) в котором собственно штрихкод (полоски), и этот файл грузишь. Но это жууткий изврат, разберись со шрифтами, или barcode.ocx, дело говорю, иначе потом все равно переделывать придется.

Я понимаю что это извращение, но у меня что-то так медленно продвигается- во-первых barcode.ocx- что это, уже установленные штрихкоды в папке FONT в WINXP или программа?

ВК'шка, должна с торговлей идти, по идее денег стоит, но должна быть нахаляву, если куплена ТиС, по ссылке в штрихкоды с примером как пользоваться, но там есть EAN13 и нет EAN8 (по крайней мере в примере, как в шрифтах не помню, давно пользовался, да и делал EAN13, разобраться очень быстро получилось), про регламентированную, имхо, там не EAN вообще (может просто я нужного не нашел).

Хорошо, спасибо. Буду пытаться.

Лови

Это ЧО?

EAN8

Ну-ну...

Ну-ну что? Что не устраивает?

А может быть все же кто-нибудь подскажет как через эксел по OLE перетащить?

Большущее спасибо за участие- сейчас проверю вариант 40.

Проглядел, что шрифт прилагается...

+ Заглянув в обработку думал прикалываешься

Я теперь совсем запуталась- как мне в печатную форму вставить соответствующий штрих-код?

Обыкновенно, втыкаешь переменную в таблицу, задаешь ей шрифт из и присваиваешь ей нужный код + восклицательные знаки. Если оно работает конечно, не проверял.

+ То есть делай все также, как если бы просто цифры выводила

А на примере не ясно ? Там же всё просто как грабли... Да работает ...будьте покойны.. :)

я не поняла как увязать с номенклатурой у которой выставлен штрих-код в справочнике.

в общем случае Данные = Номенклатура.БазоваяЕдиница.ШтрихКод; ЗЫ: + немного преобразовать придётся , чтоб с "!" выводился... смотри на пример.

Уважаемая Галина. приношу свои извинения. я на самом деле начал с середины а не с начала. Чтобы описанный мной код работал вначале необходимо сделать следующее: 1. Найти (например в и-нете) файл barcode.ocx 2 Зарегистрировать его из командной строки командой RegSVR32 Barcode.ocx 3. В нужной ячейке печатной формы нажать правую клавишу мыши и выбрать из выпадающего меню "Специальная вставка" 4 из специальных вставок (если их будет несколько) выбрать "Active Barcode" 5/ В свойстве текст получившегося рисунка (1с вставляет специальные вставки как рисунок) набрать то чтоя написал выше. 6. ИсхТабл.ТекущийОбъект.Text= Номенклатура.БазоваяЕдиница.ШтрихКод 7. докум - не надо. У меня стоит докум потому что это реализовано как внешняя печатная форма и докум - это передаваемый в форму контекст документа. У вас в форме документа  номенклатура и так определена...

после этого все будет работать, если только у вас близкая к стандартной конфигурация.... С уважением...

да. тип кода устанвливается в свойствах объекта "Active Barcode". хоть  EAN8. хоть  EAN13

Я попробую и Ваш метод Торин. Большое спасибо всем!Я оченно Вам признательна и благодарна.

Торин у меня только почему-то выходить только текст, хотя Barcode.ocx установила

Торин я установила Barcode но он встал как пакет,а дальше просто ерунда, если я беру другую ячейку и пытаюсь там через спец. вставку сделать мне разрешается ввести только текст.