для комплексных, бухий, а особенно нетиповых конфиг. рекомендую:
1. Вставить в эту процедуру
Опер=СоздатьОбъект("Операция");

2. Вместо строчки
Если ТД.СуществуетОперация()=1 Тогда

Поставить
Если Опер.НайтиОперацию(ТД)=1 Тогда