©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
BLRTN ; IHS/HQT/MJL - CREATE/EDIT TRANSACTIONS ; 17-Dec-2015 15:37 ; MKK
Source file <BLRTN.m>
| Package | Total | Call Graph |
|---|---|---|
| IHS Changes To Lab | 7 | ^BLRNFLTL ^BLRNLINK INIT^BLRPARAM GETCPT^BLRTNCON ORDVRS^BLRTNRES $$ERRCHK^BLRUTIL MAKEITSO^BLRUTIL6 |
| VA Fileman | 1 | $$GET1^DIQ |
| Package | Total | Caller Graph |
|---|---|---|
| IHS Changes To Lab | 4 | BLRTNB BLRTNDEL BLRTNM1 BLRTNRES |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| MODSET | ; EP
|
|
| RES1 | ; EP
|
|
| CHKDT | ; EP
|
|
| DEFAULT | ; EP
|
|
| KILL | ; EP
|
|
| COMPDATE(BLRLRDFN,BLRSS,BLRDTC,BLRACCN) | ; EP
|
|
| CTL | ; EP
|
|
| CKORD | ; EP
|
|
| ORDER | ; EP
|
|
| TSK | ; EP - entry point for background job
|
|
| CTL1 | ; EP
; Wait 60 seconds to finish setting data, if not done (something's wrong!) proceed to next queue entry. |
|
| ACCESSN | ; EP
|
|
| GETDIAG(TEST) | ; EP
|
|
| EMSG | ; EP
; Log an error because the crossreference isn't set. |
|
| LOINC | ; EP
|
|
| GETCPT | ; EP
|
|
| GETIEN() | ; EP
|
|
| RESVRS | ; EP
|
|
| SET4 | ; EP
|
|
| GETNEW | ; EP
|
|
| SET1 | ; EP
|
|
| SET2 | ; EP
|
|
| SET3 | ; EP
|
|
| UPDTNS | ; EP
|
|
| CPTCODE | ; EP - Entry point
; S BLRFOUND=0,(BLRXII,BLRCPTS,BLRCPTP)="" F S BLRXII=$O(^BLRCPT("C",BLRTEST1,BLRXII)) Q:(BLRXII="") I '$P($G(^BLRCPT(BLRXII,1)),U,2) D GETCPT Q:BLRFOUND |
|
| CRSFLDS | ; EP
|
|
| ACCVRS | ; EP
|
| FileNo | Call Tags |
|---|---|
| ^LAB(60 - [#60] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^BLRCPT - [#9009021] | CPTCODE+2, GETCPT+1, GETCPT+3, GETCPT+5, GETCPT+6 |
| ^BLRCPT("C" | CPTCODE+2 |
| ^BLRLOCK - [#9009023] | TSK+1, TSK+15 |
| ^BLRSITE - [#9009029] | TSK+5, TSK+9*, CTL+5, CTL+11, CTL+17, CTL+19*, CTL+24, CTL1+2, CTL1+4*, CTL1+13* , ORDER+9, ACCESSN+7, DEFAULT+2, DEFAULT+3*, DEFAULT+4*, MODSET+1, SET3+3, RES1+7, RES1+8 |
| ^BLRTXLOG - [#9009022] | RES1+1, CHKDT+2, CKORD+3, CKORD+6, CKORD+7, GETNEW+3 |
| ^BLRTXLOG("@" | GETNEW+2 |
| ^BLRTXLOG("AOT" | MODSET+2, MODSET+3 |
| ^BLRTXLOG("SEQ" | GETNEW+1, GETNEW+4* |
| ^BLRTXLOG(1 | GETNEW+2 |
| ^BLRUCUM - [#90475.3] | SET4+4, RES1+6 |
| ^LAB(60 - [#60] | SET2+1, SET2+2, SET2+3, SET3+1, SET4+2, SET4+3, RES1+3, LOINC+12 |
| ^LR - [#63] | LOINC+9, COMPDATE+4, COMPDATE+7, COMPDATE+10 |
| ^LRO(68 - [#68] | ACCVRS+1, SET3+11, CKORD+6, LOINC+2, LOINC+4, LOINC+11 |
| ^LRO(69 - [#69] | ORDER+5, GETDIAG+3, GETDIAG+5, MODSET+1, MODSET+5, UPDTNS+1, UPDTNS+2, CKORD+7, LOINC+7 |
| ^VA(200 - [#200] | RES1+15 |
| Name | Line Occurrences |
|---|---|
| $$COMPDATE | LOINC+10 |
| $$GETIEN | MODSET+4, SET3+16 |
| @( | CTL1+10, SET3+19, GETIEN+6, GETIEN+7 |
| ACCVRS | ACCESSN+6 |
| CPTCODE | SET3+2 |
| CRSFLDS | SET3+22 |
| CTL | TSK+13 |
| CTL1 | CTL+24 |
| EMSG | GETIEN+8, CHKDT+1 |
| GETDIAG | UPDTNS+3, LOINC+6 |
| GETNEW | GETIEN+2 |
| KILL | TSK+14 |
| LOINC | SET3+20, RES1+12 |
| MODSET | ORDER+8 |
| RES1 | RESVRS+2 |
| SET1 | ACCESSN+7, UPDTNS+5, UPDTNS+6 |
| SET2 | SET1+2 |
| SET3 | SET1+1, SET2+3 |
| SET4 | SET3+14 |
| UPDTNS | ORDER+11, ACCESSN+8 |
| Name | Field # of Occurrence |
|---|---|
| ^("AGE" | RES1+7 |
| ^("SEX" | RES1+8 |
| ^(0 | RES1+15 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| AGE | RES1+7*, RES1+11! |
| BLR | CTL1+4!, CTL1+14!, KILL+1! |
| BLR("ACCESSIO | N NUMBER" , ACCVRS+1* |
| BLR("BILLING | CPT STRING" , SET3+15* |
| BLR("COLLECTI | ON SAMPLE POINTER" , LOINC+11* |
| BLR("COMPLETE | DATE" , LOINC+9*, LOINC+10* |
| BLR("CPT LAB | CODE POINTER" , SET3+15* |
| BLR("DUZ(2)" | CTL1+7* |
| BLR("IHS LOIN | C" , LOINC+20* |
| BLR("LAB MODU | LE" , SET3+15* |
| BLR("LAB TEST | LIST COST" , SET3+15* |
| BLR("LOINC CO | DE" , LOINC+12* |
| BLR("ORDER DA | TE" , MODSET+5* |
| BLR("ORDER NU | MBER" , MODSET+5* |
| BLR("ORDER SE | QUENCE NUMBER" , MODSET+5* |
| BLR("PANEL/TE | ST POINTER" , SET3+15* |
| BLR("PARENT P | OINTER" , SET3+17* |
| BLR("REFERENC | E HIGH" , RES1+10*, CRSFLDS+1!, E LOW" , RES1+10*, CRSFLDS+1! |
| BLR("RESULT N | /A FLAG" , RES1+13*, CRSFLDS+1! |
| BLR("RESULT" | RES1+13*, CRSFLDS+1! |
| BLR("SEQUENCE | NUMBER" , MODSET+4*, SET3+16*, SET3+17, RES1+1 |
| BLR("SIGN OR | SYMPTOM" , GETDIAG+5*, GETDIAG+6! |
| BLR("SITE/SPE | CIMEN POINTER" , SET4+5*, SET4+7*, LOINC+4*, LOINC+12 |
| BLR("STATUS F | LAG" , CTL1+7*, MODSET+4*, RES1+13*, CRSFLDS+2* |
| BLR("UNITS" | SET4+5*, RES1+10* |
| BLR("VERIFIER | POINTER" , ACCVRS+2*, RES1+16* |
| >> BLRAA | ACCESSN+2*, ACCVRS+1, UPDTNS+5, SET3+9*, SET3+11, LOINC+2, LOINC+3, LOINC+4, LOINC+11 |
| BLRACCN | ACCESSN+6, ACCVRS+1*, COMPDATE~, COMPDATE+4, COMPDATE+7, COMPDATE+10 |
| >> BLRAD | ACCESSN+2*, ACCVRS+1, UPDTNS+5, SET3+9*, SET3+11, LOINC+3, LOINC+4, LOINC+11 |
| >> BLRAN | ACCESSN+2*, ACCVRS+1, UPDTNS+5, SET3+9*, SET3+11, LOINC+3, LOINC+4, LOINC+11 |
| BLRARRAY | KILL+1! |
| >> BLRATOM | SET1+1*, SET2+1*, SET2+2, SET3+1*, SET3+17, SET3+23 |
| >> BLRBADCK | CTL1+5*, ORDER+7*, ACCESSN+3*, GETIEN+7 |
| >> BLRCDT | CHKDT+2*, CHKDT+3, CHKDT+4, CHKDT+5 |
| >> BLRCMF | CTL1+7*, SET3+2, SET3+7, SET3+14, SET3+17, SET3+23, RES1+1, GETIEN+2 |
| BLRCPACT | GETCPT+3*, GETCPT+7, GETCPT+9! |
| BLRCPCD | GETCPT+3*, GETCPT+7, GETCPT+9! |
| BLRCPCST | GETCPT+3*, GETCPT+7, GETCPT+9! |
| BLRCPDAT | GETCPT+3*, GETCPT+9! |
| BLRCPMN | GETCPT+5*, GETCPT+9! |
| BLRCPQN | GETCPT+6*, GETCPT+9! |
| BLRCPRC | GETCPT+3*, GETCPT+7, GETCPT+9! |
| >> BLRCPTL | SET1+1* |
| BLRCPTM | GETCPT+4*, GETCPT+5*, GETCPT+7, GETCPT+9! |
| BLRCPTN | GETCPT+3*, GETCPT+5, GETCPT+6, GETCPT+9! |
| >> BLRCPTP | SET3+2*, SET3+15, CPTCODE+2*, GETCPT+2* |
| BLRCPTQ | GETCPT+4*, GETCPT+6*, GETCPT+7, GETCPT+9! |
| >> BLRCPTS | SET3+2*, SET3+15, CPTCODE+2*, GETCPT+7* |
| >> BLRCREF | RESVRS+1*, RESVRS+2 |
| >> BLRCRGL | GETIEN+3*, EMSG+3, CKORD+8 |
| >> BLRCRSBS | ORDER+7*, ACCESSN+3*, GETIEN+3 |
| >> BLRCST | SET3+1*, SET3+15 |
| BLRCTST | MODSET+2*, MODSET+3, MODSET+4, MODSET+8! |
| >> BLRDEL | RES1+1* |
| >> BLRDIAG | GETDIAG+5*, GETDIAG+6 |
| >> BLRDIR | CTL1+5*, ORDER+7*, ACCESSN+3*, GETIEN+3, CKORD+8 |
| BLRDTC | LOINC+7*, LOINC+9, LOINC+10, COMPDATE~, COMPDATE+2, COMPDATE+4 |
| BLRDTER | CHKDT+4*, CHKDT+5*, KILL+2! |
| >> BLRDUZ | CTL1+7*, RESVRS+2*, RES1+14*, RES1+15, RES1+16 |
| >> BLRDUZ2 | CTL1+7* |
| >> BLRDUZN | RES1+15* |
| BLREMSG | KILL+1! |
| >> BLRENT | GETIEN+3*, GETIEN+5, GETIEN+6, GETIEN+9, GETIEN+10, CHKDT+1, CHKDT+2, CHKDT+3, CHKDT+6, EMSG+2 , CKORD+2, CKORD+3, CKORD+8*, GETNEW+1*, GETNEW+2*, GETNEW+3*, GETNEW+4 |
| BLRENT1 | CKORD+3*, CKORD+6, CKORD+7, CKORD+9! |
| BLRENTS | GETNEW+4*, KILL+1! |
| BLRENTS(1 | GETNEW+4* |
| BLRERR | CTL1+5*, MODSET+4, SET3+16, GETIEN+1*, GETIEN+5*, GETIEN+7, GETIEN+8, CHKDT+1, CHKDT+4*, CHKDT+5* , EMSG+3*, CKORD+1*, CKORD+2, CKORD+4, CKORD+6*, CKORD+7*, KILL+1! |
| BLRERROR | KILL+1! |
| BLRERROR(1 | EMSG+3* |
| BLRESTR | KILL+2! |
| BLRFDA | KILL+1! |
| >> BLRFOUND | CPTCODE+2*, GETCPT+2* |
| >> BLRHCNT | TSK+4*, TSK+13*, CTL+24* |
| BLRI | CTL1+2*, CTL1+4, KILL+1! |
| BLRICNT | KILL+1! |
| >> BLRIDS | CTL1+7*, ORDER+4, ACCESSN+2, DEFAULT+4 |
| BLRIEN | GETIEN+9*, CHKDT+3*, CHKDT+6*, GETNEW+4*, KILL+1! |
| BLRIENS | KILL+1! |
| BLRIII | KILL+1! |
| >> BLRL60 | SET3+1*, RESVRS+1 |
| BLRLEV | SET1+1*, SET1+2, SET1+3!, SET2+1*, SET2+2*, SET2+3, SET2+4*, SET3+2, SET3+17, SET3+23 |
| BLRLEV( | SET2+1, SET2+2*, SET2+3*, SET2+4*, SET3+17, SET3+23* |
| BLRLEV(1 | SET1+1* |
| >> BLRLOG | TSK+13, CTL+5*, CTL+6, CTL+7, CTL+8*, CTL+9, CTL+24, CTL+26 |
| BLRLOGDA | KILL+1! |
| BLRLRDFN | LOINC+3, LOINC+9, LOINC+10, COMPDATE~, COMPDATE+4, COMPDATE+7, COMPDATE+10 |
| >> BLRLTA | CTL+11*, CTL+12, CTL+13*, CTL+14, CTL+24 |
| >> BLRLTP | CTL+12*, CTL+14, CTL+24*, CTL1+2, CTL1+4, CTL1+13, ORDER+9, ACCESSN+7, MODSET+1, SET3+3 , RES1+7, RES1+8 |
| BLRMI | KILL+2! |
| BLRMOD | CTL+25!, SET3+1*, SET3+15 |
| >> BLRNAF | RESVRS+2*, RES1+13 |
| BLRNN | GETCPT+3*, GETCPT+7, GETCPT+9! |
| BLRNN1 | GETCPT+5*, GETCPT+6*, GETCPT+9! |
| BLROAOT | MODSET+1*, MODSET+3, MODSET+8! |
| >> BLRODT | ORDER+4*, ORDER+5, ACCESSN+2*, GETDIAG+3, GETDIAG+5, MODSET+1, MODSET+5, UPDTNS+1, UPDTNS+2, LOINC+7 |
| >> BLRODTM | MODSET+1*, MODSET+2, GETCPT+1, CKORD+7 |
| >> BLROKCK | CTL1+5*, ORDER+7*, ACCESSN+3*, GETIEN+6 |
| >> BLROPT | CTL1+7*, ORDER+2, ORDER+8, ORDER+9, ACCESSN+1, ACCESSN+7, UPDTNS+2, SET3+7 |
| BLRPAR | SET1+1*, SET1+3!, SET3+17*, SET3+23 |
| >> BLRPARAM | CTL1+7* |
| BLRPC | KILL+2! |
| >> BLRPHASE | CTL1+7*, CTL1+10, DEFAULT+1, MODSET+3*, MODSET+4, MODSET+7*, UPDTNS+2, UPDTNS+4, SET3+22 |
| BLRPSN | MODSET+1*, MODSET+3, MODSET+5, MODSET+8! |
| BLRPT | KILL+2! |
| >> BLRQDH | TSK+5*, TSK+8, TSK+9, CTL+9, CTL+11, CTL+14, CTL+16, CTL+17*, CTL+18, CTL+19 , CTL+24, CTL+26, CTL1+2, CTL1+4, CTL1+13, ORDER+9, ACCESSN+7, DEFAULT+2, DEFAULT+3, DEFAULT+4 , MODSET+1, SET3+3, RES1+7, RES1+8 |
| BLRQFLAG | CTL+2~, CTL+3*, CTL+4, CTL+9*, CTL+14* |
| >> BLRQSITE | TSK+5, TSK+9, CTL+5, CTL+11, CTL+17, CTL+19, CTL+24, CTL1+2, CTL1+4, CTL1+13 , ORDER+9, ACCESSN+7, DEFAULT+2, DEFAULT+3, DEFAULT+4, MODSET+1, SET3+3, RES1+7, RES1+8 |
| BLRQUIET | TSK+2*, KILL+1! |
| >> BLRRES | RESVRS+2*, RES1+13 |
| >> BLRRH | RES1+4*, RES1+9, RES1+10 |
| >> BLRRL | RES1+4*, RES1+9, RES1+10 |
| >> BLRRSTAG | CTL1+5*, SET3+19 |
| >> BLRRVS( | RESVRS+2 |
| >> BLRSEQ | ORDER+4*, ORDER+5, ACCESSN+2*, GETDIAG+3, GETDIAG+5, MODSET+2, UPDTNS+1, UPDTNS+2, CKORD+7, LOINC+7 |
| BLRSFID | KILL+1! |
| BLRSIEN | KILL+1! |
| >> BLRSPEC | SET3+3*, SET3+11*, SET3+14, SET4+2, SET4+3, SET4+5, SET4+7, RES1+3 |
| BLRSS | RESVRS+2, LOINC+2*, LOINC+3, LOINC+9, LOINC+10, COMPDATE~, COMPDATE+4, COMPDATE+7, COMPDATE+10 |
| BLRSTOP | TSK+13, CTL+7*, CTL+9, CTL+22, KILL+1! |
| >> BLRSTR1 | SET3+3* |
| BLRT | KILL+1! |
| BLRTCNT | KILL+1! |
| >> BLRTEST | ACCESSN+7*, UPDTNS+2*, SET1+1, LOINC+6 |
| >> BLRTEST1 | MODSET+4*, SET1+1*, SET2+3*, SET3+1, SET3+15, SET4+2, SET4+3, CPTCODE+2, RES1+3, LOINC+3 , LOINC+6, LOINC+12, LOINC+16 |
| >> BLRTRY | TSK+4*, CTL+16* |
| >> BLRTST | UPDTNS+1*, UPDTNS+2, UPDTNS+3 |
| BLRTSTS | ORDER+9*, ORDER+12! |
| BLRTSTS( | UPDTNS+2 |
| >> BLRUNITS | SET4+3*, SET4+4*, SET4+5, RES1+4*, RES1+6*, RES1+10 |
| BLRVL | KILL+1! |
| BLRVR | KILL+1! |
| BLRVRS | KILL+1! |
| >> BLRX | CTL+24*, CTL1+7, DEFAULT+2*, DEFAULT+3, DEFAULT+4, UPDTNS+2*, UPDTNS+5, SET3+9 |
| >> BLRXII | CPTCODE+2*, GETCPT+1, GETCPT+2, GETCPT+3, GETCPT+5, GETCPT+6 |
| >> BLRXPCC | TSK+13, CTL+6*, CTL+27 |
| BLRXQY0 | KILL+2! |
| >> BLRZ | SET4+3*, RES1+3*, RES1+4 |
| CDATE | COMPDATE+1~, COMPDATE+4*, COMPDATE+6, COMPDATE+7*, COMPDATE+9, COMPDATE+10*, COMPDATE+12 |
| DT | CHKDT+3, CHKDT+4 |
| DUZ | RES1+14 |
| IHSLOINC | LOINC+15~, LOINC+16*, LOINC+17, LOINC+19, LOINC+20 |
| >> LOINC | LOINC+12*, LOINC+19* |
| >> LRAA | CKORD+6 |
| >> LRAD | CKORD+6 |
| >> LRAN | CKORD+5, CKORD+6 |
| SDATE | COMPDATE+1~, COMPDATE+2*, COMPDATE+7*, COMPDATE+10*, COMPDATE+11! |
| SEX | RES1+8*, RES1+11! |
| >> SPEC | LOINC+11* |
| >> TARACC | COMPDATE+4*, COMPDATE+7*, COMPDATE+10* |
| TEST | GETDIAG~, GETDIAG+2, GETDIAG+3 |
| TSTIEN | GETDIAG+1~, GETDIAG+3*, GETDIAG+4, GETDIAG+5, GETDIAG+7! |
| U | TSK+5, TSK+9, CTL+6, CTL+7, CTL+8, CTL+12, CTL+13, CTL+19, CTL1+4, CTL1+7 , CTL1+13, ORDER+2, ORDER+5, ACCESSN+1, DEFAULT+2, DEFAULT+3, MODSET+1, MODSET+5, UPDTNS+5, SET3+1 , SET3+9, SET3+11, SET4+3, SET4+4, CPTCODE+2, GETCPT+1, GETCPT+3, RESVRS+1, RESVRS+2, RES1+1 , RES1+4, RES1+6, RES1+15, CHKDT+2, CKORD+3, CKORD+6, CKORD+7, LOINC+2, LOINC+4, LOINC+7 , LOINC+9, LOINC+11, LOINC+12, COMPDATE+4, COMPDATE+7, COMPDATE+10 |
| ZTDESC | KILL+2! |
| ZTDTH | KILL+2! |
| ZTIO | KILL+2! |
| ZTRTN | KILL+2! |
| ZTSAVE | KILL+2! |