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 |
| 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 |