©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
BUDDRP6O ; IHS/CMI/LAB - UDS REPORT PROCESSOR ;
Source file <BUDDRP6O.m>
| Package | Total | Call Graph |
|---|---|---|
| IHS Uniform Data System | 4 | ($$CPTI,$$PLCL)^BUDDDU $$VBBD^BUDDRP6V ($$DATE,$$LASTPRC)^BUDDUTL1 GETMEDS^BUDDUTL2 |
| Patient Care Component Reports | 3 | ALLV^APCLAPIU $$START1^APCLDF ($$CLINIC,$$PRIMPROV,$$VD)^APCLV |
| Kernel | 2 | $$FMTE^XLFDT ($$STRIP,$$UP)^XLFSTR |
| DRG Grouper | 1 | $$CODEN^ICPTCOD |
| IHS Patient | 1 | $$DOB^AUPNPAT |
| IHS VA Utilities | 1 | ($$VAL,$$VALI)^XBDIQ1 |
| Package | Total | Caller Graph |
|---|---|---|
| IHS Uniform Data System | 2 | BUDDRP6B BUDDRPTC |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| MEDC | ||
| GETV(P,BD,ED,SITE) | ;EP - get all visits for this patient and COUNT MEDICAL VISITS
|
|
| STATDC(V) | ;EP - is the prescription associated with this V MED discontinued?
|
|
| LOINC(A,B) | ;EP
|
|
| I | ;EP ;CAD
|
|
| CAD(P,BDATE,EDATE) | ;EP
|
|
| LIPITHER(P,BD,ED) | ;
|
|
| LDL(P,BDATE,EDATE,NORES) | ;EP
|
|
| LIPIDALG(P,ED) | ;
|
|
| PROBCAD(P,BDATE,EDATE) | ;EP
|
|
| MEDC1 |
| Name | Field # of Occurrence |
|---|---|
| ALLV^APCLAPIU | CAD+4 |
| $$START1^APCLDF | GETV+3 |
| $$CLINIC^APCLV | GETV+12 |
| $$PRIMPROV^APCLV | GETV+17, GETV+27 |
| $$VD^APCLV | LIPITHER+12, GETV+16 |
| $$DOB^AUPNPAT | CAD+55, CAD+57 |
| $$CPTI^BUDDDU | CAD+55 |
| $$PLCL^BUDDDU | PROBCAD+2, CAD+41, CAD+43 |
| $$VBBD^BUDDRP6V | I+8, I+9 |
| $$DATE^BUDDUTL1 | I+26, I+28, CAD+15, CAD+16, CAD+22, CAD+23, CAD+28, CAD+29, CAD+32, CAD+33 , CAD+38, CAD+39, CAD+42, CAD+44, CAD+51, CAD+55 |
| $$LASTPRC^BUDDUTL1 | CAD+57 |
| GETMEDS^BUDDUTL2 | LIPITHER+3 |
| $$CODEN^ICPTCOD | CAD+54 |
| $$VAL^XBDIQ1 | CAD+13, CAD+20, CAD+28, CAD+29, CAD+30, CAD+38, CAD+39, CAD+51, LIPITHER+13, MEDC+4 |
| $$VALI^XBDIQ1 | CAD+27, CAD+37 |
| $$FMTE^XLFDT | PROBCAD+4, CAD+58, LIPITHER+13, GETV+3 |
| $$STRIP^XLFSTR | LIPIDALG+13, LIPIDALG+20 |
| $$UP^XLFSTR | LIPITHER+9 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ATXAX - [#9002226] | LIPIDALG+12, LIPIDALG+14, LIPIDALG+19, LIPIDALG+21, LOINC+3, LOINC+5 |
| ^ATXAX("B" | LIPIDALG+3, LIPIDALG+4, LDL+6 |
| ^ATXLAB - [#9002228] | LDL+14 |
| ^ATXLAB("B" | LDL+7 |
| ^AUPNVCPT - [#9000010.18] | CAD+12 |
| ^AUPNVCPT("AD" | CAD+11 |
| ^AUPNVLAB - [#9000010.09] | LDL+11, LDL+12, LDL+13, LDL+14, LDL+16, LDL+18 |
| ^AUPNVLAB("AE" | LDL+8, LDL+9, LDL+10 |
| ^AUPNVMED - [#9000010.14] | LIPITHER+8, LIPITHER+9, STATDC+2 |
| ^AUPNVPOV - [#9000010.07] | CAD+26 |
| ^AUPNVPOV("AD" | CAD+25, GETV+20 |
| ^AUPNVPRC - [#9000010.08] | CAD+36, CAD+49 |
| ^AUPNVPRC("AA" | CAD+47, CAD+48 |
| ^AUPNVPRC("AD" | CAD+35 |
| ^AUPNVSIT - [#9000010] | GETV+5, GETV+6, GETV+7, GETV+8, GETV+11, GETV+19, GETV+24, GETV+25, MEDC1+3, MEDC1+4 |
| ^AUPNVTC - [#9000010.33] | CAD+19 |
| ^AUPNVTC("AD" | CAD+18 |
| ^BUDDCNTL - [#90668.2] | GETV+14, MEDC1+1 |
| ^BUDDCNTL("B" | GETV+13, MEDC+2 |
| ^BUDDSITE - [#90668.1] | GETV+10 |
| ^BUDDTFIV("AA" | MEDC+6 |
| ^BUDDTFIV("C" | MEDC+5 |
| ^BUDDTSSC - [#90668.8] | CAD+53 |
| ^BUDDTSSC("AC" | CAD+15, CAD+16, CAD+22, CAD+23 |
| ^BUDDTSSC("AD" | CAD+28, CAD+29 |
| ^BUDDTSSC("AP" | CAD+38, CAD+39, CAD+50 |
| ^BUDDTSSC("AS" | CAD+32, CAD+33 |
| ^BUDDTSSC("B" | CAD+5, CAD+6 |
| ^DPT - [#2] | I+1, I+26, I+28 |
| ^GMR(120.8 - [#120.8] | LIPIDALG+6, LIPIDALG+8, LIPIDALG+16 |
| ^LAB(95.3 - [#95.3] | LOINC+2, LOINC+4 |
| ^PSDRUG - [#50] | LIPIDALG+12, LIPIDALG+13, LIPIDALG+14, LIPIDALG+19, LIPIDALG+20, LIPIDALG+21 |
| ^PSDRUG("B" | LIPIDALG+17 |
| ^PSRX - [#52] | STATDC+6, STATDC+11 |
| ^PSRX("APCC" | STATDC+4 |
| ^XTMP("BUDDRP6B" | I+26*, I+28* |
| Name | Line Occurrences |
|---|---|
| $$CAD | I+10 |
| $$GETV | I+6 |
| $$LDL | I+12 |
| $$LIPIDALG | I+17 |
| $$LIPITHER | I+21 |
| $$LOINC | LDL+17 |
| $$PROBCAD | CAD+59 |
| $$STATDC | LIPITHER+10 |
| MEDC1 | MEDC+4, MEDC+5 |
| Name | Field # of Occurrence |
|---|---|
| ^( | STATDC+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | LDL+1~, LOINC+1~, LOINC+2*, LOINC+3, LOINC+4*, LOINC+5 |
| A | LIPIDALG+2~, LIPITHER+1~, LIPITHER+6*, LIPITHER+7, LIPITHER+9, LIPITHER+10, LIPITHER+11, GETV+1~, GETV+3*, LOINC~ , LOINC+2, LOINC+4 |
| A("MEDCARE" | MEDC1+2, MEDC1+4* |
| A("SAMEPROV" | GETV+23, GETV+25* |
| A("VISITS" | GETV+4 |
| B | LIPIDALG+2~, GETV+3*, LDL+1~, LDL+8*, LOINC~, LOINC+3, LOINC+5 |
| BD | LIPITHER~, LIPITHER+3, GETV~, GETV+3 |
| BDATE | PROBCAD~, CAD~, CAD+4, CAD+59, LDL~, LDL+8 |
| >> BUD18RB | I+2*, I+3 |
| >> BUD18TH | I+5*, I+8, I+9 |
| >> BUDAGE | I+26, I+28 |
| BUDAST | CAD+1~, CAD+2*, CAD+15*, CAD+16*, CAD+22*, CAD+23*, CAD+28*, CAD+29*, CAD+32*, CAD+33* , CAD+38*, CAD+39*, CAD+40 |
| >> BUDBD | I+2, I+10, I+12, I+21 |
| >> BUDCAD1L | I+27 |
| >> BUDCAD2L | I+25 |
| >> BUDCADT | I+21*, I+22, I+26, I+28 |
| >> BUDCADV | I+10*, I+11, I+26, I+28 |
| >> BUDCCOM | I+26, I+28 |
| BUDD | LIPIDALG+2~, LIPIDALG+5*, LIPIDALG+6, LIPIDALG+12*, LIPIDALG+14*, LIPIDALG+19*, LIPIDALG+21*, LIPIDALG+23, LDL+1~, LDL+2! , LDL+3*, LDL+14*, LDL+20* |
| >> BUDDOB | I+1*, I+3, I+5, I+6 |
| >> BUDED | I+6, I+8, I+9, I+10, I+12, I+17, I+21, CAD+55 |
| BUDG | LDL+1~, LDL+2! |
| >> BUDH | I+26, I+28 |
| >> BUDISD | LIPITHER+5* |
| >> BUDJ | I+26, I+28 |
| >> BUDLDL | I+12*, I+13, I+26, I+28 |
| BUDLT | LDL+1~, LDL+7*, LDL+14 |
| BUDMEDS1 | LIPITHER+1~, LIPITHER+3, LIPITHER+4 |
| BUDMEDS1( | LIPITHER+6, LIPITHER+7, LIPITHER+9!, LIPITHER+10!, LIPITHER+11 |
| >> BUDMEDV | I+4 |
| >> BUDSECTI("CAD" | I+22* |
| >> BUDSECTI("PTS" | I+24* |
| >> BUDSITE | I+6 |
| BUDT | LDL+1~, LDL+2! |
| BUDT( | LDL+14*, LDL+20*, LDL+23, LDL+24, LDL+25 |
| BUDVS | CAD+1~ |
| BUDVS( | CAD+7, CAD+8, CAD+9 |
| C | LIPIDALG+2~, LIPITHER+1~, LIPITHER+6*, LIPITHER+13*, LIPITHER+14, LDL+1~, LDL+24*, LDL+25 |
| CLINC | GETV+1~, GETV+12*, GETV+14 |
| CTR | CAD+1~, CAD+7*, CAD+8, CAD+9 |
| D | LIPIDALG+13*, LIPIDALG+14, LIPIDALG+20*, LIPIDALG+21, CAD+46*, CAD+47*, CAD+48, CAD+51, GETV+1~, GETV+23* , GETV+24, MEDC1+2*, MEDC1+3, LDL+1~, LDL+8*, LDL+9, LDL+10, LDL+14, LDL+20, LDL+23* , LDL+24, LDL+25, LDL+27 |
| >> DFN | I+1, I+6, I+8, I+9, I+10, I+12, I+17, I+21, I+26, I+28 |
| E | GETV+3*, LDL+1~, LDL+8* |
| ED | LIPIDALG~, LIPITHER~, LIPITHER+3, GETV~, GETV+3 |
| EDATE | PROBCAD~, CAD~, CAD+4, CAD+41, CAD+43, CAD+46, CAD+57, CAD+59, LDL~, LDL+8 |
| G | LIPIDALG+2~, PROBCAD+1~, PROBCAD+2*, PROBCAD+3, PROBCAD+4, CAD+47*, CAD+48, CAD+51*, CAD+52, CAD+53 , CAD+55*, LIPITHER+1~, LIPITHER+2*, LIPITHER+4, LDL+1~, LDL+23*, LDL+24, LDL+27*, LDL+29 |
| >> J | LDL+16*, LDL+17 |
| L | LDL+1~, LDL+9*, LDL+10 |
| LASTV | GETV+1~, GETV+2* |
| LINE | GETV+1~, MEDC+4*, MEDC+5*, MEDC+6*, MEDC1+1 |
| M | LIPITHER+1~, LIPITHER+7*, LIPITHER+8, LIPITHER+9, LIPITHER+10, LIPITHER+13 |
| MEDV | GETV+1~, GETV+2*, GETV+4, MEDC1+5*, MEDC1+7 |
| MEDVI | GETV+1~, GETV+2*, MEDC1+5* |
| N | LIPIDALG+2~, LIPIDALG+8*, LIPIDALG+10, LIPIDALG+11, LIPIDALG+15 |
| NORES | LDL~, LDL+4* |
| P | LIPIDALG~, LIPIDALG+6, PROBCAD~, PROBCAD+2, CAD~, CAD+4, CAD+41, CAD+43, CAD+47, CAD+48 , CAD+55, CAD+57, CAD+59, LIPITHER~, LIPITHER+3, STATDC+3~, STATDC+4*, STATDC+5, STATDC+6, STATDC+11 , GETV~, GETV+3, GETV+23, GETV+25, MEDC1+2, MEDC1+4, LDL~, LDL+8, LDL+9, LDL+10 |
| PP | GETV+1~, GETV+17*, GETV+18, GETV+22, GETV+23, GETV+25, GETV+27*, GETV+28, MEDC+4, MEDC+5 , MEDC+6 |
| R | LDL+1~, LDL+13*, LDL+18*, LDL+19*, LDL+20 |
| S | LIPIDALG+2~, STATDC+3~, GETV+1~, GETV+21*, GETV+24*, GETV+26, MEDC+1*, MEDC1*, MEDC1+3* |
| SITE | GETV~, GETV+10 |
| T | LIPIDALG+2~, LIPIDALG+3*, LIPIDALG+12, LIPIDALG+19, LDL+1~, LDL+6*, LDL+15, LDL+17 |
| T1 | LIPIDALG+2~, LIPIDALG+4*, LIPIDALG+14, LIPIDALG+21 |
| T35V | GETV+1~, GETV+2* |
| T6V | GETV+1~, GETV+2* |
| TIEN | CAD+1~, CAD+5*, CAD+15, CAD+22, CAD+28, CAD+32, CAD+38, GETV+1~, GETV+13*, GETV+14 , MEDC+2*, MEDC1+1, MEDC1+2, MEDC1+4 |
| TIEN1 | CAD+1~, CAD+6*, CAD+16, CAD+23, CAD+29, CAD+33, CAD+39, CAD+50, CAD+53 |
| TV | GETV+1~, GETV+2* |
| U | I+1, I+13, I+26, I+28, LIPIDALG+8, LIPIDALG+12, LIPIDALG+13, LIPIDALG+14, LIPIDALG+16, LIPIDALG+19 , LIPIDALG+20, LIPIDALG+21, PROBCAD+4, CAD+8, CAD+9, CAD+42, CAD+44, CAD+49, CAD+55, CAD+58 , LIPITHER+7, LIPITHER+9, LIPITHER+11, LIPITHER+13, STATDC+6, STATDC+11, GETV+4, GETV+6, GETV+7, GETV+8 , GETV+11, GETV+19, GETV+23, GETV+24, GETV+25, MEDC1+2, MEDC1+3, MEDC1+4, LDL+12, LDL+13 , LDL+14, LDL+16, LDL+18, LDL+27, LOINC+2, LOINC+4 |
| V | LIPITHER+1~, LIPITHER+11*, LIPITHER+12, STATDC~, STATDC+1, STATDC+2, STATDC+4 |
| V1D | LIPITHER+1~, LIPITHER+12*, LIPITHER+13 |
| VDATE | CAD+1~, CAD+9*, CAD+15, CAD+16, CAD+22, CAD+23, CAD+28, CAD+29, CAD+32, CAD+33 , CAD+38, CAD+39, GETV+1~, GETV+16*, GETV+23, GETV+25, MEDC1+2, MEDC1+4 |
| VIEN | CAD+1~, CAD+8*, CAD+11, CAD+18, CAD+25, CAD+35 |
| VLOC | GETV+1~, GETV+8*, GETV+9, GETV+10, MEDC1+2, MEDC1+4 |
| VSIT | GETV+1~, GETV+4*, GETV+5, GETV+6, GETV+7, GETV+8, GETV+11, GETV+12, GETV+16, GETV+17 , GETV+19, GETV+20, GETV+24, GETV+25, GETV+27, MEDC+4, MEDC1+3, MEDC1+4, MEDC1+5 |
| X | I+6*, I+7, I+17*, I+18, LIPIDALG+2~, LIPIDALG+6*, LIPIDALG+8, LIPIDALG+16, CAD+1~, CAD+11* , CAD+12, CAD+13, CAD+18*, CAD+19, CAD+20, CAD+25*, CAD+26, CAD+27, CAD+28, CAD+29 , CAD+30, CAD+35*, CAD+36, CAD+37, CAD+38, CAD+39, CAD+42, CAD+44, CAD+49*, CAD+50 , CAD+53*, CAD+54, CAD+55, STATDC+3~, STATDC+6*, STATDC+7, STATDC+8, STATDC+9, STATDC+10, STATDC+11* , STATDC+12, STATDC+13, STATDC+14, STATDC+15, GETV+1~, GETV+4*, LDL+1~, LDL+10*, LDL+11, LDL+12 , LDL+13, LDL+14, LDL+16, LDL+18, LDL+25*, LDL+26, LDL+27 |
| Y | LIPIDALG+2~, LIPIDALG+11*, LIPIDALG+12, LIPIDALG+13, LIPIDALG+14, LIPIDALG+16*, LIPIDALG+17*, LIPIDALG+18, LIPIDALG+19, LIPIDALG+20 , LIPIDALG+21, CAD+1~, CAD+13*, CAD+14, CAD+15, CAD+16, CAD+20*, CAD+21, CAD+22, CAD+23 , CAD+27*, CAD+28, CAD+29, CAD+30*, CAD+31, CAD+32, CAD+33, CAD+37*, CAD+38, CAD+39 , CAD+41*, CAD+42, CAD+43*, CAD+44, CAD+48*, CAD+49, CAD+51, CAD+54*, CAD+55, CAD+57* , CAD+58, CAD+59*, CAD+60, MEDC+5* |
| Z | CAD+1~, CAD+55* |