Синоним перечесления на укр. языке

(6) Взял из типовой, модуль локализация:

// Возвращает код языка интерфейса в формате ru/uk
Функция КодЯзыкаИнтерфейса() Экспорт

Возврат ТекущийЯзык().КодЯзыка;

КонецФункции // КодЯзыкаИнтерфейса()

//Если параметр КодЯзыка совпадает с кодом языка интерфейса (язКодЯзыкаИнтерфейса()),
// то представление получается через ОбъектМетаданных.Представление()
//Если не совпадает, то возвращаются синонимы в зависимости от имени объекта
//
// Параметры
// Объект - Ссылка на объект, для которого нужно получить перевод
// КодЯзыка – Строка – код языка в формате uk/ru
//
Функция ПолучитьЛокализованныйСинонимОбъекта(Ссылка, КодЯзыка) Экспорт

МетаданныеДляСсылки = Ссылка.Метаданные();
ПолноеИмяОбъектаМетаданных = МетаданныеДляСсылки.ПолноеИмя();

Если Метаданные.Документы.Содержит(МетаданныеДляСсылки) Тогда
Если КодЯзыка = КодЯзыкаИнтерфейса() Тогда
// "переводить" не нужно
Возврат МетаданныеДляСсылки.Синоним;
КонецЕсли;
// это документ
ИмяДляПеревода = МетаданныеДляСсылки.Имя;
ИначеЕсли Метаданные.Перечисления.Содержит(МетаданныеДляСсылки) Тогда
// это перечисление
Если КодЯзыка = КодЯзыкаИнтерфейса() Тогда
// "переводить" не нужно
Возврат Строка(Ссылка);
КонецЕсли;
// имя элемента перечисления получить из метаданных "трудно",
// поэтому для перевода будем использовать синоним на языке интерфейса
ИндексЗначения = Перечисления[МетаданныеДляСсылки.Имя].Индекс(Ссылка);
ИмяДляПеревода = МетаданныеДляСсылки.ЗначенияПеречисления[ИндексЗначения].Имя;
КонецЕсли;

РезультатПеревода = "";
РезультатПеревода = ОбработатьПереводы(ПолноеИмяОбъектаМетаданных, ИмяДляПеревода, КодЯзыка);
//Если РезультатПеревода = "" Тогда
// ОбработатьДополнительныеПереводы(ПолноеИмяОбъектаМетаданных, ИмяДляПеревода, КодЯзыка);
//КонецЕсли;

Возврат РезультатПеревода;
КонецФункции // ПредставлениеОбъекта()

Функция ОбработатьПереводы(ПолноеИмяОбъектаМетаданных, ИмяДляПеревода, КодЯзыка)

Если ПолноеИмяОбъектаМетаданных = "Документ.АвансовыйОтчет" Тогда
Возврат НСтр( "ru='Авансовый отчет';uk='Авансовий звіт';" ,КодЯзыка);
ИначеЕсли ПолноеИмяОбъектаМетаданных = "Документ.ВнутреннийЗаказ" Тогда
Возврат НСтр( "ru='Внутренний заказ';uk='Внутрішнє замовлення';" ,КодЯзыка);
ИначеЕсли ПолноеИмяОбъектаМетаданных = "Документ.ВозвратТоваровОтПокупателя" Тогда
Возврат НСтр( "ru='Возврат товаров от покупателя';uk='Повернення товарів від покупців';" ,КодЯзыка);
ИначеЕсли ПолноеИмяОбъектаМетаданных = "Документ.ВозвратТоваровПоставщику" Тогда
Возврат НСтр( "ru='Возврат товаров поставщику';uk='Повернення товарів постачальнику';" ,КодЯзыка);
ИначеЕсли ПолноеИмяОбъектаМетаданных = "Документ.ВозвратТоваровПоставщикуИзНТТ" Тогда
Возврат НСтр( "ru='Возврат товаров поставщику из НТТ';uk='Повернення товарів постачальнику з НТТ';" ,КодЯзыка);
ИначеЕсли ПолноеИмяОбъектаМетаданных = "Документ.ЗаказПокупателя" Тогда
Возврат НСтр( "ru='Заказ покупателя';uk='Замовлення покупця';" ,КодЯзыка);
ИначеЕсли ПолноеИмяОбъектаМетаданных = "Документ.ЗаказПоставщику" Тогда
Возврат НСтр( "ru='Заказ поставщику';uk='Замовлення постачальнику';" ,КодЯзыка);
ИначеЕсли ПолноеИмяОбъектаМетаданных = "Документ.ИнвентаризацияТоваровНаСкладе" Тогда
Возврат НСтр( "ru='Инвентаризация товаров на складе';uk='Інвентаризація товарів на складі';" ,КодЯзыка);
ИначеЕсли ПолноеИмяОбъектаМетаданных = "Документ.ИнвентаризацияТоваровОтданныхНаКомиссию" Тогда
Возврат НСтр( "ru='Инвентаризация товаров отданных на комиссию';uk='Інвентаризація товарів переданих на комісію';" ,КодЯзыка);
ИначеЕсли ПолноеИмяОбъектаМетаданных = "Документ.КорректировкаДолга" Тогда
Возврат НСтр( "ru='Корректировка долга';uk='Коректування боргу';" ,КодЯзыка);
ИначеЕсли ПолноеИмяОбъектаМетаданных = "Документ.КорректировкаДолгаПоВозвратнойТаре" Тогда
Возврат НСтр( "ru='Корректировка долга по возвратной таре';uk='Коректування боргу по зворотній тарі';" ,КодЯзыка);
ИначеЕсли ПолноеИмяОбъектаМетаданных = "Документ.ОтчетКомиссионераОПродажах" Тогда
Возврат НСтр( "ru='Отчет комиссионера о продажах';uk='Звіт комісіонера про продаж';" ,КодЯзыка);
ИначеЕсли ПолноеИмяОбъектаМетаданных = "Документ.ОтчетКомитентуОПродажах" Тогда
Возврат НСтр( "ru='Отчет комитенту о продажах товаров';uk='Звіт комітенту про продаж';" ,КодЯзыка);
ИначеЕсли ПолноеИмяОбъектаМетаданных = "Документ.ОтчетОРозничныхПродажах" Тогда
Возврат НСтр( "ru='Отчет о розничных продажах';uk='Звіт про роздрібний продаж';" ,КодЯзыка);
ИначеЕсли ПолноеИмяОбъектаМетаданных = "Документ.ОприходованиеТоваров" Тогда
Возврат НСтр( "ru='Оприходование товаров';uk='Оприбуткування товарів';" ,КодЯзыка);
ИначеЕсли ПолноеИмяОбъектаМетаданных = "Документ.ПеремещениеТоваров" Тогда
Возврат НСтр( "ru='Перемещение товаров';uk='Переміщення товарів';" ,КодЯзыка);
ИначеЕсли ПолноеИмяОбъектаМетаданных = "Документ.ПлатежноеПоручениеВходящее" Тогда
Возврат НСтр( "ru='Платежное поручение входящее';uk='Платіжне доручення отримане';" ,КодЯзыка);
ИначеЕсли ПолноеИмяОбъектаМетаданных = "Документ.ПлатежноеПоручениеИсходящее" Тогда
Возврат НСтр( "ru='Платежное поручение исходящее';uk='Платіжне доручення ';" ,КодЯзыка);
ИначеЕсли ПолноеИмяОбъектаМетаданных = "Документ.ПлатежноеТребованиеВыставленное" Тогда
Возврат НСтр( "ru='Платежное требование выставленное';uk='Платіжна вимога ';" ,КодЯзыка);
ИначеЕсли ПолноеИмяОбъектаМетаданных = "Документ.ПлатежноеТребованиеПолученное" Тогда
Возврат НСтр( "ru='Платежное требование полученное';uk='Платіжна вимога ';" ,КодЯзыка);
ИначеЕсли ПолноеИмяОбъектаМетаданных = "Документ.ПлатежноеТребованиеПоручениеВыставленное" Тогда
Возврат НСтр( "ru='Платежное требование поручение выставленное';uk='Платіжна вимога-доручення ';" ,КодЯзыка);
ИначеЕсли ПолноеИмяОбъектаМетаданных = "Документ.ПлатежноеТребованиеПоручениеПолученное" Тогда
Возврат НСтр( "ru='Платежное требование поручение полученное';uk='Платіжна вимога-доручення ';" ,КодЯзыка);
ИначеЕсли ПолноеИмяОбъектаМетаданных = "Документ.ПлатежныйОрдерПоступлениеДенежныхСредств" Тогда
Возврат НСтр( "ru='Платежный ордер, поступление денежных средств';uk='Платіжний ордер, надходження грошових коштів';" ,КодЯзыка);
ИначеЕсли ПолноеИмяОбъектаМетаданных = "Документ.ПлатежныйОрдерСписаниеДенежныхСредств" Тогда
Возврат НСтр( "ru='Платежный ордер, списание денежных средств';uk='Платіжний ордер, списання грошових коштів';" ,КодЯзыка);
ИначеЕсли ПолноеИмяОбъектаМетаданных = "Документ.ПоступлениеДопРасходов" Тогда
Возврат НСтр( "ru='Поступление доп. расходов';uk='Надходження дод. витрат';" ,КодЯзыка);
ИначеЕсли ПолноеИмяОбъектаМетаданных = "Документ.ПоступлениеТоваровУслуг" Тогда
Возврат НСтр( "ru='Поступление товаров и услуг';uk='Надходження товарів та послуг';" ,КодЯзыка);
ИначеЕсли ПолноеИмяОбъектаМетаданных = "Документ.ПоступлениеТоваровУслугВНТТ" Тогда
Возврат НСтр( "ru='Поступление товаров и услуг в НТТ';uk='Надходження товарів та послуг у НТТ';" ,КодЯзыка);
ИначеЕсли ПолноеИмяОбъектаМетаданных = "Документ.ПриходныйКассовыйОрдер" Тогда
Возврат НСтр( "ru='Приходный кассовый ордер';uk='Прибутковий касовий ордер';" ,КодЯзыка);
ИначеЕсли ПолноеИмяОбъектаМетаданных = "Документ.РасходныйКассовыйОрдер" Тогда
Возврат НСтр( "ru='Расходный кассовый ордер';uk='Видатковий касовий ордер';" ,КодЯзыка);
ИначеЕсли ПолноеИмяОбъектаМетаданных = "Документ.ПриходныйОрдерНаТовары" Тогда
Возврат НСтр( "ru='Приходный ордер на товары';uk='Прибутковий ордер на товари';" ,КодЯзыка);
ИначеЕсли ПолноеИмяОбъектаМетаданных = "Документ.РасходныйОрдерНаТовары" Тогда
Возврат НСтр( "ru='Расходный ордер на товары';uk='Видатковий ордер на товари';" ,КодЯзыка);
ИначеЕсли ПолноеИмяОбъектаМетаданных = "Документ.РеализацияТоваровУслуг" Тогда
Возврат НСтр( "ru='Реализация товаров и услуг';uk='Реалізація товарів та послуг';" ,КодЯзыка);
ИначеЕсли ПолноеИмяОбъектаМетаданных = "Документ.СчетНаОплатуПокупателю" Тогда
Возврат НСтр( "ru='Счет на оплату покупателю';uk='Рахунок на оплату покупцю';" ,КодЯзыка);
ИначеЕсли ПолноеИмяОбъектаМетаданных = "Документ.СчетНаОплатуПоставщика" Тогда
Возврат НСтр( "ru='Счет на оплату поставщика';uk='Рахунок на оплату постачальнику';" ,КодЯзыка);
ИначеЕсли ПолноеИмяОбъектаМетаданных = "Документ.ЧекККМ" Тогда
Возврат НСтр( "ru='Товарний чек';uk='Товарний чек';" ,КодЯзыка);
ИначеЕсли ПолноеИмяОбъектаМетаданных = "Документ.ПланируемоеПоступлениеДенежныхСредств" Тогда
Возврат НСтр( "ru='Планируемое поступление денежных средств';uk='Плановане надходження грошових коштів';" ,КодЯзыка);
КонецЕсли;

Если ПолноеИмяОбъектаМетаданных = "Перечисление.ПолФизическихЛиц" Тогда
Если ИмяДляПеревода = "Женский" Тогда
Возврат НСтр( "uk='Жіночий';" ,КодЯзыка);
ИначеЕсли ИмяДляПеревода = "Мужской" Тогда
Возврат НСтр( "ru='Мужской';uk='Чоловічий';" ,КодЯзыка);
КонецЕсли;

ИначеЕсли ПолноеИмяОбъектаМетаданных = "Перечисление.СтавкиНДС" Тогда
Если ИмяДляПеревода = "БезНДС" Тогда
Возврат НСтр( "ru='Без НДС';uk='Без ПДВ';" ,КодЯзыка);
ИначеЕсли ИмяДляПеревода = "НДС0" Тогда
Возврат НСтр( "ru='0%';uk='0%';" ,КодЯзыка);
ИначеЕсли ИмяДляПеревода = "НДС20" Тогда
Возврат НСтр( "ru='20%';uk='20%';" ,КодЯзыка);
ИначеЕсли ИмяДляПеревода = "НеНДС" Тогда
Возврат НСтр( "ru='Не НДС';uk='Не ПДВ';" ,КодЯзыка);
КонецЕсли;

ИначеЕсли ПолноеИмяОбъектаМетаданных = "Перечисление.ТипыСкладов" Тогда
Если ИмяДляПеревода = "Оптовый" Тогда
Возврат НСтр( "ru='Оптовый';uk='Гуртовий';" ,КодЯзыка);
ИначеЕсли ИмяДляПеревода = "Розничный" Тогда
Возврат НСтр( "ru='Розничный';uk='Роздрібний';" ,КодЯзыка);
КонецЕсли;

ИначеЕсли ПолноеИмяОбъектаМетаданных = "Перечисление.ВидыОперацийЗаявкиНаРасходование" Тогда
Если ИмяДляПеревода = "ОплатаПоставщику" Тогда
Возврат НСтр( "ru='оплата поставщику';uk='оплата постачальнику';" ,КодЯзыка);
ИначеЕсли ИмяДляПеревода = "ВозвратДенежныхСредствПокупателю" Тогда
Возврат НСтр( "ru='возврат денежных средств покупателю';uk='повернення грошових коштів покупцю';" ,КодЯзыка);
ИначеЕсли ИмяДляПеревода = "ВыдачаДенежныхСредствПодотчетнику" Тогда
Возврат НСтр( "ru='выдача денежных средств подотчетнику';uk='видача грошових коштів підзвітнику';" ,КодЯзыка);
ИначеЕсли ИмяДляПеревода = "ВыдачаДенежныхСредствКассеККМ" Тогда
Возврат НСтр( "ru='выдача денежных средств в кассу ККМ';uk='видача грошових коштів в касу ЕККА';" ,КодЯзыка);
ИначеЕсли ИмяДляПеревода = "РасчетыПоКредитамИЗаймамСКонтрагентами" Тогда
Возврат НСтр( "ru='расчеты по кредитам и займам с контрагентами';uk='розрахунки за кредитами та займами з контрагентами';" ,КодЯзыка);
ИначеЕсли ИмяДляПеревода = "ПеречислениеНалога" Тогда
Возврат НСтр( "ru='перечисление налога';uk='перерахування податку';" ,КодЯзыка);
ИначеЕсли ИмяДляПеревода = "ПрочийРасходДенежныхСредств" Тогда
Возврат НСтр( "ru='прочий расход денежных средств';uk='інші витрати грошових коштів';" ,КодЯзыка);
ИначеЕсли ИмяДляПеревода = "ПрочиеРасчетыСКонтрагентами" Тогда
Возврат НСтр( "ru='прочие расчеты с контрагентами';uk='інші розрахунки з контрагентами';" ,КодЯзыка);
КонецЕсли;

ИначеЕсли ПолноеИмяОбъектаМетаданных = "Перечисление.ВидыДенежныхСредств" Тогда
Если ИмяДляПеревода = "Наличные" Тогда
Возврат НСтр( "ru='Наличные';uk='Готівка';" ,КодЯзыка);
ИначеЕсли ИмяДляПеревода = "Безналичные" Тогда
Возврат НСтр( "ru='Безналичные';uk='Безготівкова';" ,КодЯзыка);
КонецЕсли;

ИначеЕсли ПолноеИмяОбъектаМетаданных = "Перечисление.Периодичность" Тогда
Если ИмяДляПеревода = "День" Тогда
Возврат НСтр( "ru='День';uk='День';" ,КодЯзыка);
ИначеЕсли ИмяДляПеревода = "Неделя" Тогда
Возврат НСтр( "ru='Неделя';uk='Неділя';" ,КодЯзыка);
ИначеЕсли ИмяДляПеревода = "Декада" Тогда
Возврат НСтр( "ru='Декада';uk='Декада';" ,КодЯзыка);
ИначеЕсли ИмяДляПеревода = "с" Тогда
Возврат НСтр( "ru='Місяць';uk='Місяць';" ,КодЯзыка);
ИначеЕсли ИмяДляПеревода = "Полугодие" Тогда
Возврат НСтр( "ru='Полугодие';uk='Півріччя';" ,КодЯзыка);
ИначеЕсли ИмяДляПеревода = "Год" Тогда
Возврат НСтр( "ru='Год';uk='Рік';" ,КодЯзыка);
КонецЕсли;

ИначеЕсли ПолноеИмяОбъектаМетаданных = "Перечисление.СпособыРаспределенияДопРасходов" Тогда
Если ИмяДляПеревода = "ПоСумме" Тогда
Возврат НСтр( "ru='по сумме';uk='по сумі';" ,КодЯзыка);
ИначеЕсли ИмяДляПеревода = "ПоКоличеству" Тогда
Возврат НСтр( "ru='по количеству';uk='по кількості';" ,КодЯзыка);
ИначеЕсли ИмяДляПеревода = "ПоВесу" Тогда
Возврат НСтр( "ru='по весу';uk='по вазі';" ,КодЯзыка);
КонецЕсли;

КонецЕсли;

КонецФункции //ОбработатьПереводы()