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

Package: Health Level Seven

Routine: HLOSRVR1


Information

HLOSRVR1 ;IRMFO-ALB/CJM/OAK/PIJ - Reading messages, sending acks;03/24/2004 14:43 ;03/08/2012

Source Information

Source file <HLOSRVR1.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Health Level Seven 10 $$ACTION^HLOAPP  $$GETEVENT^HLOCLNT2  $$SAVEMSG^HLOF778  (ADDMSG2,ADDSEG)^HLOMSG  $$ACKTOIEN^HLOMSG1  $$ESCAPE^HLOPBLD  $$PARSEHDR^HLOPRS  NEWMSG^HLOSRVR2  
COUNT^HLOSTAT  ($$READHDR,$$READSEG,CLOSE)^HLOT  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
Health Level Seven 4 HLOAPI  HLOCLNT1  HLOPRSR3  HLOSRVR  

Entry Points

Name Comments DBIA/ICR reference
DEL777(IEN777) ;delete a record from file 777 where the read did not complete
DEL778(IEN778) ;delete a record from file 778 where the read did not complete
SQUISH(SEG) ;
ADDAC(HLMSTATE) ;adds the AC xref for duplicates detection
READMSG(HLCSTATE,HLMSTATE) ;
ZB30
CHECKMSG(HLMSTATE) ;
SPLITHDR(HDR) ;
DUP(HLMSTATE) ;
ZB29

External References

Name Field # of Occurrence
$$ACTION^HLOAPP CHECKMSG+20, CHECKMSG+34
$$GETEVENT^HLOCLNT2 CHECKMSG+32
$$SAVEMSG^HLOF778 ZB30+42
ADDMSG2^HLOMSG ZB30+33
ADDSEG^HLOMSG ZB30+28, ZB30+41
$$ACKTOIEN^HLOMSG1 ZB30+18
$$ESCAPE^HLOPBLD ZB30+16
$$PARSEHDR^HLOPRS READMSG+20
NEWMSG^HLOSRVR2 ZB29+8
COUNT^HLOSTAT ZB30+51
$$READHDR^HLOT READMSG+16
$$READSEG^HLOT ZB30+4, ZB30+10
CLOSE^HLOT ZB29+1, ZB29+6, ZB30+53

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^HLA - [#777] DEL777+2!
^HLB - [#778] ZB30+26, DUP+21, CHECKMSG+25, DEL778+2!
^HLB("AC" ADDAC+4*, DUP+16

Label References

Name Line Occurrences
$$DUP ZB29+12
ADDAC ZB30+50
CHECKMSG ZB30+49
DEL777 ZB30+46
DEL778 ZB30+46
SPLITHDR READMSG+17, ZB30+31
SQUISH SPLITHDR+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A SQUISH+6~, SQUISH+16
A( SQUISH+12*
ACK READMSG+13~
ACTION CHECKMSG+10~, CHECKMSG+20, CHECKMSG+21, CHECKMSG+34
CODE ZB30+11~, ZB30+15*, ZB30+17, ZB30+23, ZB30+39
COUNT SQUISH+6~, SQUISH+8*, SQUISH+13*, SQUISH+14*
DUP DUP+9~, DUP+10*, DUP+16, DUP+17*, DUP+26*, DUP+28
ERROR CHECKMSG+10~, CHECKMSG+12*, CHECKMSG+18, CHECKMSG+20*, CHECKMSG+22, CHECKMSG+26*, CHECKMSG+27*
FROM ADDAC+2~, ADDAC+3*, ADDAC+4, DUP+9~, DUP+15*, DUP+16
FS ZB30+7~, ZB30+9*, ZB30+15, ZB30+16, ZB30+32, SPLITHDR+3~, SPLITHDR+5*, SPLITHDR+6, SPLITHDR+8
HDR CHECKMSG+11*, CHECKMSG+20, CHECKMSG+34, SPLITHDR~, SPLITHDR+4
HDR("ACCEPT A CK TYPE" , CHECKMSG+13
HDR("EVENT" CHECKMSG+32*
HDR("PROCESSI NG ID" , CHECKMSG+36
HDR("RECEIVIN G FACILITY" , CHECKMSG+43, CHECKMSG+44, CHECKMSG+45, CHECKMSG+46, CHECKMSG+47
HDR(1 SPLITHDR+5, SPLITHDR+6, SPLITHDR+8, SPLITHDR+10*
HDR(2 SPLITHDR+9*
HLCSTATE READMSG~, READMSG+16, ZB29+1, ZB29+6, ZB29+8, ZB30+4, ZB30+10, ZB30+51, ZB30+53
HLCSTATE("MES SAGE ENDED" , ZB29*, ZB29+5*, ZB30+42, ZB30+44, ZB30+53, ZB30+54
HLCSTATE("SYSTEM" CHECKMSG+36, CHECKMSG+43, CHECKMSG+46, CHECKMSG+47, CHECKMSG+48, SQUISH+7
HLMSTATE READMSG~, ZB29+8, ZB29+12, ZB30+16, ZB30+28, ZB30+33, ZB30+41, ZB30+42, ZB30+49, ZB30+50
, ADDAC~, DUP~, CHECKMSG~
HLMSTATE("ACK TO IEN" , ZB30+25*, CHECKMSG+25, CHECKMSG+26*, CHECKMSG+27*, CHECKMSG+32,  TO" , ZB30+21*, ZB30+22*, ZB30+23*
, ZB30+26*, ZB30+27*, CHECKMSG+18, CHECKMSG+42
HLMSTATE("BATCH" ZB30+19, ZB30+36, ZB30+37*, ZB30+38*, ZB30+39*, ZB30+40*, ZB30+51
HLMSTATE("BODY" ZB30+46, ZB30+47*
HLMSTATE("HDR" ZB29+11, ZB30+9, ZB30+51, ADDAC+3, ADDAC+4, DUP+15, DUP+16, DUP+17, CHECKMSG+11, CHECKMSG+32
HLMSTATE("ID" ZB29+9, ZB30+22, ADDAC+4, DUP+13, DUP+16, CHECKMSG+27
HLMSTATE("IEN" ZB30+46, ZB30+47*, ADDAC+4
HLMSTATE("MSA" ZB29+11*, DUP+22*, DUP+23, DUP+24*, DUP+25*, CHECKMSG+17*, CHECKMSG+20*, CHECKMSG+26*, CHECKMSG+27*, CHECKMSG+36*
, CHECKMSG+48*, CHECKMSG+49*
HLMSTATE("ORI GINAL MODE" , CHECKMSG+13, CHECKMSG+17
HLMSTATE("STATUS" CHECKMSG+17*, CHECKMSG+20*, CHECKMSG+21*, CHECKMSG+26*, CHECKMSG+27*, CHECKMSG+29*, CHECKMSG+30*, CHECKMSG+34*, CHECKMSG+36*, CHECKMSG+48*
HLMSTATE("UNS TORED LINES" , ZB30+42
>> HLO("MSGID" ZB29+4
I READMSG+13~, ZB29+3*, ZB29+4, SQUISH+6~, SQUISH+8*, SQUISH+9*, SQUISH+10, SQUISH+12
IEN ZB30+11~, ZB30+18*, ZB30+24, ZB30+25, ZB30+26, ZB30+40, DUP+9~, DUP+10*, DUP+16*, DUP+21
IEN777 DEL777~, DEL777+2
IEN778 DEL778~, DEL778+2
J SQUISH+6~, SQUISH+8*, SQUISH+12, SQUISH+14*
K SQUISH+6~, SQUISH+11*, SQUISH+12
LEN SQUISH+6~, SQUISH+10*, SQUISH+11
MAX SQUISH+6~, SQUISH+7*, SQUISH+14
MSA ZB30+11~, ZB30+14*, ZB30+15, ZB30+16
NEWMSGID ZB30+7~, ZB30+8*, ZB30+32*, ZB30+38
NODE DUP+20~, DUP+21*, DUP+22, DUP+24, DUP+25, CHECKMSG+24~, CHECKMSG+25*, CHECKMSG+26, CHECKMSG+27, CHECKMSG+29
, CHECKMSG+30
OLDMSGID ZB30+11~, ZB30+15*, ZB30+18, ZB30+21, ZB30+37
PASS CHECKMSG+10~, CHECKMSG+39*, CHECKMSG+42*, CHECKMSG+43*, CHECKMSG+44*, CHECKMSG+45*, CHECKMSG+46*, CHECKMSG+47*, CHECKMSG+48, CHECKMSG+49
QUEUE CHECKMSG+10~, CHECKMSG+20, CHECKMSG+21, CHECKMSG+34
SEG READMSG+13~, READMSG+16, READMSG+17, READMSG+20, ZB29+8, ZB30+4, ZB30+10, ZB30+28, ZB30+31, ZB30+33
, ZB30+41, SQUISH~, SQUISH+15!, SQUISH+16*
SEG( SQUISH+9, SQUISH+10, SQUISH+12
SEG("BATCH CO NTROL ID" , ZB29+3
SEG("MESSAGE CONTROL ID" , ZB29+3
SEG("SEGMENT TYPE" , ZB29+3
SEG(1 ZB30+12, ZB30+14, SQUISH+4
SEG(2 ZB30+12, ZB30+14, ZB30+32
SEG(3 ZB30+14
SEGTYPE ZB30+11~, ZB30+12*, ZB30+13, ZB30+17*, ZB30+20, ZB30+30, ZB30+35
STORE READMSG+13~, READMSG+15*, ZB29+10*, ZB29+12, ZB30*, ZB30+3, ZB30+44, ZB30+48
SUBIEN ZB30+36~*, ZB30+37, ZB30+38, ZB30+39, ZB30+40
TEMP SPLITHDR+3~
TEMP(1 SPLITHDR+6*, SPLITHDR+8, SPLITHDR+10
TEMP(2 SPLITHDR+7*, SPLITHDR+8*, SPLITHDR+9
TEXT ZB30+11~, ZB30+16*, ZB30+27
WANTACK CHECKMSG+10~, CHECKMSG+14*, CHECKMSG+16*, CHECKMSG+20, CHECKMSG+26, CHECKMSG+27, CHECKMSG+36, CHECKMSG+48, CHECKMSG+49
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  All