2 Ход работы
1. Создать кнопку вызова заданной книги MS Excel. При этом, если приложение MS Excel уже находится в оперативной памяти, то не загружать его вторично, а просто активизировать. С помощью данной кнопки обеспечить также запись в специальный файл служебной информации о рабочей книге MS Excel: дату и время последнего обновления, размер файла.
Создайте кнопку с анимационной связью Action. В Action для запуска (активизации) заданной книги MS Excel используйте функции: InfoAppActive, ActivateApp (эти функции можно использовать в сочетании с функцией InfoAppTitle), StartApp. Для StartApp следует указать не только путь к файлу EXCEL.EXE, но также и путь к рабочей книге. Для организации записи служебной информации в специальный файл используйте функции: InfoFile, StringFromTime, FileWriteMessage, Text (или StringFromIntg).
Анимационная связь Action для кнопки MS Excel |
{активизация (запуск) рабочей книги - Study.xls} IF InfoAppActive( InfoAppTitle( "Excel" )) == 1 THEN ActivateApp InfoAppTitle( "Excel"); ELSE StartApp "c:\progra~1\micros~2\office\excel d:\user\intouch\study.xls"; ENDIF; {запись служебной информации a infostudy.txt} DIM Str AS MESSAGE; Str = StringFromTime(InfoFile("d:\user\intouch \study.xls", 3, $Year ), 3); FileWriteMessage("d:\user\intouch\infostudy.txt ", -1, Str +", ",0 ); Str = Text(InfoFile("d:\user\intouch\study.xls ", 2, $Year), "#" ); FileWriteMessage("d:\user\intouch\infostudy.txt ", -1, Str,1 ); |
2. В книге MS Excel создать таблицу, в которую из InTouch поступают текущие значения тэгов работы клапанов, уровня наполнения, задания для уровней (рисунок 39). По окончании каждого технологического цикла записывать в таблицу MS Excel дату и время окончания цикла, а также объем полученного продукта (запись проводить с сохранением предыдущих значений).
Рисунок 39. Окно MS Excel для организации обмена данных с InTouch
Откройте рабочую книгу MS Excel. В любых выбранных вами ячейках введите формулы для связи с заданными тэгами учебного приложения InTouch. Например: «=View|Tagname!'Level_1'». Проверьте соответствие полученных результатов значениям тэгов в InTouch.
Для организации записи данных в таблицу MS Excel по запросу используйте функцию WWPoke. При этом, после ввода строки адрес ввода следующей строки должен увеличиваться на единицу.
3. Из MS Excel передавать в InTouch плановый объем порции выпускаемого продукта.
Отведите в рабочей книге MS Excel ячейку под плановый объем выпускаемой продукции (например, R7C2) и запишите в нее какое-либо число. В учебном приложении InTouch для указанного показателя введите аналоговый тэг типа I/O. Адреса ввода для данного тэга в InTouch: Application Name - Excel, Topic Name - [Study.xls]Sheet1, Item - R7C2 (здесь предполагается, что данные находятся на листе Sheet1 в книге Study).