HLOPROC1 ;ALB/CJM/OAK/PIJ- Process Manager - 10/4/94 1pm ;12/30/2010
Source file <HLOPROC1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| GETWORK(PROCESS) | ;
|
|
| DOWORK(PROCESS) | ;
|
|
| GETPROC(IEN,PROCESS) | ;
|
|
| STOPHL7 | ;shut down HLO HL7
|
|
| STARTHL7 | ;
|
|
| QUIT1(COUNT) | ;just returns 1 as function value first time around,then 0, insuring that the DO WORK function is called just once
|
|
| CHKDEAD(WORK) | ;
|
|
| CHKQUED | ;did any queued task get dequeued without being erased?
|
|
| QUEUED(TASK) | ;
|
|
| CNTLIVE | ;count the running processes
|
|
| CNTQUED | ;count the queued tasks
|
|
| RECOUNT(RECOUNT) | ;check that the processes that are supposed to be running actually are, same for the queued processes
|
|
| RESET | ;
|
|
| ERROR | ;
|
|
| QCOUNT(WORK) | ;count messages pending on all the queues
|
