1С Программирование

• Табличный документ
• Напечатать штрихкод 1С
• Заготовка обработки с сохранением параметров
• Общего назначения

Табличный документ

Напечатать штрихкод 1С

В интернете очень много вариантов вывода с подключением каких-то компонент. Указанный метод работает на чистой БП 3.0.140.29 без установки чего-либо.

Вывод в документ

Располагаем пустой рисунок на печатной форме, даём имя:

РисунокШК = ОбластьМакета.Рисунки.ШтрихКод;
ШтрихКод = ДанныеЗаявки.КоносаментПоЗаявке;
РисунокШК.Картинка = ПолучитьШтрихкод(РисунокШК.Ширина,РисунокШК.Высота, Штрихкод);
РисунокШК.Линия = Новый Линия(ТипЛинииРисункаТабличногоДокумента.НетЛинии);
ТД.Вывести(ОбластьМакета);

ПолучитьШтрихкод

Функция ПолучитьШтрихкод(ШиринаШтрихкода, ВысотаШтрихкода, Штрихкод)
    
    ПараметрыШтрихкода = ГенерацияШтрихкода.ПараметрыГенерацииШтрихкода();
    ПараметрыШтрихкода.GS1DatabarКоличествоСтрок = 2;
    ПараметрыШтрихкода.Ширина  = ШиринаШтрихкода;
    ПараметрыШтрихкода.Высота  = ВысотаШтрихкода;
    ПараметрыШтрихкода.ТипКода = 99;
    ПараметрыШтрихкода.ОтображатьТекст = Ложь;
    ПараметрыШтрихкода.РазмерШрифта   = 0;
    ПараметрыШтрихкода.УголПоворота   = 0;
    ПараметрыШтрихкода.Штрихкод       = Штрихкод;
    ПараметрыШтрихкода.ПрозрачныйФон  = Ложь;
    ПараметрыШтрихкода.Масштабировать = Истина;
    
    РезультатОперации = ГенерацияШтрихкода.ИзображениеШтрихкода(ПараметрыШтрихкода);
    Возврат РезультатОперации.Картинка;
    
КонецФункции

Взято тут

Заготовка обработки с сохранением параметров

Скачать

Заменить названием и идентификатором своей обработки

Добавить свои параметры в обработку

Отразить на форме

Общего назначения

Числа

ПолучитьСклоненияСтрокиПоЧислу

"Будет отправлено "+ПолучитьСклоненияСтрокиПоЧислуНаСервере("письмо",ПисьмаНаОтправку.Количество(),"ПД=Винительный")+". Продолжить?"

&НаСервереБезКонтекста
Функция ПолучитьСклоненияСтрокиПоЧислуНаСервере(Слово,Количество,Формат)
	Склонения = ПолучитьСклоненияСтрокиПоЧислу(Слово,Количество,,,Формат);
	Если НЕ ЗначениеЗаполнено(Склонения) Тогда
		Возврат Строка(Количество)+" "+Слово;
	КонецЕсли;
	Возврат Склонения[0];
КонецФункции // ПолучитьСклоненияСтрокиПоЧислуНаСервере()