HLOPURGE ;IRMFO-ALB/CJM - Purging Old Messages;03/24/2004 14:43
Source file <HLOPURGE.m>
| Package | Total | Call Graph | 
|---|---|---|
| Health Level Seven | 2 | $$GETMSG^HLOMSG DEQUE^HLOQUE | 
| Kernel | 1 | ($$DT,$$FMADD,$$NOW)^XLFDT | 
| Package | Total | Caller Graph | 
|---|---|---|
| Electronic Dental Record | 1 | BADEPROV | 
| IHS Changes To Pharmacy | 1 | APSPESIB | 
| iCare | 1 | BQINIGH2 | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| OLD777 | ; | |
| KILL777(BODY) | ; | |
| KSEARCH(MSG,MSGTYPE,EVENT,SAPP,RAPP,IEN) | ; | |
| GETWORK(WORK) | ; | |
| OLD778 | ; | |
| DOWORK(WORK) | ; | |
| DELETE(MSGIEN,FLAG) | ; | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^HLA - [#777] | OLD778+16, OLD777+11!, KILL777+2, KILL777+3! | 
| ^HLA("B" | OLD777+4, OLD777+7, OLD777+11!, KILL777+4! | 
| ^HLB - [#778] | OLD778+8, OLD778+10, DELETE+30, DELETE+34, DELETE+39, DELETE+51! | 
| ^HLB("AC" | DELETE+55! | 
| ^HLB("AD" | DOWORK+7, DOWORK+10, DOWORK+12!, DELETE+52! | 
| ^HLB("AE" | DELETE+40! | 
| ^HLB("B" | DELETE+53! | 
| ^HLB("C" | OLD777+10, OLD777+11!, DELETE+58!, DELETE+59 | 
| ^HLB("ERRORS" | OLD778+30, OLD778+33!, DELETE+21!, DELETE+25!, DELETE+26! | 
| ^HLB("QUEUE" | OLD778+23 | 
| ^HLB("SEARCH" | KSEARCH+9! | 
| Name | Line Occurrences | 
|---|---|
| DELETE | DOWORK+11, OLD778+12, OLD778+25, OLD777+10 | 
| KILL777 | DELETE+56, DELETE+59 | 
| KSEARCH | DELETE+16, DELETE+38 | 
| OLD777 | DOWORK+2 | 
| OLD778 | DOWORK+1 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| AC | DELETE+4~, DELETE+50*, DELETE+55 | 
| APP | OLD778+1~, OLD778+30*, OLD778+33, DELETE+19~, DELETE+20*, DELETE+21, DELETE+25, DELETE+26, KSEARCH+3~, KSEARCH+8* , KSEARCH+9 | 
| BODY | OLD778+9~, OLD778+14*, OLD778+15, OLD778+16, KILL777~, KILL777+2, KILL777+3, KILL777+4 | 
| CS | DELETE+4~, DELETE+10*, DELETE+11, DELETE+13, DELETE+36, DELETE+37, DELETE+47, DELETE+48, DELETE+49 | 
| END | OLD778+1~, OLD778+4*, OLD778+8 | 
| EVENT | DELETE+33~, DELETE+37*, DELETE+38, KSEARCH~, KSEARCH+5, KSEARCH+9 | 
| FLAG | DELETE~, DELETE+56, DELETE+59 | 
| FROM | OLD778+20~, OLD778+21*, OLD778+22*, OLD778+23, OLD778+24 | 
| FS | DELETE+4~, DELETE+8*, DELETE+9, DELETE+11, DELETE+13, DELETE+32, DELETE+35, DELETE+43, DELETE+45, DELETE+46 | 
| HDR | DELETE+44~ | 
| HDR("SENDING | APPLICATION" , DELETE+45*, DELETE+50, FACILITY" , DELETE+47*, DELETE+48*, DELETE+49*, DELETE+50 | 
| HDR2 | DELETE+33~, DELETE+34*, DELETE+35 | 
| >> HLPURGE( | GETWORK+3, GETWORK+4 | 
| IEN | KSEARCH~, KSEARCH+9 | 
| IEN778 | OLD777+8~, OLD777+9*, OLD777+10* | 
| MSG | DELETE+5, DELETE+16, DELETE+38, KSEARCH~ | 
| MSG("BATCH" | DELETE+16 | 
| MSG("BODY" | DELETE+18, DELETE+56, DELETE+58, DELETE+59 | 
| MSG("DIRECTION" | DELETE+42, DELETE+52, DELETE+54, DELETE+57, KSEARCH+7, KSEARCH+8, KSEARCH+9 | 
| MSG("DT/TM CR | EATED" , DELETE+21, DELETE+25, DELETE+26, KSEARCH+6, KSEARCH+9 | 
| MSG("EVENT" | DELETE+16 | 
| MSG("HDR" | DELETE+8, DELETE+10, DELETE+11, DELETE+13, DELETE+45, DELETE+46 | 
| MSG("ID" | DELETE+50, DELETE+53 | 
| MSG("MESSAGE | TYPE" , DELETE+16 | 
| MSG("STATUS" | DELETE+18, DELETE+20, DELETE+21, DELETE+22, DELETE+52 | 
| MSGID | DELETE+31~, DELETE+39*, DELETE+40 | 
| MSGIEN | DOWORK+8~, DOWORK+9*, DOWORK+10*, DOWORK+11, DOWORK+12, OLD778+5~, OLD778+7*, OLD778+8*, OLD778+10, OLD778+12 , OLD778+23, OLD778+24, OLD778+25, OLD777+5~, OLD777+6*, OLD777+7*, OLD777+10, OLD777+11, DELETE~, DELETE+5 , DELETE+16, DELETE+21, DELETE+24, DELETE+26, DELETE+30, DELETE+34, DELETE+38, DELETE+39, DELETE+40, DELETE+51 , DELETE+52, DELETE+53, DELETE+55, DELETE+58 | 
| MSGTYPE | DELETE+33~, DELETE+36*, DELETE+38, KSEARCH~, KSEARCH+4, KSEARCH+9 | 
| NODE | OLD778+9~, OLD778+10*, OLD778+11, OLD778+14, OLD778+19, OLD778+21, OLD778+22, OLD778+23, OLD778+24 | 
| NOW | DOWORK+4~, DOWORK+5*, DOWORK+7 | 
| OK | GETWORK+2~*, GETWORK+4*, GETWORK+5 | 
| OLD | OLD778+1~, OLD778+2*, OLD778+12, OLD778+17, OLD778+27, OLD778+33, OLD777+1~, OLD777+2*, OLD777+4 | 
| QUIT | OLD778+5~, OLD778+6*, OLD778+8, OLD778+27* | 
| RAPP | DELETE+4~, DELETE+6*, DELETE+13*, DELETE+14*, DELETE+16, DELETE+20, DELETE+38, KSEARCH~, KSEARCH+8 | 
| SAPP | DELETE+4~, DELETE+6*, DELETE+11*, DELETE+12*, DELETE+16, DELETE+20, DELETE+38, KSEARCH~, KSEARCH+8 | 
| START | OLD778+1~, OLD778+3*, OLD778+4, OLD778+7 | 
| SUB | DELETE+23~, DELETE+24*, DELETE+25, DELETE+26* | 
| SUBIEN | DELETE+4~, DELETE+29*, DELETE+30*, DELETE+34, DELETE+38, DELETE+39, DELETE+40 | 
| TIME | DOWORK+4~, DOWORK+6*, DOWORK+7*, DOWORK+10, DOWORK+12, OLD778+31~, OLD778+32*, OLD778+33*, OLD777+1~, OLD777+3* , OLD777+4*, OLD777+7, OLD777+11, KILL777+1~, KILL777+2*, KILL777+4 | 
| TYPE | OLD778+1~, OLD778+30*, OLD778+33 | 
| VALUE | DELETE+33~, DELETE+35*, DELETE+36, DELETE+37, DELETE+44~, DELETE+46*, DELETE+47, DELETE+48, DELETE+49 | 
| WHEN | OLD778+9~, OLD778+11*, OLD778+12, OLD778+13, OLD778+16*, OLD778+17, OLD778+27 | 
| WORK | GETWORK~, GETWORK+3, GETWORK+4*, DOWORK~, DOWORK+1, DOWORK+2, DOWORK+3, DOWORK+7, DOWORK+10, DOWORK+12 , DOWORK+13 | 
| WORK("DONE" | GETWORK+4, DOWORK+13* |