©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
BTIUMED7 ; SLC/JM - Active/Recent Med Objects Routine ;03-Oct-2012 14:44;DU
Source file <BTIUMED7.m>
| Package | Total | Call Graph |
|---|---|---|
| IHS Electronic Health Record | 1 | $$VSTR2VIS^BEHOENCX |
| Kernel | 1 | $$FMTE^XLFDT |
| VA Fileman | 1 | $$GET1^DIQ |
| VueCentric Framework | 1 | ($$GETVAR,GETVAR)^CIAVMEVT |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| VMED(TARGET,FILLS) | ;EP; returns medications for current vuecentric visit context
; If SIG is set to 1, include medication sig |
|
| GETMED(RETURN,VIEN) | ;EP returns all medications given for a visit
|
|
| FILOOP(RX,RX2) | ;
|
|
| FILLS(RETURN,VIEN) | ;Create and add nodes for fills and past fills.
|
| FileNo | Call Tags |
|---|---|
| ^PSRX - [#52] | GET1^DIQ |
| ^AUPNVMED - [#9000010.14] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("TEST" | VMED+6 |
| ^AUPNVMED("AD" | GETMED+4 |
| ^PSRX - [#52] | GETMED+14, GETMED+15, FILLS+4, FILLS+22, FILLS+24, FILOOP+1, FILOOP+2 |
| ^PSRX("B" | GETMED+7 |
| Name | Line Occurrences |
|---|---|
| FILLS | GETMED+23 |
| FILOOP | FILLS+6, FILLS+25 |
| GETMED | VMED+8 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | FILOOP+2 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CNT | VMED+3~, VMED+10*, VMED+12*, VMED+13, VMED+14 |
| COUNT | GETMED+1~, GETMED+3*, GETMED+16*, GETMED+17*, GETMED+18, GETMED+19*, GETMED+20, GETMED+21*, GETMED+22, FILLS+15* , FILLS+16, FILLS+17*, FILLS+18, FILLS+33*, FILLS+34, FILLS+35*, FILLS+36 |
| >> DFN | VMED+6 |
| FILL | FILLS+2!, FILLS+3~, FILLS+20! |
| FILL( | FILLS+8, FILLS+9, FILLS+26, FILLS+27 |
| FILL(9999999 | FILOOP+1*, FILOOP+2* |
| FILLS | VMED~, GETMED+23, FILOOP+1* |
| I | VMED+3~, VMED+11*, VMED+13, GETMED+14* |
| II | FILLS+3~, FILOOP+2* |
| NRXN | FILLS+3~, FILLS+22*, FILLS+23, FILLS+24, FILLS+25 |
| PSIII | FILLS+3~, FILLS+8*, FILLS+9, FILLS+26*, FILLS+27 |
| RESULT | VMED+3~, VMED+8 |
| RESULT( | VMED+11, VMED+13 |
| RETURN | GETMED~, GETMED+2!, GETMED+23, FILLS~ |
| RETURN( | GETMED+16*, GETMED+18*, GETMED+20*, GETMED+22*, FILLS+16*, FILLS+18*, FILLS+34*, FILLS+36* |
| RF | FILLS+3~ |
| RFL | FILLS+3~, FILLS+5*, FILLS+19, FILOOP+2* |
| RFS | FILLS+3~ |
| RX | GETMED+1~, GETMED+7*, GETMED+8, GETMED+9, GETMED+10, GETMED+11, GETMED+12, GETMED+14, GETMED+15, FILLS+4 , FILLS+6, FILLS+22, FILOOP~, FILOOP+1, FILOOP+2 |
| RX2 | FILLS+3~, FILLS+4*, FILLS+6, FILLS+24*, FILLS+25, FILOOP~, FILOOP+1 |
| RXNO | GETMED+1~, GETMED+6*, GETMED+7 |
| TARGET | VMED~, VMED+2, VMED+5, VMED+6, VMED+10, VMED+13, VMED+14, VMED+15 |
| TIUIS | GETMED+1~, GETMED+10*, GETMED+20 |
| TIULF | GETMED+1~, GETMED+11*, GETMED+20 |
| TIUPRV | GETMED+1~, GETMED+12*, GETMED+22 |
| TIURE | GETMED+1~ |
| TIURF | GETMED+1~, GETMED+15*, GETMED+22 |
| TIUX | GETMED+1~, GETMED+4*, GETMED+5, GETMED+6 |
| TIUY | GETMED+1~, GETMED+4*, GETMED+5*, GETMED+18 |
| TRM | GETMED+1~, GETMED+13*, GETMED+14*, GETMED+15 |
| U | FILLS+9, FILLS+22, FILLS+27 |
| VIEN | GETMED~, GETMED+4, GETMED+23, FILLS~ |
| VST | VMED+3~, VMED+4*, VMED+5, VMED+6*, VMED+8 |
| X | VMED+3~, VMED+6*, FILLS+3~, FILLS+9*, FILLS+10, FILLS+11, FILLS+27*, FILLS+28, FILLS+29 |
| Y | FILLS+3~, FILLS+7*, FILLS+12*, FILLS+13*, FILLS+14, FILLS+18, FILLS+21*, FILLS+30*, FILLS+31*, FILLS+32 , FILLS+36 |
| Z | FILLS+3~, FILLS+11*, FILLS+12, FILLS+13, FILLS+29*, FILLS+30, FILLS+31 |
| Name | Field # of Occurrence |
|---|---|
| $T(GETVAR^CIAVMEVT | VMED+2 |