BLRPOC ;IHS/MSC/PLS - EHR POC Component support ; 13-Oct-2017 14:04 ; MKK
Source file <BLRPOC.m>
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 |
Package | Total | Caller Graph |
---|---|---|
IHS Changes To Lab | 2 | BLRF60SR BLRLNKU2 |
IHS Laboratory Point of Care | 2 | BLRPOC2 BLRPOC3 |
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
|
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 |
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 |
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 |
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 |
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 |
>> | 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* |