Вывести на печать. Склонения в зависимости от рода.
Найденные решения
В 1с есть сервис склонений. Но если речь идет о контрагенте, то тут сложнее.
Я например анализировал отчетство покупателя (ИП) и писал когда-то так:
Я например анализировал отчетство покупателя (ИП) и писал когда-то так:
ГражданскоеЛицо=Ложь;
Если Прав(ПолноеНазваниеПокупателя,2)="на" Тогда
ПолИсполнителя=Перечисления.ПолФизическогоЛица.Женский;
ИначеЕсли Прав(ПолноеНазваниеПокупателя,2)="зи" Тогда
ПолИсполнителя=Перечисления.ПолФизическогоЛица.Женский;
ИначеЕсли Прав(ПолноеНазваниеПокупателя,2)="зы" Тогда
ПолИсполнителя=Перечисления.ПолФизическогоЛица.Женский;
ИначеЕсли Прав(ПолноеНазваниеПокупателя,2)="ич" Тогда
ПолИсполнителя=Перечисления.ПолФизическогоЛица.Мужской;
ИначеЕсли Прав(ПолноеНазваниеПокупателя,2)="лу" Тогда
ПолИсполнителя=Перечисления.ПолФизическогоЛица.Мужской;
ИначеЕсли Прав(ПолноеНазваниеПокупателя,2)="лы" Тогда
ПолИсполнителя=Перечисления.ПолФизическогоЛица.Мужской;
Иначе //по-умолчанию мужской
ПолИсполнителя=Перечисления.ПолФизическогоЛица.Мужской;
КонецЕсли;
Если Найти(ПолноеНазваниеПокупателя,"ИП ")>0 Тогда
ПолноеНазваниеПокупателя = СТРЗаменить(ПолноеНазваниеПокупателя,"ИП ", "Индивидуальный предприниматель ");
ИначеЕсли Найти(ПолноеНазваниеПокупателя,"Индивидуальный предприниматель")>0 Тогда
Иначе
ГражданскоеЛицо=Истина;
Если ПолИсполнителя=Перечисления.ПолФизическогоЛица.Мужской Тогда
ПолноеНазваниеПокупателя="Гражданин Российской Федерации "+ПолноеНазваниеПокупателя;
Иначе
ПолноеНазваниеПокупателя="Гражданка Российской Федерации "+ПолноеНазваниеПокупателя;
КонецЕсли;
КонецЕсли;
Если ПолИсполнителя=Перечисления.ПолФизическогоЛица.Мужской Тогда
Именуемый="именуемый";
Иначе
Именуемый="именуемая";
КонецЕсли;
ПоказатьОстальные ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
В 1с есть сервис склонений. Но если речь идет о контрагенте, то тут сложнее.
Я например анализировал отчетство покупателя (ИП) и писал когда-то так:
Я например анализировал отчетство покупателя (ИП) и писал когда-то так:
ГражданскоеЛицо=Ложь;
Если Прав(ПолноеНазваниеПокупателя,2)="на" Тогда
ПолИсполнителя=Перечисления.ПолФизическогоЛица.Женский;
ИначеЕсли Прав(ПолноеНазваниеПокупателя,2)="зи" Тогда
ПолИсполнителя=Перечисления.ПолФизическогоЛица.Женский;
ИначеЕсли Прав(ПолноеНазваниеПокупателя,2)="зы" Тогда
ПолИсполнителя=Перечисления.ПолФизическогоЛица.Женский;
ИначеЕсли Прав(ПолноеНазваниеПокупателя,2)="ич" Тогда
ПолИсполнителя=Перечисления.ПолФизическогоЛица.Мужской;
ИначеЕсли Прав(ПолноеНазваниеПокупателя,2)="лу" Тогда
ПолИсполнителя=Перечисления.ПолФизическогоЛица.Мужской;
ИначеЕсли Прав(ПолноеНазваниеПокупателя,2)="лы" Тогда
ПолИсполнителя=Перечисления.ПолФизическогоЛица.Мужской;
Иначе //по-умолчанию мужской
ПолИсполнителя=Перечисления.ПолФизическогоЛица.Мужской;
КонецЕсли;
Если Найти(ПолноеНазваниеПокупателя,"ИП ")>0 Тогда
ПолноеНазваниеПокупателя = СТРЗаменить(ПолноеНазваниеПокупателя,"ИП ", "Индивидуальный предприниматель ");
ИначеЕсли Найти(ПолноеНазваниеПокупателя,"Индивидуальный предприниматель")>0 Тогда
Иначе
ГражданскоеЛицо=Истина;
Если ПолИсполнителя=Перечисления.ПолФизическогоЛица.Мужской Тогда
ПолноеНазваниеПокупателя="Гражданин Российской Федерации "+ПолноеНазваниеПокупателя;
Иначе
ПолноеНазваниеПокупателя="Гражданка Российской Федерации "+ПолноеНазваниеПокупателя;
КонецЕсли;
КонецЕсли;
Если ПолИсполнителя=Перечисления.ПолФизическогоЛица.Мужской Тогда
Именуемый="именуемый";
Иначе
Именуемый="именуемая";
КонецЕсли;
Показать
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот