APCHPST2 ; IHS/CMI/LAB - Patient Health Summary - Post Visit ;
Source file <APCHPST2.m>
Package | Total | Call Graph |
---|---|---|
IHS Patient | 1 | $$AGE^AUPNPAT |
Kernel | 1 | ($$FMADD,$$FMDIFF,$$FMTE)^XLFDT |
Patient Care Component | 1 | (EN,PROBA)^APCHPALG |
Patient Care Component Reports | 1 | $$START1^APCLDF |
Name | Comments | DBIA/ICR reference |
---|---|---|
LASTWC | ;
|
|
ALLERG | ;
|
|
MEAS | ;
|
|
LASTHT | ;
|
|
RXSTAT | ;gets status of rx ... TAKEN FROM PSOFUNC ROUTINE
|
|
GETHWBBP(P) | ||
S1 | ;
|
|
BMI | ;
|
|
MEDBLD | ;BUILD ARRAY OF MEDICATIONS
|
|
S(Y,F,C,T) | ;set up array
|
|
LASTBP | ;
|
|
MEDS | ;
|
|
LASTWT | ;
|
|
GETLABSX | ;get lab tests ordered today
|
|
EP | ;EP - meds/ allergies/ measurements
|
|
DATE(D) | ;EP - convert to slashed date
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^AUPNVMED - [#9000010.14] | MEDBLD+3, MEDBLD+4, MEDBLD+11, MEDBLD+17 |
^AUPNVMED("AA" | MEDS+13 |
^AUPNVMSR("AC" | LASTHT+2 |
^AUPNVSIT("AC" | LASTHT+1 |
^DPT - [#2] | GETLABSX+2 |
^LAB(60 - [#60] | GETLABSX+7 |
^LRO(69 - [#69] | GETLABSX+4, GETLABSX+5, GETLABSX+6 |
^PS(52.5 - [#52.5] | RXSTAT+3 |
^PSDRUG - [#50] | MEDBLD+5, MEDBLD+18, MEDBLD+20, MEDBLD+21 |
^PSRX - [#52] | MEDBLD+9, MEDBLD+12 |
^PSRX("APCC" | MEDBLD+8 |
^TMP("APCHPHS" | S1+1*, S1+2* |
Name | Line Occurrences |
---|---|
GETHWBBP | MEAS+2 |
MEDBLD | MEDS+13 |
RXSTAT | MEDBLD+9 |
S | MEDS+1, MEDS+2, MEDS+3, MEDS+4, MEDS+5, MEDS+6, MEDS+7, MEDS+8, MEDS+9, MEDS+14 , MEDS+17, MEDS+19, MEDS+20, MEDS+21, MEDS+22, MEDS+23, MEDS+24, MEDS+25, MEDS+26, MEDS+27 , MEDS+28, MEDS+29, ALLERG+1, ALLERG+2, ALLERG+3, ALLERG+4, ALLERG+8, ALLERG+13, ALLERG+19, ALLERG+25 , ALLERG+30, ALLERG+35, ALLERG+37, MEAS+1, MEAS+5, MEAS+7, MEAS+8, MEAS+9, MEAS+10, MEAS+12 , MEAS+13, MEAS+16, MEAS+18, MEAS+20, MEAS+21, MEAS+22, MEAS+25, MEAS+26, MEAS+27, MEAS+28 , MEAS+30, MEAS+31 |
S1 | S+5, S+7, S+10 |
Name | Field # of Occurrence |
---|---|
^( | MEDBLD+8 |
^("P" | RXSTAT+3 |
^(0 | RXSTAT+3 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | S+3~, S+8*, S+9*, S1+1*, S1+2, LASTHT+4*, LASTWT+1*, LASTBP+1*, LASTWC+1*, BMI+3* , BMI+4*, BMI+5 |
>> APCHDBP | MEAS+25*, MEAS+26 |
>> APCHENT | ALLERG+8 |
>> APCHENT("A" | ALLERG+9, ALLERG+11, ALLERG+13, ALLERG+25 |
>> APCHENT("P" | ALLERG+15, ALLERG+17, ALLERG+19 |
>> APCHENT("U" | ALLERG+21, ALLERG+23 |
>> APCHFEET | MEAS+4*, MEAS+5 |
>> APCHINCH | MEAS+4*, MEAS+5 |
>> APCHLR | GETLABSX+2*, GETLABSX+3, GETLABSX+4 |
>> APCHLRO | GETLABSX+3*, GETLABSX+4*, GETLABSX+5, GETLABSX+6 |
>> APCHSALD | ALLERG+5*, ALLERG+9*, ALLERG+10, ALLERG+11, ALLERG+13, ALLERG+15*, ALLERG+16, ALLERG+17, ALLERG+19, ALLERG+21* , ALLERG+22, ALLERG+23, ALLERG+25, ALLERG+28*, ALLERG+31* |
>> APCHSALG | ALLERG+5*, ALLERG+12*, ALLERG+18*, ALLERG+24*, ALLERG+37 |
>> APCHSALP | ALLERG+5*, ALLERG+11*, ALLERG+13, ALLERG+17*, ALLERG+19, ALLERG+23*, ALLERG+25, ALLERG+28*, ALLERG+32*, ALLERG+33 , ALLERG+35 |
>> APCHSAPR | ALLERG+28*, ALLERG+34*, ALLERG+37 |
>> APCHSBP | MEAS+25*, MEAS+26 |
APCHSCOT | MEDBLD+2!, MEDBLD+10*, MEDBLD+11*, MEDBLD+16 |
>> APCHSDFN | MEDS+13, MEAS+2, MEAS+27, MEAS+28, MEAS+30, MEAS+31, GETLABSX+2 |
>> APCHSDLM | MEDS+12*, MEDS+13 |
>> APCHSDTM | MEDBLD+6*, MEDBLD+16 |
>> APCHSDYS | MEDBLD+14*, MEDBLD+16, MEDBLD+24 |
>> APCHSIVD | MEDS+13*, MEDBLD+6 |
>> APCHSM( | MEDS+16, MEDBLD+23, MEDBLD+24*, MEDBLD+25*, MEDBLD+26* |
>> APCHSMCT | MEDS+13*, MEDS+14, MEDBLD+27* |
>> APCHSMED | MEDS+15*, MEDS+16*, MEDS+17 |
>> APCHSMFX | MEDBLD+18*, MEDBLD+21*, MEDBLD+23, MEDBLD+24, MEDBLD+25, MEDBLD+26 |
>> APCHSMX | MEDS+13*, MEDBLD+3, MEDBLD+4, MEDBLD+8, MEDBLD+11, MEDBLD+17 |
>> APCHSN | MEDBLD+4*, MEDBLD+5, MEDBLD+7, MEDBLD+14, MEDBLD+18, MEDBLD+19, MEDBLD+20, MEDBLD+21, MEDBLD+24 |
>> APCHSPT | ALLERG+30, ALLERG+31 |
>> APCHSPT( | ALLERG+31, ALLERG+32, ALLERG+35 |
>> APCHSQ | MEDS+13* |
APCHSRXP | MEDBLD+2!, MEDBLD+8*, MEDBLD+9, MEDBLD+10, MEDBLD+12, MEDBLD+25, RXSTAT+1, RXSTAT+2 |
>> APCHSSTA | MEDBLD+12*, MEDBLD+13 |
>> APCHTCTR | GETLABSX+6* |
>> APCHTEST | GETLABSX+7*, GETLABSX+8 |
>> APCHTST( | GETLABSX+8* |
>> APCHTSTP | GETLABSX+3*, GETLABSX+5*, GETLABSX+6, GETLABSX+7 |
APCHX | GETHWBBP+1! |
APCHX("BMI" | MEAS+11, MEAS+12, MEAS+15, MEAS+16, MEAS+18, MEAS+19, GETHWBBP+2*, BMI+5* |
APCHX("BP" | MEAS+25, MEAS+26, MEAS+30, MEAS+31, LASTBP+1* |
APCHX("BPD" | MEAS+26, MEAS+27, MEAS+28, LASTBP+1* |
APCHX("HT" | MEAS+4, MEAS+5, MEAS+8, GETHWBBP+2*, LASTHT+4*, LASTHT+5*, BMI+2, BMI+4 |
APCHX("HTD" | GETHWBBP+2*, LASTHT+4*, BMI+1 |
APCHX("WC" | GETHWBBP+2*, LASTWC+1* |
APCHX("WCD" | GETHWBBP+2*, LASTWC+1* |
APCHX("WT" | MEAS+7, MEAS+9, MEAS+10, GETHWBBP+2*, LASTWT+1*, BMI+2, BMI+4 |
APCHX("WTD" | MEAS+10, MEAS+11, MEAS+15, MEAS+16, GETHWBBP+2*, LASTWT+1*, BMI+1 |
APCHY | LASTHT+3~, LASTWT+1!, LASTBP+1!, LASTWC+1! |
APCHY(1 | LASTHT+4, LASTWT+1, LASTBP+1, LASTWC+1 |
C | S~, S+7 |
D | DATE~, DATE+1, DATE+2 |
DT | MEDS+12, MEAS+10, MEAS+11, MEAS+15, MEAS+27, MEAS+28, MEDBLD+16, GETLABSX+4, GETLABSX+5, GETLABSX+6 , RXSTAT+4 |
>> E | LASTHT+4*, LASTWT+1*, LASTBP+1*, LASTWC+1* |
F | S~, S+1*, S+5* |
>> H | BMI+4* |
>> J | RXSTAT+2*, RXSTAT+3 |
>> L | S+7* |
P | GETHWBBP~, LASTHT+1, LASTHT+2, LASTHT+4, LASTWT+1, LASTBP+1, LASTWC+1, BMI+1 |
>> RX0 | MEDBLD+9*, RXSTAT+3, RXSTAT+5* |
>> RX2 | MEDBLD+9*, RXSTAT+4 |
>> ST | MEDBLD+9, MEDBLD+26, RXSTAT+5* |
>> ST0 | RXSTAT+3*, RXSTAT+4*, RXSTAT+5 |
T | S~, S+2*, S+7*, S+8, S+9 |
U | S1+1, LASTHT+4, LASTWT+1, LASTBP+1, LASTWC+1, MEDBLD+5, MEDBLD+7, MEDBLD+11, MEDBLD+12, MEDBLD+14 , MEDBLD+17, MEDBLD+18, MEDBLD+19, MEDBLD+20, MEDBLD+21, MEDBLD+24, MEDBLD+25, MEDBLD+26, GETLABSX+7 |
>> W | BMI+4* |
X | MEDS+1*, MEDS+2*, MEDS+3*, MEDS+4*, MEDS+5*, MEDS+6*, MEDS+7*, MEDS+8*, MEDS+9*, MEDS+14* , MEDS+17*, MEDS+19*, MEDS+20*, MEDS+21*, MEDS+22*, MEDS+23*, MEDS+24*, MEDS+25*, MEDS+26*, MEDS+27* , MEDS+28*, MEDS+29*, ALLERG+1*, ALLERG+2*, ALLERG+3*, ALLERG+4*, ALLERG+8*, ALLERG+13*, ALLERG+19*, ALLERG+25* , ALLERG+30*, ALLERG+35*, ALLERG+37*, MEAS+1*, MEAS+5*, MEAS+7*, MEAS+8*, MEAS+9*, MEAS+10*, MEAS+12* , MEAS+13*, MEAS+16*, MEAS+18*, MEAS+20*, MEAS+21*, MEAS+22*, MEAS+25*, MEAS+26*, MEAS+27*, MEAS+28* , MEAS+30*, MEAS+31*, S+3~, S+5*, S+6*, S+8*, S+9*, S1+2, LASTHT+4~, LASTWT+1~ , LASTBP+1~, LASTWC+1~ |
Y | S~, S+6, S+7, S+9 |