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 |  Marked Items  | All
Print Page as PDF
Routine: HLUCM009

Package: Health Level Seven

Routine: HLUCM009


Information

HLUCM009 ;CIOFO-O/LJA - HL7/Capacity Mgt API-II ;2/25/03-08:50

Source Information

Source file <HLUCM009.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Health Level Seven 3 INCR^HLUCM001  (ERRCHK,SETMORE)^HLUCM003  $$LOADEM^HLUCM050  
Kernel 1 $$UP^XLFSTR  
MailMan 1 QD^XMXUTIL3  

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

Package Total Caller Graph
Health Level Seven 6 HLEVSRV0  HLUCM  HLUCM001  HLUCM002  HLUCM050  HLUCM090  

Entry Points

Name Comments DBIA/ICR reference
IEN870(IEN772) ; Given 772 find 870...
MSGTYPE(IEN772) ; MSG or MSA's type...
KILLS(WHEN) ; Kills of ^TMP data WHEN (START or END or ALL)
SITESMSH(TXT) ; Return location pieces, slightly modified...
MAILTYPE(MIEN) ; Is MSH in Mailman message local or remote...
NMSPXRF ; Xref of namespaces that can be inferred. (If start with DG change to DG)
ACCUMLAT(CATEGORY,TYPE,SORT,SUB1,SUB2,SUB3,SUB4) ; Generic accumulator
LOAD772S(IEN772,HLNMSP) ; Load list of related 772s... [HL*1.6*91]
HOLDTOT(IEN) ; Accumulate...
SETUP() ; Perform checks, which can return error conditions, and
; set up variables for $$LOOP. This extrinsic function returns
; "" if no errors, or the # errors found. (Note that error
; details placed in ERRINFO(ERROR-REASON)="")
SETDEF ; Set various defaults...
FINDWAY ; How were NMSP and PROT passed? By reference? (If so, return 1)
; Passed by reference?
MSGID(MSGID) ; Search forward for MSA's to this MSGID...
ERRMOVE(IEN772) ; Move all associated data out of ^TMP's totaling arrays
EOR ;HLUCM009 - HL7/Capacity Mgt API-II ;2/25/03-08:50

External References

Name Field # of Occurrence
INCR^HLUCM001 ACCUMLAT+4, ACCUMLAT+8, ACCUMLAT+13, ACCUMLAT+18, ACCUMLAT+23, ACCUMLAT+28
ERRCHK^HLUCM003 SETUP+9
SETMORE^HLUCM003 SETUP+8
$$LOADEM^HLUCM050 LOAD772S+15
$$UP^XLFSTR SETDEF+4
QD^XMXUTIL3 MAILTYPE+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^HL(772 - [#772] IEN870+2, MSGTYPE+2, LOAD772S+10, LOAD772S+12, MSGID+3
^HLMA - [#773] IEN870+12, MSGID+4
^HLMA("B" IEN870+11
^HLMA("C" MSGID+4
^ORD(101 - [#101] IEN870+8
^TMP( KILLS+8!, KILLS+14!, KILLS+22!, ACCUMLAT+3, ACCUMLAT+5*, ACCUMLAT+7, ACCUMLAT+9*, ACCUMLAT+12, ACCUMLAT+14*, ACCUMLAT+17
, ACCUMLAT+19*, ACCUMLAT+22, ACCUMLAT+24*, ACCUMLAT+27, ACCUMLAT+29*, SETUP+10!
^TMP($J KILLS+8!, KILLS+14!, KILLS+20!, KILLS+22!, MAILTYPE+3!, MAILTYPE+6, MAILTYPE+7, MAILTYPE+8, MAILTYPE+10!, NMSPXRF+1!*
, ERRMOVE+4, ERRMOVE+5, ERRMOVE+10, ERRMOVE+12*, ERRMOVE+13!, ERRMOVE+16*, ERRMOVE+17!, ERRMOVE+20*, ERRMOVE+21!

Label References

Name Line Occurrences
FINDWAY SETUP+7
SETDEF SETUP+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACKTO LOAD772S+6~
BIEN MSGID+1~
CATEGORY ACCUMLAT~, ACCUMLAT+3, ACCUMLAT+5, ACCUMLAT+7, ACCUMLAT+9, ACCUMLAT+12, ACCUMLAT+14, ACCUMLAT+17, ACCUMLAT+19, ACCUMLAT+22
, ACCUMLAT+24, ACCUMLAT+27, ACCUMLAT+29
CHILD LOAD772S+6~
>> COND SETDEF+4*, SETDEF+5*
CT MSGID+1~
D MSGID+1~
DATA IEN870+1~, IEN870+2*, IEN870+5, IEN870+8, KILLS+1~, KILLS+7*, KILLS+8, KILLS+12*, KILLS+13, KILLS+14
, KILLS+21*, KILLS+22, LOAD772S+6~, LOAD772S+12*
DEL MSGTYPE+1~, MSGTYPE+3*, MSGTYPE+4
DIV SITESMSH+1~, SITESMSH+2*
FAC LOAD772S+6~
HL772 LOAD772S+6~
HLAPI KILLS+18!
HLI LOAD772S+6~
HLJ LOAD772S+6~
HLK LOAD772S+6~
HLN LOAD772S+6~
HLNMSP LOAD772S~, LOAD772S+9!, LOAD772S+15
HLPCKG LOAD772S+6~
HLZZI LOAD772S+6~
HOLD MSGID+1~
HOLD( MSGID+3*, MSGID+4*
HOLDNMSP LOAD772S+6~
HOLDNMSP( HOLDTOT+1, HOLDTOT+2*
I NMSPXRF+1~*, LOAD772S+6~
I772 LOAD772S+7~, MSGID+1~
I773 IEN870+1~, IEN870+10*, IEN870+11*, IEN870+12, LOAD772S+7~, MSGID+1~
I870 IEN870+1~, IEN870+11, IEN870+12*, IEN870+13
IEN IEN870+1~, IEN870+5*, IEN870+8*, MAILTYPE+1~, HOLDTOT~, HOLDTOT+1, HOLDTOT+2
>> IEN101 SETDEF+2*, FINDWAY+3
>> IEN101("" FINDWAY+3
IEN772 IEN870~, IEN870+2, IEN870+11, MSGTYPE~, MSGTYPE+2, LOAD772S~, LOAD772S+10, LOAD772S+12, LOAD772S+15, ERRMOVE~
, ERRMOVE+5, ERRMOVE+6
IEN772C ERRMOVE+1~, ERRMOVE+9*, ERRMOVE+10*, ERRMOVE+12, ERRMOVE+13
IEN772P ERRMOVE+1~, ERRMOVE+5*, ERRMOVE+6*, ERRMOVE+10, ERRMOVE+16, ERRMOVE+17, ERRMOVE+20, ERRMOVE+21
IN MSGTYPE+1~, MSGTYPE+2*, MSGTYPE+3, MSGTYPE+4*, MSGTYPE+5
MIEN MAILTYPE~, MAILTYPE+4
MSA MSGID+1~
MSGID LOAD772S+7~, MSGID~, MSGID+3, MSGID+4
>> NMSPTYPE FINDWAY+2*
NOERR SETUP+4~, SETUP+5*, SETUP+11
NUM LOAD772S+7~, LOAD772S+15*, LOAD772S+17
P4 SITESMSH+1~, SITESMSH+2*, SITESMSH+3*, SITESMSH+5
P6 SITESMSH+1~, SITESMSH+2*, SITESMSH+4*, SITESMSH+5
PARENT LOAD772S+7~
PCKG LOAD772S+7~
PIEN LOAD772S+7~
>> PNMSP SETDEF+1*, FINDWAY+2
>> PNMSP("" FINDWAY+2
PROT LOAD772S+7~
>> PROTYPE FINDWAY+3*
RECNO MAILTYPE+1~, MAILTYPE+5*, MAILTYPE+6*, MAILTYPE+7, MAILTYPE+8
SORT ACCUMLAT~, ACCUMLAT+3, ACCUMLAT+5, ACCUMLAT+7, ACCUMLAT+9, ACCUMLAT+12, ACCUMLAT+14, ACCUMLAT+17, ACCUMLAT+19, ACCUMLAT+22
, ACCUMLAT+24
>> SUB ERRMOVE+11*, ERRMOVE+12, ERRMOVE+13
SUB1 ACCUMLAT~, ACCUMLAT+3, ACCUMLAT+5, ACCUMLAT+7, ACCUMLAT+9, ACCUMLAT+12, ACCUMLAT+14, ACCUMLAT+17, ACCUMLAT+19
SUB2 ACCUMLAT~, ACCUMLAT+3, ACCUMLAT+5, ACCUMLAT+7, ACCUMLAT+9, ACCUMLAT+12, ACCUMLAT+14
SUB3 ACCUMLAT~, ACCUMLAT+3, ACCUMLAT+5, ACCUMLAT+7, ACCUMLAT+9
SUB4 ACCUMLAT~, ACCUMLAT+2, ACCUMLAT+3, ACCUMLAT+5
T NMSPXRF+1~*
TO MAILTYPE+1~, MAILTYPE+7*, MAILTYPE+9
TOID MAILTYPE+1~, MAILTYPE+8*, MAILTYPE+9
>> TOTALS KILLS+7, KILLS+12, ACCUMLAT+3, ACCUMLAT+5, ACCUMLAT+7, ACCUMLAT+9, ACCUMLAT+12, ACCUMLAT+14, ACCUMLAT+17, ACCUMLAT+19
, ACCUMLAT+22, ACCUMLAT+24, ACCUMLAT+27, ACCUMLAT+29, SETUP+10, SETDEF+3*
>> TOTCURR ACCUMLAT+3*, ACCUMLAT+5, ACCUMLAT+7*, ACCUMLAT+9, ACCUMLAT+12*, ACCUMLAT+14, ACCUMLAT+17*, ACCUMLAT+19, ACCUMLAT+22*, ACCUMLAT+24
, ACCUMLAT+27*, ACCUMLAT+29
TOTNUM LOAD772S+7~, HOLDTOT+1, HOLDTOT+2*
TXT SITESMSH~, SITESMSH+2
TYPE MAILTYPE+1~, MAILTYPE+2*, MAILTYPE+6, MAILTYPE+9*, MAILTYPE+11, ACCUMLAT~, ACCUMLAT+3, ACCUMLAT+5, ACCUMLAT+7, ACCUMLAT+9
, ACCUMLAT+12, ACCUMLAT+14, ACCUMLAT+17, ACCUMLAT+19, ACCUMLAT+22, ACCUMLAT+24, ACCUMLAT+27, ACCUMLAT+29
U IEN870+5, IEN870+8, IEN870+12, SITESMSH+5, NMSPXRF+1
VAL LOAD772S+7~
WHEN KILLS~, KILLS+4*, KILLS+11, KILLS+17
X LOAD772S+7~, MSGID+1~, MSGID+3*, MSGID+4*

Marked Items

Name Field # of Occurrence
$T(NMSPXRF+I NMSPXRF+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All