HLOFILER ;ALB/CJM- Passes messages on the incoming queue to the applications - 10/4/94 1pm ;03/12/2012
Source file <HLOFILER.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Health Level Seven | 1 | ^HLD(779.3 |
Name | Comments | DBIA/ICR reference |
---|---|---|
GETWORK(QUE) | ;
|
|
DOWORK(QUEUE) | ;passes the messages on the queue to the application
|
|
ENDWORK | ;where the execution resumes upon an error
|
|
DEQUE(MSGIEN,PURGE,ORIG) | ;
|
|
ZB2 | ||
ERROR | ;error trap
|
|
ERROR2 | ;
|
|
ERROR3 | ;error trap for application context
|
Name | Field # of Occurrence |
---|---|
^%ZTER | ERROR+16, ERROR3+2 |
UNWIND^%ZTER | ERROR+17 |
COUNT^HLOESTAT | ERROR2+30 |
SETPURGE^HLOF778A | ZB2+4 |
$$DESCAPE^HLOPRS1 | ERROR2+26, ERROR2+28 |
$$STOPPED^HLOQUE | GETWORK+13, GETWORK+16, GETWORK+19 |
DEQUE^HLOQUE | DEQUE+8 |
SYSPARMS^HLOSITE | ERROR2+8 |
$$FMADD^XLFDT | ERROR2+16 |
$$NOW^XLFDT | ERROR+3, ERROR2+9 |
DUZ^XUP | DOWORK+22 |
KILL^XUSCLEAN | DOWORK+27, ERROR2+35 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZTSCH("TASK" | ERROR2+38 |
^HLB - [#778] | DEQUE+9*, DEQUE+12, DEQUE+13*, DEQUE+14*, ZB2+2, ZB2+3*, ERROR2+10, ERROR2+17*, ERROR2+19 |
^HLB("AD" | ERROR2+15!, ERROR2+18* |
^HLB("ERRORS" | ERROR2+29* |
^HLB("QUEUE" | GETWORK+12, GETWORK+13, GETWORK+15, GETWORK+16, GETWORK+18, GETWORK+19, DOWORK+8, DOWORK+11 |
^HLTMP("HL7 RUNNING PROCESSES" | ERROR2+41 |
^HLTMP("LOG ALL ERRORS" | ERROR+13 |
^TMP("HL7 ERRORS" | ERROR+4*, ERROR+10 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ACTION | DOWORK+9~, DOWORK+12*, DOWORK+16, DOWORK+20 |
COUNT | DOWORK+3~, DOWORK+5*, DOWORK+8*, DOWORK+9~ |
CS | ERROR2+7~, ERROR2+22*, ERROR2+26, ERROR2+28 |
DEQUE | DOWORK+3~, DOWORK+5*, DOWORK+17~, DEQUE+2*, DEQUE+3, ZB2+5!* |
DEQUE( | DEQUE+2*, DEQUE+4, DEQUE+6 |
DIR | ERROR2+7~, ERROR2+14*, ERROR2+15, ERROR2+18, ERROR2+30 |
DUZ | DOWORK+17~ |
ESCAPE | ERROR2+7~, ERROR2+24*, ERROR2+26, ERROR2+28 |
FROM | GETWORK+9~, GETWORK+10*, GETWORK+11, GETWORK+12, GETWORK+13, GETWORK+14, GETWORK+15*, GETWORK+16, GETWORK+17, GETWORK+18* , GETWORK+19, GETWORK+20 |
FS | ERROR2+7~, ERROR2+20*, ERROR2+21, ERROR2+26, ERROR2+28 |
HDR | ERROR2+7~, ERROR2+19*, ERROR2+20, ERROR2+22, ERROR2+23, ERROR2+24, ERROR2+25, ERROR2+26, ERROR2+28 |
HLMSGIEN | DOWORK+17~, DOWORK+19* |
HOUR | ERROR+2~, ERROR+3*, ERROR+4, ERROR+10 |
MCODE | DOWORK+9~, DOWORK+17~, DOWORK+20*, DOWORK+23 |
MSGIEN | DOWORK+3~, DOWORK+6*, DOWORK+8*, DOWORK+11, DOWORK+15, DOWORK+19, DOWORK+21~, DEQUE~, DEQUE+2, DEQUE+3* , DEQUE+4*, DEQUE+6, DEQUE+8, DEQUE+9, ZB2+2, ZB2+3, ZB2+4, ERROR2+10, ERROR2+15, ERROR2+17 , ERROR2+18, ERROR2+19, ERROR2+29, ERROR2+34~ |
NODE | DOWORK+9~, DOWORK+11*, DOWORK+12, DOWORK+13, DOWORK+14, DEQUE+5~, DEQUE+6*, DEQUE+7, ERROR2+7~, ERROR2+10* , ERROR2+11, ERROR2+12, ERROR2+13*, ERROR2+14, ERROR2+15, ERROR2+16*, ERROR2+17, ERROR2+18 |
NOW | ERROR2+7~, ERROR2+9*, ERROR2+16, ERROR2+29 |
ORIG | DOWORK+9~, DOWORK+15, DEQUE~, DEQUE+5~ |
ORIG("ACK BY" | , DOWORK+14*, DEQUE+2, DEQUE+7*, DEQUE+13 |
ORIG("IEN" | DOWORK+14*, DEQUE+2, DEQUE+7*, DEQUE+12, DEQUE+13, DEQUE+14, ZB2+4 |
ORIG("STATUS" | DOWORK+14*, DEQUE+2, DEQUE+7*, DEQUE+14, ZB2+4 |
PURGE | DOWORK+9~, DOWORK+13*, DOWORK+15, DEQUE~, DEQUE+2, DEQUE+5~, DEQUE+7*, ZB2 |
QUE | GETWORK~, DOWORK+3~, DOWORK+4*, DOWORK+8, DOWORK+9~ |
QUE("FROM" | GETWORK+10, GETWORK+20* |
QUE("QUEUE" | GETWORK+10, GETWORK+20* |
QUEUE | GETWORK+9~, GETWORK+10*, GETWORK+11, GETWORK+12, GETWORK+13*, GETWORK+14, GETWORK+15, GETWORK+16*, GETWORK+18, GETWORK+19* , GETWORK+20, GETWORK+21, DOWORK~, DOWORK+4, DOWORK+8*, ERROR2+34~ |
QUEUE("FROM" | DOWORK+8, DOWORK+11, DEQUE+8 |
QUEUE("QUEUE" | DOWORK+8, DOWORK+11, DEQUE+8 |
RAPP | ERROR2+7~, ERROR2+26*, ERROR2+27*, ERROR2+29, ERROR2+30 |
REP | ERROR2+7~, ERROR2+23*, ERROR2+26, ERROR2+28 |
SAPP | ERROR2+7~, ERROR2+28*, ERROR2+30 |
STATUS | ZB2+1~, ZB2+2*, ZB2+3*, ZB2+4 |
SUBCOMP | ERROR2+7~, ERROR2+25*, ERROR2+26, ERROR2+28 |
SYS | ERROR2+7~, ERROR2+8 |
SYS("ERROR PU | RGE" , ERROR2+16 |
X | DOWORK+21~ |
ZTSK | DOWORK+26~, ERROR2+34~, ERROR2+38, ERROR2+39 |