Routine: BLRUTIL

Information

BLRUTIL ;IHS/ITSC/TPF - BLR LINK UTILITIES AND TESTING SUBROUTINES ; 24-Mar-2016 12:28 ; MKK

Source Information

Source file <BLRUTIL.m>

Call Graph

Call Graph Total: 11

Package	Total	Call Graph
IHS Changes To Lab	3	CHKENTRY^BLRENTRY ESIGINFO^BLRUTIL5 (DEBUGMI,GETSTACK)^BLRUTIL6
Kernel	3	^%ZIS ^%ZISC ($$FMTE,$$NOW)^XLFDT
VA Fileman	2	UPDATE^DIE $$GET1^DIQ
IHS VA %Utilities	1	($$ERR,$$KILLOK)^ZIBGCHAR
MailMan	1	^XMB
Uncategorized	1	(DISABLE,ENABLE)^%NOJRN

Caller Graph

Caller Graph Total: 81

Package	Total	Caller Graph
Lab Service	40	LR7OB0 LRAPQAT1 LRARCHIV LRCHIV LRDPA1 LRGEN1 LRHDR LRKILL LRLABELF LRLIST LRMIEDZ2 LRMIHDR LRMIPSU LRMISTF1 LRMIV1 LRMIVER1 LRORD LRORDGUI LRORDK LROSPLG LROW2A LROW2P LRRK LRRP1 LRRP1NWC LRRP2 LRSTUF LRTSTOUT LRTSTSET LRU LRVER LRVER3A LRVER5 LRVRKIL LRWLST LRWLST1 LRWLST11 LRWRKLST LRWU1 LRX
IHS Changes To Lab	35	BLR7OB1 BLR7OMZ5 BLRAG05G BLRAG07 BLRAG09C BLRDIAG BLRDIAG1 BLRESIGR BLREXEC2 BLRFLTL BLRLINK BLRLINK1 BLRLINK2 BLRLINK4 BLRLINKP BLRLINKU BLRMANP2 BLRMIAUT BLRNLINK BLRPCCVM BLRRLTDR BLRSGNSU BLRSGNSY BLRSHDRC BLRTN BLRTNA BLRTNB BLRTNDEL BLRTNM BLRTNM1 BLRTNRES BLRUER BLRUTIL3 BLRUTIL4 BLRUTIL5
Automated Lab Instruments	5	LA7HDR LA7QRY2 LA7VCIN4 LA7VHLU LAMIAUT0
IHS Lab LOINC Surveillance	1	BLSLX

Entry Points

Name	Comments	DBIA/ICR reference
ADDON(NAMESP,MAINRTN,DUZ2)	;EP
REPORT(SHORT)	; EP
ERRCHK(ERRDT)	;EP
ENTRYAUD(LABEL,ARRY1,ARRY2,ARRY3)	;EP
ESIGINFO	;EP ; ----- BEGIN IHS/OIT/MKK LR5.21027 ; Code moved to BLRUTIL3 because BLRUTIL was > 15000 bytes ; D ESIGINFO^BLRUTIL3
CHKRTN(KIDIEN,RTNERROR)	; EP
CLRERRS(ERRDT)	;EP
MAIL(BLRERR,MAILGRP)	; EP
NUMTIME(X)
4	; S BLRQSITE=$P($G(^AUTTSITE(1,0)),U)
CAPVARS(XXXX,TARGET)	;EP
NUMDATE(FMDATE)
TEST	; EP
RESETGLO	;EP
ISPIMS()	;EP

External References

Name	Field # of Occurrence
DISABLE^%NOJRN	ENTRYAUD+9
ENABLE^%NOJRN	ENTRYAUD+52
^%ZIS	REPORT+1
^%ZISC	REPORT+19
CHKENTRY^BLRENTRY	ENTRYAUD+6
ESIGINFO^BLRUTIL5	ESIGINFO+4
DEBUGMI^BLRUTIL6	ENTRYAUD+27
GETSTACK^BLRUTIL6	ENTRYAUD+48
UPDATE^DIE	TEST+5
$$GET1^DIQ	ENTRYAUD+4
$$FMTE^XLFDT	NUMDATE+1
$$NOW^XLFDT	ENTRYAUD+19
^XMB	MAIL+4
$$ERR^ZIBGCHAR	RESETGLO+3
$$KILLOK^ZIBGCHAR	RESETGLO+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,$$ERR^ZIBGCHAR($$KILLOK^ZIBGCHAR($P(BLR,U,2)))_" "_BLR Line Location: RESETGLO+3
Function Call: WRITE	Prompt: !,"KILLING "_BLR Line Location: RESETGLO+4
Function Call: WRITE	Prompt: !,"No link errors were found!!" Line Location: 4+29
Function Call: WRITE	Prompt: !,$G(BLRERRS)," link errors were found and cleared from the error log!" Line Location: 4+30
Routine Call	DIE Line Location: TEST+5
Routine Call	%ZIS Line Location: REPORT+1

FileNo	Call Tags
^BLRSITE - [#9009029]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("TEST"	ADDON+31, CHKRTN+5
^%ZOSF("UCI"	4+5
^%ZTER(1 - [#3.075]	ERRCHK+7, ERRCHK+9, 4+10, 4+11, 4+15, 4+27*
^AUTTSITE(1	ERRCHK+4, 4+3
^BLRENTRY	ENTRYAUD+20, ENTRYAUD+22, ENTRYAUD+23, ENTRYAUD+33, ENTRYAUD+36, ENTRYAUD+39, ENTRYAUD+42, ENTRYAUD+43, ENTRYAUD+44, REPORT+4 , REPORT+6, REPORT+8, REPORT+10, REPORT+15, REPORT+17
^BLRENTRY("C"	ENTRYAUD+50*
^BLRSITE - [#9009029]	ERRCHK+5, ERRCHK+13, 4+4, 4+31, ADDON+22, ADDON+24
^BLRTXLOG("A"	TEST+1
^DIC(9.4 - [#9.4]	ISPIMS+2, ISPIMS+4
^XPD(9.7 - [#9.7]	ADDON+4, ADDON+7, ADDON+15, CHKRTN+3, CHKRTN+4

Name	Line Occurrences
$$CHKRTN	ADDON+28
CAPVARS	ENTRYAUD+30
MAIL	ERRCHK+14, ADDON+6, ADDON+20, ADDON+38

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	CAPVARS+7, ENTRYAUD+13, ENTRYAUD+14~, ENTRYAUD+15
%ORIG	ENTRYAUD+11~, ENTRYAUD+13*, ENTRYAUD+15
>> APPIEN	ADDON+22*, ADDON+23, ADDON+24
>> APPNAME	ADDON+18, ADDON+35
>> APPON	ADDON+24*, ADDON+25
ARRY1	ENTRYAUD~, ENTRYAUD+32, ENTRYAUD+33
ARRY2	ENTRYAUD~, ENTRYAUD+35, ENTRYAUD+36
ARRY3	ENTRYAUD~, ENTRYAUD+38, ENTRYAUD+39
BLR	RESETGLO+1~, RESETGLO+2*, RESETGLO+3, RESETGLO+4
>> BLRERLIM	ERRCHK+5, ERRCHK+6, ERRCHK+10, 4+4*
BLRERR	ERRCHK+14, ADDON+6, ADDON+17, ADDON+20, ADDON+33, ADDON+38, MAIL~
BLRERR(1	ERRCHK+14, ADDON+6, ADDON+18, ADDON+34
BLRERR(2	ERRCHK+14, ADDON+19, ADDON+35*
BLRERR(3	ERRCHK+14, ADDON+36
>> BLRERRS	ERRCHK+3, ERRCHK+9, ERRCHK+10, 4+9, 4+18, 4+29, 4+30
>> BLRFDA(9009022	TEST+2, TEST+3, TEST+4*
>> BLRIEN(1	TEST+1*, TEST+3
>> BLRQSITE	ERRCHK+4, ERRCHK+5, ERRCHK+13, 4+3, 4+4, 4+31
>> CHKRTN	ADDON+28*
>> CURUCI	4+7*, 4+17
>> DILOCKTM	4+1
>> DISYS	4+1
DMLRDFN	ENTRYAUD+26~
DMLRIDT	ENTRYAUD+26~
DT	4+1
DTIME	4+1
DUZ	ENTRYAUD+23, ENTRYAUD+33, ENTRYAUD+36, ENTRYAUD+39, ENTRYAUD+42, ENTRYAUD+43, ENTRYAUD+44, ENTRYAUD+50, 4+1
DUZ(2	ENTRYAUD+4
DUZ2	ADDON~, ADDON+1, ADDON+22, ADDON+24
ENTRYNUM	ENTRYAUD+18~, ENTRYAUD+20, ENTRYAUD+22, ENTRYAUD+23, ENTRYAUD+33, ENTRYAUD+36, ENTRYAUD+39, ENTRYAUD+42, ENTRYAUD+43, ENTRYAUD+44 , ENTRYAUD+50, REPORT+7, REPORT+8*, REPORT+10, REPORT+12, REPORT+15, REPORT+17
ERRDT	ERRCHK~, ERRCHK+1, ERRCHK+7, ERRCHK+9, CLRERRS~, CLRERRS+1, 4+1, 4+10, 4+11, 4+15 , 4+27
>> ERRNUM	ERRCHK+2, ERRCHK+7, ERRCHK+9, 4+8, 4+10, 4+11, 4+15
>> ERRUCI	4+15, 4+16, 4+17
FMDATE	NUMDATE~, NUMDATE+1
IO	4+1
>> IOBS	4+1
IOF	REPORT+2, REPORT+11, 4+1
IOM	4+1
ION	4+1
>> IOS	4+1
IOSL	4+1
IOST	4+1
>> IOT	4+1
>> IOXY	4+1
IS52	ISPIMS+1~
>> KFINISH1	ADDON+4*, ADDON+5, ADDON+6, ADDON+7
>> KFINISH2	ADDON+7*, ADDON+15, ADDON+22, ADDON+28
KIDIEN	CHKRTN~, CHKRTN+3, CHKRTN+4
>> KSTATUS	ADDON+15*, ADDON+16, ADDON+19
LABEL	ENTRYAUD~, ENTRYAUD+23, ENTRYAUD+33, ENTRYAUD+36, ENTRYAUD+39, ENTRYAUD+42, ENTRYAUD+43, ENTRYAUD+44, ENTRYAUD+50, REPORT+9* , REPORT+10*, REPORT+12, REPORT+15, REPORT+17
MAILGRP	ERRCHK+14, ADDON+6, ADDON+19, ADDON+20, ADDON+37, ADDON+38, MAIL~, MAIL+2
MAINRTN	ADDON~, ADDON+1, ADDON+30, ADDON+36
NAMESP	ADDON~, ADDON+1, ADDON+4, ADDON+5, ADDON+6, ADDON+34
NOW	ENTRYAUD+18~, ENTRYAUD+19, ENTRYAUD+23, ENTRYAUD+33, ENTRYAUD+36, ENTRYAUD+39, ENTRYAUD+42, ENTRYAUD+43, ENTRYAUD+44, ENTRYAUD+50 , REPORT+5, REPORT+6*, REPORT+8, REPORT+10, REPORT+15, REPORT+17
NOWTIM	ENTRYAUD+18~, ENTRYAUD+21*
ORIGX	ENTRYAUD+11~, ENTRYAUD+12*, ENTRYAUD+43
ORIGY	ENTRYAUD+11~, ENTRYAUD+12*, ENTRYAUD+44
>> POP	REPORT+1
>> RETURN	ERRCHK+10*, ERRCHK+12, ERRCHK+15
RTNERROR	ADDON+28, CHKRTN~, CHKRTN+1, CHKRTN+5, CHKRTN+6
RTNERROR(	CHKRTN+5*
>> RTNNAME	CHKRTN+4*, CHKRTN+5
>> RTNNUM	CHKRTN+2, CHKRTN+3, CHKRTN+4
SHORT	REPORT~, REPORT+2, REPORT+11, REPORT+13
STARTTIM	ENTRYAUD+18~
TARGET	CAPVARS~, CAPVARS+4, CAPVARS+8
TARGET2	CAPVARS+2~, CAPVARS+4*, CAPVARS+7
U	RESETGLO+3, ENTRYAUD+22, ERRCHK+4, ERRCHK+5, ERRCHK+9, ERRCHK+13, 4+1, 4+3, 4+4, 4+15 , 4+27, 4+31, ADDON+15, ADDON+24
>> USER	REPORT+3, REPORT+4, REPORT+6, REPORT+8, REPORT+10, REPORT+15, REPORT+17
>> VALUE	REPORT+17*, REPORT+18
>> VARIABLE	REPORT+14, REPORT+15, REPORT+17, REPORT+18
VERS	ISPIMS+1~, ISPIMS+4*, ISPIMS+5, ISPIMS+6
>> WOT	4+24*, 4+25
X	ENTRYAUD+12, ENTRYAUD+18~, ADDON+30, CHKRTN+5, ISPIMS+1~, ISPIMS+2, ISPIMS+3, ISPIMS+4, NUMTIME~, NUMTIME+2 , NUMTIME+3, NUMTIME+4
>> XMB	MAIL+2*
>> XMDUZ	MAIL+3*
>> XMTEXT	MAIL+1*
>> XPARSYS	4+1
>> XQXFLG	4+1
XXXX	CAPVARS~, CAPVARS+5, CAPVARS+7, CAPVARS+8
Y	ENTRYAUD+12, ENTRYAUD+18~, 4+7, NUMTIME+1~, NUMTIME+3*
YYYY	CAPVARS+1~, CAPVARS+7*

Customize PDF page

Package: IHS Changes To Lab

Routine: BLRUTIL

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Caller Graph Total: 81

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: