• Sh
  • Участник
  • Неактивен
  • На форуме с 14 сентября 2005
  • Сообщений: 68

Re: Как в скрипте получить привязки к номенклатуре

Покажите на примере, как вставить в техпроцесс позицию "РасЦех", с привязанными к номенклатуре цехами.
В API Explorer-e, нашел лишь такой путь: 

Set @ = TCSApp.Nomenclatures(NMkClassId)
If Not @ Is Nothing Then 
End if
Set @ = Nothing
  @ = TCSActiveModule.IsParameterValues
  Set Module_2 = Module_1.ChildModules.ModuleByName("NmkAffix").AsIDispatch
  If  Not Module_2 Is Nothing Then 
    @ = Module_2.ShowModal("Caption")
    Set Module_3 = Module_2.ChildModules.ModuleByName("CurrentModule").AsIDispatch
    If  Not Module_3 Is Nothing Then 
    End If
  End If

Все бы хорошо, но есть одна неприятная строка 

    @ = Module_2.ShowModal("Caption")

в которой надо выбрать "Привязка->Цехов к расцеховке", и без чего Module_2.ChildModules.ModuleByName("CurrentModule").AsIDispatch => Nothing
Какие еще варианты возможны?