| 
    
            
         
         | 
    
    
  | 
v8: Преобразовать Должность из именительного в родительный падеж | ☑ | ||
|---|---|---|---|---|
| 
    0
    
        Novi4ok91    
     14.11.13 
            ✎
    11:41 
 | 
         
        Здравствуйте. Подскажите функцию для преобразования.     
         | 
|||
| 
    1
    
        Wobland    
     14.11.13 
            ✎
    11:42 
 | 
         
        ПадежС     
         | 
|||
| 
    2
    
        mikecool    
     14.11.13 
            ✎
    11:43 
 | 
         
        в типовых Просклонять     
         | 
|||
| 
    3
    
        aka AMIGO    
     14.11.13 
            ✎
    11:44 
 | 
         
        а в мисте - поискать кнопкой "Поиск"     
         | 
|||
| 
    4
    
        de Bug    
     14.11.13 
            ✎
    11:44 
 | 
         
        (0) Генерального директора?     
         | 
|||
| 
    5
    
        Cube    
     14.11.13 
            ✎
    11:45 
 | 
||||
| 
    6
    
        Cube    
     14.11.13 
            ✎
    11:46 
 | 
         
        +(5) Не сочтите за рекламу ^^     
         | 
|||
| 
    7
    
        aka AMIGO    
     14.11.13 
            ✎
    11:48 
 | 
         
        "инженегр" - это класс :)
 
        еще добавить "погромист" :)  | 
|||
| 
    8
    
        Cube    
     14.11.13 
            ✎
    11:49 
 | 
         
        (7) Ну, "инженегр" это уже баян, а вот "погроммист" надо будет запомнить))))     
         | 
|||
| 
    9
    
        МихаилМ    
     14.11.13 
            ✎
    11:53 
 | 
         
        (8)
 
        погаммист ("от гамить")  | 
|||
| 
    10
    
        Помогите    
     14.11.13 
            ✎
    11:54 
 | 
         
        (0)
 
        Функция ДолжностьВРодительномПадеже() Возврат "Должности"; КонецФункции;  | 
|||
| 
    11
    
        Cube    
     14.11.13 
            ✎
    11:55 
 | 
         
        (9) "Поганист" :)     
         | 
|||
| 
    12
    
        Cube    
     14.11.13 
            ✎
    11:55 
 | 
         
        Отдвухсоттысячник: http://morpher.ru/?s=%ce%f2%e4%e2%f3%f5%f1%ee%f2%f2%fb%f1%ff%f7%ed%e8%ea     
         | 
|||
| 
    13
    
        Wobland    
     14.11.13 
            ✎
    11:58 
 | 
         
        otdvuhsottysyachniki.ru     
         | 
|||
| 
    14
    
        Novi4ok91    
     14.11.13 
            ✎
    12:11 
 | 
         
        В трудовом договоре необходимо выводить должность в РП, пож подскажите чт-ть дельное     
         | 
|||
| 
    15
    
        aka AMIGO    
     14.11.13 
            ✎
    12:13 
 | 
         
        (14) см (3) - Поиск по форуму, текст "v8 просклонять"     
         | 
|||
| 
    16
    
        aka AMIGO    
     14.11.13 
            ✎
    12:14 
 | 
         
        +15 или v8 родительный падеж
 
        или.. по фантазии..  | 
|||
| 
    17
    
        Wobland    
     14.11.13 
            ✎
    12:15 
 | 
         
        (14) знаешь, что я делал в твоей ситуации? глобальный поиск "падеж"     
         | 
|||
| 
    18
    
        Novi4ok91    
     14.11.13 
            ✎
    12:18 
 | 
         
        Глобальный поиск находит только преобразования ФИО     
         | 
|||
| 
    19
    
        hhhh    
     14.11.13 
            ✎
    12:22 
 | 
         
        (18) добавьте дополнительный реквизит в справочник Организации: Должность в родительном падеже. Зачем вам склонять? НЕ парьте себе мозг.     
         | 
|||
| 
    20
    
        Novi4ok91    
     14.11.13 
            ✎
    12:24 
 | 
         
        Изменения конфигурации недопустимы, естепственно было бы проще     
         | 
|||
| 
    21
    
        alexei366    
     14.11.13 
            ✎
    12:25 
 | 
         
        Не помню где нашел, но вроде как-то работает))
 
        Функция ПадежС(z1,Знач z2=2,Знач z3="*",z4=0) Экспорт z5=Найти(z1,"-"); z6=?(z5=0,"","-"+ПадежС(Сред(z1,z5+1,СтрДлина(z1)-z5+1),z2,z3,z4)); z1=НРег(?(z5=0,z1,Лев(z1,z5-1))); z7=Прав(z1,3);z8=Прав(z7,2);z9=Прав(z8,1); z5=СтрДлина(z1); za=Найти("ая ия ел ок яц ий па да ца ша ба та га ка",z8); zb=Найти("аеёийоуэюяжнгхкчшщ",Лев(z7,1)); zc=Макс(z2,-z2); zd=?(za=4,5,Найти("айяь",z9)); zd=?((zc=1)или(z9=".")или((z4=2)и(Найти("оиеу"+?(z3="ч","","бвгджзклмнпрстфхцчшщъ"),z9)>0))или((z4=1)и(Найти("мия мяэ лия кия жая лея",z7)>0)),9,?((zd=4)и(z3="ч"),2,?(z4=1,?(Найти("оеиую",z9)+Найти("их ых аа еа ёа иа оа уа ыа эа юа яа",z8)>0,9,?(z3<>"ч",?(za=1,7,?(z9="а",?(za>18,1,6),9)),?(((Найти("ой ый",z8)>0)и(z5>4)и(Прав(z1,4)<>"опой"))или((zb>10)и(za=16)),8,zd))),zd))); ze=Найти("лец вей бей дец пец мец нец рец вец аец иец ыец бер",z7); zf=?((zd=8)и(zc<>5),?((zb>15)или(Найти("жий ний",z7)>0),"е","о"),?(z1="лев","ьв",?((Найти("аеёийоуэюя",Сред(z1,z5-3 ,1))=0)и((zb>11)или(zb=0))и(ze<>45),"",?(za=7,"л",?(za=10,"к",?(za=13,"йц",?(ze=0,"",?(ze<12,"ь"+?(ze=1,"ц",""),?(ze<37,"ц",?(ze<49,"йц","р")))))))))); zf=?((zd=9)или((z4=3)и(z3="ы")),z1,Лев(z1,z5-?((zd>6)или(zf<>""),2,?(zd>0,1,0)))+zf+СокрП(Сред("а у а "+Сред("оыые",Найти("внч",z9)+1,1)+"ме "+?(Найти("гжкхш",Лев(z8,1))>0,"и","ы")+" е у ойе я ю я ем"+?(za=16,"и","е")+" и е ю ейе и и ь ьюи и и ю ейи ойойу ойойойойуюойойгомуго"+?((zf="е")или(za=16)или((zb>12)и(zb<16)),"и","ы")+"мм",10*zd+2*zc-3,2))); Возврат ?(""=z1,"",?(z4>0,ВРег(Лев(zf,1))+?((z2<0)и(z4>1),".",Сред(zf,2)),zf)+z6); КонецФункции // z1 - фамилия имя отчество например Железняков Юрий Юрьевич // z2 - Падеж ( по умолчанию = 2 - родительный) // 2 - родительный ( нет кого? ) Железнякова Юрия Юрьевича // 3 - дательный ( кому? ) Железнякову Юрию Юрьевичу // 4 - винительный ( вижу кого? ) Железнякова Юрия Юрьевича // 5 - творительный ( кем? ) Железняковым Юрием Юрьевичем // 6 - предложный ( о ком? ) Железнякове Юрии Юрьевиче // Если задать Z2 меньше 0, то на выходе получим от -1=Железняков Ю. Ю. до -6=Железнякове Ю. Ю. // z3 - параметр Пол может не указываться, но при наличии фамилий с // инициалами точное определение пола невозможно, поэтому предлагается задавать пол этим // параметром 1 - мужской 2 - женский // ДЛЯ СКЛОНЕНИЯ ПРОФЕССИЙ ИСПОЛЬЗУЙТЕ ФУНКЦИЮ ПАДЕЖП И БУДЕТ ВАМ СЧАСТЬЕ! // --------------------------------------------------------------------------------------- // Бибик Галушка Цой Николайчик Наталия Петровна Герценберг Кривошей Капица-Метелица // Если Падеж(Фио ,1 ,3), то на выходе получим Фамилия Имя Отчество и т.д. // Если Падеж(Фио ,1 ,3,"1" ), то Фамилия // Если Падеж(Фио ,1 ,3,"2" ), то Имя // Если Падеж(Фио ,1 ,3,"3" ), то Отчество // Если Падеж(Фио, 1 ,3,"12" ), то Фамилия Имя // Если Падеж(Фио, 1 ,3,"23" ), то Имя Отчество // Если Падеж(Фио,-1 ,3,"231" ),то И. О. Фамилия // Если Падеж(Фио,-1 ,3,"23" ), то И. О. // 10-11-2003 3-20 Функция Падежик(z1,z2=2,z3=3,Знач z4="123",z5=1) Экспорт Возврат?(z5<4,Падежик(СокрЛП(СтрЗаменить(Сред(z1,Найти(z1+" "," ")+1),".",". ")),z2,z3,СтрЗаменить(z4,z5,ПадежС(Лев(z1,Найти(z1+" "," ")-1),z2,Сред("ча"+НРег(Прав(СокрП(z1),1)),z3,1),z5)+" "),z5+1),z4); КонецФункции Функция Падеж(z1,z2=2,z3=3,Знач z4="123") Экспорт z1=СокрП(z1); z5=Прав(z1,4); z6=Найти("оглы кызы огло",z5); Возврат Падежик(?(z6>0,Лев(z1,СтрДлина(z1)-5),z1),z2,z3,z4)+?(z6>0,z5,""); КонецФункции Функция ПадежП(Знач z1,Знач z2,z3=0) Экспорт z1=СокрЛП(z1);z4=Найти(z1+" "," ")+1;z5=Лев(z1,z4-2);z6=Прав(z5,2); z7=?((Найти("ая ий ый",z6)>0)и(Найти("ющий нный",Сред(z1,z4-5,4))=0)и(z3=0),"1","*"); Возврат НРег(?((z6="ая")или(Прав(z6,1)="а"),ПадежС(z5,z2,z7,1)+" "+ПадежС(Сред(z1,z4),z2),ПадежС(z5,z2,"ч",1)+?((z6="ий")и(Найти(z1," ")=0),""," "+?(z7="1",ПадежП(Сред(z1,z4),z2,Число(z7)),Сред(z1,z4))))); КонецФункции  | 
|||
| 
    22
    
        MSII    
     14.11.13 
            ✎
    12:26 
 | 
         
        (20) Свойства объектов, доп.реквизиты в конфе тоже не предусмотрены?     
         | 
|||
| 
    23
    
        alexei366    
     14.11.13 
            ✎
    12:27 
 | 
         
        (21) ПадежП для должности     
         | 
|||
| 
    24
    
        Novi4ok91    
     14.11.13 
            ✎
    12:29 
 | 
         
        Спасибо!     
         | 
|||
| 
    25
    
        alexei366    
     14.11.13 
            ✎
    12:33 
 | 
         
        (24) Юзеры говорят, иногда с какиминибудь замудренными ФИО может и фигню в окончаниях выдать - но очень редко, типа когда отчества нет (иностранец), по должностям претензий не было (но и их склонения далеко не во всех доках генерируемых используется). Ну и как понимаешь только для написанных на кириллице катит)).     
         | 
|||
| 
    26
    
        Cube    
     14.11.13 
            ✎
    12:53 
 | 
         
        (21) Ну, это творение Sj вот исходники: http://www.superjur.narod.ru/padeg.htm     
         | 
|||
| 
    27
    
        y22-k    
     14.11.13 
            ✎
    13:03 
 | 
         
        (0) на ИС была обработка с процедурами склонения     
         | 
|||
| 
    28
    
        romix    
     14.11.13 
            ✎
    13:03 
 | 
         
        Хранить в 3 падежах: И, Р, Д должность и ФИО.     
         | 
|||
| 
    29
    
        romix    
     14.11.13 
            ✎
    13:04 
 | 
         
        Генерилка может по умолчанию пустые заполнять, а там если чего пользователь подправит.     
         | 
| Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |