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) ;02/04/2004

Source Information

Source file <HLOF778A.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
Health Level Seven 4 ACKTO^HLOF778  ($$GETMSG,$$NEXTMSG)^HLOMSG  BUILDHDR^HLOPBLD1  $$INC^HLOSITE  
Kernel 1 $$SEC^XLFDT  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Health Level Seven 3 HLOF777  HLOF778  HLOSRVR  

Entry Points

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

External References

Name Field # of Occurrence
ACKTO^HLOF778 NEW+59
$$GETMSG^HLOMSG DOWORK+9
$$NEXTMSG^HLOMSG DOWORK+13
BUILDHDR^HLOPBLD1 NEW+19
$$INC^HLOSITE AGAIN+1
$$SEC^XLFDT GETWORK+11, GETWORK+15, GETWORK+19, DOWORK+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^HLB - [#778] NEW+22!, NEW+46*, NEW+48*, NEW+51*, NEW+52*
^HLB("AD" NEW+47*
^HLB("B" NEW+41*
^HLB("C" NEW+42*
^HLB("ERRORS" NEW+43*
^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+63*, 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+56~, NEW+57*, NEW+59
ACKTO("ACK BY " , NEW+58*
APP 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+59
HLMSTATE("ACK TO" , NEW+18, NEW+24, NEW+55, NEW+57, NEW+60*
HLMSTATE("BATCH" NEW+18, NEW+19, NEW+23, NEW+58
HLMSTATE("BODY" NEW+24, NEW+42
HLMSTATE("DIRECTION" NEW+9, NEW+17, NEW+24, NEW+32
HLMSTATE("DT/ TM CREATED" , NEW+43, NEW+63
HLMSTATE("DT/TM" NEW+30
HLMSTATE("HDR" NEW+18*, NEW+20*, NEW+23, NEW+43, NEW+46, NEW+51, NEW+52, NEW+58
HLMSTATE("IEN" NEW+11*, NEW+47
HLMSTATE("STATUS" NEW+47, TCP+3
ID NEW+7~, NEW+23*, NEW+24, NEW+41
IEN NEW+7~, NEW+9*, NEW+10, NEW+11, NEW+22, NEW+41, NEW+42, NEW+43, NEW+46, NEW+48
, NEW+51, NEW+52, NEW+63, NEW+65, 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
MSG DOWORK+8~, DOWORK+9, DOWORK+13, DOWORK+15, SET~
MSG("BATCH" DOWORK+11, SET+10, SET+18
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
MSGIEN DOWORK+3~, DOWORK+6*, DOWORK+7*, DOWORK+9, DOWORK+16
NODE NEW+7~, NEW+24*, NEW+25*, NEW+26*, NEW+27*, NEW+28*, NEW+29*, NEW+30*, NEW+33*, NEW+34*
, NEW+35*, NEW+36*, NEW+37*, NEW+38*, NEW+47*, NEW+48
NOW GETWORK+9~, GETWORK+11*, GETWORK+15, GETWORK+19, GETWORK+20
OLD GETWORK+9~, GETWORK+12*, GETWORK+17
STAT NEW+7~, NEW+8*, NEW+25, NEW+26, NEW+27, NEW+28, NEW+29, NEW+33, NEW+34, NEW+35
, NEW+36, NEW+37, NEW+38, NEW+43
SUCCESS GETWORK+9~, GETWORK+10*, GETWORK+13, GETWORK+15*, GETWORK+17, GETWORK+19*
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