HLOUSR6 ;OAK/RBN -ListManager screen for reporting outbound queues;12 JUN 1997 10:00 am ;07/02/2010
Source file <HLOUSR6.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 | 3 | HLO DELETE TOP MESSAGE HLO DISPLAY OUT-GOING QUEUES HLOUSR7 |
| Kernel | 1 | ^ORD(101 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; Created list of outbound queues.
|
|
| INIT | ; -- init variables and list array
|
|
| HDR | ; Header info. for the outbound queue display.
|
|
| OUTQUE | ;
|
|
| CJ(STRING,LEN) | ;
|
|
| LJ(STRING,LEN) | ;
|
|
| RJ(STRING,LEN) | ;
|
|
| CLEAN | ; Clean up before leaving
|
|
| GETTOP() | ; Get top message in queue
|
|
| DELTOP | ; Deletes the top message on a queue
|
|
| ASKQUE(LINK) | ;
|
| Name | Field # of Occurrence |
|---|---|
| WAIT^DICD | EN+3 |
| ^DIR | ASKQUE+11 |
| $$MSGID^HLOPRS | DELTOP+33 |
| $$GETPRTY^HLOQUE | OUTQUE+30, OUTQUE+32 |
| $$STOPPED^HLOQUE | OUTQUE+30, OUTQUE+32 |
| DEQUE^HLOQUE | DELTOP+35 |
| $$ASKLINK^HLOUSR | DELTOP+10 |
| $$ASKYESNO^HLOUSR2 | DELTOP+33 |
| $$ASKPORT^HLOUSRA | DELTOP+19 |
| CHGCAP^VALM | OUTQUE+17 |
| EN^VALM | EN+4 |
| SHOW^VALM | INIT+3 |
| PAUSE^VALM1 | DELTOP+5, DELTOP+11, DELTOP+29, DELTOP+32 |
| CNTRL^VALM10 | OUTQUE+31 |
| SET^VALM10 | OUTQUE+2 |
| $$CJ^XLFSTR | CJ+1 |
| $$LJ^XLFSTR | LJ+1 |
| $$RJ^XLFSTR | RJ+1 |
| OWNSKEY^XUSRB | DELTOP+3 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^HLB - [#778] | GETTOP+5 |
| ^HLB("QUEUE" | GETTOP+3, GETTOP+6!, DELTOP+15, DELTOP+17, DELTOP+28, DELTOP+31, DELTOP+38, ASKQUE+6 |
| ^HLC("QUEUECOUNT" | OUTQUE+19, OUTQUE+24, OUTQUE+25 |
| ^HLTMP("FAILING LINKS" | OUTQUE+22 |
| ^TMP("HLO OUTBOUND QUEUES" | CLEAN+1! |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CONF | DELTOP+1~, DELTOP+3 |
| CONF(0 | DELTOP+4 |
| COUNT | HDR+1~, OUTQUE+1~, OUTQUE+20~, OUTQUE+25*, OUTQUE+26, OUTQUE+30, OUTQUE+32 |
| DEFAULT | ASKQUE+3~, ASKQUE+6*, ASKQUE+7*, ASKQUE+8 |
| DIR | HDR+1~, ASKQUE+12! |
| DIR("?" | ASKQUE+9*, ASKQUE+10* |
| DIR("A" | ASKQUE+5* |
| DIR("B" | ASKQUE+8* |
| DIR(0 | ASKQUE+4* |
| DUOUT | ASKQUE+3~, ASKQUE+13 |
| DUZ | DELTOP+3 |
| ERROR | DELTOP+1~, DELTOP+14*, DELTOP+20*, DELTOP+21 |
| FROM | HDR+1~ |
| HLOLNAM | DELTOP+1~, DELTOP+22*, DELTOP+26, DELTOP+28, DELTOP+31, DELTOP+35, DELTOP+38 |
| HLOQNAM | DELTOP+1~, DELTOP+26*, DELTOP+27, DELTOP+28, DELTOP+31, DELTOP+35, DELTOP+38 |
| HLRFRSH | EN+1~, EN+2, EN+5*, EN+6, HDR+2*, OUTQUE+4* |
| HLSCREEN | HDR+1~, HDR+3* |
| >> IOBOFF | OUTQUE+31 |
| >> IOBON | OUTQUE+31 |
| LEN | CJ~, CJ+1, LJ~, LJ+1, RJ~, RJ+1 |
| LINE | OUTQUE+1~, OUTQUE+2* |
| LINK | HDR+1~, OUTQUE+1~, OUTQUE+18*, OUTQUE+19*, OUTQUE+21, OUTQUE+24, OUTQUE+25, OUTQUE+30, OUTQUE+32, GETTOP+3 , GETTOP+6, ASKQUE~, ASKQUE+6 |
| LINKNAME | DELTOP+1~, DELTOP+10*, DELTOP+11, DELTOP+15, DELTOP+16, DELTOP+17, DELTOP+18, DELTOP+19, DELTOP+22 |
| LIST | HDR+1~ |
| LOCERR | DELTOP+1~ |
| NODE | GETTOP+4~, GETTOP+5*, GETTOP+6, GETTOP+7 |
| OLDRFRSH | EN+1~, EN+2*, EN+5 |
| PORT | DELTOP+1~, DELTOP+15*, DELTOP+16*, DELTOP+17, DELTOP+18*, DELTOP+19*, DELTOP+20, DELTOP+22 |
| PORT2 | DELTOP+13~, DELTOP+17*, DELTOP+18 |
| QUE | HDR+1~, OUTQUE+20~, OUTQUE+23*, OUTQUE+24*, OUTQUE+25, OUTQUE+30, OUTQUE+32, GETTOP+3, GETTOP+6, ASKQUE+3~ |
| QUIT | GETTOP+1~, GETTOP+2*, GETTOP+3, GETTOP+7* |
| SHOW | OUTQUE+20~, OUTQUE+21*, OUTQUE+22*, OUTQUE+29, OUTQUE+30*, OUTQUE+32* |
| STATUS | HDR+1~ |
| STRING | CJ~, CJ+1, LJ~, LJ+1, RJ~, RJ+1 |
| TEMP | HDR+1~ |
| TIME | HDR+1~ |
| TODAY | HDR+1~ |
| TOP | OUTQUE+1~, OUTQUE+23*, OUTQUE+28*, OUTQUE+30, OUTQUE+32, GETTOP+1~, GETTOP+2*, GETTOP+3*, GETTOP+5, GETTOP+6 , GETTOP+7*, GETTOP+8, DELTOP+1~, DELTOP+31*, DELTOP+32, DELTOP+33, DELTOP+35 |
| >> VALM("TITLE" | HDR+4* |
| >> VALMAR | OUTQUE+5*, OUTQUE+30, OUTQUE+32 |
| >> VALMBCK | EN+7*, INIT+4*, OUTQUE+6*, OUTQUE+33*, DELTOP+2* |
| >> VALMBG | HDR+9* |
| >> VALMCNT | OUTQUE+3*, OUTQUE+27*, OUTQUE+30, OUTQUE+31, OUTQUE+32 |
| >> VALMDDF("COL | 1" , HDR+10*, OUTQUE+7*, 2" , HDR+11!, OUTQUE+11*, 3" , HDR+11!, OUTQUE+14*, 4" , HDR+11!, OUTQUE+15*, 5" , HDR+11!, OUTQUE+16! |
| >> VALMSG | HDR+5* |
| X | ASKQUE+3~ |
| Y | ASKQUE+3~, ASKQUE+13, ASKQUE+14 |