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

Package: Health Level Seven

Routine: HLOF778A


Information

HLOF778A ;ALB/CJM-HL7 - Saving messages to file 778 (continued) ;03/13/2012

Source Information

Source file <HLOF778A.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Health Level Seven 6 $$RTNTN^HLOAPP  COUNT^HLOESTAT  ACKTO^HLOF778  ($$GETMSG,$$NEXTMSG)^HLOMSG  BUILDHDR^HLOPBLD1  ($$INC,SYSPURGE)^HLOSITE  
Kernel 1 ($$FMADD,$$NOW,$$SEC)^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: 7

Package Total Caller Graph
Health Level Seven 7 HLOAPI1  HLOCLNT2  HLOF777  HLOF778  HLOFILER  HLOSRVR  ^HLD(779.3  

Entry Points

Name Comments DBIA/ICR reference
NEW(HLMSTATE) ;
NEWIEN(DIR,TCP) ;
AGAIN ;
TCP() ;checks the link to see if its TCP, return 1 if yes, 0 if no or not defined
GETWORK(WORK) ; Used by the Process Manager.
DOWORK(WORK) ;Used by the Process Manager
SET(MSG) ;
SETPURGE(MSG,MSGSTAT,MATE,MATESTAT) ; Set message up for purging.

External References

Name Field # of Occurrence
$$RTNTN^HLOAPP NEW+33, NEW+35
COUNT^HLOESTAT NEW+54
ACKTO^HLOF778 NEW+71
$$GETMSG^HLOMSG DOWORK+9
$$NEXTMSG^HLOMSG DOWORK+13
BUILDHDR^HLOPBLD1 NEW+19
$$INC^HLOSITE AGAIN+1
SYSPURGE^HLOSITE SETPURGE+15
$$FMADD^XLFDT SETPURGE+43
$$NOW^XLFDT SETPURGE+43
$$SEC^XLFDT GETWORK+11, GETWORK+15, GETWORK+19, DOWORK+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^HLA - [#777] SETPURGE+18, SETPURGE+29
^HLB - [#778] NEW+22!, NEW+57*, NEW+59*, NEW+62*, NEW+63*, NEW+78*, SETPURGE+12, SETPURGE+26, SETPURGE+48*, SETPURGE+51*
, SETPURGE+52*, SETPURGE+53*
^HLB("AD" NEW+58*, SETPURGE+47!, SETPURGE+48*, SETPURGE+50!, SETPURGE+51*, SETPURGE+52*, SETPURGE+53*
^HLB("B" NEW+50*
^HLB("C" NEW+51*
^HLB("ERRORS" NEW+53*
^HLB("SEARCH" SET+19*
^HLC("FILE778" NEWIEN+15
^HLCS(869.1 - [#869.1] TCP+4
^HLCS(870 - [#870] TCP+4
^HLTMP("PENDING SEARCH X-REF" NEW+75*, GETWORK+7, GETWORK+13, GETWORK+14, GETWORK+17, GETWORK+18, GETWORK+22, DOWORK+5, DOWORK+7, DOWORK+16!
, DOWORK+17

Label References

Name Line Occurrences
$$NEWIEN NEW+9
$$TCP NEW+9
AGAIN AGAIN+6
SET DOWORK+13, DOWORK+15

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACKTO NEW+67~, NEW+68*, NEW+71
ACKTO("ACK BY " , NEW+70*
ACKTO("IEN" NEW+69*
APP NEW+7~, NEW+31*, NEW+33, NEW+35, SET+3~, SET+8*, SET+9*, SET+19
COUNTER NEWIEN+12~, NEWIEN+15*, AGAIN+1, AGAIN+3, AGAIN+4, AGAIN+5
CS SET+3~, SET+7*, SET+8, SET+13, SET+14
DIR NEWIEN~, NEWIEN+13, NEWIEN+14, NEWIEN+15
DOLLARJ GETWORK+9~, GETWORK+12*, GETWORK+13*, GETWORK+14, GETWORK+17*, GETWORK+18, GETWORK+20
FS SET+3~, SET+5*, SET+6, SET+8, SET+12
HDR NEW+14~, NEW+19, DOWORK+12~, DOWORK+13
HDR(1 NEW+20, DOWORK+13
HDR(2 NEW+20, DOWORK+13
HLMSTATE NEW~, NEW+19, NEW+71
HLMSTATE("ACK TO IEN" , NEW+66, NEW+69,  TO" , NEW+18, NEW+24, NEW+68, NEW+72*
HLMSTATE("BATCH" NEW+18, NEW+19, NEW+23, NEW+32, NEW+37, NEW+38, NEW+54, NEW+70
HLMSTATE("BODY" NEW+24, NEW+51
HLMSTATE("DIRECTION" NEW+9, NEW+17, NEW+24, NEW+31, NEW+41, NEW+78
HLMSTATE("DT/ TM CREATED" , NEW+53, NEW+75
HLMSTATE("DT/TM" NEW+30
HLMSTATE("HDR" NEW+18*, NEW+20*, NEW+23, NEW+31, NEW+35, NEW+53, NEW+54, NEW+57, NEW+62, NEW+63
, NEW+70
HLMSTATE("IEN" NEW+11*, NEW+58
HLMSTATE("RETENTION" NEW+39*
HLMSTATE("STATUS" NEW+58, TCP+3
HLMSTATE("SYSTEM" NEW+37, NEW+38
ID NEW+7~, NEW+23*, NEW+24, NEW+50
IEN NEW+7~, NEW+9*, NEW+10, NEW+11, NEW+22, NEW+50, NEW+51, NEW+53, NEW+57, NEW+59
, NEW+62, NEW+63, NEW+75, NEW+78, NEW+80, NEWIEN+12~, AGAIN+1*, AGAIN+2, AGAIN+4*, AGAIN+6
AGAIN+7, TCP+1~, TCP+3*, TCP+4, SET+3~, SET+17*, SET+18*, SET+19
INC NEWIEN+12~, NEWIEN+13*, NEWIEN+14*, AGAIN+7
MATE SETPURGE~, SETPURGE+25, SETPURGE+26, SETPURGE+27!, SETPURGE+39, SETPURGE+49, SETPURGE+50, SETPURGE+51, SETPURGE+53
MATE("BATCH" SETPURGE+29*, SETPURGE+33
MATE("BODY" SETPURGE+28*, SETPURGE+29
MATE("DIR" SETPURGE+31*, SETPURGE+50, SETPURGE+51, SETPURGE+53
MATE("OLD PUR GE" , SETPURGE+30*, SETPURGE+45, SETPURGE+49, SETPURGE+50, SETPURGE+53
MATE("RETENTION" SETPURGE+32*, SETPURGE+33*, SETPURGE+40
MATESTAT SETPURGE~, SETPURGE+25, SETPURGE+34*, SETPURGE+41
MSG DOWORK+8~, DOWORK+9, DOWORK+13, DOWORK+15, SET~, SETPURGE~, SETPURGE+11, SETPURGE+12, SETPURGE+47, SETPURGE+48
, SETPURGE+52
MSG("BATCH" DOWORK+11, SET+10, SET+18, SETPURGE+18*, SETPURGE+22
MSG("BODY" SETPURGE+17*, SETPURGE+18
MSG("DIR" SETPURGE+20*, SETPURGE+47, SETPURGE+48, SETPURGE+52
MSG("DIRECTION" SET+4, SET+8, SET+19
MSG("DT/TM CR EATED" , DOWORK+10, SET+19
MSG("EVENT" SET+14*, SET+16*, SET+19
MSG("HDR" DOWORK+13*, SET+5, SET+7, SET+8, SET+12
MSG("IEN" SET+17
MSG("MESSAGE TYPE" , SET+13*, SET+15*, SET+19
MSG("OLD PURG E" , SETPURGE+19*, SETPURGE+44, SETPURGE+46, SETPURGE+47, SETPURGE+52
MSG("RETENTION" SETPURGE+21*, SETPURGE+22*, SETPURGE+37
MSGIEN DOWORK+3~, DOWORK+6*, DOWORK+7*, DOWORK+9, DOWORK+16
MSGSTAT SETPURGE~, SETPURGE+14, SETPURGE+38
NEWPURGE SETPURGE+10~, SETPURGE+37*, SETPURGE+38*, SETPURGE+40*, SETPURGE+41*, SETPURGE+43*, SETPURGE+44*, SETPURGE+45*, SETPURGE+46, SETPURGE+48
, SETPURGE+49, SETPURGE+51, SETPURGE+52, SETPURGE+53
NODE NEW+7~, NEW+24*, NEW+25*, NEW+26*, NEW+27*, NEW+28*, NEW+29*, NEW+30*, NEW+36*, NEW+42*
, NEW+43*, NEW+44*, NEW+45*, NEW+46*, NEW+47*, NEW+58*, NEW+59, SETPURGE+10~, SETPURGE+12*, SETPURGE+13
, SETPURGE+17, SETPURGE+19, SETPURGE+20, SETPURGE+21, SETPURGE+26*, SETPURGE+27, SETPURGE+28, SETPURGE+30, SETPURGE+31, SETPURGE+32
, SETPURGE+34
NOW GETWORK+9~, GETWORK+11*, GETWORK+15, GETWORK+19, GETWORK+20
OLD GETWORK+9~, GETWORK+12*, GETWORK+17
RTNTN NEW+7~, NEW+33*, NEW+35*, NEW+36, NEW+37*, NEW+38*, NEW+39
STAT NEW+7~, NEW+8*, NEW+25, NEW+26, NEW+27, NEW+28, NEW+29, NEW+42, NEW+43, NEW+44
, NEW+45, NEW+46, NEW+47, NEW+52, NEW+78
SUCCESS GETWORK+9~, GETWORK+10*, GETWORK+13, GETWORK+15*, GETWORK+17, GETWORK+19*
SYSPURGE SETPURGE+10~, SETPURGE+15
SYSPURGE("ERROR" SETPURGE+22, SETPURGE+33, SETPURGE+38, SETPURGE+41
SYSPURGE("NORMAL" SETPURGE+22, SETPURGE+33
TCP NEWIEN~, NEWIEN+13, NEWIEN+14, NEWIEN+15, TCP+1~, TCP+2*, TCP+4*, TCP+5
TIME GETWORK+14~*, GETWORK+15, GETWORK+18~*, GETWORK+19, DOWORK+3~, DOWORK+4*, DOWORK+5*, DOWORK+7, DOWORK+16
VALUE SET+11~, SET+12*, SET+13, SET+14
WORK GETWORK~, DOWORK~
WORK("DOLLARJ" GETWORK+12, GETWORK+20*, GETWORK+21, DOWORK+5, DOWORK+7, DOWORK+16
WORK("NOW" GETWORK+20*, DOWORK+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables  | All