©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
BTIULO7 ;IHS/ITSC/LJF - IHS OBJECTS ADDED IN PATCHES;06-Aug-2018 15:33;MGH
Source file <BTIULO7.m>
| Package | Total | Call Graph |
|---|---|---|
| IHS Mods To Text Integration Utilities | 4 | ($$MCD,$$MCR2,$$RRE,$$THIRD)^BTIULO2 ($$QUAL,OLD)^BTIULO7A $$LSTDATE^BTIUPCC1 $$PREG^BTIUPCC6 |
| Kernel | 2 | $$FMTE^XLFDT $$REPEAT^XLFSTR |
| Patient Care Component Reports | 2 | $$PNM^APCLSIL1 $$PCCVF^APCLV |
| Health Summary Components | 1 | $$FIXDT^BHSFAM1 |
| IHS Electronic Health Record | 1 | $$VSTR2VIS^BEHOENCX |
| IHS Patient | 1 | ($$MCD,$$MCR,$$PI,$$RR)^AUPNPAT |
| IHS VA Utilities | 1 | ENP^XBDIQ1 |
| VA Fileman | 1 | $$GET1^DIQ |
| VueCentric Framework | 1 | ($$GETVAR,GETVAR)^CIAVMEVT |
| Package | Total | Caller Graph |
|---|---|---|
| IHS Mods To Text Integration Utilities | 1 | BTIULO7A |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PAD(DATA,LENGTH) | ; -- SUBRTN to pad length of data
|
|
| VINS(TARGET) | ; returns insurance coverage for current vuecentric visit context; PATCH 1001
; assumes DFN is set |
|
| RHX(DFN,TARGET,MODE) | ;EP; REPRODUCTIVE HX-BRIEF and REPRODUCTIVE HX-EXPANDED objects
|
|
| TODAYLAB(PAT) | ;EP; returns all labs taken today;PATCH 1002 new code
|
|
| GETINS(RETURN,VISIT) | ;return insurance coverage at time of visit
; VISIT=Visit IEN |
|
| NLAB(DFN,TIUTST,TIUCNT,BRIEF) | ;EP; -- returns last # of current lab result for single test;PATCH 1001
; TIUTST = lab test name; TIUCNT = # of test results to return |
|
| FPM(DFN,TARGET,MODE) | ;EP; CONTRACEPTION-BRIEF object
|
|
| SP(NUM) | ; -- SUBRTN to pad spaces
|
|
| NVIT(DFN,TIUMSR,TIUCNT,TIUDATE,BRIEF) | ;EP; returns last # of of a specific vital sign; PATCH 1002 new code
; TIUMSR = measurement name ; TIUCNT = # of results to return ; TIUDATE=1 return date measurement taken |
|
| LASTHFC(PAT,CTG,CAP) | ;EP - return last factor in category CTG for patient PAT; PATCH 1001
; CAP = 1 if want caption to be returned; = 0 otherwise |
|
| LMP(DFN,MODE) | ;EP; LMP-BRIEF and LMP-EXPANDED objects
|
|
| EDC(DFN,MODE) | ;EP; EDC-BRIEF and EDC-EXPANDED objects
|
|
| TODAYVIT(PAT) | ;EP; returns all vitals taken today
|
| Name | Field # of Occurrence |
|---|---|
| $$PNM^APCLSIL1 | TODAYVIT+21 |
| $$PCCVF^APCLV | TODAYVIT+7 |
| $$MCD^AUPNPAT | GETINS+16 |
| $$MCR^AUPNPAT | GETINS+8 |
| $$PI^AUPNPAT | GETINS+17 |
| $$RR^AUPNPAT | GETINS+22 |
| $$VSTR2VIS^BEHOENCX | VINS+7 |
| $$FIXDT^BHSFAM1 | FPM+10, FPM+11 |
| $$MCD^BTIULO2 | GETINS+16 |
| $$MCR2^BTIULO2 | GETINS+9 |
| $$RRE^BTIULO2 | GETINS+23 |
| $$THIRD^BTIULO2 | GETINS+18 |
| $$QUAL^BTIULO7A | NVIT+28 |
| OLD^BTIULO7A | RHX+10 |
| $$LSTDATE^BTIUPCC1 | NVIT+44, NVIT+45 |
| $$PREG^BTIUPCC6 | NVIT+26 |
| $$GETVAR^CIAVMEVT | VINS+5 |
| GETVAR^CIAVMEVT | VINS+2 |
| $$GET1^DIQ | LASTHFC+15, LASTHFC+16, NLAB+16, NLAB+17, LMP+5, LMP+7, EDC+5, EDC+7, RHX+9, RHX+12 , RHX+13, RHX+14, RHX+15, RHX+16, RHX+17, RHX+18, RHX+19, RHX+20, RHX+21, RHX+22 , RHX+23, RHX+24, RHX+25, RHX+26, RHX+31, RHX+32 |
| ENP^XBDIQ1 | NLAB+14, NVIT+16, TODAYLAB+9 |
| $$FMTE^XLFDT | LASTHFC+18 |
| $$REPEAT^XLFSTR | PAD+1 |
| FileNo | Call Tags |
|---|---|
| ^AUPNVLAB - [#9000010.09] | GET1^DIQ |
| ^AUPNVHF - [#9000010.23] | GET1^DIQ |
| ^AUPNREP - [#9000017] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("TEST" | VINS+7 |
| ^AUPNMCR - [#9000003] | GETINS+12 |
| ^AUPNMCR("B" | GETINS+11 |
| ^AUPNREP - [#9000017] | RHX+8, RHX+28, FPM+6, FPM+7, FPM+8, FPM+10, FPM+11, FPM+27 |
| ^AUPNRRE - [#9000005] | GETINS+26 |
| ^AUPNRRE("B" | GETINS+25 |
| ^AUPNVHF("AA" | LASTHFC+8, LASTHFC+9, LASTHFC+10 |
| ^AUPNVLAB("AA" | NLAB+11, NLAB+13 |
| ^AUPNVLAB("AD" | TODAYLAB+8 |
| ^AUPNVMSR("AA" | NVIT+13, NVIT+15 |
| ^AUPNVSIT - [#9000010] | GETINS+6 |
| ^AUPNVSIT("AA" | TODAYVIT+5, TODAYVIT+6, TODAYLAB+6, TODAYLAB+7 |
| ^AUTTCM - [#99999.11] | FPM+9 |
| ^AUTTHF("AC" | LASTHFC+7 |
| ^AUTTHF("B" | LASTHFC+4 |
| ^AUTTMSR("B" | NVIT+8 |
| ^DPT - [#2] | LMP+4, EDC+4, RHX+7, FPM+5 |
| ^LAB(60 - [#60] | NLAB+7 |
| ^TMP("BTIULO" | NLAB+6!, NLAB+30*, NLAB+31*, NVIT+7!, NVIT+8*, NVIT+44*, NVIT+45*, NVIT+47*, TODAYLAB+2!, TODAYLAB+14* , TODAYLAB+16 |
| Name | Line Occurrences |
|---|---|
| $$PAD | TODAYLAB+11, TODAYLAB+12, SP+1 |
| $$SP | NLAB+29, NVIT+43 |
| GETINS | VINS+8 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| APCLV | TODAYVIT+1~ |
| APCLV( | TODAYVIT+8, TODAYVIT+9 |
| ARR | NLAB+5~, NVIT+6~ |
| ARR( | NLAB+22*, NLAB+26, NLAB+27, NLAB+28, NVIT+35*, NVIT+40, NVIT+41, NVIT+42 |
| ARRAY | NLAB+25~ |
| BHC | FPM+2~, FPM+8*, FPM+9 |
| BHX | FPM+2~, FPM+6*, FPM+7, FPM+8, FPM+10, FPM+11, FPM+27 |
| BRIEF | NLAB~, NLAB+8, NVIT~, NVIT+9 |
| CAP | LASTHFC~, LASTHFC+12, LASTHFC+14 |
| CAPTION | NLAB+5~, NLAB+8*, NLAB+9*, NLAB+29, NLAB+31, NVIT+6~, NVIT+9*, NVIT+10*, NVIT+43, NVIT+47 |
| CNT | VINS+3~, VINS+4*, VINS+12*, VINS+13, VINS+14, GETINS+3~, GETINS+7*, GETINS+14*, GETINS+15, GETINS+16* , GETINS+20*, GETINS+21, GETINS+28*, GETINS+29, NLAB+5~, NLAB+10*, NLAB+11, NLAB+13, NLAB+19*, NLAB+23* , NLAB+26, NLAB+27, NLAB+28*, NLAB+29, NVIT+6~, NVIT+12*, NVIT+13, NVIT+35*, NVIT+38*, NVIT+40 , NVIT+41, NVIT+42*, NVIT+43, NVIT+44, NVIT+45, RHX+35*, RHX+36, RHX+37*, RHX+38, RHX+39* , RHX+40, RHX+41*, RHX+42, RHX+43*, RHX+44, RHX+45*, RHX+46, RHX+47*, RHX+48, RHX+49* , RHX+50, RHX+51*, RHX+52, FPM+2~, FPM+4*, FPM+12, FPM+13*, FPM+14*, FPM+17*, FPM+19 , FPM+21*, FPM+23, FPM+25*, FPM+28 |
| COUNT | TODAYLAB+1~, TODAYLAB+14* |
| CTG | LASTHFC~, LASTHFC+3, LASTHFC+4, LASTHFC+12, LASTHFC+14 |
| CTGN | LASTHFC+2~, LASTHFC+4*, LASTHFC+7 |
| DATA | NLAB+5~, NLAB+21*, NLAB+22, PAD~, PAD+1 |
| DATE | NLAB+5~, NLAB+16*, NLAB+17*, NLAB+22, NLAB+23*, NLAB+26*, NLAB+27, NLAB+28, NVIT+6~, NVIT+33* , NVIT+35, NVIT+38*, NVIT+40*, NVIT+41, NVIT+42, TODAYVIT+14*, TODAYVIT+15 |
| DATE2 | NLAB+5~, NLAB+18*, NLAB+21 |
| DFN | VINS+7, GETINS+8, GETINS+9, GETINS+11, GETINS+16, GETINS+17, GETINS+18, GETINS+22, GETINS+23, GETINS+25 , NLAB~, NLAB+11, NLAB+13, NVIT~, NVIT+13, NVIT+15, NVIT+26, LMP~, LMP+4, LMP+5 , LMP+7, EDC~, EDC+4, EDC+5, EDC+7, RHX~, RHX+7, RHX+8, RHX+9, RHX+10 , RHX+12, RHX+13, RHX+14, RHX+15, RHX+16, RHX+17, RHX+18, RHX+19, RHX+20, RHX+21 , RHX+22, RHX+23, RHX+24, RHX+25, RHX+26, RHX+28, RHX+31, RHX+32, FPM~, FPM+5 , FPM+6, FPM+7, FPM+8, FPM+10, FPM+11, FPM+27, TODAYVIT+21 |
| DT | TODAYVIT+4, TODAYVIT+21, TODAYLAB+5 |
| EC | RHX+3~, RHX+19*, RHX+20*, RHX+46 |
| EDCDT | EDC+2~, EDC+7*, EDC+8 |
| END | FPM+2~, FPM+11*, FPM+16, FPM+24, FPM+28, TODAYVIT+1~, TODAYVIT+4*, TODAYVIT+5, TODAYLAB+1~, TODAYLAB+5* , TODAYLAB+6 |
| ERR | TODAYVIT+1~, TODAYVIT+7* |
| FPBEGIN | FPM+2~ |
| FPDATE | FPM+2~ |
| FT | RHX+3~, RHX+15*, RHX+16*, RHX+38 |
| G | RHX+3~, RHX+11*, RHX+12*, RHX+36 |
| GRAV | RHX+3~ |
| HF | LASTHFC+2~, LASTHFC+6*, LASTHFC+7*, LASTHFC+8, LASTHFC+9, LASTHFC+10 |
| HFDT | LASTHFC+2~, LASTHFC+9*, LASTHFC+10, LASTHFC+13*, LASTHFC+15, LASTHFC+16, LASTHFC+18 |
| HOW | EDC+2~, EDC+7*, EDC+8 |
| I | VINS+3~, VINS+11*, VINS+13 |
| IEN | GETINS+3~, GETINS+11*, GETINS+12, GETINS+25*, GETINS+26, NLAB+5~, NLAB+12*, NLAB+13*, NLAB+14, NLAB+16 , NLAB+17, NLAB+22, NLAB+27*, NLAB+28, NVIT+6~, NVIT+14*, NVIT+15*, NVIT+16, NVIT+26, NVIT+28 , NVIT+35, NVIT+41*, NVIT+42 |
| INS | GETINS+3~, GETINS+13*, GETINS+15, GETINS+19*, GETINS+21, GETINS+27*, GETINS+29 |
| LAB | NLAB+5~, NLAB+7*, NLAB+11, NLAB+13, NVIT+6~ |
| LAC | RHX+3~, RHX+28*, RHX+30 |
| LAC1 | RHX+3~, RHX+27*, RHX+31*, RHX+33*, RHX+52 |
| LACDATE | RHX+3~, RHX+32*, RHX+33 |
| LC | RHX+3~, RHX+21*, RHX+22*, RHX+48 |
| LCNT | NLAB+5~, NLAB+23*, NLAB+28*, NLAB+30 |
| LENGTH | PAD~, PAD+1 |
| LGTH | NLAB+5~, NLAB+20*, NLAB+21 |
| LIN1 | FPM+2~, FPM+26*, FPM+27*, FPM+28 |
| LINE | GETINS+3~, GETINS+7*, NLAB+5~, NLAB+28*, NLAB+30, NVIT+6~, NVIT+19*, NVIT+21*, NVIT+22*, NVIT+23* , NVIT+25, NVIT+27*, NVIT+29*, NVIT+35, NVIT+42*, NVIT+44, NVIT+45, FPM+2~, FPM+15*, FPM+18* , FPM+19, FPM+22*, FPM+23, TODAYLAB+1~, TODAYLAB+8*, TODAYLAB+11*, TODAYLAB+12*, TODAYLAB+13*, TODAYLAB+14 |
| LIST | LASTHFC+2~ |
| LIST( | LASTHFC+10*, LASTHFC+15, LASTHFC+16 |
| LIST(0 | LASTHFC+12, LASTHFC+13 |
| MB | RHX+3~, RHX+13*, RHX+14*, RHX+50 |
| MEAS | TODAYVIT+1~ |
| MEAS( | TODAYVIT+9*, TODAYVIT+13, TODAYVIT+14, TODAYVIT+15 |
| MEDCARE | GETINS+3~, GETINS+9*, GETINS+10, GETINS+12*, GETINS+13 |
| MODE | LMP~, LMP+3, LMP+6, EDC~, EDC+3, EDC+6, RHX~, RHX+5, RHX+10, RHX+12 , RHX+14, RHX+16, RHX+18, RHX+20, RHX+22, RHX+24, RHX+26, RHX+33, FPM~, FPM+16 , FPM+20 |
| MSR | NVIT+6~, NVIT+8*, NVIT+13, NVIT+15 |
| NUM | SP~, SP+1 |
| OTHER | RHX+3~ |
| PARA | RHX+3~ |
| PAT | LASTHFC~, LASTHFC+3, LASTHFC+8, LASTHFC+9, LASTHFC+10, TODAYVIT~, TODAYVIT+5, TODAYVIT+6, TODAYLAB~, TODAYLAB+6 , TODAYLAB+7 |
| PRE | RHX+3~, RHX+17*, RHX+18*, RHX+40 |
| PVT | GETINS+3~, GETINS+18*, GETINS+19 |
| QUALIF | NVIT+6~, NVIT+28*, NVIT+29 |
| RESULT | LASTHFC+2~, LASTHFC+14*, LASTHFC+15*, LASTHFC+17*, LASTHFC+18*, LASTHFC+19, VINS+3~, VINS+8, TODAYVIT+12*, TODAYVIT+22* , TODAYVIT+23*, TODAYVIT+24 |
| RESULT( | VINS+11, VINS+13 |
| RETURN | GETINS~, GETINS+4! |
| RETURN( | GETINS+15*, GETINS+16*, GETINS+21*, GETINS+29* |
| RR | GETINS+3~, GETINS+23*, GETINS+24, GETINS+26*, GETINS+27 |
| RRE | GETINS+3~ |
| SA | RHX+3~, RHX+25*, RHX+26*, RHX+44 |
| SEL | GETINS+3~, GETINS+13*, GETINS+19*, GETINS+27* |
| START | FPM+2~, FPM+10*, FPM+18, FPM+22 |
| STOP | NVIT+6~ |
| TA | RHX+3~, RHX+23*, RHX+24*, RHX+42 |
| TARGET | VINS~, VINS+2, VINS+6, VINS+7, VINS+10, VINS+13, VINS+14, VINS+15, LMP+3, EDC+3 , RHX~, RHX+4, RHX+5, RHX+7, RHX+8, RHX+10, RHX+36, RHX+38, RHX+40, RHX+42 , RHX+44, RHX+46, RHX+48, RHX+50, RHX+52, RHX+53, FPM~, FPM+3, FPM+13, FPM+14 , FPM+19, FPM+23, FPM+28, FPM+29 |
| TIU | NLAB+5~, NLAB+14!, NVIT+6~, NVIT+16! |
| TIU( | NLAB+15, NLAB+18, NLAB+20, NLAB+22, NVIT+19 |
| TIU(1201 | NLAB+18, NVIT+18, NVIT+33 |
| TIU(2 | NVIT+17 |
| TIUA | TODAYLAB+1~, TODAYLAB+9! |
| TIUA( | TODAYLAB+10, TODAYLAB+11, TODAYLAB+12, TODAYLAB+13 |
| TIUA(1109 | TODAYLAB+10, TODAYLAB+13 |
| TIUCNT | NLAB~, NLAB+9, NLAB+11, NLAB+13, NLAB+26, NLAB+27, NVIT~, NVIT+10, NVIT+13, NVIT+40 , NVIT+41 |
| TIUDATE | NVIT~, NVIT+44, NVIT+45 |
| TIUMSR | NVIT~, NVIT+8, NVIT+9, NVIT+10, NVIT+21, NVIT+22, NVIT+23, NVIT+24, NVIT+47 |
| TIUTST | NLAB~, NLAB+7, NLAB+8, NLAB+9 |
| TIUX | TODAYLAB+1~, TODAYLAB+8*, TODAYLAB+9 |
| TOT | RHX+3~ |
| TT | NVIT+6~, NVIT+18*, NVIT+19 |
| TYP | FPM+2~, FPM+9*, FPM+15 |
| TYPE | TODAYVIT+1~, TODAYVIT+13*, TODAYVIT+14, TODAYVIT+15, TODAYVIT+16, TODAYVIT+17, TODAYVIT+18, TODAYVIT+19, TODAYVIT+22 |
| U | GETINS+12, GETINS+26, NVIT+19, NVIT+21, NVIT+22, NVIT+23, NVIT+25, NVIT+27, NVIT+29, NVIT+44 , NVIT+45, LMP+4, EDC+4, RHX+7, FPM+5, FPM+8, FPM+9, FPM+10, FPM+11, FPM+27 , TODAYVIT+9 |
| VALUE | TODAYVIT+1~, TODAYVIT+15*, TODAYVIT+16*, TODAYVIT+17*, TODAYVIT+18*, TODAYVIT+20*, TODAYVIT+21*, TODAYVIT+22 |
| VDT | GETINS+3~, GETINS+6*, GETINS+8, GETINS+16, GETINS+17, GETINS+22, NLAB+5~, NLAB+10*, NLAB+11*, NLAB+13 , NVIT+6~, NVIT+12*, NVIT+13*, NVIT+15, NVIT+33, TODAYVIT+1~, TODAYVIT+4*, TODAYVIT+5*, TODAYVIT+6, TODAYVIT+9 , TODAYLAB+1~, TODAYLAB+5*, TODAYLAB+6*, TODAYLAB+7 |
| VFILENUM | NLAB+25~ |
| VISIT | GETINS~, GETINS+6, TODAYLAB+1~, TODAYLAB+7*, TODAYLAB+8 |
| VST | VINS+3~, VINS+5*, VINS+6, VINS+7*, VINS+8, TODAYVIT+1~, TODAYVIT+6*, TODAYVIT+7 |
| X | LASTHFC+2~, LASTHFC+16*, LASTHFC+17, VINS+3~, VINS+7*, NLAB+5~, NVIT+6~, NVIT+43*, NVIT+44, NVIT+45 , LMP+2~, LMP+5*, LMP+6, LMP+7, EDC+2~, EDC+5*, EDC+6, EDC+8, RHX+3~, RHX+9* , RHX+10, RHX+11, FPM+2~, TODAYVIT+8*, TODAYVIT+9 |
| Y | NLAB+29*, NLAB+30, NVIT+20~, NVIT+21*, NVIT+22*, NVIT+23*, NVIT+25*, NVIT+26*, NVIT+27 |
| Name | Field # of Occurrence |
|---|---|
| $T(GETVAR^CIAVMEVT | VINS+2 |