Автоматизированное рабочее место оператора автоматизированного переговорного пункта и информационной системы
| Категория реферата: Рефераты по информатике, программированию
| Теги реферата: строительные рефераты, сочинения по литературе
| Добавил(а) на сайт: Гурский.
Предыдущая страница реферата | 10 11 12 13 14 15 16 17 18 19 20
ТЕКСТ ПРОГРАММЫ СТАРТЕРА МОНИТОРА
| |; IAKoff Save, %n, 05/06/96 |
|iapmon | |
|iapmon |;IAKoff;11:47 PM 23 Jan 1996; |
| |q |
| |;Обслуживание АПП-РК |
|run() | |
| |n %nname,%d |
| |i $g(^appstat("NODE"))'=$znode q 1 |
| |s %d=$g(^appstat("DEVICE"))+0 |
| |i (%d108) q 2 |
| |i $$tstjob()'="" g endrun |
| |s ^appstat(1)="F" s ^appstat(2)="F" s ^appstat(3)="F" |
| |j |
| |^iapbckg(^appstat("DEVICE")):(name="APP-MON":strstk=8000:|
| |sysstk=8000) |
|endrun | |
| |q 0 |
| | ; ---------------------------------------- |
|tstjob() | |
| |n %c,%i,%n |
| |s $zp=$c(30) |
| |s %c=$zjob("*")_"*" s %i=1 |
|m2 | |
| |s %n=$p(%c,",",%i) |
| |i %n="" g etm |
| |i $p($zjob(%n),"|",9)="APP-MON" g etm |
| |s %i=%i+1 g m2 |
|etm | |
| |q %n |
| | ; ---------------------------------------- |
|stop | |
| |i $$tstjob()="" g endstop |
|nobckg1 | |
| |i (^appstat(1)="F")&(^appstat(2)="F")&(^appstat(3)="F") g|
| |stopbckg |
| |g endstop |
|stopbckg | |
| |s ^appstat("CMD")="H" |
| |; ниже была оШибка ! |
| |i ^appstat("STATUS")'="H" g nobckg1 |
|endstop | |
| |q |
Скачали данный реферат: Гребенников, Христина, Покалюк, Voropaev, Гавриил, Янкилович, Tverdislav.
Последние просмотренные рефераты на тему: курсовые и дипломные работы, решебник, мировая экономика, курсовая работа по праву.
Категории:
Предыдущая страница реферата | 10 11 12 13 14 15 16 17 18 19 20