Я новичок по штрих кодам
В типовом есть для номенклатуру, а для ОС нету.
Можно ли организвать самописную обработку для печати ШК основных средств.
У кого есть опыть, поделитесь плиз.

Можно. Опыт есть.

Мне для личного опыта: что у вас за основные средства?
А по сути вопроса: почему бы не слизать с номенклатуры?

(2) Там слишком замудрено. Хочу простой код написать.

(3) Прикрути к ОС реквизит и записывай туда циферки штрихкода - ничего сложного.

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

(5) Если организаций несколько - не взлетит, нужно отдельный реквизит...

(6) ну это уже тонкости реализации

(5) Поддерживаю, так делал

(5) Я все сделал. Просто надо печатать зебру.

(9) качаешь нужный шрифт, устанавливаешь в систему, и твой цифровой код выводишь этим шрифтом - вуаля - зЁбра :)

Создал в справочнике ОС реквизит "ШтрихКод". В кнопку печати в форме элемента написал так:

   ВысотаЭтикетки = УправлениеПользователями.ПолучитьЗначениеПоУмолчанию(глТекущийПользователь, "ПринтерЭтикетокВысота");
   ШиринаЭтикетки = УправлениеПользователями.ПолучитьЗначениеПоУмолчанию(глТекущийПользователь, "ПринтерЭтикетокШирина");
   Таб                     = Новый ТабличныйДокумент;
   Таб.ИмяПараметровПечати =    "ПАРАМЕТРЫ_ПЕЧАТИ_Этикетка"+СокрЛП(ИмяКомпьютера());
   Макет                   = ПолучитьОбщийМакет("Этикетка");
   ЭтикеткаОбласть         = Макет.ПолучитьОбласть(1,1,4,2);
   ОбластьНоменклатура     = ЭтикеткаОбласть.Области.Номенклатура;
   ОбластьШтрихкод         = ЭтикеткаОбласть.Области.ОбластьШтрихкод;
   РисунокШтрихкод         = ЭтикеткаОбласть.Рисунки.Штрихкод;
   ОбластьЦена             = ЭтикеткаОбласть.Области.Цена;

   ОбластьНоменклатура.ВысотаСтроки = ВысотаЭтикетки * 2.65 * 0.3;
   ОбластьШтрихкод.ВысотаСтроки     = ВысотаЭтикетки * 2.65 * 0.5;
   РисунокШтрихкод.Расположить(ОбластьШтрихкод);
   ОбластьЦена.ВысотаСтроки         = ВысотаЭтикетки * 2.65 * 0.2;

   ЭтикеткаОбласть.Область(2,2,2,2).ШиринаКолонки = ШиринаЭтикетки*0.53;

       ОбластьГраницаСправа      = Макет.ПолучитьОбласть(2,4,4,4);
       ОбластьНизГраницыСправа   = Макет.ПолучитьОбласть(5,4,5,4);
       ОбластьГраницаСнизу       = Макет.ПолучитьОбласть(6,2,6,2);
       ОбластьНачалоГраницыСнизу = Макет.ПолучитьОбласть(6,1,6,1);

       ОбластьГраницаСправа.Рисунки.ГраницаСправа.Высота = ВысотаЭтикетки*1.09;
       ОбластьГраницаСнизу.Рисунки.ГраницаСнизу.Ширина   = ШиринаЭтикетки;

       ОбластьГраницаСправа.Область(1,1,1,1).ВысотаСтроки = ВысотаЭтикетки*2.65;
       ОбластьГраницаСнизу.Область(1,1,1,1).ШиринаКолонки = ШиринаЭтикетки*0.53;

   Таб.Вывести(ЭтикеткаОбласть);
   ЭтикеткаОбласть.Рисунки.Штрихкод.Объект.ТипКода = 1;
   ЭтикеткаОбласть.Рисунки.Штрихкод.Объект.Сообщение = ШтрихКод;
   ОбластьНоменклатура.Текст = СокрЛП(Наименование);
   Таб.Защита              = Ложь;
   Таб.ТолькоПросмотр      = Истина;
   Таб.ОтображатьСетку     = Ложь;
   Таб.ОтображатьЗаголовки = Ложь;
   Таб.Показать("Этикетка");



Но почему то пусто.

(11) Ну так а что в ячейке "ЭтикеткаОбласть.Области.ОбластьШтрихкод;" ??? Параметр, шаблон, текст??? Какие свойства??? Какой шрифт???

(11) а зачем ты вот с этим так заморачиваешься???

" ОбластьНоменклатура.ВысотаСтроки = ВысотаЭтикетки * 2.65 * 0.3;
   ОбластьШтрихкод.ВысотаСтроки     = ВысотаЭтикетки * 2.65 * 0.5;
   РисунокШтрихкод.Расположить(ОбластьШтрихкод);
   ОбластьЦена.ВысотаСтроки         = ВысотаЭтикетки * 2.65 * 0.2;"

????

капец. открыть типовую обработку печать этикетки и посмотреть как там формируется штрих-код - дело 5 мин

(12) В типовом есть общий макет, который используется  при печати номенклатуры, я ипользовал этот макет.
Т.е. там уже все настроено

На, там всё просто: http://files.mail.ru/XJPCEI
Это внешняя печатная форма для документа "ИнвентаризацияТоваровНаСкладе" УПП. Недоделанная, но тебе сгодится :)

Вроде получилось. Но!
Что означает контрольный исмвол EAN в конце. Дя чего это?

(17) это наследие от древних египтян. не вникай

Пока норм. Всем пасиб