В программах 1С Предприятие применяется несколько разных вариантов штрихкодов

1. Штрихкод в регламентированных отчётах
Расположен в левом верхнем углу налоговой декларации. Для печати используется установленный шрифт (true type font) EANGNIVC.TTF.
Выглядит - чёрные вертикальные полоски-чёрточки в левом верхнем углу

Когда не установлен - печатаются очень крупные цифры вида !510

Для установки:
1. Скачайте файл EANGNIVC.TTF в интернете
2. Скопируйте его в каталог со шрифтами (Пуск → Настройка → Панель управления → Шрифты).

Иногда штрихкод установлен, и всё равно не печатается. Найдите шрифт EANGNIVC в каталоге со шрифтами и покликайте мышкой по нему. Вы его активируете, и теперь переходите в 1С - всё получится.

2. Штрихкод в конфигурации Торговля и склад

В конфигурации Торговля и склад на этикетках с товаром применяется компонента ActiveBarcode. Установочный файл Barcod.ocx находится в каталоге с базой данных 1С.

1. Для установки скопируйте файл Barcod.ocx в каталог C:Windows\System32\
2. Нажмите кнопку Пуск и выберите пункт Выполнить
3. В поле Открыть введите команду regsvr32.exe C:Windows\System32\barcode.ocx и нажмите кнопку ОК

3. Двухмерный штрихкод

Используется в 1С Бухгалтерии при печати налоговых деклараций в 2007 году.

1. На титульном листе на второй закладке установите галочку Печатать двухмерный штрихкод.
2. Нажмите кнопку Печать - выберите строку Печатать все листы или Показать все листы.

Программа сформирует файл для ИФНС, потом преобразует его в двухмерный штрихкод и распределит его на нескольких листах декларации.

Для установки:
1. Скачайте файл SETUP_BARCODELIB.EXE
2. Запустите его с правами администратора.

4. Модуль печати машиночитаемых бланков

Используется в 1С Бухгалтерии при печати налоговых деклараций с 2008 года.

1. На титульном листе нажмите кнопку Печать
2. Выберите первую или вторую строку Печатать сразу форму с двухмерным штрихкодом PDF417 или Показать бланк формы с двухмерным штрихкодом PDF417.

Программа сформирует файл для ИФНС, потом преобразует его в двухмерный штрихкод и распределит его на нескольких листах декларации.

Для установки:
1. Скачайте файл modyl.rar, это архив, внутри программа установки и инструкция.
2. Запустите программу установки с правами администратора.

Была поставлена задача на предприятии, где ежедневно выписывается по 300-500 накладных организовать штрихкодирование документов, для более удобной работы с бумажным носителем в дальнейшем. И вот результат…

Конфигурация “Торговля и склад”. Хотелось сделать как можно проще и быстрее, и в тоже время надежно. На решение задачи ушло 1,5 часа. И так приступим….

У нас будет использоваться штрихкод EAN13. Создаем общий реквизит документов:


Общий реквизит документов "EAN13"
Тип – “Строка”, длина – 13, отбор по реквизиту

Добавляем в глобальный модуль процедуру

Код 1C v 7.x

 //******************************************************************************

// глСформироватьШтрихкодДокумента(Конт)

//

// Параметры:

//  Конт - контекст документа для которого необходимо сформировать штрихкод

//    EAN13- реквизит документа содержащий штрихкод

// Возвращаемое значение:

//  Нет                

//

// Описание:

//  На основании номера документа и вида документа формирует штрихкод в формате

//  EAN

//

Процедура глСформироватьШтрихкодДокумента(Конт, EAN13) Экспорт

   

    Если ПустаяСтрока(EAN13) = 1 Тогда

   

        ПрефиксыДокументов = СоздатьОбъект("СписокЗначений");



        ПрефиксыДокументов.ДобавитьЗначение("001", "Реализация");



        ПрефиксыДокументов.ДобавитьЗначение("002", "СчетФактураВыданный");               

        // и т.д



        КодДокумента        = СокрЛП(Прав(Конт.НомерДок,7));

        КодВидаДокумента    = ПрефиксыДокументов.Получить(Конт.Вид());

   

       

        Префикс = Прав(ДатаГод(Конт.ДатаДок), 2);

   

        ИспКолво = 10;

       

        Штрихкод = СимволыВЦифры(Прав(СокрЛП(КодДокумента+КодВидаДокумента),

                   ИспКолво));

        Штрихкод = Префикс + глДополнитьСтрокуЛ(Штрихкод, "0", ИспКолво);

                 

        EAN13 = Штрихкод + глКонтрольныйСимволEAN(Штрихкод, 13);

    КонецЕсли;

                   

КонецПроцедуры // глСформироватьШтрихкодДокумента()

После этого в документы, которым будут присваиваться штрихкоды добавляем вызов
вышеописанного в процедуру "ПриЗаписи()"

Код 1C v 7.x

 Процедура ПриЗаписи()

   //..............................

   глСформироватьШтрихкодДокумента(Контекст, EAN13);

КонецПроцедуры

В результате при первой записи документа ему будет присвоен штрихкод состоящий
из следующих блоков:
1. год документа (2 символа);
2. семь цифр справа от номера документа;
3. код вида документа (3 символа);
4. контрольный символ;

Осталось только вставить в печатную форму объект ActiveBarcode и настроить
необходимые свойства у него.

А вот и результат


Автор: Александр Шкураев