Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: HLOPURGE

Package: Health Level Seven

Routine: HLOPURGE


Information

HLOPURGE ;IRMFO-ALB/CJM - Purging Old Messages;03/24/2004 14:43 ;06/17/2009

Source Information

Source file <HLOPURGE.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Health Level Seven 3 $$GETMSG^HLOMSG  DEQUE^HLOQUE  ($$OLDPURGE,SYSPARMS)^HLOSITE  
Kernel 1 ($$DT,$$FMADD,$$NOW)^XLFDT  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Health Level Seven 1 ^HLD(779.3  

Entry Points

Name Comments DBIA/ICR reference
GETWORK(WORK) ;
DOWORK(WORK) ;
OLD778 ;
OLD777 ;
DELETE(MSGIEN,FLAG) ;
KILL777(BODY) ;
KSEARCH(MSG,MSGTYPE,EVENT,SAPP,RAPP,IEN) ;

External References

Name Field # of Occurrence
$$GETMSG^HLOMSG DELETE+5
DEQUE^HLOQUE OLD778+25
$$OLDPURGE^HLOSITE OLD778+3, OLD777+3
SYSPARMS^HLOSITE OLD778+31
$$DT^XLFDT OLD778+2, OLD778+32, OLD777+2
$$FMADD^XLFDT OLD778+3, OLD778+32, OLD777+3
$$NOW^XLFDT DOWORK+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^HLA - [#777] OLD778+17, OLD777+14!, KILL777+3, KILL777+4!
^HLA("B" OLD777+5, OLD777+8, OLD777+14!, KILL777+5!
^HLB - [#778] OLD778+9, OLD778+11, OLD777+12, DELETE+34, DELETE+38, DELETE+43, DELETE+55!
^HLB("AC" DELETE+59!
^HLB("AD" DOWORK+7, DOWORK+10, DOWORK+11!, DELETE+56!
^HLB("AE" DELETE+44!
^HLB("B" DELETE+57!
^HLB("C" OLD777+11, OLD777+14!, DELETE+62!, DELETE+63
^HLB("ERRORS" OLD778+34, OLD778+37!, DELETE+25!, DELETE+29!, DELETE+30!
^HLB("QUEUE" OLD778+24
^HLB("SEARCH" KSEARCH+10!

Label References

Name Line Occurrences
DELETE DOWORK+12, OLD778+13, OLD778+26, OLD777+13
KILL777 DELETE+60, DELETE+63
KSEARCH DELETE+22, DELETE+42
OLD777 DOWORK+2
OLD778 DOWORK+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AC DELETE+4~, DELETE+54*, DELETE+59
APP OLD778+1~, OLD778+33*, OLD778+34*, OLD778+37, KSEARCH+3~, KSEARCH+8*, KSEARCH+9, KSEARCH+10
BODY OLD778+10~, OLD778+15*, OLD778+16, OLD778+17, KILL777~, KILL777+1, KILL777+3, KILL777+4, KILL777+5
CS DELETE+4~, DELETE+13*, DELETE+15, DELETE+18, DELETE+40, DELETE+41, DELETE+51, DELETE+52, DELETE+53
END OLD778+1~, OLD778+5*, OLD778+9
EVENT DELETE+37~, DELETE+41*, DELETE+42, KSEARCH~, KSEARCH+5*, KSEARCH+10
FLAG DELETE~, DELETE+60, DELETE+63
FROM OLD778+21~, OLD778+22*, OLD778+23*, OLD778+24, OLD778+25
FS DELETE+4~, DELETE+10*, DELETE+15, DELETE+18, DELETE+36, DELETE+39, DELETE+47, DELETE+49, DELETE+50
HDR DELETE+48~
HDR("SENDING APPLICATION" , DELETE+49*, DELETE+54, FACILITY" , DELETE+51*, DELETE+52*, DELETE+53*, DELETE+54
HDR2 DELETE+37~, DELETE+38*, DELETE+39
>> HLPURGE( GETWORK+4, GETWORK+5, DOWORK+13
IEN KSEARCH~, KSEARCH+10
IEN778 OLD777+9~, OLD777+10*, OLD777+11*, OLD777+12, OLD777+13
MSG DELETE+4~, DELETE+5, DELETE+22, DELETE+42, KSEARCH~
MSG("BATCH" DELETE+22
MSG("BODY" DELETE+24, DELETE+60, DELETE+62, DELETE+63
MSG("DIRECTION" DELETE+46, DELETE+56, DELETE+58, DELETE+61, KSEARCH+7, KSEARCH+8, KSEARCH+10
MSG("DT/TM CR EATED" , DELETE+25, DELETE+29, DELETE+30, KSEARCH+6, KSEARCH+10
MSG("EVENT" DELETE+22
MSG("HDR" DELETE+10, DELETE+13, DELETE+15, DELETE+18, DELETE+49, DELETE+50
MSG("ID" DELETE+54, DELETE+57
MSG("MESSAGE TYPE" , DELETE+22
MSG("STATUS" DELETE+24, DELETE+26, DELETE+56
MSGID DELETE+35~, DELETE+43*, DELETE+44
MSGIEN DOWORK+8~, DOWORK+9*, DOWORK+10*, DOWORK+11, DOWORK+12, OLD778+6~, OLD778+8*, OLD778+9*, OLD778+11, OLD778+13
, OLD778+24, OLD778+25, OLD778+26, OLD777+6~, OLD777+7*, OLD777+8*, OLD777+11, OLD777+14, DELETE~, DELETE+5
, DELETE+22, DELETE+25, DELETE+28, DELETE+30, DELETE+34, DELETE+38, DELETE+42, DELETE+43, DELETE+44, DELETE+55
, DELETE+56, DELETE+57, DELETE+59, DELETE+62
MSGTYPE DELETE+37~, DELETE+40*, DELETE+42, KSEARCH~, KSEARCH+4*, KSEARCH+10
NODE OLD778+10~, OLD778+11*, OLD778+12, OLD778+13, OLD778+15, OLD778+20, OLD778+22, OLD778+23, OLD778+24, OLD778+25
NOW DOWORK+4~, DOWORK+5*, DOWORK+7
OK GETWORK+2~, GETWORK+3*, GETWORK+5*, GETWORK+6, GETWORK+7
OLD OLD778+1~, OLD778+3*, OLD778+13, OLD778+18, OLD778+28, OLD778+32*, OLD778+37, OLD777+1~, OLD777+3*, OLD777+5
PARMS OLD778+1~, OLD778+31
PARMS("ERROR PURGE" , OLD778+32
QUIT OLD778+6~, OLD778+7*, OLD778+9, OLD778+28*
RAPP DELETE+4~, DELETE+6*, DELETE+18*, DELETE+20*, DELETE+22, DELETE+25, DELETE+29, DELETE+30, DELETE+42, KSEARCH~
, KSEARCH+8
SAPP DELETE+4~, DELETE+6*, DELETE+15*, DELETE+16*, DELETE+22, DELETE+42, KSEARCH~, KSEARCH+8
START OLD778+1~, OLD778+4*, OLD778+5, OLD778+8
STOP OLD777+9~, OLD777+10*, OLD777+12*, OLD777+14
SUB DELETE+27~, DELETE+28*, DELETE+29, DELETE+30*
SUBIEN DELETE+4~, DELETE+33*, DELETE+34*, DELETE+38, DELETE+42, DELETE+43, DELETE+44
TIME DOWORK+4~, DOWORK+6*, DOWORK+7*, DOWORK+10, DOWORK+11, OLD778+35~, OLD778+36*, OLD778+37*, OLD777+1~, OLD777+4*
, OLD777+5*, OLD777+8, OLD777+14, KILL777+2~, KILL777+3*, KILL777+5
TODAY OLD778+1~, OLD778+2*, OLD778+3, OLD778+13, OLD777+1~, OLD777+2*, OLD777+3, OLD777+12
TYPE OLD778+1~
VALUE DELETE+37~, DELETE+39*, DELETE+40, DELETE+41, DELETE+48~, DELETE+50*, DELETE+51, DELETE+52, DELETE+53
WHEN OLD778+10~, OLD778+12*, OLD778+13, OLD778+14, OLD778+17*, OLD778+18, OLD778+28
WORK GETWORK~, GETWORK+4, GETWORK+5*, GETWORK+6*, DOWORK~, DOWORK+1, DOWORK+2, DOWORK+3, DOWORK+7, DOWORK+10
, DOWORK+11, DOWORK+13
WORK("DONE" GETWORK+5*, GETWORK+6!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables  | All