Routine: BLRLINKU

Call Graph

Call Graph Total: 10

Package	Total	Call Graph
IHS Changes To Lab	3	(HEADERDT,HEADERPG,PRESSKEY)^BLRGMENU ENTRYAUD^BLRUTIL GETACCCP^BLRUTIL3
VA Fileman	3	FIND^DIC $$GET1^DIQ ^DIR
Kernel	2	($$DT,$$FMDIFF,$$HDIFF,$$HTE,$$HTFM)^XLFDT ($$CJ,$$UP)^XLFSTR
DRG Grouper	1	$$ICDDX^ICDEX
IHS VA Utilities	1	^XBFMK

Package	Total	Caller Graph
IHS Changes To Lab	3	BLRLINK1 BLRLINK4 BLRPRE34
Lab Service	1	LRWLST1

Package

Total

Caller Graph

IHS Changes To Lab

BLRLINK1 BLRLINK4 BLRPRE34

Lab Service

LRWLST1

Entry Points

Name	Comments	DBIA/ICR reference
REPTSINI	; EP -- Initialize Variables
STORVAL(WHERE,WHAT)
REPTSLIN	; EP - Write a line of Data
LAHREFR()	; EP - Return Flag/Ref Ranges/Units from ^LR, if possible
WARNINGS(MSG)	; EP
ICDCHEK(ICDCODE)	; EP - Check to see if passed string is in ICD dictionary.
CHKINHL7	; EP
REFLAB68	; EP -- Setup ^XTMP global with Ref Lab Accessions' IENs ; If purge date > Today, then RETURN
RPTSBRKO	; EP - Breakout values for variables
RESETX	; EP ; Delete the ^XTMP("BLRLINKU" global. This allows ; REFLAB68 (see above) to rebuild the global with ; the latest information.
REPTSTOR	; EP -- Progrmmaer Mode Only Report on ^XTMP("BLRSRCH") global
STORFIND(UID,WOT)	; EP - Store Time Before or After $Order through the ^INTHU global
GETINTHU(UID)	; EP -- Get Reference Range information from File 4001 (UNIVERSAL INTERFACE)
RESTART	; EP - Create ^XTMP("BLRSRCH") if it doesn't exist or restart it

External References

Name	Field # of Occurrence
HEADERDT^BLRGMENU	RESETX+7, RESETX+16, RESETX+21, RESETX+28
HEADERPG^BLRGMENU	REPTSLIN+3
PRESSKEY^BLRGMENU	REPTSTOR+10, RESETX+30, WARNINGS+9
ENTRYAUD^BLRUTIL	CHKINHL7+1, CHKINHL7+21, CHKINHL7+31, GETINTHU+1, GETINTHU+70, LAHREFR+3, LAHREFR+17, LAHREFR+34
GETACCCP^BLRUTIL3	CHKINHL7+8
FIND^DIC	REFLAB68+29
$$GET1^DIQ	GETINTHU+11, LAHREFR+9, LAHREFR+10, LAHREFR+13
^DIR	WARNINGS+6
$$ICDDX^ICDEX	ICDCHEK+10
^XBFMK	WARNINGS+2
$$DT^XLFDT	REFLAB68+2, STORFIND+2
$$FMDIFF^XLFDT	STORFIND+2
$$HDIFF^XLFDT	RPTSBRKO+23
$$HTE^XLFDT	RPTSBRKO+10, RPTSBRKO+21
$$HTFM^XLFDT	REFLAB68+10, RESTART+2
$$CJ^XLFSTR	REPTSINI+3, RESETX+15, RESETX+20
$$UP^XLFSTR	GETINTHU+20, RPTSBRKO+10, RPTSBRKO+21

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: UID Line Location: REPTSLIN+5
Function Call: WRITE	Prompt: ?11,LRAS Line Location: REPTSLIN+6
Function Call: WRITE	Prompt: ?31,SDT Line Location: REPTSLIN+7
Function Call: WRITE	Prompt: ?51,EDT Line Location: REPTSLIN+8
Function Call: WRITE	Prompt: ?71,$J(DIFFTIME,9) Line Location: REPTSLIN+9
Function Call: WRITE	Prompt: ! Line Location: REPTSLIN+10
Function Call: WRITE	Prompt: ?9,"This option will reset the ^XTMP(""BLRLINKU"") Global.",! Line Location: RESETX+8
Function Call: WRITE	Prompt: ! Line Location: RESETX+9
Function Call: WRITE	Prompt: ?9,"The ^XTMP(""BLRLINKU"") Global is ONLY used for Reference Lab",! Line Location: RESETX+10
Function Call: WRITE	Prompt: ?9,"processes.",! Line Location: RESETX+11
Function Call: WRITE	Prompt: ! Line Location: RESETX+12
Function Call: WRITE	Prompt: !!,?9,"^XTMP(""BLRLINKU"") Global has been reset.",! Line Location: RESETX+29
Function Call: WRITE	Prompt: ?9,MSG Line Location: WARNINGS+1
Function Call: WRITE	Prompt: !!,?14,"Invalid/Quit/No response. Routine Ends." Line Location: WARNINGS+8
Routine Call	DIC Line Location: REFLAB68+29
Routine Call	DIR Line Location: WARNINGS+6

FileNo	Call Tags
^INRHD - [#4005]	FIND^DIC
^LAB(60 - [#60]	GET1^DIQ
68.02	GET1^DIQ
^BLRSITE - [#9009029]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUTTLOC - [#9999999.06]	REFLAB68+15
^BLRRL - [#9009026]	REFLAB68+26, REFLAB68+39, REFLAB68+40
^BLRSITE - [#9009029]	REFLAB68+13, REFLAB68+14, REFLAB68+25
^BLRTXLOG - [#9009022]	CHKINHL7+7, CHKINHL7+14, STORVAL+4*, LAHREFR+12
^INTHU - [#4001]	GETINTHU+32, GETINTHU+33, GETINTHU+35, GETINTHU+42, GETINTHU+44
^INTHU("AD"	GETINTHU+30
^INTHU(0	REPTSINI+3
^LAB(62.4 - [#62.4]	GETINTHU+14, GETINTHU+51, GETINTHU+54
^LR - [#63]	LAHREFR+15
^LRO(68 - [#68]	CHKINHL7+16, REFLAB68+42, RPTSBRKO+4, RPTSBRKO+5, RPTSBRKO+6, RPTSBRKO+7, LAHREFR+5
^TMP("BLR"	CHKINHL7+23, GETINTHU+4, GETINTHU+64, LAHREFR+30, LAHREFR+33
^TMP("BLRLINKU"	GETINTHU+66*
^XTMP("BLRLINKU"	CHKINHL7+12, GETINTHU+23, REFLAB68+2, REFLAB68+7!, REFLAB68+10, REFLAB68+35, REFLAB68+36, REFLAB68+42, RESETX+25!
^XTMP("BLRSRCH"	STORFIND+1, STORFIND+2, STORFIND+4, STORFIND+5, STORFIND+6, RESTART+1!, RESTART+2*, REPTSTOR+6, REPTSTOR+7, RPTSBRKO+9 , RPTSBRKO+13, RPTSBRKO+16, RPTSBRKO+20

Label References

Name	Line Occurrences
$$GETINTHU	CHKINHL7+19
$$LAHREFR	GETINTHU+17
$$WARNINGS	RESETX+13, RESETX+17, RESETX+22
REFLAB68	CHKINHL7+11, RESETX+26
REPTSINI	REPTSTOR+4
REPTSLIN	REPTSTOR+8
RESTART	STORFIND+1, STORFIND+2
RPTSBRKO	REPTSLIN+1
STORFIND	GETINTHU+22, GETINTHU+68
STORVAL	CHKINHL7+26, CHKINHL7+27, CHKINHL7+28, CHKINHL7+29

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> ABN	LAHREFR+22*, LAHREFR+30
ABNFLAG	CHKINHL7+3~
AUTIF60P	GETINTHU+6~, GETINTHU+54*, GETINTHU+64
AUTOINSN	GETINTHU+6~
AUTOINSP	GETINTHU+6~, GETINTHU+8~, GETINTHU+14*, GETINTHU+15, GETINTHU+51, GETINTHU+54
AUTOITST	GETINTHU+6~
BLRDIVS	REFLAB68+4~, REFLAB68+12, REFLAB68+13, REFLAB68+14, REFLAB68+25
>> BLRLOGDA	CHKINHL7+5, CHKINHL7+7, CHKINHL7+14, STORVAL+4, LAHREFR+12
>> BLRVAL(20	STORVAL+3*
CNT	GETINTHU+39, GETINTHU+47, STORFIND+4, STORFIND+5, STORFIND+6, REPTSTOR+2~, REPTSTOR+6, REPTSTOR+7, REPTSINI+12, RPTSBRKO+9 , RPTSBRKO+13, RPTSBRKO+16, RPTSBRKO+18, RPTSBRKO+20
DESTIEN	REFLAB68+4~, REFLAB68+30*, REFLAB68+35
DESTNAME	REFLAB68+4~, REFLAB68+27*, REFLAB68+29, REFLAB68+35
DIFFTIME	REPTSTOR+2~, REPTSLIN+9, RPTSBRKO+2, RPTSBRKO+23
>> DIR("A"	WARNINGS+4*
>> DIR("B"	WARNINGS+5*
>> DIR(0	WARNINGS+3*
DNDESC	CHKINHL7+2~
DNIEN	CHKINHL7+2~
DUZ(2	CHKINHL7+12, GETINTHU+11, GETINTHU+23
EDT	REPTSTOR+2~, REPTSLIN+8, RPTSBRKO+2, RPTSBRKO+21
ERRORS	ICDCHEK+1~
F60IEN	CHKINHL7+2~, CHKINHL7+14, CHKINHL7+23, GETINTHU+4, LAHREFR+1~, LAHREFR+12, LAHREFR+13, LAHREFR+30, LAHREFR+33
FOUNDIT	GETINTHU+6~, GETINTHU+29, GETINTHU+30, GETINTHU+32, GETINTHU+35, GETINTHU+36, GETINTHU+39, GETINTHU+42, GETINTHU+65, GETINTHU+71 , LAHREFR+31*
HD1	REPTSTOR+1~, REPTSINI+11*, REPTSLIN+3
HDE	RPTSBRKO+1~, RPTSBRKO+20*, RPTSBRKO+21, RPTSBRKO+23
HDS	RPTSBRKO+1~, RPTSBRKO+9*, RPTSBRKO+10, RPTSBRKO+23
HEADER	REPTSTOR+1~, RESETX+4~
HEADER(1	REPTSINI+1, RESETX+5
HEADER(2	REPTSINI+2, RESETX+6
HEADER(3	REPTSINI+3, RESETX+15, RESETX+19!, RESETX+20*, RESETX+24!
HEADER(4	REPTSINI+4*
HEADER(5	REPTSINI+5, REPTSINI+6, REPTSINI+7, REPTSINI+8, REPTSINI+9*
HL7TEST	CHKINHL7+2~
ICDCODE	ICDCHEK~, ICDCHEK+3*, ICDCHEK+4, ICDCHEK+10
INCOMIEN	REFLAB68+4~
INSTIEN	REFLAB68+5~, REFLAB68+15*, REFLAB68+35, REFLAB68+36, REFLAB68+42
IOM	REPTSINI+3, RESETX+15, RESETX+20
ISQN	LAHREFR+1~
LA7INST	GETINTHU+8~, GETINTHU+11*, GETINTHU+12, GETINTHU+14, GETINTHU+20
LINES	REPTSTOR+1~, REPTSINI+11, REPTSLIN+3, REPTSLIN+11
LOCIEN	REFLAB68+5~, REFLAB68+14*, REFLAB68+15
LRAA	CHKINHL7+2~, CHKINHL7+8, CHKINHL7+9, CHKINHL7+12, CHKINHL7+16, RPTSBRKO+1~, RPTSBRKO+4, RPTSBRKO+5, RPTSBRKO+6, RPTSBRKO+7 , LAHREFR+5, LAHREFR+6, LAHREFR+8
>> LRAAIEN	LAHREFR+8*, LAHREFR+9, LAHREFR+10
LRAAREF	REFLAB68+4~, REFLAB68+40*, REFLAB68+41, REFLAB68+42
LRAD	CHKINHL7+2~, CHKINHL7+8, CHKINHL7+9, CHKINHL7+16, RPTSBRKO+1~, RPTSBRKO+5, RPTSBRKO+6, RPTSBRKO+7, LAHREFR+5, LAHREFR+6 , LAHREFR+8
LRAN	CHKINHL7+2~, CHKINHL7+8, CHKINHL7+9, CHKINHL7+16, RPTSBRKO+1~, RPTSBRKO+6, RPTSBRKO+7, LAHREFR+5, LAHREFR+6, LAHREFR+8
LRAS	CHKINHL7+2~, CHKINHL7+7, CHKINHL7+8, REPTSTOR+2~, REPTSLIN+6, RPTSBRKO+2, RPTSBRKO+7*
>> LRDFN	LAHREFR+9*, LAHREFR+15
>> LRIDT	LAHREFR+10*, LAHREFR+15
LRSB	LAHREFR+1~, LAHREFR+13*, LAHREFR+15
LWL	LAHREFR+1~
MAXLINES	REPTSTOR+1~, REPTSINI+11*, REPTSLIN+3
MSG	WARNINGS~, WARNINGS+1
MSGABN	GETINTHU+7~, GETINTHU+60, GETINTHU+61, GETINTHU+64
MSGID	GETINTHU+6~
MSGNUM	GETINTHU+6~, GETINTHU+29, GETINTHU+30, GETINTHU+32, GETINTHU+33, GETINTHU+35, GETINTHU+42, GETINTHU+44, GETINTHU+66
MSGRESLT	GETINTHU+7~, GETINTHU+56*, GETINTHU+64
MSGRHI	GETINTHU+7~, GETINTHU+59*, GETINTHU+64
MSGRLOW	GETINTHU+7~, GETINTHU+58*, GETINTHU+64
MSGSEG	GETINTHU+6~, GETINTHU+31, GETINTHU+32, GETINTHU+33, GETINTHU+35, GETINTHU+40
>> MSGSEG2	GETINTHU+40, GETINTHU+42, GETINTHU+44
MSGSTR	GETINTHU+6~, GETINTHU+44*, GETINTHU+45, GETINTHU+48, GETINTHU+56, GETINTHU+57, GETINTHU+58, GETINTHU+59, GETINTHU+60
>> MSGTEST	GETINTHU+48*, GETINTHU+49, GETINTHU+51, GETINTHU+54
MSGUID	GETINTHU+6~
MSGUNITS	GETINTHU+7~, GETINTHU+57*, GETINTHU+64
NOTMSG	GETINTHU+7~, GETINTHU+31*
>> OTHER	LAHREFR+24*, LAHREFR+25, LAHREFR+26, LAHREFR+27
OUTARRAY	REFLAB68+4~, REFLAB68+28!
OUTARRAY("DILIST"	REFLAB68+30
PG	REPTSTOR+1~, REPTSINI+11*, REPTSLIN+3
QFLG	REPTSTOR+1~, REPTSTOR+6, REPTSTOR+7, REPTSINI+11*, REPTSLIN+3
REFHIGH	CHKINHL7+3~
>> REFLABN	REFLAB68+26*, REFLAB68+27
REFLLABN	REFLAB68+4~
REFLLABS	REFLAB68+4~, REFLAB68+25*, REFLAB68+26, REFLAB68+39, REFLAB68+40
REFLLRAA	REFLAB68+4~, REFLAB68+38, REFLAB68+39, REFLAB68+40
REFLOW	CHKINHL7+3~
RESULT	LAHREFR+1~, LAHREFR+21*, LAHREFR+30
RHI	LAHREFR+1~, LAHREFR+26*, LAHREFR+30
RLOW	LAHREFR+1~, LAHREFR+25*, LAHREFR+30
SDT	REPTSTOR+2~, REPTSLIN+7, RPTSBRKO+2, RPTSBRKO+10
>> SNAPSHOT	GETINTHU+22
STR	CHKINHL7+2~, CHKINHL7+23, CHKINHL7+24, CHKINHL7+26, CHKINHL7+27, CHKINHL7+28, CHKINHL7+29, LAHREFR+15, LAHREFR+19, LAHREFR+21 , LAHREFR+22, LAHREFR+24
TARGET	ICDCHEK+1~
TMPBLRU	LAHREFR+1~
TMPBLRU("BLR"	LAHREFR+33*
U	LAHREFR+21, LAHREFR+22, LAHREFR+24
UID	CHKINHL7+2~, CHKINHL7+16, CHKINHL7+17, CHKINHL7+19, CHKINHL7+23, GETINTHU~, GETINTHU+4, GETINTHU+22, GETINTHU+35, GETINTHU+64 , GETINTHU+68, STORFIND~, STORFIND+6, REPTSTOR+2~, REPTSTOR+7, REPTSINI+12*, REPTSLIN+5, RPTSBRKO+4, RPTSBRKO+5, RPTSBRKO+6 , RPTSBRKO+9, RPTSBRKO+13, RPTSBRKO+16, RPTSBRKO+20, LAHREFR+5, LAHREFR+30, LAHREFR+33
UNITS	CHKINHL7+3~, LAHREFR+1~, LAHREFR+27*, LAHREFR+30
WHAT	STORVAL~, STORVAL+1, STORVAL+3, STORVAL+4
WHERE	STORVAL~, STORVAL+3, STORVAL+4
WOT	STORFIND~, STORFIND+6
WOTPIECE	GETINTHU+8~, GETINTHU+20*, GETINTHU+48
WOTREF	GETINTHU+8~, GETINTHU+23*, GETINTHU+24, GETINTHU+30
X	ICDCHEK+1~
>> Y	WARNINGS+7

Customize PDF page

Package: IHS Changes To Lab

Routine: BLRLINKU

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Caller Graph Total: 4

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: