Для НомерСубконто = 1 По 3 Цикл
ТекСубконто = Проводка["СубконтоДт" + НомерСубконто];
Если ТипЗнч(ТекСубконто) = ТипЗнч(МояСсылочка) Тогда
...
КонецЕсли;
Сч = Сч + 1;
КонецЦикла:
Для НомерСубконто = 0 По 2 Цикл
Если МойСчет.ВидыСубконто[НомерСубконто].ВидСубконто.ТипЗначения.Типы().Найти(ТипЗнч(Справочники.СтатьиЗатрат.ПустаяСсылка()))<>Неопределено Тогда
//вот и оно
КонецЕсли;
КонецЦикла;
как-то так
TurboConf — расширение возможностей Конфигуратора 1С