Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: BLRPOC

Package: IHS Laboratory Point of Care

Routine: BLRPOC


Information

BLRPOC ;IHS/MSC/PLS - EHR POC Component support ; 13-Oct-2017 14:04 ; MKK

Source Information

Source file <BLRPOC.m>

Call Graph

Call Graph Total: 10

Package Total Call Graph
VA Fileman 3 (CHK,HELP)^DIE  ^DIM  $$GET1^DIQ  
IHS Patient 2 ^AUPNPAT  $$AGE^AUPNPAT3  
IHS Changes To Lab 1 $$QUALCHEK^BLRQUALU  
IHS Laboratory Point of Care 1 SAVER^BLRPOC2  
Kernel 1 ($$DT,$$NOW)^XLFDT  
Lab Service 1 E2^LRDPA  
Toolkit 1 $$GET^XPAR  

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
IHS Changes To Lab 2 BLRF60SR  BLRLNKU2  
IHS Laboratory Point of Care 2 BLRPOC2  BLRPOC3  

Entry Points

Name Comments DBIA/ICR reference
NOOLST(DATA) ; EP
ISPANEL(IEN) ;EP- Returns boolean flag indicating if test is a panel test
GUINIT(DATA,USR) ; EP
VRET ; S DATA(0)=1_U_$S(LRFLG="H":"1:H",LRFLG="H*":"2:H",LRFLG="L":"1:L",LRFLG="L*":"2:L",1:0)_U_$G(LRDAT(0))_U_$G(LRDAT) Q
; ----- BEGIN IHS/OIT/MKK - LR*5.2*1030
BADPTR(IEN) ; EP
; I '$D(^DD(63.04,$P($$GET1^DIQ(60,IEN,5,"E"),";",2))) Q 1 ; IHS/MSC/BF - IHS Lab Patch 1026 -- Make sure $P returns numeric
; ----- BEGIN IHS/OIT/MKK - LR*5.2*1027 - Valid check for existance of invalid IEN
GETTST(TST,DFN) ;EP-
POCTSTS(DATA,DIV,LOC,USR,DFN) ; EP
CHKTST(TEST) ; EP
VALIDATE(DATA,TSTIEN,COLIEN,RES,DFN) ; EP
URGLST(DATA) ; EP
LABDESC(DATA,DIV) ; EP
NEWPAT(DFN) ;EP
GETCOM(COMIEN) ; EP
SAVE(DATA,DFN,ARY) ;EP-
GETPAT(DFN) ;EP
CVARS ; EP
BLDARY(LOC,SPEC0,RES,FLG) ; EP
USRMATCH(LIEN,DIV,USR) ; EP
PNLTSTS(DATA,TST,DFN) ;EP - Return "tst" list of tests within a panel. If another panel
; is within a panel, those tests will not be returned.
; Loop thru the LAB TEST INCLUDED IN PANEL field of File 60 and call $$GETTST to collect the test information
REFRES(VAL) ; EP
UNQCOL(IEN) ;EP - RETURN FIRST COLLECTION SAMPLE
VALERR(DATA,ERRARY) ; EP
LOCMATCH(LIEN,DIV,LOC) ; EP

External References

Name Field # of Occurrence
^AUPNPAT GETTST+2, VALIDATE+5
$$AGE^AUPNPAT3 GETTST+3, VALIDATE+6
SAVER^BLRPOC2 SAVE+1
$$QUALCHEK^BLRQUALU VALIDATE+39
CHK^DIE VALIDATE+14
HELP^DIE VALIDATE+12
^DIM REFRES+3
$$GET1^DIQ POCTSTS+5, POCTSTS+7, GETTST+4, GETTST+6, GETTST+7, GETTST+8, GETTST+9, GETTST+11, GETTST+13, VALIDATE+8
, VALIDATE+17, VALIDATE+19, GUINIT+1, NOOLST+3, GETCOM+2, GETCOM+3, CHKTST+15, BADPTR+4, BADPTR+7
E2^LRDPA NEWPAT+5
$$DT^XLFDT GETTST+3, VALIDATE+6
$$NOW^XLFDT BLDARY+7
$$GET^XPAR GETTST+3, VALIDATE+6

Used in RPC

