|   |   | 
| 
 | Переменная нужна заглавными буквами | ☑ | ||
|---|---|---|---|---|
| 0
    
        example221 22.01.20✎ 13:34 | 
        Добрый день форумчане,подскажите пожалуйста бестолковому,Вот у меня есть макет ценника в нем есть переменная <Наименование>,как сделать так чтобы на ценники наименование выдавало заглавными буквами?     | |||
| 1
    
        palsergeich 22.01.20✎ 13:35 | 
        Врег(Наименование)     | |||
| 2
    
        piter3 22.01.20✎ 13:35 | 
        ВРег     | |||
| 3
    
        example221 22.01.20✎ 13:39 | 
        (2) (1) Сейчас попробую спасибо.     | |||
| 4
    
        example221 22.01.20✎ 13:51 | 
        А куда именно этот врег?     | |||
| 5
    
        piter3 22.01.20✎ 13:52 | 
        (4) тебе написали уже Врег(Наименование)     | |||
| 6
    
        example221 22.01.20✎ 14:05 | 
        у меня наименование добавляется вот так 
 Если Строка=Неопределено Тогда Строка = Номенклатура.Добавить(); КонецЕсли; строка.Товар = Ссылка; строка.Артикул = сокрлп(Ссылка.Артикул); строка.Наименование = сокрлп(Ссылка.НаименованиеПолное); строка.Страна = Ссылка.СтранаПроисхождения; строка.Цена = _ПолучитьЦену(ТипЦен,Ссылка); | |||
| 7
    
        example221 22.01.20✎ 14:05 | 
        макет = получитьмакет("Средний100х80");
 обл_ценник = макет.ПолучитьОбласть("Ценник|Товар"); выведено_в_строке = 0; выведено_строк = 0; Для каждого стр Из Номенклатура Цикл обл_ценник.Параметры.Заполнить(стр); Попытка обл_ценник.Параметры.Описание = стр.Товар.Комментарий; Исключение КонецПопытки; обл_ценник.Параметры.Организация = ПараметрыСеанса.Организация; Если выведено_в_строке=0 Тогда ТабДокумент.Вывести(обл_ценник); Иначе ТабДокумент.Присоединить(обл_ценник); КонецЕсли; выведено_в_строке = выведено_в_строке + 1; Если выведено_в_строке=2 Тогда выведено_в_строке = 0; выведено_строк = выведено_строк + 1; КонецЕсли; Если выведено_строк=3 Тогда ТабДокумент.ВывестиГоризонтальныйРазделительСтраниц(); выведено_строк = 0; КонецЕсли; КонецЦикла; ТабДокумент.ПолеСлева = 5; ТабДокумент.ПолеСправа = 5; ТабДокумент.ПолеСверху = 10; ТабДокумент.ПолеСнизу = 10; | |||
| 8
    
        example221 22.01.20✎ 14:05 | 
        КлючУникальности = Строка(ТекущаяДата()); //уникальность открытых форм будем определять по тек. времени ...
 ПечатнаяФорма = ПолучитьОбщуюФорму("ПечатнаяФормаДокументов", , КлючУникальности); Пока ПечатнаяФорма.Открыта() Цикл КлючУникальности = КлючУникальности + "0"; //... а если в одну секунду открыли, степень уникальности повысим ПечатнаяФорма = ПолучитьОбщуюФорму("ПечатнаяФормаДокументов", , КлючУникальности); КонецЦикла; //Попытка // Документ.ИмяПараметровПечати = НазваниеПечатнойФормы; //Исключение //КонецПопытки; //Документ.КлючПараметровПечати = НазваниеПечатнойФормы; //зададим параметры макета ПечатнаяФорма.Объект = ЭтотОбъект; ПечатнаяФорма.ЭлементыФормы.ТабличныйДокумент.ПолеСлева = Документ.ПолеСлева; ПечатнаяФорма.ЭлементыФормы.ТабличныйДокумент.ПолеСправа = Документ.ПолеСправа; ПечатнаяФорма.ЭлементыФормы.ТабличныйДокумент.ПолеСверху = Документ.ПолеСверху; ПечатнаяФорма.ЭлементыФормы.ТабличныйДокумент.ПолеСнизу = Документ.ПолеСнизу; ПечатнаяФорма.ЭлементыФормы.ТабличныйДокумент.ОриентацияСтраницы = Документ.ОриентацияСтраницы; //покажем СписокКопируемыхСвойств = "АвтоМасштаб,Защита,ИмяПараметровПечати,КлючПараметровПечати,ИмяПринтера,ИмяСохраненияПоложенияОкна,ИтогиСнизу,ИтогиСправа,КодЯзыкаМакета,КоличествоЭкземпляров,НаправлениеПерехода,ОбластьПечати,ОриентацияСтраницы,ОтображатьГруппировки,ОтображатьЗаголовки,ОтображатьСетку,ПовторятьПриПечатиКолонки,ПовторятьПриПечатиСтроки,ПолеСверху,ПолеСлева,ПолеСнизу,ПолеСправа,РазмерКолонтитулаСверху,РазмерКолонтитулаСнизу,СохранятьСвойстваОтображения,ТекущаяОбласть,ТолькоПросмотр,ФиксацияСверху,ФиксацияСлева,ФиксированныйФон,ФоноваяКартинка,ЧерноБелыйПросмотр"; ЗаполнитьЗначенияСвойств(ПечатнаяФорма.ЭлементыФормы.ТабличныйДокумент, Документ, СписокКопируемыхСвойств, ""); ПечатнаяФорма.ЭлементыФормы.ТабличныйДокумент.Вывести(Документ); ПечатнаяФорма.ЭлементыФормы.ТабличныйДокумент.ОтображатьЗаголовки = Ложь; ПечатнаяФорма.ЭлементыФормы.ТабличныйДокумент.ОтображатьСетку = Ложь; ПечатнаяФорма.ЭлементыФормы.ТабличныйДокумент.Защита = обПраво("ЗащитаПечатныхФорм",глПрава); ПечатнаяФорма.ЭлементыФормы.ТабличныйДокумент.ТолькоПросмотр = обПраво("ОткрытиеПечатныхФормДокументовВРежимеПросмотра",глПрава); ПечатнаяФорма.Открыть(); | |||
| 9
    
        example221 22.01.20✎ 14:06 | 
        куда врег     | |||
| 10
    
        Ненавижу 1С гуру 22.01.20✎ 14:07 | 
        строка.Наименование = СокрЛП(ВРег(Ссылка.НаименованиеПолное));     | |||
| 11
    
        example221 22.01.20✎ 14:10 | 
        (10) Спасибо,огромное.^_^     | |||
| 12
    
        example221 22.01.20✎ 14:15 | 
        (10) Сработало,спасибочки)     | |||
| 13
    
        example221 22.01.20✎ 14:18 | 
        Закрыто     | 
 
 | Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |