Routine: BLR7OGMP

Package	Total	Call Graph
Kernel	3	$$FMTE^XLFDT ($$CJ,$$LJ,$$REPEAT,$$TRIM,$$UP)^XLFSTR ($$NAME,$$PADD)^XUAF4
Lab Service	2	$$EN^LRLRRVF (DD,DOC)^LRX
VA Fileman	2	$$GET1^DIQ ^DIWP
IHS Changes To Lab	1	$$GETACCCP^BLRUTIL3
Registration	1	$$SETSTR^VALM1

Package	Total	Caller Graph
Lab Service	2	LR7OGMC LRRPU

Entry Points

Name	Comments	DBIA/ICR reference
PRINT(OUTCNT)	; from LR7OGMC
MULTIVAL(VALUE)	; EP - Multiple Line Value String
PLS	; List performing laboratories
NAME(X)	; $$(#) -> name
SETLINE(LINE,CNT)	;
LABARRT	; EP - Lab Arrival Time
MUMPEVAL(EVAL)	;
DQUOTER(STR)	; EP -- Get rid of double quotes in string
ZEROFIX(F60PTR,RESULT)	; EP - Leading & Trailing Zero Fix for Results
MUMPRNGE(RANGE)	; EP -- MUMPS Code in Reference Range -- Evaluate and store
USEDIWP(X,LM,CW)	; EP -- Use FileMan DIWP to wrap text
DD(Y)	; $$(date/time) -> date/time format
REFWRAP	; EP -- Reference Range String too long -- have to wrap it
GETCOMPD()	; EP - Get Completion Date
CONDSPEC()	; EP - Specimen Condition
RESULTHD	; EP - 'Results' Header

External References

Name	Field # of Occurrence
$$GETACCCP^BLRUTIL3	LABARRT+3
$$GET1^DIQ	PRINT+99, PLS+18, LABARRT+5
^DIWP	USEDIWP+5, REFWRAP+10
$$EN^LRLRRVF	PRINT+77
DD^LRX	DD+1
DOC^LRX	NAME+2
$$SETSTR^VALM1	PRINT+22
$$FMTE^XLFDT	PRINT+26, GETCOMPD+16, LABARRT+9
$$CJ^XLFSTR	PLS+25
$$LJ^XLFSTR	PLS+9, PLS+17
$$REPEAT^XLFSTR	PLS+11
$$TRIM^XLFSTR	PRINT+73, PRINT+74, MUMPRNGE+15, MUMPRNGE+18, DQUOTER+4
$$UP^XLFSTR	PRINT+26, PRINT+72, ZEROFIX+3, LABARRT+9
$$NAME^XUAF4	PLS+9
$$PADD^XUAF4	PLS+10

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
68.02	GET1^DIQ
^HL(779.004 - [#779.004]	GET1^DIQ
^BLRUCUM - [#90475.3]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(63.04	ZEROFIX+11, ZEROFIX+13
^LAB(60 - [#60]	PRINT+45, ZEROFIX+8
^LAB(61 - [#61]	PRINT+25
^LR - [#63]	PRINT+53, PRINT+87, PRINT+91, CONDSPEC+1, GETCOMPD+9, GETCOMPD+12, GETCOMPD+14
^TMP("LR7OG"	PRINT+9, PRINT+12, PRINT+14, PRINT+42, PRINT+117, PRINT+119, PRINT+121, PRINT+124, PRINT+126
^TMP("LR7OGX"	SETLINE+1*
^TMP("LRPLS"	PRINT+91*, PLS+8, PLS+14, PLS+29!
^UTILITY($J	USEDIWP+3!, USEDIWP+7, USEDIWP+8, REFWRAP+7!, REFWRAP+12, REFWRAP+14, REFWRAP+21, REFWRAP+23, REFWRAP+25!
^XTMP("BLR7OGMP"	REFWRAP+12*

Label References

Name	Line Occurrences
$$CONDSPEC	PRINT+32
$$DQUOTER	MUMPRNGE+16, MUMPRNGE+19
$$GETCOMPD	PRINT+109, REFWRAP+17
$$MUMPEVAL	MUMPRNGE+22, MUMPRNGE+23
$$NAME	PRINT+16
LABARRT	PRINT+29
MULTIVAL	PRINT+115
MUMPRNGE	PRINT+61
PLS	PRINT+129
REFWRAP	PRINT+110
RESULTHD	PRINT+38
SETLINE	PRINT+18, PRINT+23, PRINT+27, PRINT+35, PRINT+36, PRINT+113, PRINT+119, PRINT+125, PRINT+128, RESULTHD+4 , RESULTHD+13, PLS+5, PLS+6, PLS+12, PLS+19, PLS+22, PLS+26, USEDIWP+9, REFWRAP+18, REFWRAP+24 , LABARRT+10
USEDIWP	MULTIVAL+1
ZEROFIX	PRINT+56, PRINT+75, PRINT+76

Naked Globals

Name	Field # of Occurrence
^(	PRINT+14, PRINT+42, PRINT+119, PRINT+124
^("G"	PRINT+9

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACC	PRINT+1~, PRINT+21*, PRINT+22
AGE	PRINT+1~, PRINT+9*
CDT	PRINT+1~, PRINT+10, PRINT+12, PRINT+13, PRINT+14, PRINT+26, PRINT+42, PRINT+117, PRINT+119, PRINT+121 , PRINT+124, PRINT+126
CMNT	PRINT+1~, PRINT+123, PRINT+124, PRINT+126
CNT	SETLINE~, SETLINE+1, SETLINE+2*, USEDIWP+1~
COUNTRY	PLS+3~, PLS+16*, PLS+18
COUNTY	PLS+3~, PLS+16*, PLS+17
CW	USEDIWP~, USEDIWP+4
DATA	PRINT+1~, PRINT+42*, PRINT+43, PRINT+44, PRINT+95, GETCOMPD+3, GETCOMPD+6
DATANAME	GETCOMPD+1~, GETCOMPD+6*, GETCOMPD+9
DATEHERE	GETCOMPD+1~, GETCOMPD+9, GETCOMPD+12, GETCOMPD+14, GETCOMPD+16, GETCOMPD+18
DBLQ	DQUOTER+1~, DQUOTER+3*, DQUOTER+5, DQUOTER+6
>> DILOCKTM	ZEROFIX+1
>> DISYS	ZEROFIX+1
>> DIWF	USEDIWP+4, REFWRAP+9
>> DIWL	USEDIWP+4, REFWRAP+9
>> DIWR	USEDIWP+4, REFWRAP+9
>> DN	ZEROFIX+8*, ZEROFIX+9, ZEROFIX+11, ZEROFIX+13
DOC	PRINT+1~, PRINT+16*, PRINT+20
>> DP	ZEROFIX+15*, ZEROFIX+16, ZEROFIX+27
DT	ZEROFIX+1
DTIME	ZEROFIX+1
DUZ	ZEROFIX+1
EVAL	MUMPEVAL~, MUMPEVAL+3, MUMPEVAL+6, MUMPEVAL+7*, MUMPEVAL+10
EVALLEN	MUMPEVAL+1~, MUMPEVAL+6*, MUMPEVAL+7
F60PTR	ZEROFIX~, ZEROFIX+1, ZEROFIX+6, ZEROFIX+8
FLAG	PRINT+1~, PRINT+44*, PRINT+97
HIGH	PRINT+1~, PRINT+74, PRINT+76, PRINT+77, MUMPRNGE+1~, MUMPRNGE+18, MUMPRNGE+19*, MUMPRNGE+23
ICOUNTRY	PLS+3~
IDT	PRINT+1~, PRINT+13*, PRINT+53, PRINT+87, PRINT+91, PRINT+109, REFWRAP+17, CONDSPEC+1, GETCOMPD+9, GETCOMPD+12 , GETCOMPD+14
INTP	PRINT+1~, PRINT+118, PRINT+119
IO	ZEROFIX+1
>> IOBS	ZEROFIX+1
IOF	ZEROFIX+1
IOM	ZEROFIX+1
ION	ZEROFIX+1
>> IOS	ZEROFIX+1
IOSL	ZEROFIX+1
IOST	ZEROFIX+1
>> IOT	ZEROFIX+1
>> IOXY	ZEROFIX+1
LABARRT	LABARRT+1~, LABARRT+5*, LABARRT+6, LABARRT+9
LINE	PRINT+1~, PRINT+20, PRINT+22, PRINT+23, PRINT+25, PRINT+26, PRINT+27, PRINT+34, PRINT+35, PRINT+94! , PRINT+95, PRINT+96, PRINT+97, PRINT+100, PRINT+106, PRINT+107, PRINT+109, PRINT+113, PRINT+122, PRINT+124 , PRINT+125, PRINT+126, SETLINE~, SETLINE+1, PLS+2~, PLS+9, PLS+11, PLS+12, PLS+17, PLS+18* , PLS+19, USEDIWP+1~, USEDIWP+6, USEDIWP+7, USEDIWP+8, REFWRAP+14, REFWRAP+15, REFWRAP+17, REFWRAP+18, REFWRAP+22! , REFWRAP+23, REFWRAP+24, REFWRAP+25!, LABARRT+8!, LABARRT+9*, LABARRT+10, LABARRT+11!
LINER	REFWRAP+1~, REFWRAP+20, REFWRAP+21, REFWRAP+23
LINESTR	PRINT+5~, RESULTHD+1!, RESULTHD+2, RESULTHD+3, RESULTHD+4, RESULTHD+5!, RESULTHD+6, RESULTHD+7, RESULTHD+8, RESULTHD+9 , RESULTHD+10, RESULTHD+11, RESULTHD+12*, RESULTHD+13
LM	USEDIWP~, USEDIWP+4, USEDIWP+7, USEDIWP+8, REFWRAP+1~, REFWRAP+8*, REFWRAP+9
LOW	PRINT+1~, PRINT+73, PRINT+75, PRINT+77, MUMPRNGE+1~, MUMPRNGE+15, MUMPRNGE+16*, MUMPRNGE+22
LRAA	LABARRT+1~, LABARRT+3, LABARRT+5
LRAD	LABARRT+1~, LABARRT+3, LABARRT+5
LRAN	LABARRT+1~, LABARRT+3, LABARRT+5
LRAS	LABARRT+1~, LABARRT+2*, LABARRT+3
LRCW	PRINT+1~, PRINT+9*
>> LRDFN	PRINT+53, PRINT+87, PRINT+91, CONDSPEC+1, GETCOMPD+9, GETCOMPD+12, GETCOMPD+14
LRDOC	NAME+1~, NAME+3
LRPLS	PRINT+5~, PLS+2~, PLS+7, PLS+8, PLS+9, PLS+10, PLS+14
LRSS	GETCOMPD+1~, GETCOMPD+3*, GETCOMPD+4, GETCOMPD+8, GETCOMPD+11, GETCOMPD+14
LRX	PRINT+1~, PRINT+82*, PRINT+105, PRINT+106, PRINT+110, REFWRAP+6
MAX	REFWRAP+1~, REFWRAP+3*, REFWRAP+9
>> ORIGRSLT	ZEROFIX+18*, ZEROFIX+25
OUTCNT	PRINT~, PRINT+18, PRINT+23, PRINT+27, PRINT+35, PRINT+36, PRINT+113, PRINT+119, PRINT+125, PRINT+128 , RESULTHD+4, RESULTHD+13, PLS+5, PLS+6, PLS+12, PLS+19, PLS+22, PLS+26, USEDIWP+9, REFWRAP+18 , REFWRAP+24, LABARRT+10
PORDER	PRINT+1~, PRINT+41, PRINT+42, PRINT+117, PRINT+119
PRNTCODE	PRINT+1~, PRINT+44*, PRINT+58, PRINT+59
RANGE	PRINT+2~, PRINT+44, PRINT+49, PRINT+61, PRINT+72, PRINT+73, PRINT+74, PRINT+77, PRINT+79, PRINT+82 , MUMPRNGE~, MUMPRNGE+15, MUMPRNGE+18, MUMPRNGE+25, MUMPRNGE+26
REFHIGH	PRINT+2~, PRINT+47*, PRINT+49
REFLOW	PRINT+2~, PRINT+46*, PRINT+49
REMOVED	DQUOTER+1~, DQUOTER+4, DQUOTER+5, DQUOTER+6, DQUOTER+8
RESULT	ZEROFIX~, ZEROFIX+1, ZEROFIX+3, ZEROFIX+5, ZEROFIX+18, ZEROFIX+19, ZEROFIX+20, ZEROFIX+21, ZEROFIX+23, ZEROFIX+25* , ZEROFIX+27, ZEROFIX+29
RV1	MUMPRNGE+1~, MUMPRNGE+22*, MUMPRNGE+25
RV2	MUMPRNGE+1~, MUMPRNGE+23*, MUMPRNGE+25
SEX	PRINT+2~, PRINT+9*
SITE	PRINT+2~, PRINT+44, PRINT+53, PRINT+54, PRINT+87*, PRINT+88, PRINT+89, PRINT+91, PRINT+107, REFWRAP+15
SITECNT	PRINT+5~, PRINT+11, PRINT+54, PRINT+88*, PRINT+128, PRINT+129
SPEC	PRINT+2~, PRINT+15*, PRINT+25, PRINT+45
SPECCOND	PRINT+6~, PRINT+32*, PRINT+33, PRINT+34
STR	PRINT+45, PRINT+46, PRINT+47, PRINT+50, PRINT+51, DQUOTER~, DQUOTER+4, MUMPEVAL+1~, MUMPEVAL+10, MUMPEVAL+11 , PLS+3~, PLS+14, PLS+15, PLS+16, PLS+25, PLS+26, USEDIWP+1~, USEDIWP+8, USEDIWP+9, ZEROFIX+13 , ZEROFIX+15
SUB	PRINT+2~, PRINT+44*, PRINT+53, PRINT+87
>> SYMBOL	ZEROFIX+18, ZEROFIX+20, ZEROFIX+29
TESTNUM	PRINT+2~, PRINT+44*, PRINT+45, PRINT+56, PRINT+75, PRINT+76
TESTSPEC	PRINT+3~
THER	PRINT+3~
THERHIGH	PRINT+3~, PRINT+51*
THERLOW	PRINT+3~, PRINT+50*
TIDT	PRINT+5~
TLOCDNM	PRINT+5~
U	PRINT+9, PRINT+15, PRINT+16, PRINT+21, PRINT+25, PRINT+43, PRINT+44, PRINT+95, PLS+11, ZEROFIX+1 , LABARRT+2
UNITS	PRINT+3~, PRINT+44, PRINT+99, PRINT+100
VALUE	PRINT+3~, PRINT+58*, PRINT+96, PRINT+115, MULTIVAL~, MULTIVAL+1
WOT	MUMPEVAL+1~, MUMPEVAL+12
X	PRINT+3~, PRINT+44, PRINT+56, PRINT+58, NAME~, PLS+2~, PLS+10, PLS+11, USEDIWP~, REFWRAP+6*
>> XPARSYS	ZEROFIX+1
>> XQXFLG	ZEROFIX+1
Y	DD~, DD+2
ZERO	PRINT+3~, PRINT+14*, PRINT+15, PRINT+16, PRINT+21, LABARRT+2

Customize PDF page

Package: IHS Changes To Lab

Routine: BLR7OGMP

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Caller Graph Total: 2

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: