Routine: HLUCM003

Package	Total	Call Graph
Health Level Seven	5	ERR^HLUCM ($$OKPAR101,$$REFPCKG,$$REFPROT)^HLUCM001 ($$OK0CALL,$$OKPAR)^HLUCM002 $$FIXNMSP^HLUCM003 $$NMSPCHG^HLUCM050
Kernel	1	$$FMDIFF^XLFDT
MailMan	1	REC^XMS3

Package	Total	Caller Graph
Health Level Seven	5	HLUCM HLUCM002 HLUCM003 HLUCM009 HLUCM050

Entry Points

Name	Comments	DBIA/ICR reference
PCKGMSH(MSH,INOUT)	; Extract PCKG namespace from MSH segment
RECNM(PFX,IEN772,FULLNM,REPNM,SRCE)	; Record where name found... ; PFX - [n] for namespace, and [p] for protocol ; IEN772 - IEN of 772 ; FULLNM - What is in entry itself, uninferred... ; REPNM - What is to be reported ; SRCE - Where it was inferred from
CORRECT(PAR,CHLDIEN,PCE,NEW)	; Change CHILD data...
MSH773(IEN772)	; Get PCKG from MSH segment in 773...
MSHMAIL(IEN772)	;
ADJPAR(IENPAR)	; Adjust times for one unit...
ERRCHK	; Error checks...
INOUT(IEN772)	;
CTPROT(PROT)	; Should entry be counted on basis of protocol? ; (Might be countable if package matches remember.) ; IEN,PROTYPE -- req
EOR	; HLUCM003 - HL7/Capacity Mgt API-II ;10/23/01 12:01
ADJTIME	; Adjust ^TMP times on basis of unit...
FIXNMSP(PCKG,I772)	; First space piece, strip _
SETMORE	; More defaults... ; ; Check format of PNMSP... ; If not passed by reference...
CTPCKG(PCKG)	; Should entry be counted on basis of package? ; (Might be countable if protocol matches remember.) ; If list of packages passed by reference, is PCKG in array? ; IEN101,NMSPTYPE,PNMSP -- req
MSH772(IEN772)	; Get PCKG from MSH segment in 772... ; Call here ONLY if can't get MSH segment from 773...

Name	Field # of Occurrence
ERR^HLUCM	ERRCHK+4, ERRCHK+5, ERRCHK+9, ERRCHK+18, SETMORE+7, SETMORE+14, SETMORE+18
$$OKPAR101^HLUCM001	SETMORE+15
$$REFPCKG^HLUCM001	CTPCKG+10
$$REFPROT^HLUCM001	CTPROT+10
$$OK0CALL^HLUCM002	CTPCKG+13, CTPROT+14
$$OKPAR^HLUCM002	SETMORE+6, SETMORE+13
$$FIXNMSP^HLUCM003	PCKGMSH+4
$$NMSPCHG^HLUCM050	FIXNMSP+11
$$FMDIFF^XLFDT	CORRECT+11
REC^XMS3	MSHMAIL+8

Name	Line Occurrences (* Changed, ! Killed)
^HL(772 - [#772]	MSHMAIL+2, MSHMAIL+3, MSH772+5, MSH772+7, INOUT+2, FIXNMSP+8
^HLMA - [#773]	MSH773+4, FIXNMSP+7
^HLMA("B"	MSH773+2, FIXNMSP+6
^TMP($J	ADJTIME+3, ADJPAR+4, ADJPAR+12, ADJPAR+13, ADJPAR+20, ADJPAR+22, ADJPAR+27, ADJPAR+28, CORRECT+4, CORRECT+15* , RECNM+7, RECNM+11, RECNM+12, RECNM+13, RECNM+14

Name	Line Occurrences
$$INOUT	MSH772+4, MSH773+3
$$PCKGMSH	MSHMAIL+11, MSH772+10, MSH773+6, MSH773+11
ADJPAR	ADJTIME+4
CORRECT	ADJPAR+21, ADJPAR+23, ADJPAR+35, ADJPAR+39, ADJPAR+43
RECNM	MSHMAIL+12, MSH772+11, MSH773+13

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
APPR	FIXNMSP+1~, FIXNMSP+9*
APPS	FIXNMSP+1~, FIXNMSP+9*
BEG	ADJPAR+1~, ADJPAR+17, ADJPAR+21, CORRECT+1~, CORRECT+10, CORRECT+11
CHILD	CORRECT+1~, CORRECT+7, CORRECT+10, CORRECT+12
CHLDIEN	CORRECT~, CORRECT+4, CORRECT+15
>> COND	ERRCHK+13
CT	MSHMAIL+1~, MSHMAIL+5, MSHMAIL+6, MSHMAIL+7, MSH772+2~, MSH772+3, MSH772+5, MSH772+6
CTPCKG	CTPCKG+4~
CTPROT	CTPROT+4~
DATA	ADJPAR+1~, ADJPAR+13, ADJPAR+14, ADJPAR+15, ADJPAR+28, ADJPAR+29
DEL	PCKGMSH+1~, PCKGMSH+2*, PCKGMSH+3
DIFF	CORRECT+1~, CORRECT+11*, CORRECT+12
END	ADJPAR+1~, ADJPAR+17, ADJPAR+23, CORRECT+1~, CORRECT+10, CORRECT+11, ERRCHK+3*, ERRCHK+5, ERRCHK+8
>> ERRINFO("INVA	LID END TIME" , ERRCHK+7, LID PROTOCOL PARAMETER" , SETMORE+16, LID START TIME" , ERRCHK+6
FACR	FIXNMSP+1~, FIXNMSP+9*
FACS	FIXNMSP+1~, FIXNMSP+9*
FULLNM	RECNM~, RECNM+14
>> HLCHILD	CORRECT+4*, CORRECT+15
I772	FIXNMSP~, FIXNMSP+3*, FIXNMSP+6, FIXNMSP+8
I773	FIXNMSP+1~, FIXNMSP+6*, FIXNMSP+7
>> IEN101	ERRCHK+16, SETMORE+13, SETMORE+15*, SETMORE+17, CTPROT+7, CTPROT+14, CTPROT+17
IEN772	ADJPAR+1~, ADJPAR+3, ADJPAR+4, ADJPAR+11, ADJPAR+12, ADJPAR+13, ADJPAR+20, ADJPAR+21, ADJPAR+22, ADJPAR+23 , ADJPAR+26, ADJPAR+27, ADJPAR+28, ADJPAR+35, ADJPAR+39, ADJPAR+43, RECNM~, RECNM+14, MSHMAIL~, MSHMAIL+2 , MSHMAIL+3, MSHMAIL+12, MSH772~, MSH772+4, MSH772+5, MSH772+7, MSH772+11, MSH773~, MSH773+2, MSH773+3 , MSH773+13, INOUT~, INOUT+2
IEN773	MSH773+1~, MSH773+2*, MSH773+4
IENPAR	ADJTIME+1~, ADJTIME+2, ADJTIME+3, ADJTIME+4, ADJPAR~, ADJPAR+4, ADJPAR+12, ADJPAR+20, ADJPAR+21, ADJPAR+22 , ADJPAR+23, ADJPAR+27, ADJPAR+35, ADJPAR+39, ADJPAR+43
IN	MSH772+2~, MSH772+3, MSH772+5, MSH772+7
INOUT	MSHMAIL+1~, MSHMAIL+3, MSHMAIL+4, MSHMAIL+10, MSHMAIL+11, MSH772+2~, MSH772+4, MSH772+9, MSH772+10, MSH773+1~ , MSH773+3, MSH773+5, MSH773+6, MSH773+9, MSH773+10, MSH773+11, INOUT+1~, INOUT+2, INOUT+3, INOUT+4 , PCKGMSH~, PCKGMSH+2, PCKGMSH+3
MIEN	MSHMAIL+1~, MSHMAIL+2*, MSHMAIL+5
MSH	MSH773+1~, MSH773+4, MSH773+5, MSH773+6, MSH773+10, MSH773+11, PCKGMSH~, PCKGMSH+2, PCKGMSH+3, FIXNMSP+1~ , FIXNMSP+7, FIXNMSP+8*, FIXNMSP+9
NEW	CORRECT~, CORRECT+4, CORRECT+7
NIEN	MSHMAIL+1~
NMSP	MSH773+8~, MSH773+9*, MSH773+12
>> NMSPTYPE	SETMORE+4, CTPCKG+10
NUM	ADJPAR+1~, ADJPAR+3, ADJPAR+5, ADJPAR+8
P1	ERRCHK+14~, ERRCHK+15*, ERRCHK+17
P2	ERRCHK+14~, ERRCHK+16*, ERRCHK+17
P3	ERRCHK+14~, ERRCHK+17*
PAR	CORRECT~
PCE	CORRECT~, CORRECT+4, CORRECT+7
PCKG	MSHMAIL+1~, MSHMAIL+5, MSHMAIL+6, MSHMAIL+11, MSHMAIL+12, MSHMAIL+13, MSH772+2~, MSH772+3, MSH772+5, MSH772+10 , MSH772+11, MSH772+12, MSH773+1~, MSH773+6, MSH773+7, MSH773+9, MSH773+11, MSH773+12, MSH773+13, MSH773+14 , FIXNMSP~, FIXNMSP+11, FIXNMSP+13, CTPCKG~, CTPCKG+10, CTPCKG+13, CTPCKG+14*
PFROM	PCKGMSH+1~, PCKGMSH+3*, PCKGMSH+4
PFX	RECNM~, RECNM+9
>> PNMSP	ERRCHK+15, SETMORE+6, CTPCKG+7, CTPCKG+13, CTPCKG+14
PREVTM	ADJPAR+1~, ADJPAR+26, ADJPAR+32, ADJPAR+33, ADJPAR+36, ADJPAR+38, ADJPAR+39, ADJPAR+40, ADJPAR+46
PROT	CTPROT~, CTPROT+10, CTPROT+14, CTPROT+16, CTPROT+18*
>> PROTYPE	SETMORE+11, CTPROT+10
RECNM	MSHMAIL+1~, MSHMAIL+10, MSHMAIL+12, MSH772+2~, MSH772+9, MSH772+11, MSH773+1~, MSH773+5, MSH773+10, MSH773+13
REPNM	RECNM~, RECNM+9*, RECNM+12, RECNM+13, RECNM+14
SEC	CORRECT+1~
SRCE	RECNM~, RECNM+13, RECNM+14
>> START	ERRCHK+3*, ERRCHK+4, ERRCHK+8
STORE	CORRECT+1~
TIME	ADJPAR+1~
TIME(	ADJPAR+14, ADJPAR+15
TIME(":"	ADJPAR+17
TIME(0	ADJPAR+17
TIME(1	ADJPAR+29, ADJPAR+33, ADJPAR+35, ADJPAR+36, ADJPAR+38, ADJPAR+40, ADJPAR+42, ADJPAR+43, ADJPAR+44
TIME(2	ADJPAR+29, ADJPAR+33, ADJPAR+42, ADJPAR+44, ADJPAR+46
TXT	MSHMAIL+1~, MSHMAIL+6, MSHMAIL+9, MSHMAIL+10, MSHMAIL+11, MSH772+2~, MSH772+7, MSH772+8, MSH772+9, MSH772+10
U	ADJPAR+14, ADJPAR+15, ADJPAR+29, CORRECT+4, CORRECT+7, CORRECT+10, CORRECT+12, MSHMAIL+2, MSHMAIL+3, INOUT+2 , CTPCKG+14, CTPROT+17
VAL	CTPROT+15~, CTPROT+17*, CTPROT+18
X	ADJPAR+14, ADJPAR+15, MSHMAIL+1~, MSHMAIL+10, MSH772+2~, MSH772+9, MSH773+1~, MSH773+5, MSH773+10, FIXNMSP+8* , FIXNMSP+9*
XMER	MSHMAIL+1~, MSHMAIL+5*, MSHMAIL+6
XMPOS	MSHMAIL+1~
XMRG	MSHMAIL+1~, MSHMAIL+9
XMZ	MSHMAIL+1~, MSHMAIL+5*

Customize PDF page

Package: Health Level Seven

Routine: HLUCM003

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 5

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: