Routine: BLRPOC2

Information

BLRPOC2 ;IHS/MSC/PLS - EHR POC Component support, part 2 ; 13-Oct-2017 14:04 ; MKK

Source Information

Source file <BLRPOC2.m>

Call Graph

Call Graph Total: 21

Package	Total	Call Graph
Lab Service	9	^LRORDST ORDER^LROW2 ^LRPARAM EXP^LRVER1 V11^LRVER3 TEST^LRVR1 FILECOM^LRVR4 CLEAN^LRVRPOCU ^LRWLST
IHS Changes To Lab	4	$$QUALCHEK^BLRQUALU $$ORD^BLRRLEDI GETACCCP^BLRUTIL3 $$REFLABCK^BLRUTIL6
VA Fileman	4	NOW^%DTC $$FIND1^DIC (FILE,UPDATE)^DIE $$GET1^DIQ
DRG Grouper	1	$$ICDDX^ICDEX
IHS Laboratory Point of Care	1	($$GETPAT,$$REFRES,BLDARY)^BLRPOC
IHS Standard Terminology	1	($$CONC,$$DSCLKP)^BSTSAPI
Kernel	1	$$TRIM^XLFSTR

Caller Graph

Caller Graph Total: 1

Package	Total	Caller Graph
IHS Laboratory Point of Care	1	BLRPOC

Entry Points

Name	Comments	DBIA/ICR reference
REVAL(LRTRES,LRTFLG)	; EP - Re-validate abnormal flag ; ----- BEGIN IHS/MSC/MKK - LR5.21041 ; Qualitative flag for POC tests
LRHACK31	; EP ; There appears to be a defect brought about by a change to a VA routine that is included ; in IHS Lab Patch 1031. The defect causes the Lab Data File's SPECIMEN TYPE field to be null ; as well as the Accession File's Collection Specimen. This subroutine is a fix, not a solution.
SAVER	; EP -
SIGNSYMP	; EP - Sign or Symptom for Incoming POC test
END	; EP

External References

Name	Field # of Occurrence
NOW^%DTC	SAVER+47
$$GETPAT^BLRPOC	SAVER+25
$$REFRES^BLRPOC	SAVER+67, SAVER+68, SAVER+69, SAVER+70
BLDARY^BLRPOC	SAVER+75
$$QUALCHEK^BLRQUALU	REVAL+12
$$ORD^BLRRLEDI	SIGNSYMP+53
GETACCCP^BLRUTIL3	LRHACK31+14
$$REFLABCK^BLRUTIL6	SIGNSYMP+45
$$CONC^BSTSAPI	SIGNSYMP+8
$$DSCLKP^BSTSAPI	SIGNSYMP+11
$$FIND1^DIC	SIGNSYMP+54
FILE^DIE	SIGNSYMP+28
UPDATE^DIE	SIGNSYMP+41, SIGNSYMP+66, SIGNSYMP+74
$$GET1^DIQ	SAVER+31, SAVER+37, SAVER+62, SAVER+64, SAVER+97, SIGNSYMP+34, SIGNSYMP+49, SIGNSYMP+50, SIGNSYMP+51
$$ICDDX^ICDEX	SIGNSYMP+61
^LRORDST	SAVER+50
ORDER^LROW2	SAVER+49
^LRPARAM	SAVER+19
EXP^LRVER1	SAVER+112
V11^LRVER3	SAVER+114
TEST^LRVR1	SAVER+91
FILECOM^LRVR4	SAVER+102
CLEAN^LRVRPOCU	END+2
^LRWLST	SAVER+52
$$TRIM^XLFSTR	SIGNSYMP+15

FileNo	Call Tags
^DPT - [#2]	GET1^DIQ
^VA(200 - [#200]	GET1^DIQ
^SC - [#44]	GET1^DIQ
^LAB(60 - [#60]	GET1^DIQ
^LAB(62 - [#62]	GET1^DIQ
^LR - [#63]	GET1^DIQ
69.01	GET1^DIQ
69.03	GET1^DIQ
^BLRRLO - [#9009026.3]	FIND1^DIC

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^BLRUCUM - [#90475.3]	SAVER+74
^DIC(19 - [#19]	SAVER+15, SAVER+16
^LAB(60 - [#60]	SAVER+66, SAVER+77
^LAB(62 - [#62]	SAVER+24, LRHACK31+10
^LAB(69.9 - [#69.9]	SAVER+12, SAVER+13, SAVER+21
^LR - [#63]	SAVER+96, LRHACK31+9, LRHACK31+10, LRHACK31+13, SIGNSYMP+70
^LRO(68 - [#68]	LRHACK31+16, LRHACK31+17*
^LRO(69 - [#69]	SIGNSYMP+23

Name	Line Occurrences
END	SAVER+12, SAVER+13, SAVER+27, SAVER+78, SAVER+83, SAVER+85
LRHACK31	SAVER+93
REVAL	SAVER+72
SIGNSYMP	SAVER+109

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	SAVER+1~, SAVER+47
ARY	END+3!
ARY("CD"	SAVER+38
ARY("CM"	SAVER+17*
ARY("CMT"	SAVER+100, SAVER+101
ARY("COL"	SAVER+23, SAVER+64, LRHACK31+6, LRHACK31+10, LRHACK31+17
ARY("LOC"	SAVER+36
ARY("NOO"	SAVER+42
ARY("ORDTST"	SAVER+18, SAVER+32, SAVER+33, SAVER+53, SAVER+77, SIGNSYMP+23, SIGNSYMP+45
ARY("PRV"	SAVER+35
ARY("RES"	SAVER+59, SAVER+60
ARY("SYMP"	SIGNSYMP+3, SIGNSYMP+4, SIGNSYMP+5
ARY("TST"	SAVER+56, SAVER+58
ARY("URG"	SAVER+33, SAVER+43
ARYSYMP	SIGNSYMP+1~
BLRDH	SAVER+1~
BLRGUI	SAVER+1~, SAVER+14*
BLRLOG	SAVER+1~
BLRPCC	SAVER+1~
BLRQSITE	SAVER+1~
BLRSTOP	SAVER+1~
BPCACC	SAVER+1~, SAVER+14*
BPCCOM	SAVER+1~, SAVER+44*
>> DATA	END+1*
DFN	SAVER+25, SAVER+31, SIGNSYMP+48~, SIGNSYMP+51*, SIGNSYMP+53
DUZ	SAVER+97
DUZ(2	SAVER+77
ERRS	SIGNSYMP+1~, SIGNSYMP+39!, SIGNSYMP+63!, SIGNSYMP+72!
F60PTR	SIGNSYMP+33~, SIGNSYMP+34*, SIGNSYMP+65
FDA	SIGNSYMP+1~, SIGNSYMP+28, SIGNSYMP+39!, SIGNSYMP+63!, SIGNSYMP+72!
FDA(	SIGNSYMP+25, SIGNSYMP+26, SIGNSYMP+40, SIGNSYMP+64, SIGNSYMP+65, SIGNSYMP+73
>> H8	REVAL+9
ICD	SIGNSYMP+1~, SIGNSYMP+38*, SIGNSYMP+40
ICDCNT	SIGNSYMP+1~, SIGNSYMP+37, SIGNSYMP+38, SIGNSYMP+57, SIGNSYMP+58
>> ICDCODE	SIGNSYMP+58*, SIGNSYMP+59, SIGNSYMP+61
>> ICDIEN	SIGNSYMP+61*, SIGNSYMP+64
ICDSTR	SIGNSYMP+1~, SIGNSYMP+4, SIGNSYMP+19, SIGNSYMP+21, SIGNSYMP+30, SIGNSYMP+37, SIGNSYMP+38, SIGNSYMP+57, SIGNSYMP+58
IENS	SIGNSYMP+1~, SIGNSYMP+23*, SIGNSYMP+25, SIGNSYMP+26, SIGNSYMP+34, SIGNSYMP+40
IN	SIGNSYMP+1~, SIGNSYMP+10*, SIGNSYMP+11
LRAA	SAVER+2~, SAVER+77*, SAVER+78, LRHACK31+4~, LRHACK31+14, LRHACK31+15, LRHACK31+16, LRHACK31+17
LRACC	SAVER+2~, SAVER+82
LRAD	LRHACK31+4~, LRHACK31+14, LRHACK31+15, LRHACK31+16, LRHACK31+17
LRAHEAD	SAVER+2~
LRAN	SAVER+2~, SAVER+82*, SAVER+83, LRHACK31+4~, LRHACK31+14, LRHACK31+15, LRHACK31+16, LRHACK31+17
LRARY	SAVER+2~, SAVER+88
LRAS	LRHACK31+4~, LRHACK31+13*, LRHACK31+14
LRBLOOD	SAVER+2~
LRCCOM	SAVER+2~
LRCDT	SAVER+2~, SAVER+38*, SAVER+39, SAVER+40
LRCMT	SAVER+2~, SAVER+101*, SAVER+102
LRCOM	SAVER+2~, SAVER+100*, SAVER+101
LRDEFSP	SAVER+2~, SAVER+64*, SAVER+66
LRDFN	SAVER+3~, SAVER+25, SAVER+27, SAVER+96, SAVER+102, LRHACK31+9, LRHACK31+10, LRHACK31+13, SIGNSYMP+48~, SIGNSYMP+50 , SIGNSYMP+51, SIGNSYMP+70
LRDL	REVAL+6~, REVAL+7*, REVAL+11
LRDPF	SAVER+3~, SAVER+30*
LRDTO	SAVER+3~
LREAL	SAVER+3~
LREND	SAVER+3~
LRFDEFSP	SAVER+3~
LRFLG	REVAL+6~, REVAL+13
LRFLOC	SAVER+3~, SAVER+62*, SAVER+63
LRFNODE	SAVER+3~, SAVER+63*, SAVER+75, REVAL+8
LRGCOM	SAVER+3~
LRI	SAVER+3~
LRIDIV	SAVER+3~
LRIDT	SAVER+4~, SAVER+96, SAVER+102, LRHACK31+9, LRHACK31+10, LRHACK31+13, SIGNSYMP+70
LRINI	SAVER+4~, SAVER+97*
LRJ	SAVER+4~
LRLABKY	SAVER+4~
LRLBLBP	SAVER+4~
LRLCSIEN	SAVER+4~
LRLLOC	SAVER+4~, SAVER+37*, SAVER+85
LRLWC	SAVER+4~, SAVER+34*
LRNATURE	SAVER+4~, SAVER+42*
LRNG2	SAVER+4~, SAVER+69*, REVAL+24
LRNG3	SAVER+5~, SAVER+70*, REVAL+25
LRNG4	SAVER+5~, SAVER+67*, REVAL+22
LRNG5	SAVER+5~, SAVER+68*, REVAL+23
>> LRNOLABL	SAVER+11*
LRNT	SAVER+5~, SAVER+47*
LRODT	SAVER+5~, SAVER+39*, SIGNSYMP+23, SIGNSYMP+45, SIGNSYMP+49, SIGNSYMP+50
LROLDIV	SAVER+5~
LROLLOC	SAVER+5~, SAVER+36*, SAVER+37
LRORDR	SAVER+5~, SAVER+45*
LRORDTIM	SAVER+5~, SAVER+40*
LRORDTST	SAVER+5~, SAVER+18*
LROT	SAVER+6~
LROT(	SAVER+32*
LROUTINE	SAVER+6~, SAVER+21*
LRPARAM	SAVER+6~, SAVER+20*
LRPCEVSO	SAVER+6~
LRPLASMA	SAVER+6~
LRPOVREQ	SAVER+6~
LRPR	SAVER+6~
LRPRAC	SAVER+6~, SAVER+35*
LRSAMP	SAVER+6~, SAVER+23*, SAVER+24, SAVER+32, SAVER+51~
LRSB	SAVER+7~, SAVER+88, SAVER+96, REVAL+6~, REVAL+8*, REVAL+11
LRSB(	SAVER+96
LRSERUM	SAVER+7~
LRSN	SAVER+7~, SIGNSYMP+23, SIGNSYMP+45, SIGNSYMP+49, SIGNSYMP+50
LRSPEC	SAVER+7~, SAVER+24, SAVER+32, SAVER+51~, REVAL+6~, REVAL+9, REVAL+11
LRSPEC0	SAVER+7~, SAVER+66, SAVER+67, SAVER+68, SAVER+69, SAVER+70, SAVER+74, SAVER+75
LRSS	SAVER+7~, SAVER+96, SIGNSYMP+70
LRTFLG	SAVER+7~, SAVER+60, SAVER+72, SAVER+75, REVAL~, REVAL+13, REVAL+21, REVAL+22, REVAL+23, REVAL+24 , REVAL+25*
LRTIEN	SAVER+7~, SAVER+58*, SAVER+62, SAVER+66, REVAL+10
LRTRES	SAVER+7~, SAVER+59, SAVER+72, SAVER+75, REVAL~, REVAL+7, REVAL+18, REVAL+19*, REVAL+22, REVAL+23 , REVAL+24, REVAL+25
LRTS	REVAL+6~, REVAL+10*, REVAL+11
LRTSEQ	SAVER+7~, SAVER+56*, SAVER+58, SAVER+59, SAVER+60
LRTST	SAVER+8~, SAVER+33, SAVER+53
LRUID	SIGNSYMP+69~, SIGNSYMP+70*, SIGNSYMP+71, SIGNSYMP+73
LRUNKNOW	SAVER+8~
LRURG	SAVER+8~, SAVER+43*
LRURINE	SAVER+8~
LRUSI	SAVER+8~, SAVER+97*
LRVF	SAVER+8~, SAVER+113*
LRVIDO	SAVER+8~
LRVIDOF	SAVER+8~
LRWLC	SAVER+8~
LRWLO	SAVER+8~
ORDERN	SIGNSYMP+48~, SIGNSYMP+49*, SIGNSYMP+53, SIGNSYMP+54
>> ORDIEN	SIGNSYMP+54*, SIGNSYMP+55, SIGNSYMP+64, SIGNSYMP+65, SIGNSYMP+73
OUT	SIGNSYMP+1~, SIGNSYMP+10*, SIGNSYMP+11
PNLINPNL	SAVER+9~
PNM	SAVER+9~, SAVER+31*
PROVNARR	SIGNSYMP+1~, SIGNSYMP+3, SIGNSYMP+8, SIGNSYMP+10, SIGNSYMP+14, SIGNSYMP+18, SIGNSYMP+21, SIGNSYMP+25
QUALFLAG	REVAL+3~, REVAL+4, REVAL+13, REVAL+14
RES	SAVER+9~, SAVER+12, SAVER+13, SAVER+14, SAVER+28, SAVER+78, SAVER+83, SAVER+85, SAVER+115, END+1
RET	SAVER+9~
SNOMED	SIGNSYMP+1~, SIGNSYMP+5, SIGNSYMP+7, SIGNSYMP+17, SIGNSYMP+21, SIGNSYMP+26
STR	SIGNSYMP+1~, SIGNSYMP+8, SIGNSYMP+9, SIGNSYMP+13!, SIGNSYMP+14, SIGNSYMP+15, SIGNSYMP+16, SIGNSYMP+17, SIGNSYMP+18, SIGNSYMP+19
U	SAVER+13, SAVER+20, SAVER+24, SAVER+33, SAVER+74, SAVER+77, REVAL+9
>> UCUM	SAVER+74*
VARS	SIGNSYMP+1~
VARS(1	SIGNSYMP+15, SIGNSYMP+16
X	REVAL+6~, REVAL+12, SIGNSYMP+53
XQY	SAVER+9~, SAVER+15*, SAVER+16
XQY0	SAVER+9~, SAVER+16*
ZTQUEUED	SAVER+9~, SAVER+14*

Customize PDF page

Package: IHS Laboratory Point of Care

Routine: BLRPOC2

Information

Source Information

Call Graph

Call Graph Total: 21

Caller Graph

Caller Graph Total: 1

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: