Как получить значение Субконто

 Функция ПолучитьСубконто(Счет, Субконто, ИмяСубконто) Экспорт



    Если Счет = Неопределено ИЛИ  Счет.Пустая() Тогда      

        Возврат Неопределено;

    КонецЕсли;



    Если ТипЗнч(ИмяСубконто) = Тип("Число") Тогда

        Если ИмяСубконто > Счет.ВидыСубконто.Количество() Тогда

            Возврат Неопределено;

        КонецЕсли;

        ВидСубк = Счет.ВидыСубконто[ИмяСубконто - 1].ВидСубконто;     

    Иначе

        ВидСубк = ПланыВидовХарактеристик[Метаданные.НайтиПоТипу(ТипЗнч(Счет)).ВидыСубконто.Имя][ИмяСубконто];            

        Если Счет.ВидыСубконто.Найти( ВидСубк) = Неопределено Тогда

            Возврат Неопределено;

        КонецЕсли;

    КонецЕсли;



    Возврат Субконто[ВидСубк];



КонецФункции