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 |