Обмен данными с другой программой

[Trouyan]

Необходимо обмениваться параметрами с другой программой.
Наверное проще всего было бы делать это через файл. Знаю что можно импортировать данные из файла Exel, но возможно ли данный импорт делать автоматически, с определенным интервалом времени ?

[booSter]

Возможно всё
Вопрос в фантазии, знаниях, опыте... и ресурсах
А методов передачи данных из одной программы в другою - тьма. Файл, кстати, ввиду своей простоты, довольно привлекательное решение. Система съёма данных по тайм-ауту тоже вполне реализуемая задача.

[Trouyan]

А ссылочки, примеры ... хотелось бы понять в какую сторону копать... писать для Кати какой-то модуль(пока понятия не имею в чем и как это делать) или уже имеется готовое решение данной задачи в самой Кати?

[bit]

Для начала надо решить на чем писать.
С++ или Automation
Если использовать Excel в качестве design table, то можно вообще ничего не писать, CATIA сама отследит все изменения

[Wireless_Fidelity]

Приблизительный список параметров в студию.
Помимо параметров, нужна ли передача каких-либо иных данных? Если да, то каков их объём?

[Trouyan]

Design table опробовал, ток Я не нашел можно ли увеличить частоту синхронизации с файлом и отключить всплывающие отчеты об изменениях в файле ?
Если программить то лучше в си.

В моём случае передаю 3 целочисленных значений углов в узлах механизма. В будущем, думаю, 25 значений - это будет предел.

[booSter]

Неплохо было бы определиться "кто есть ху" в этой связке:

1. CATIA Server - Внешняя программа периодически забрасывает данные в CATIA
2. CATIA Client - CATIA время от времени забирает данные у внешней программы
3. Диаллог - Внешняя программа уведомляет о наличии новой пачки данных, CATIA их забирает и уведомляет внешнюю программу о том что готова к следующей пачке

Реализация обмена зависит от выбранного подхода

[Trouyan]

Неплохо было бы определиться "кто есть ху" в этой связке:

1. CATIA Server - Внешняя программа периодически забрасывает данные в CATIA
2. CATIA Client - CATIA время от времени забирает данные у внешней программы
3. Диаллог - Внешняя программа уведомляет о наличии новой пачки данных, CATIA их забирает и уведомляет внешнюю программу о том что готова к следующей пачке

Реализация обмена зависит от выбранного подхода

Если в design table частоту изменить нельзя то попробовал бы первый вариант.

[booSter]

... попробовал бы первый вариант ...

Можно сделать через CATIA Automation/VB примерно так:

1. В CATIA нужные параметры добавил в публикации, чтобы отвязаться от структуры документа
2. Со стороны клиента (внешней программы):
   
   1. Создать СOM-референс theApp на объект типа "CATIA.Application" (средствами COM)
   2. Получить текущий (либо необходимый CATIA-документ) theDoc используя методы theApp
   3. Найти в theDoc публикации с нужными именами, а через них - параметры
   4. Вбить значения параметрам
   5. Проапдэйтить theDoc
3. Проверить результат в CATIA

... за подробностями - в личку

[likemilk]

Тоже очень интересует эта тема. Буквально только начал осваивать передачу данный через текстовый файл.
Хотелось бы научиться из экселя через VBA обращаться к катийным документам. Может кто дать пример кода, чтобы понять в каком направлении двигаться?
Как то уже пробовал пример в котором из экселя идёт обращение к файлу базы данных (mdb) используя DAO. В том примере всё работает. Но для этого нужно было подключить класс DAO Object Library.
Нужно ли в экселе, также подключить какие то катийные библиотеки? Если да то можно по конкретней? Их там очень много. Нужна ли какая то конкретная или можно все галочки по включать?
И наоборот нужно ли в катии подключать экселевские классы?

[Wireless_Fidelity]

Можно вообще ничего не подключать. Получаете доступ к COM-серверу через Set CATIA = GetObject("CATIA.Application"), а затем используете все те же методы, что и в VBA.
В обратную сторону работает точно так же.

[likemilk]

Можно вообще ничего не подключать. Получаете доступ к COM-серверу через Set CATIA = GetObject("CATIA.Application"), а затем используете все те же методы, что и в VBA.
В обратную сторону работает точно так же.

Уважаемый Wireless_Fidelity, а можно ещё элементарный примерчик кода, а то совсем отсутствует опыт использования такого метода.
На словах то вроде всё понятно но на практике часто так бывает что не там запятую поставишь и полдня чешешь репу, пытаясь понять почему оно не работает

[Wireless_Fidelity]

Пишу из головы, работать должно. Из CATIA печатаем ячейку (1,1):

Код: Выделить всё

Sub CATMain()
Dim Excel as Object
Set CATIA = GetObject("","Excel.Application") ' первый аргумент пустой, потому что нас не интересует, какой документ открыт в Excel'e

MsgBox Excel.ActiveSheet.Cells(1,1).Text

Dim

End Sub

Из Excel печатаем полные пути ко всем загруженным в CATIA документам:

Код: Выделить всё

Sub Main()
Dim CATIA as Object
Set CATIA = GetObject("", "CATIA.Application")

' получаем общее количество документов
Dim iNbDocs as Integer
iNbDocs = CATIA.Documents.Count

' проходим по документам, печатаем пути
Dim iDoc
For iDoc = 1 to CATIA.Documents.Count
    MsgBox CATIA.Documents.Item(iDoc).FullName
Next

End Sub

[likemilk]

Спасибо, всё получилось.