APCHPST1 ; IHS/CMI/LAB - Patient Health Summary - Post Visit ;
Source file <APCHPST1.m>
Package | Total | Call Graph |
---|---|---|
Kernel | 2 | ($$FMDIFF,$$FMTE)^XLFDT $$LOW^XLFSTR |
Patient Care Component Reports | 2 | $$START1^APCLDF $$PRIMPROV^APCLV |
IHS Patient | 1 | ($$AGE,$$HRN,$$SEX)^AUPNPAT |
IHS VA Utilities | 1 | $$VAL^XBDIQ1 |
Immunization Tracking | 1 | IMMFORC^BIRPC |
Patient Care Component | 1 | EP^APCHPST2 |
Taxonomy | 1 | $$ICD^ATXAPI |
VA Fileman | 1 | ^%DT |
Name | Comments | DBIA/ICR reference |
---|---|---|
GETLABSX | ;get lab tests ordered today
|
|
CKD | ;Does patient have chronic kidney disease (CKD)?
|
|
IMMUN | ;
|
|
APCHLHD | ;
|
|
LOINC(A,B) | ;
|
|
TYPEREF(N) | ;
|
|
S1 | ;
|
|
GETLABS | ;get todays labs from V Lab File
|
|
MISC | ;
|
|
S(Y,F,C,T) | ;set up array
|
|
MEDS | ;
|
|
CKDP | ;
|
|
LAB(P,T,LT) | ;EP
|
|
REF(P,T,D) | ;return refusal string after date D for test is tax T
|
|
SETARRAY | ;set up array containing dm care summary
|
|
LABTESTS | ;
|
|
DMDX(P) | ;
|
|
DMX | ;
|
|
EP(APCHSDFN) | ;PEP - PASS DFN get back array of patient care summary
|
|
DATE(D) | ;EP - convert to slashed date
|
|
REF1(P,F,I,D,T) | ; ;
|
Name | Field # of Occurrence |
---|---|
^%DT | LABTESTS+7, LABTESTS+11, LABTESTS+18 |
EP^APCHPST2 | MEDS+1 |
$$START1^APCLDF | DMDX+8 |
$$PRIMPROV^APCLV | SETARRAY+5 |
$$ICD^ATXAPI | DMDX+4 |
$$AGE^AUPNPAT | LABTESTS+16 |
$$HRN^AUPNPAT | SETARRAY+4 |
$$SEX^AUPNPAT | SETARRAY+9, CKD+4, CKD+5 |
IMMFORC^BIRPC | IMMUN+3 |
$$VAL^XBDIQ1 | SETARRAY+6, SETARRAY+7 |
$$FMDIFF^XLFDT | LABTESTS+7, LABTESTS+11, LABTESTS+18 |
$$FMTE^XLFDT | SETARRAY+3, SETARRAY+8, LAB+14 |
$$LOW^XLFSTR | SETARRAY+9 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZOSF("TEST" | SETARRAY+2 |
^APCCCTRL - [#9001000] | SETARRAY+4 |
^ATXAX - [#9002226] | LOINC+3, LOINC+5 |
^ATXAX("B" | DMDX+2 |
^ATXLAB - [#9002228] | LAB+5, REF+4 |
^ATXLAB("B" | LABTESTS+5, LABTESTS+10, LABTESTS+16, CKD+3, CKD+7, CKD+10, CKD+13 |
^AUPNPREF - [#9000022] | TYPEREF+1 |
^AUPNPREF("AA" | REF1+6, REF1+8 |
^AUPNPROB - [#9000011] | DMDX+4 |
^AUPNPROB("AC" | DMDX+4 |
^AUPNVLAB - [#9000010.09] | LAB+5, LAB+7, LAB+14, GETLABS+6, GETLABS+8 |
^AUPNVLAB("AE" | LAB+2, LAB+3, LAB+4, GETLABS+2, GETLABS+3, GETLABS+5 |
^AUPNVSIT - [#9000010] | LAB+14 |
^AUPNVSIT("AC" | SETARRAY+5 |
^AUTTLOC - [#9999999.06] | SETARRAY+7 |
^DIC(4 - [#4] | SETARRAY+4 |
^DPT - [#2] | SETARRAY+4, SETARRAY+9, GETLABSX+2 |
^LAB(60 - [#60] | GETLABSX+7, GETLABS+4 |
^LAB(95.3 - [#95.3] | LOINC+2, LOINC+4 |
^LRO(69 - [#69] | GETLABSX+4, GETLABSX+5, GETLABSX+6 |
^TMP("APCHPHS" | EP+2!, EP+3*, S1+1*, S1+2* |
Name | Line Occurrences |
---|---|
$$DATE | REF1+10, REF1+12 |
$$DMDX | CKDP+6, LABTESTS+5, LABTESTS+16 |
$$LAB | LABTESTS+5, LABTESTS+11, LABTESTS+16, CKD+3, CKD+7, CKD+10, CKD+13 |
$$LOINC | LAB+8 |
$$REF | LAB+13, LAB+14 |
$$REF1 | REF+5 |
$$TYPEREF | REF1+10, REF1+12 |
APCHLHD | LABTESTS+6, LABTESTS+9, LABTESTS+13, LABTESTS+17, LABTESTS+18, LABTESTS+21 |
CKD | CKDP+2 |
DMX | DMDX+8 |
GETLABS | LABTESTS+20 |
S | SETARRAY+3, SETARRAY+4, SETARRAY+6, SETARRAY+7, SETARRAY+8, SETARRAY+9, SETARRAY+10, SETARRAY+11, SETARRAY+12, CKDP+8 , CKDP+10, CKDP+11, CKDP+12, CKDP+13, LABTESTS+6, LABTESTS+8, LABTESTS+9, LABTESTS+12, LABTESTS+13, LABTESTS+17 , LABTESTS+18, LABTESTS+22, LABTESTS+25, LABTESTS+27, IMMUN+1, IMMUN+4, IMMUN+9, IMMUN+11, IMMUN+13, MISC+1 , MISC+2, MISC+3, MISC+4, MISC+5, MISC+6, MISC+7, MISC+8, MISC+9, MISC+10, MISC+11 , MISC+12, MISC+13, MISC+14, MISC+15, MISC+16, MISC+17, APCHLHD+1, APCHLHD+2 |
S1 | S+5, S+7, S+10 |
SETARRAY | EP+4 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | S+3~, S+8*, S+9*, S1+1*, S1+2, LOINC+1~, LOINC+2*, LOINC+3, LOINC+4*, LOINC+5 , REF+6*, TYPEREF+1~*, TYPEREF+2, TYPEREF+3, TYPEREF+4 |
A | LOINC~, LOINC+2, LOINC+4 |
>> APCDVSIT | SETARRAY+5 |
>> APCHCKCH | LABTESTS+12*, LABTESTS+16 |
>> APCHCKD | CKDP+7, CKD+1*, CKD+4*, CKD+5*, CKD+7, CKD+8*, CKD+10, CKD+11*, CKD+13, CKD+14* |
>> APCHCTR | LABTESTS+26*, LABTESTS+27, GETLABS+6*, GETLABS+7, GETLABS+8 |
>> APCHDBP | CKDP+4, CKDP+5, CKDP+6, CKDP+7 |
>> APCHHBP | CKDP+3*, CKDP+5*, CKDP+6*, CKDP+7*, CKDP+8, CKDP+9 |
>> APCHI | IMMUN+10 |
>> APCHI( | IMMUN+7*, IMMUN+12, IMMUN+13 |
>> APCHICTR | IMMUN+10*, IMMUN+12*, IMMUN+13 |
>> APCHIMDU | IMMUN+13* |
>> APCHIMM | IMMUN+3, IMMUN+4, IMMUN+5, IMMUN+9 |
>> APCHIMMN | IMMUN+5*, IMMUN+7 |
>> APCHIMMT | IMMUN+5*, IMMUN+6*, IMMUN+7 |
>> APCHLA1D | LABTESTS+5*, LABTESTS+6, LABTESTS+7* |
>> APCHLA1V | LABTESTS+5* |
>> APCHLACD | CKD+10* |
>> APCHLACV | CKD+10*, CKD+11 |
>> APCHLCHD | LABTESTS+11*, LABTESTS+16*, LABTESTS+17, LABTESTS+18* |
>> APCHLCHV | LABTESTS+11*, LABTESTS+16* |
>> APCHLCRD | CKD+3* |
>> APCHLCRV | CKD+3*, CKD+4, CKD+5 |
>> APCHLEGD | CKD+13* |
>> APCHLEGV | CKD+13*, CKD+14 |
>> APCHLHD | LABTESTS+4*, LABTESTS+6*, LABTESTS+8, LABTESTS+9*, LABTESTS+12, LABTESTS+13*, LABTESTS+17*, LABTESTS+18*, LABTESTS+21* |
>> APCHLR | GETLABSX+2*, GETLABSX+3, GETLABSX+4 |
>> APCHLRO | GETLABSX+3*, GETLABSX+4*, GETLABSX+5, GETLABSX+6 |
>> APCHLUPD | CKD+7* |
>> APCHLUPV | CKD+7*, CKD+8 |
>> APCHPROV | SETARRAY+5*, SETARRAY+6 |
APCHREF | REF+4~, REF+6 |
APCHREF( | REF+6 |
APCHREF(9999999 | REF+5* |
>> APCHSBP | CKDP+4, CKDP+5, CKDP+6, CKDP+7 |
APCHSDFN | EP~, SETARRAY+4, SETARRAY+5, SETARRAY+6, SETARRAY+7, SETARRAY+9, CKDP+6, LABTESTS+5, LABTESTS+11, LABTESTS+16 , IMMUN+3, CKD+3, CKD+4, CKD+5, CKD+7, CKD+10, CKD+13, GETLABSX+2, GETLABS+2, GETLABS+3 , GETLABS+5 |
>> APCHSIVD | GETLABS+1*, GETLABS+2, GETLABS+3, GETLABS+5 |
>> APCHSLAB | LABTESTS+23*, LABTESTS+24*, LABTESTS+25, LABTESTS+26, LABTESTS+27 |
APCHT | REF+4~*, REF+5 |
>> APCHTCTR | GETLABSX+6* |
>> APCHTEST | GETLABSX+7*, GETLABSX+8, GETLABS+4*, GETLABS+8 |
>> APCHTST | LABTESTS+21, LABTESTS+22 |
>> APCHTST( | LABTESTS+24, LABTESTS+26, LABTESTS+27, GETLABSX+8*, GETLABS+4*, GETLABS+8* |
>> APCHTSTP | GETLABSX+3*, GETLABSX+5*, GETLABSX+6, GETLABSX+7, GETLABS+2*, GETLABS+3*, GETLABS+4, GETLABS+5 |
>> APCHVLAB | GETLABS+2*, GETLABS+5*, GETLABS+6, GETLABS+8 |
APCHX | DMDX+6~, DMDX+7*, DMDX+8*, DMDX+9*, DMX+1 |
APCHX("BP" | CKDP+3 |
APCHX(3 | DMDX+8 |
B | LOINC~, LOINC+3, LOINC+5 |
C | S~, S+7 |
D | LAB+2~*, LAB+3, LAB+4, DATE~, DATE+1, DATE+2, REF~, REF+3*, REF+5, REF1~ , REF1+4*, REF1+10 |
DT | SETARRAY+3, SETARRAY+8, LABTESTS+7, LABTESTS+11, LABTESTS+18, GETLABSX+4, GETLABSX+5, GETLABSX+6, GETLABS+1 |
DUZ(2 | SETARRAY+4, SETARRAY+7 |
>> E | DMDX+8* |
F | S~, S+1*, S+5*, REF1~, REF1+2, REF1+6, REF1+8 |
G | LAB+2~*, LAB+3, LAB+4, LAB+5*, LAB+9*, LAB+13, LAB+14 |
I | DMDX+4~*, DMDX+5, REF1~, REF1+3, REF1+6, REF1+8 |
J | LAB+2~, LAB+7*, LAB+8 |
>> L | S+7* |
LT | LAB~, LAB+1*, LAB+6, LAB+8 |
N | REF1+6~, REF1+8*, REF1+10, REF1+12, TYPEREF~, TYPEREF+1 |
P | DMDX~, DMDX+4, DMDX+8, LAB~, LAB+2, LAB+3, LAB+4, LAB+13, LAB+14, REF~ , REF+1, REF+5, REF1~, REF1+1, REF1+6, REF1+8 |
>> R | LAB+13* |
T | LABTESTS+5*, LABTESTS+10*, LABTESTS+11, LABTESTS+16*, CKD+3*, CKD+7*, CKD+10*, CKD+13*, S~, S+2* , S+7*, S+8, S+9, DMDX+2~*, DMDX+3, DMDX+4, LAB~, LAB+5, LAB+13, LAB+14 , REF~, REF+2, REF+4, REF1~, REF1+5*, REF1+10, REF1+11 |
U | SETARRAY+4, SETARRAY+7, SETARRAY+9, LABTESTS+27, IMMUN+5, IMMUN+13, S1+1, DMDX+4, LAB+5, LAB+7 , LAB+14, LOINC+2, LOINC+4, REF+5, TYPEREF+1, GETLABSX+7, GETLABS+4, GETLABS+8 |
V | LAB+2~, REF+4~, REF+5*, REF+6* |
X | SETARRAY+2*, SETARRAY+3*, SETARRAY+4*, SETARRAY+6*, SETARRAY+7*, SETARRAY+8*, SETARRAY+9*, SETARRAY+10*, SETARRAY+11*, SETARRAY+12* , CKDP+8*, CKDP+10*, CKDP+11*, CKDP+12*, CKDP+13*, LABTESTS+6*, LABTESTS+7*, LABTESTS+8*, LABTESTS+9*, LABTESTS+11* , LABTESTS+12*, LABTESTS+13*, LABTESTS+17*, LABTESTS+18*, LABTESTS+22*, LABTESTS+25*, LABTESTS+27*, IMMUN+1*, IMMUN+4*, IMMUN+9* , IMMUN+11*, IMMUN+13*, MISC+1*, MISC+2*, MISC+3*, MISC+4*, MISC+5*, MISC+6*, MISC+7*, MISC+8* , MISC+9*, MISC+10*, MISC+11*, MISC+12*, MISC+13*, MISC+14*, MISC+15*, MISC+16*, MISC+17*, S+3~ , S+5*, S+6*, S+8*, S+9*, S1+2, DMDX+4~*, DMDX+8*, LAB+2~, LAB+3*, LAB+4 , LAB+5, REF1+6~*, REF1+7, REF1+8, REF1+9, APCHLHD+1*, APCHLHD+2* |
>> X1 | LABTESTS+7*, LABTESTS+11*, LABTESTS+18* |
>> X2 | LABTESTS+7*, LABTESTS+11*, LABTESTS+18* |
Y | SETARRAY+7*, LABTESTS+7, LABTESTS+11, LABTESTS+18, S~, S+6, S+7, S+9, DMDX+4~*, LAB+4* , LAB+5, LAB+7, LAB+9, REF1+9~*, REF1+10, REF1+11, REF1+12 |