APCHS72 ; IHS/CMI/LAB - PART 7 OF APCHS -- SUMMARY PRODUCTION COMPONENTS ;
Source file <APCHS72.m>
Package | Total | Call Graph |
---|---|---|
Kernel | 2 | ($$FMADD,$$FMTE)^XLFDT $$LOW^XLFSTR |
Patient Care Component | 2 | DISPREF^APCHS3C (HOLDDSP,MEDRU)^APCHS7 |
IHS VA Utilities | 1 | ($$VAL,$$VALI)^XBDIQ1 |
Package | Total | Caller Graph |
---|---|---|
Patient Care Component | 6 | APCHS73 APCHS74 APCHS78 APCHS7C APCHS7R APCHSTP1 |
Health Summary Components | 1 | BHSMEDR |
Name | Comments | DBIA/ICR reference |
---|---|---|
OTH | ;gather up all others by date range in components, get last of each
|
|
GETMEDS(DFN,Y,Z,SIGT) | ;PEP - return array of meds for patient P
|
|
SETNVA | ;
|
|
SITE | ;DETERMINE IF OUTSIDE LOCATION INFO PRESENT
|
|
S(Y,F,C,T) | ;set up array
|
|
S1 | ;
|
|
MEDS | ;EP - called from component - <SETUP>
|
|
CHRONIC(N) | ;EP
|
|
SIG | ;CONSTRUCT THE FULL TEXT FROM THE ENCODED SIG
|
|
SETARRAY | ;DISPLAY MEDICATION
|
|
MEDX | ;
|
|
NONVA | ; S DFN=APCHSPAT,PSOACT=1 D ^PSOHCSUM
|
|
DISPLAY | ;
|
|
REORDER | ;
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^APCHSCTL - [#9001015] | MEDS+4 |
^AUPNVMED - [#9000010.14] | GETMEDS+24, GETMEDS+25, GETMEDS+27, OTH+3, OTH+4, OTH+6, NONVA+3, CHRONIC+2, CHRONIC+4, SETARRAY+2 , SETARRAY+9 |
^AUPNVMED("AA" | GETMEDS+22, GETMEDS+23, OTH+1, OTH+2 |
^AUPNVSIT - [#9000010] | SETARRAY+4, SITE+2, SITE+3, SITE+4 |
^DIC(4 - [#4] | SITE+4 |
^DPT - [#2] | GETMEDS+12 |
^PS(50.7 - [#50.7] | NONVA+11 |
^PS(51 - [#51] | SIG+3 |
^PS(55 - [#55] | NONVA+2, NONVA+3, NONVA+6, NONVA+9, NONVA+11, NONVA+12, CHRONIC+6 |
^PSDRUG - [#50] | NONVA+11, NONVA+12, SETARRAY+7 |
^PSRX("APCC" | CHRONIC+5 |
^TMP("APCHSMEDS" | MEDX+1!, DISPLAY+1, DISPLAY+2, DISPLAY+3, DISPLAY+4, GETMEDS+10!, REORDER+6!, S1+1*, S1+2*, S1+3* |
^TMP($J | MEDX+1!, GETMEDS+10!, GETMEDS+25, GETMEDS+27*, OTH+4, OTH+6*, NONVA+12*, REORDER+2, REORDER+3, REORDER+7! |
Name | Line Occurrences |
---|---|
$$CHRONIC | GETMEDS+26, OTH+5 |
DISPLAY | MEDS+9 |
GETMEDS | MEDS+8 |
S | SETARRAY+13, SETARRAY+14, SETNVA+9, SETNVA+10 |
S1 | S+5, S+7, S+10 |
SETARRAY | REORDER+4, REORDER+5 |
SETNVA | SETARRAY+1 |
SIG | SETARRAY+11, SETNVA+8 |
SITE | SETARRAY+12 |
Name | Field # of Occurrence |
---|---|
^( | CHRONIC+5 |
^(21 | SITE+2 |
^(9 | SIG+3 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | GETMEDS+9~, SETARRAY+2*, SETARRAY+4, SETARRAY+6, SETARRAY+7, S+8*, S+9*, S1+2*, S1+3 |
A | GETMEDS+9~, REORDER+3~ |
A( | REORDER+3*, REORDER+5 |
>> APCHORTS | SETARRAY+9*, SETARRAY+10 |
>> APCHSBRK | MEDS+2 |
APCHSC | REORDER+4~*, REORDER+5~* |
>> APCHSCKP | MEDS+2, DISPLAY+2, DISPLAY+4 |
>> APCHSDLM | NONVA+8 |
>> APCHSEGL | DISPLAY+3 |
>> APCHSEGT | MEDS+4 |
APCHSFN | MEDS+14*, MEDS+16! |
>> APCHSNPG | MEDS+2 |
>> APCHSPAT | MEDS+8, NONVA+2, NONVA+3, NONVA+6, NONVA+9, NONVA+11, NONVA+12 |
>> APCHSQIT | MEDS+2, MEDS+12, DISPLAY+2, DISPLAY+4 |
APCHST | MEDS+14*, MEDS+16! |
>> APCHSTYP | MEDS+4, MEDS+8 |
APCHSX | MEDX+2!, DISPLAY+2*, DISPLAY+4*, REORDER+4~*, REORDER+5~* |
B | GETMEDS+9~, SETARRAY+8*, SETARRAY+10*, SETARRAY+13, SETNVA+7*, SETNVA+9 |
C | GETMEDS+9~, REORDER+2*, REORDER+3*, S~, S+7 |
D | GETMEDS+9~, NONVA+9*, NONVA+10*, NONVA+11, NONVA+12, SETARRAY+4*, SETARRAY+5*, SETARRAY+13, SETNVA+1*, SETNVA+2* , SETNVA+3*, SETNVA+9 |
DFN | GETMEDS~, GETMEDS+11, GETMEDS+12, GETMEDS+22, GETMEDS+23, OTH+1, OTH+2 |
DT | GETMEDS+16, GETMEDS+18 |
DUZ(2 | SITE+4 |
E | GETMEDS+9~, SETARRAY+6*, SETARRAY+8, SETARRAY+10, SETNVA+4*, SETNVA+7 |
F | GETMEDS+9~, S~, S+2*, S+5* |
G | GETMEDS+9~, SETARRAY+6*, SETARRAY+11*, SETARRAY+13, SETNVA+5*, SETNVA+8*, SETNVA+9, SIG+1, SIG+2, SIG+3 |
H | GETMEDS+9~ |
I | GETMEDS+9~, GETMEDS+21~, GETMEDS+22*, GETMEDS+23, OTH+1~*, OTH+2, REORDER+2~*, REORDER+3~*, REORDER+4~*, REORDER+5~* , S1+1, S1+2, S1+3 |
J | GETMEDS+9~ |
K | GETMEDS+9~, SETARRAY+7*, SETARRAY+13, SETNVA+6*, SETNVA+9 |
L | GETMEDS+9~, NONVA+6*, NONVA+7*, NONVA+8, NONVA+12, S+7* |
M | GETMEDS+9~, REORDER+2~ |
M( | REORDER+2*, REORDER+4 |
N | GETMEDS+9~, NONVA+11*, NONVA+12, REORDER+2~*, REORDER+3~*, REORDER+4~*, REORDER+5~*, CHRONIC~, CHRONIC+1, CHRONIC+2 , CHRONIC+4, CHRONIC+5, SETARRAY+1, SETARRAY+2, SETARRAY+7, SETARRAY+9, SETNVA+1, SETNVA+4, SETNVA+5, SETNVA+6 |
O | GETMEDS+9~, REORDER+2~*, REORDER+3~* |
P | GETMEDS+9~, CHRONIC+3~, CHRONIC+4*, CHRONIC+6, SIG+2~*, SIG+3 |
Q | GETMEDS+9~, SETARRAY+6*, SETARRAY+13 |
R | GETMEDS+9~ |
S | GETMEDS+9~, REORDER+2~*, REORDER+3~*, SETARRAY+14, SITE+1*, SITE+2*, SITE+4* |
SIGT | GETMEDS~, SIG+1 |
T | GETMEDS+9~, SETARRAY+4*, SETARRAY+5*, SETARRAY+6*, SETARRAY+13, S~, S+3*, S+7*, S+8, S+9 |
U | MEDS+4, GETMEDS+25, GETMEDS+27, OTH+4, OTH+6, NONVA+3, NONVA+6, NONVA+9, NONVA+11, NONVA+12 , CHRONIC+4, SETARRAY+4, SETARRAY+6, SETARRAY+7, SETARRAY+9, SETNVA+1, SETNVA+4, SETNVA+5, SETNVA+6, SITE+2 , SITE+3, SITE+4, S1+2 |
V | GETMEDS+9~, SETARRAY+4*, SETARRAY+5, SITE+2, SITE+3, SITE+4 |
W | GETMEDS+9~ |
X | MEDX+3!, GETMEDS+9~, GETMEDS+23~*, GETMEDS+24, GETMEDS+25, GETMEDS+26, GETMEDS+27, OTH+2*, OTH+3, OTH+4 , OTH+5, OTH+6, NONVA+2*, NONVA+3, NONVA+6, NONVA+9, NONVA+11, NONVA+12, CHRONIC+3~, CHRONIC+5* , CHRONIC+6, SETARRAY+13*, SETARRAY+14*, SETNVA+9*, SETNVA+10*, SIG+2*, SIG+3*, SIG+4, S+1~, S+5* , S+6*, S+8*, S+9*, S1+3 |
X1 | MEDX+3! |
X2 | MEDX+3! |
Y | MEDS+4*, MEDS+5*, MEDS+6*, MEDS+7*, MEDS+8, MEDX+3!, GETMEDS~, GETMEDS+13*, GETMEDS+16*, GETMEDS+17* , OTH+1, CHRONIC+3~, CHRONIC+6*, CHRONIC+7, SIG+3*, S~, S+6, S+7, S+9 |
Z | MEDS+4*, MEDS+8, GETMEDS~, GETMEDS+14*, GETMEDS+18*, GETMEDS+19*, GETMEDS+22, SETARRAY+11, SETNVA+8, SIG+1* , SIG+2*, SIG+4* |