Тема от afoninaanna (изменено: afoninaanna, 27 ноября 2015 16:00:15)

  • На форуме с 30 января 2013
  • Сообщений: 5

Тема: Получение полного классификатора

Добрый день! Умные люди, подскажите, пожалуйста, как программно получить в текстовом виде полный классификатор выбранной номенклатуры.

  • Откуда: Новосибирск
  • На форуме с 30 сентября 2003
  • Сообщений: 4,310

Re: Получение полного классификатора

Запустить в номенклатурном справочнике макрос

Sub FormMacro_ShowNodePath( TCSActiveModule )'Тест полного пути
   if Not TCSActiveModule.IsEmpty then
       Set Node = TCSActiveModule.DbTree.DbNodeByNodeId( TCSActiveModule.p_NODE_ID.AsInteger )
       'Dim Node as IDbNode
       if Not Node is Nothing Then
          Call TCSApp.ShowMessageBox( "Поный путь", Node.FullPath( "\\" ) )
       Else
         Call TCSApp.ShowErrorMessage( "Не могу найти ноду!" )
       End If
   Else
     Call TCSApp.ShowErrorMessage( "Выберите запись!" )
   End If
End Sub
Спасибо сказали: afoninaanna1