RPC Name Call Tags
BLRPOC POCTSTS POCTSTS
BLRPOC PNLTSTS PNLTSTS
BLRPOC SAVE SAVE
BLRPOC VALIDATE VALIDATE
BLRPOC URGLST URGLST
BLRPOC NOOLST NOOLST
BLRPOC LABDESC LABDESC

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ
^LAB(60 - [#60] GET1^DIQ
60.01 GET1^DIQ
60.02 GET1^DIQ
^LAB(62 - [#62] GET1^DIQ
^LAB(62.5 - [#62.5] GET1^DIQ
63.04 CHK^DIE,  HELP^DIE
^LAB(69.9 - [#69.9] GET1^DIQ
^BLRPOC(90479 - [#90479] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BLRPOC(90479 - [#90479] POCTSTS+3, POCTSTS+10, LABDESC+3, LABDESC+6, LOCMATCH+1, USRMATCH+1
^DD(63.04 BADPTR+7
^DPT - [#2] GETPAT+2
^LAB(60 - [#60] UNQCOL+2, UNQCOL+4, ISPANEL+1, PNLTSTS+4, PNLTSTS+7, VALIDATE+19, VALIDATE+37, CHKTST+4, CHKTST+5, CHKTST+6
, CHKTST+7, CHKTST+14, CHKTST+18, CHKTST+19
^LAB(62.05 - [#62.05] URGLST+2, URGLST+3
^LR("A" NEWPAT+3
^LR(0 NEWPAT+4, NEWPAT+6
^ORD(100.02 - [#100.02] NOOLST+4, NOOLST+5, NOOLST+6, NOOLST+9

Label References

Name Line Occurrences
$$BADPTR CHKTST+17
$$CHKTST POCTSTS+11
$$GETCOM LABDESC+7
$$GETTST POCTSTS+12, PNLTSTS+8
$$ISPANEL GETTST+14, CHKTST+12, CHKTST+16
$$LOCMATCH POCTSTS+5
$$NEWPAT GETPAT+3
$$REFRES GETTST+10, GETTST+12, VALIDATE+44, VALIDATE+45, VALIDATE+46, VALIDATE+47
$$UNQCOL GETTST+5
$$USRMATCH POCTSTS+7
VALERR VALIDATE+13, VALIDATE+16
VRET VALIDATE+41, VALIDATE+49, VALIDATE+50, VALIDATE+51

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AGE GETTST+3*, VALIDATE+2~, VALIDATE+6*
ARY SAVE~, CVARS+1!
AUPNDAYS VALIDATE+2~
AUPNDOB VALIDATE+2~
AUPNDOD VALIDATE+2~
AUPNPAT VALIDATE+2~
AUPNSEX VALIDATE+2~
BADPTR CHKTST+1~, CHKTST+11*, CHKTST+14, CHKTST+17*, CHKTST+21
BLRDH CVARS+1!
BLRGUI CVARS+1!
BLRLOG CVARS+1!
BLRPCC CVARS+1!
BLRQSITE CVARS+1!
BLRSTOP CVARS+1!
BPCACC CVARS+1!
BPCCOM CVARS+1!
CC LABDESC+1~, LABDESC+3*, LABDESC+6
CHKVAL GETTST+1~, REFRES+1~, REFRES+5
CNT POCTSTS+2~, POCTSTS+3*, POCTSTS+8*, POCTSTS+12, PNLTSTS+3~, PNLTSTS+4*, PNLTSTS+5*, PNLTSTS+8, URGLST+1~, URGLST+2*
, URGLST+4*, URGLST+5, NOOLST+1~, NOOLST+5*, NOOLST+10*, NOOLST+11, LABDESC+1~, LABDESC+3*, LABDESC+4*, LABDESC+7
COL GETTST+1~, GETTST+5*, GETTST+6, GETTST+7, GETTST+8, GETTST+14
COLIEN VALIDATE~, VALIDATE+17, VALIDATE+18, VALIDATE+19
COLNM GETTST+1~, GETTST+6*, GETTST+14, CHKTST+1~
COMIEN LABDESC+1~, LABDESC+6*, LABDESC+7, GETCOM~, GETCOM+2, GETCOM+3, GETCOM+4
DATA POCTSTS~, SAVE~, PNLTSTS~, VALIDATE~, VALIDATE+4, VALIDATE+9*, VALIDATE+13, VALIDATE+16, VRET+7*, VALERR~
, GUINIT~, GUINIT+1*, URGLST~, NOOLST~, LABDESC~
DATA( POCTSTS+12*, PNLTSTS+8*, VALERR+3*, URGLST+5*, NOOLST+11*, LABDESC+7*
DATA(0 VALIDATE+13*, VALIDATE+16*, VALIDATE+18*, VRET+7*
DATA(1 VALIDATE+9*, VALIDATE+18*
DEF NOOLST+1~, NOOLST+3*, NOOLST+4*, NOOLST+11
DEFSPEC VALIDATE+2~, VALIDATE+17*, VALIDATE+18
DFN POCTSTS~, POCTSTS+12, GETTST~, GETTST+2, GETTST+3, SAVE~, PNLTSTS~, PNLTSTS+8, VALIDATE~, VALIDATE+5
, VALIDATE+6, GETPAT~, GETPAT+2, GETPAT+3, NEWPAT~, NEWPAT+2
DIV POCTSTS~, POCTSTS+1*, POCTSTS+3, POCTSTS+5, POCTSTS+7, POCTSTS+10, LABDESC~, LABDESC+2*, LABDESC+3, LABDESC+6
, LOCMATCH~, LOCMATCH+1, USRMATCH~, USRMATCH+1
DUPPER VALIDATE+3~, VALIDATE+4*
DUZ BLDARY+5
DUZ(2 POCTSTS+1, LABDESC+2, BLDARY+8, CHKTST+6, CHKTST+18
ERRARY VALERR~
ERRARY("DIHELP" VALERR+2, VALERR+3
FLG BLDARY~, BLDARY+3
HLP VALERR+1~, VALERR+2*, VALERR+3
IEN UNQCOL~, UNQCOL+2, UNQCOL+4, ISPANEL~, ISPANEL+1, URGLST+1~, URGLST+3*, URGLST+5, NOOLST+1~, NOOLST+6*
, NOOLST+9, NOOLST+11, BADPTR~, BADPTR+4, BADPTR+7
LDEXP GETCOM+1~, GETCOM+3*, GETCOM+4
LDNAME GETCOM+1~, GETCOM+2*, GETCOM+4
LIEN LOCMATCH~, LOCMATCH+1, USRMATCH~, USRMATCH+1
LOC POCTSTS~, POCTSTS+5, BLDARY~, BLDARY+1, BLDARY+3, BLDARY+4, BLDARY+5, BLDARY+6, BLDARY+7, BLDARY+8
, LOCMATCH~, LOCMATCH+1
LP POCTSTS+2~, POCTSTS+3*, POCTSTS+5, POCTSTS+7, POCTSTS+10, PNLTSTS+3~, PNLTSTS+4*, PNLTSTS+7
LRAA CVARS+1!
LRAHEAD CVARS+1!
LRARY CVARS+1!
LRARY( BLDARY+1*, BLDARY+3*, BLDARY+4*, BLDARY+5*, BLDARY+6*, BLDARY+7*, BLDARY+8*
LRBLOOD CVARS+1!
LRCCOM CVARS+1!
LRDAT VALIDATE+1~, VALIDATE+14, VALIDATE+16, VALIDATE+35, VRET+7
LRDAT(0 VRET+7
LRDFN GETPAT+1~, GETPAT+2*, GETPAT+3*, GETPAT+4, NEWPAT+1~, NEWPAT+3*, NEWPAT+7*, NEWPAT+8, CVARS+2!
LRDL VALIDATE+34~, VALIDATE+35*, VALIDATE+38
LRDPAF NEWPAT+1~
LRDPF NEWPAT+1~, NEWPAT+2*, CVARS+2!
LRDTO CVARS+2!
LREAL CVARS+2!
LREND CVARS+2!
LRERR VALIDATE+1~, VALIDATE+16
LRFIEN VALIDATE+1~, VALIDATE+10*, VALIDATE+12, VALIDATE+14, VALIDATE+36
LRFLG VALIDATE+1~, VALIDATE+7*, VALIDATE+27*, VALIDATE+40, VALIDATE+49*, VALIDATE+50*, VALIDATE+51*, VALIDATE+52*, VRET+7
LRFLOC VALIDATE+1~, VALIDATE+8*, VALIDATE+9, VALIDATE+10
LRGCOM CVARS+2!
LRI CVARS+2!
LRIDIV CVARS+2!
LRITMIEN CHKTST+1~, CHKTST+15*, CHKTST+16, CHKTST+17, CHKTST+18, CHKTST+19
LRJ CVARS+2!
LRLABKY CVARS+2!
LRLBLBP CVARS+2!
LRLLOC CVARS+2!
LRLOOP CHKTST+1~, CHKTST+14*, CHKTST+15
LRLWC CVARS+2!
LRNATURE CVARS+2!
LRNG2 VALIDATE+1~, VALIDATE+46*, VALIDATE+51
LRNG3 VALIDATE+1~, VALIDATE+47*, VALIDATE+52
LRNG4 VALIDATE+1~, VALIDATE+44*, VALIDATE+49
LRNG5 VALIDATE+1~, VALIDATE+45*, VALIDATE+50
LRORDR CVARS+2!
LRORDTIM CVARS+2!
LRORDTST CVARS+3!
LROUTINE CVARS+3!
LRPARAM CVARS+3!
LRPCEVSO CVARS+3!
LRPLASMA CVARS+3!
LRPOVREQ CVARS+3!
LRPR CVARS+3!
LRSAMP CVARS+3!
LRSB VALIDATE+34~, VALIDATE+36*, VALIDATE+37, VALIDATE+38
LRSERUM CVARS+3!
LRSPEC GETTST+8*, VALIDATE+38, CVARS+3!
>> LRSPEC0 VALIDATE+19*, VALIDATE+44, VALIDATE+45, VALIDATE+46, VALIDATE+47
LRSS CVARS+3!
LRTS VALIDATE+34~, VALIDATE+37*, VALIDATE+38
LRUNKNOW CVARS+3!
LRURG CVARS+3!
LRURINE CVARS+4!
LRUSI CVARS+4!
LRVER VALIDATE+1~, VALIDATE+13
LRVF CVARS+4!
LRVIDO CVARS+4!
LRVIDOF CVARS+4!
LRWLC CVARS+4!
LRWLO CVARS+4!
OLDRES VALIDATE+22~, VALIDATE+23*, VRET+2
ORD NOOLST+1~, NOOLST+5*, NOOLST+6, NOOLST+11
PNLINPNL CHKTST+1~, CHKTST+11*, CHKTST+14, CHKTST+16*, CHKTST+21
PTST PNLTSTS+3~, PNLTSTS+7*, PNLTSTS+8
QUALFLAG VALIDATE+31~, VALIDATE+32*, VALIDATE+40*, VALIDATE+41
REFH GETTST+1~, GETTST+11*, GETTST+12*, GETTST+14
REFL GETTST+1~, GETTST+9*, GETTST+10*, GETTST+14
REFVAL REFRES+1~, REFRES+2*, REFRES+5*, REFRES+7
RES VALIDATE~, VALIDATE+11, VALIDATE+14, VALIDATE+23, VALIDATE+24*, VALIDATE+25*, VALIDATE+49, VALIDATE+50, VALIDATE+51, VALIDATE+52
, VRET+2*, BLDARY~, BLDARY+1, BLDARY+2
RET CVARS+4!
SAMP CHKTST+1~
SEX VALIDATE+2~
SMP UNQCOL+1~, UNQCOL+2*, UNQCOL+4
SPEC GETTST+1~, GETTST+7*, GETTST+9, GETTST+11, GETTST+13, CHKTST+1~
SPEC0 BLDARY~, BLDARY+6
SSN VALIDATE+2~
SUBNOACC CHKTST+2~, CHKTST+8*, CHKTST+14, CHKTST+18*, CHKTST+21
SUBNOCOL CHKTST+2~, CHKTST+8*, CHKTST+14, CHKTST+19*, CHKTST+21
TEST CHKTST~, CHKTST+4, CHKTST+5, CHKTST+6, CHKTST+7, CHKTST+12, CHKTST+14, CHKTST+15
TST POCTSTS+2~, POCTSTS+10*, POCTSTS+11, POCTSTS+12, GETTST~, GETTST+4, GETTST+5, GETTST+9, GETTST+11, GETTST+13
, GETTST+14, PNLTSTS~, PNLTSTS+4, PNLTSTS+7, URGLST+1~, URGLST+2*, URGLST+3, URGLST+5
TSTIEN VALIDATE~, VALIDATE+8, VALIDATE+19
TSTNM GETTST+1~, GETTST+4*, GETTST+14
U GETTST+14, VALIDATE+44, VALIDATE+45, VALIDATE+46, VALIDATE+47, VRET+7, URGLST+5, NOOLST+11, GETCOM+4, BLDARY+3
, BLDARY+4, BLDARY+5, BLDARY+6, BLDARY+7, BLDARY+8, CHKTST+4, CHKTST+5
UNITS GETTST+1~, GETTST+13*, GETTST+14
USR POCTSTS~, POCTSTS+7, GUINIT~, GUINIT+1, USRMATCH~, USRMATCH+1
VAL REFRES~, REFRES+3
WOT BADPTR+3~, BADPTR+4*, BADPTR+5
X VALIDATE+34~, VALIDATE+39*, NEWPAT+1~, NEWPAT+2*, REFRES+3*, REFRES+4, REFRES+5, REFRES+6!
>> Y GETTST+2*, VALIDATE+5*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All