APCLV1 ; IHS/CMI/LAB - visit entry utilities/get codes ;
Source file <APCLV1.m>
| Package | Total | Call Graph | 
|---|---|---|
| IHS VA Utilities | 2 | ($$VAL,$$VALI)^XBDIQ1 $$EXTSET^XBFUNC | 
| Patient Care Component Reports | 2 | $$START1^APCLDF ($$CHART,$$PRIMPROV)^APCLV | 
| DRG Grouper | 1 | $$CPT^ICPTCOD | 
| Kernel | 1 | ($$DOW,$$FMTE)^XLFDT | 
| VA Fileman | 1 | ^%DTC | 
| Package | Total | Caller Graph | 
|---|---|---|
| Diabetes Registry | 3 | BDMDMSM BDMDR4 BDMSELFM | 
| Patient Care Component Reports | 2 | APCLDMSM APCLV | 
| IHS Designated Provider | 1 | BDPDPEE | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| GETABBRV | ; | |
| CLEX | ; | |
| APWI | ;EP | |
| DSCHTYPE | ;EP | |
| 36 | ;; | |
| ADMUB | ;EP | |
| LOS | ;EP | |
| CODT | ;EP | |
| TRAVTIME | ;EP | |
| DSCHSERV | ;EP | |
| ADMSERV | ;EP | |
| DOW | ;EP - returns | |
| PCHART | ;EP | |
| NLAB | ;EP - #labs | |
| CHSCOST | ;EP | |
| APCWL | ;EP | |
| PATIENT | ;EP | |
| 09 | ;; | |
| 42 | ;; | |
| DDTM | ;EP | |
| 41 | ;; | |
| FACTX | ;EP | |
| LS | ;EP - level of service code | |
| ADMSOURC | ;EP | |
| OUTSL | ;EP | |
| DVEX | ;EP | |
| DSCHDATE | ;EP | |
| EM | ;EP - eval&man cpt code | |
| DWEX | ;EP | |
| VD | ; EP - given visit ien in V, return date of visit in internal or external format | |
| CONSULTS | ;EP | |
| LASTVD(P,F) | ;PEP - given patient DFN in P, return pt's last pcc visit date, ; using the data fetcher. Returns date in format specified in F. | |
| LOCENC | ;EP - given visit ien V, return loc. of encounter in format F | |
| CLINIC | ;EP - clinic | |
| COMM | ;EP ; get COMMUNITY - STATE,COUNTY,COMMUNITY codes | |
| DLM | ;EP | |
| ACTTIME | ;EP | |
| VDTM | ;EP - given visit ien in V, return visit date and time in F format | |
| 11 | ;; | |
| 60 | ;; | |
| ADMTYPE | ;EP | |
| 54 | ;; | |
| GETCHART(L) | ; | |
| APDT | ;EP | |
| 51 | ;; | |
| CHART | ;EP - returns ASUFAC_HRN ( 12 digits, HRN is left zero filled) | |
| 53 | ;; | |
| 52 | ;; | |
| 99 | ;; | |
| NRX | ;EP - #rxs | |
| TIME | ;EP - given visit ien in V, returns visit time of day in format F | |
| SC | ;EP - service category | |
| TYPE | ;EP type of visit | 
| Name | Field # of Occurrence | 
|---|---|
| ^%DTC | LOS+5 | 
| $$START1^APCLDF | LASTVD+6 | 
| $$CHART^APCLV | PATIENT+7 | 
| $$PRIMPROV^APCLV | APCWL+26 | 
| $$CPT^ICPTCOD | EM+8 | 
| $$VAL^XBDIQ1 | ADMUB+7, ADMSOURC+8, ADMSOURC+9, FACTX+8 | 
| $$VALI^XBDIQ1 | ADMSERV+6, DSCHSERV+6, ADMTYPE+6, ADMUB+6, ADMSOURC+7, DSCHTYPE+6, FACTX+6, FACTX+7, ACTTIME+6, TRAVTIME+6 , CHSCOST+6 | 
| $$EXTSET^XBFUNC | TYPE+5, SC+5, LS+5, APWI+5 | 
| $$DOW^XLFDT | DOW+6 | 
| $$FMTE^XLFDT | VD+6, VDTM+6, TIME+6, LASTVD+9, DSCHDATE+7, DDTM+7, DLM+6, DVEX+6, DWEX+6, CODT+6 , APDT+6 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^AUPNPAT - [#9000001] | COMM+6, COMM+7, COMM+8, COMM+9, CHART+7, CHART+9, GETCHART+3, PCHART+3, PCHART+5 | 
| ^AUPNVCHS("AD" | CHSCOST+4 | 
| ^AUPNVINP - [#9000010.02] | DSCHDATE+5, DDTM+5, CONSULTS+6, LOS+5 | 
| ^AUPNVINP("AD" | ADMSERV+4, DSCHSERV+4, ADMTYPE+4, ADMUB+4, ADMSOURC+4, DSCHTYPE+4, DSCHDATE+4, DDTM+4, CONSULTS+5, LOS+4 , FACTX+4 | 
| ^AUPNVLAB("AD" | NLAB+4 | 
| ^AUPNVMED("AD" | NRX+4, APCWL+23 | 
| ^AUPNVPOV("AD" | APCWL+6 | 
| ^AUPNVPRV("AD" | APCWL+7 | 
| ^AUPNVSIT - [#9000010] | COMM+3, COMM+4, CHART+3, CHART+4, LOCENC+2, LOCENC+4, VD+2, VD+4, VDTM+2, VDTM+4 , TIME+2, TIME+4, DOW+2, DOW+4, TYPE+2, TYPE+4, SC+2, SC+4, CLINIC+2, CLINIC+4 , EM+2, EM+4, LS+2, LS+4, NLAB+2, NRX+2, ADMSERV+2, DSCHSERV+2, ADMTYPE+2, ADMUB+2 , ADMSOURC+2, DSCHTYPE+2, DSCHDATE+2, DDTM+2, CONSULTS+2, CONSULTS+4, LOS+2, LOS+5, FACTX+2, ACTTIME+2 , TRAVTIME+2, CHSCOST+2, PATIENT+2, PATIENT+4, DLM+2, DLM+4, DVEX+2, DVEX+4, DWEX+2, DWEX+4 , APWI+2, APWI+4, CODT+2, CODT+4, APDT+2, APDT+4, OUTSL+2, OUTSL+4, APCWL+2, APCWL+3 | 
| ^AUPNVSIT("AC" | LASTVD+4 | 
| ^AUPNVTM("AD" | ACTTIME+4, TRAVTIME+4 | 
| ^AUTTCOM - [#9999999.05] | COMM+11 | 
| ^AUTTLOC - [#9999999.06] | GETCHART+1, LOCENC+6, LOCENC+7, FACTX+7, PCHART+8, APCWL+18 | 
| ^DD(9000010.02 | ADMTYPE+7, ADMTYPE+8, DSCHTYPE+7, DSCHTYPE+8 | 
| ^DG(405.1 - [#405.1] | ADMTYPE+8, DSCHTYPE+8 | 
| ^DIC(4 - [#4] | LOCENC+7 | 
| ^DIC(40.7 - [#40.7] | CLINIC+6, CLINIC+7, APCWL+22, APCWL+24 | 
| ^DIC(42.1 - [#42.1] | ADMTYPE+7 | 
| ^DIC(42.2 - [#42.2] | DSCHTYPE+7 | 
| ^DIC(45.7 - [#45.7] | ADMSERV+7, DSCHSERV+7 | 
| ^DIC(7 - [#7] | APCWL+28, APCWL+29 | 
| ^DPT - [#2] | PATIENT+6, PATIENT+7, APCWL+14, APCWL+15 | 
| ^ICPT - [#81] | EM+6 | 
| Name | Line Occurrences | 
|---|---|
| $$GETCHART | CHART+7, CHART+8, CHART+9, PCHART+6 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| % | COMM+1~, COMM+2*, COMM+3, COMM+5, COMM+6, COMM+7, CHART+1~, CHART+2*, CHART+3, CHART+6 , CHART+7*, CHART+8*, CHART+9*, CHART+10*, CHART+11, GETCHART+6*, GETCHART+7, NLAB+3~, NLAB+4*, NLAB+5 , NRX+3~, NRX+4*, NRX+5, ADMSERV+3~, ADMSERV+4*, ADMSERV+5, ADMSERV+7, DSCHSERV+3~, DSCHSERV+4*, DSCHSERV+5 , DSCHSERV+7, ADMTYPE+3~, ADMTYPE+4*, ADMTYPE+5, ADMTYPE+7, ADMTYPE+8, ADMUB+3~, ADMUB+4*, ADMUB+5, ADMSOURC+3~ , ADMSOURC+4*, ADMSOURC+5, DSCHTYPE+3~, DSCHTYPE+4*, DSCHTYPE+5, DSCHTYPE+7, DSCHTYPE+8, FACTX+3~, FACTX+4*, FACTX+5 , PCHART+1~, PCHART+2*, PCHART+3, PCHART+4, PCHART+5, PCHART+6*, PCHART+7*, PCHART+8*, PCHART+9 | 
| C | CHART+1~, GETCHART+3*, GETCHART+4, GETCHART+5*, GETCHART+6, PCHART+1~, APCWL+3~, APCWL+21*, APCWL+22, APCWL+24 | 
| CL | APCWL+20~, APCWL+22*, APCWL+23 | 
| >> D | APCWL+26*, APCWL+27, APCWL+28, APCWL+29 | 
| DUZ(2 | CHART+8 | 
| ERR | LASTVD+5~, LASTVD+6* | 
| F | COMM+11, LOCENC+7, VD+6, VDTM+6, TIME+6, TIME+7, TIME+8, LASTVD~, LASTVD+3*, LASTVD+9 , DOW+6, TYPE+5, SC+5, CLINIC+7, EM+8, LS+5, ADMSERV+7, DSCHSERV+7, ADMTYPE+7, ADMTYPE+8 , ADMUB+6, ADMSOURC+6, DSCHTYPE+7, DSCHTYPE+8, DSCHDATE+7, DDTM+7, FACTX+6, FACTX+7, PATIENT+7, DLM+6 , DVEX+6, DWEX+6, APWI+5, CODT+6, APDT+6 | 
| L | CHART+1~, CHART+7*, CHART+8*, CHART+9*, GETCHART~, GETCHART+1, GETCHART+3, PCHART+4, PCHART+5, PCHART+6 , PCHART+8, APCWL+3~, APCWL+16*, APCWL+17, APCWL+18 | 
| LVD | LASTVD+5~ | 
| LVD(1 | LASTVD+7, LASTVD+8 | 
| P | COMM+1~, COMM+4*, COMM+5, COMM+6, COMM+7, COMM+8, COMM+9, CHART+1~, CHART+5*, CHART+6 , CHART+7, CHART+9, GETCHART+3, LASTVD~, LASTVD+2, LASTVD+4, LASTVD+6, PCHART+3, PCHART+5, APCWL+3~ , APCWL+12*, APCWL+13, APCWL+14, APCWL+15 | 
| R | APCWL+3~*, APCWL+4, APCWL+5, APCWL+8, APCWL+9, APCWL+10, APCWL+11, APCWL+12, APCWL+16, APCWL+21 | 
| S | CHART+1~, GETCHART+1*, GETCHART+2, GETCHART+6, PCHART+1~ | 
| U | COMM+4, COMM+8, COMM+9, COMM+11, CHART+5, CHART+7, GETCHART+1, GETCHART+3, LOCENC+4, LOCENC+7 , VD+4, VDTM+4, TIME+4, LASTVD+8, DOW+4, TYPE+4, SC+4, CLINIC+4, CLINIC+7, EM+4 , EM+8, LS+4, ADMSERV+7, DSCHSERV+7, ADMTYPE+7, ADMTYPE+8, DSCHTYPE+7, DSCHTYPE+8, DSCHDATE+5, DDTM+5 , CONSULTS+4, CONSULTS+6, LOS+5, FACTX+7, PATIENT+4, PATIENT+7, DLM+4, DVEX+4, DWEX+4, APWI+4 , CODT+4, APDT+4, OUTSL+4, PCHART+8, APCWL+4, APCWL+5, APCWL+8, APCWL+9, APCWL+10, APCWL+11 , APCWL+12, APCWL+15, APCWL+16, APCWL+21, APCWL+22, APCWL+24, APCWL+29 | 
| >> V | COMM+3, COMM+4, CHART+3, CHART+4, LOCENC+1, LOCENC+2, LOCENC+4, VD+1, VD+2, VD+4 , VDTM+1, VDTM+2, VDTM+4, TIME+1, TIME+2, TIME+4, DOW+1, DOW+2, DOW+4, TYPE+1 , TYPE+2, TYPE+4, SC+1, SC+2, SC+4, CLINIC+1, CLINIC+2, CLINIC+4, EM+1, EM+2 , EM+4, LS+1, LS+2, LS+4, NLAB+1, NLAB+2, NLAB+4, NRX+1, NRX+2, NRX+4 , ADMSERV+1, ADMSERV+2, ADMSERV+4, DSCHSERV+1, DSCHSERV+2, DSCHSERV+4, ADMTYPE+1, ADMTYPE+2, ADMTYPE+4, ADMUB+1 , ADMUB+2, ADMUB+4, ADMSOURC+1, ADMSOURC+2, ADMSOURC+4, DSCHTYPE+1, DSCHTYPE+2, DSCHTYPE+4, DSCHDATE+1, DSCHDATE+2 , DSCHDATE+4, DDTM+1, DDTM+2, DDTM+4, CONSULTS+1, CONSULTS+2, CONSULTS+4, CONSULTS+5, LOS+1, LOS+2 , LOS+4, FACTX+1, FACTX+2, FACTX+4, ACTTIME+1, ACTTIME+2, ACTTIME+4, TRAVTIME+1, TRAVTIME+2, TRAVTIME+4 , CHSCOST+1, CHSCOST+2, CHSCOST+4, PATIENT+1, PATIENT+2, PATIENT+4, PATIENT+7, DLM+1, DLM+2, DLM+4 , DVEX+1, DVEX+2, DVEX+4, DWEX+1, DWEX+2, DWEX+4, APWI+1, APWI+2, APWI+4, CODT+1 , CODT+2, CODT+4, APDT+1, APDT+2, APDT+4, OUTSL+1, OUTSL+2, OUTSL+4, APCWL+1, APCWL+2 , APCWL+3, APCWL+6, APCWL+7, APCWL+23, APCWL+26 | 
| X | LOS+3~, LOS+6*, LOS+7 | 
| X1 | LOS+3~, LOS+5* | 
| X2 | LOS+3~, LOS+5* | 
| Y | COMM+1~, COMM+7*, COMM+8, LOCENC+3~, LOCENC+4*, LOCENC+5, LOCENC+6, LOCENC+7, VD+3~, VD+4* , VD+5, VD+6, VDTM+3~, VDTM+4*, VDTM+5, VDTM+6, TIME+3~, TIME+4*, TIME+5, TIME+6* , TIME+7, TIME+8, TIME+9, LASTVD+5~, LASTVD+8*, LASTVD+9, DOW+3~, DOW+4*, DOW+5, DOW+6 , TYPE+3~, TYPE+4*, TYPE+5, SC+3~, SC+4*, SC+5, CLINIC+3~, CLINIC+4*, CLINIC+5, CLINIC+6 , CLINIC+7, EM+3~, EM+4*, EM+5, EM+6, EM+8, LS+3~, LS+4*, LS+5, NLAB+3~ , NLAB+4*, NRX+3~, NRX+4*, ADMSERV+3~, ADMSERV+6*, ADMSERV+7, DSCHSERV+3~, DSCHSERV+6*, DSCHSERV+7, ADMTYPE+3~ , ADMTYPE+6*, ADMTYPE+7, ADMTYPE+8, ADMUB+3~, ADMSOURC+3~, ADMSOURC+6, ADMSOURC+7*, ADMSOURC+8*, DSCHTYPE+3~, DSCHTYPE+6* , DSCHTYPE+7, DSCHTYPE+8, DSCHDATE+3~, DSCHDATE+5*, DSCHDATE+6, DSCHDATE+7, DDTM+3~, DDTM+5*, DDTM+6, DDTM+7 , CONSULTS+3~, LOS+3~, FACTX+3~, FACTX+7*, ACTTIME+3~, ACTTIME+4*, ACTTIME+5, ACTTIME+6, TRAVTIME+3~, TRAVTIME+4* , TRAVTIME+5, TRAVTIME+6, CHSCOST+3~, CHSCOST+4*, CHSCOST+5, CHSCOST+6, PATIENT+3~, PATIENT+4*, PATIENT+5, PATIENT+6 , PATIENT+7, DLM+3~, DLM+4*, DLM+5, DLM+6, DVEX+3~, DVEX+4*, DVEX+5, DVEX+6, DWEX+3~ , DWEX+4*, DWEX+5, DWEX+6, APWI+3~, APWI+4*, APWI+5, CODT+3~, CODT+4*, CODT+5, CODT+6 , APDT+3~, APDT+4*, APDT+5, APDT+6, OUTSL+3~ | 
| Z | COMM+1~, COMM+8*, COMM+9*, COMM+10, COMM+11, CHART+1~, CHART+4*, CHART+5, CHART+7, ADMSERV+3~ , ADMSERV+4*, ADMSERV+5, ADMSERV+6, DSCHSERV+3~, DSCHSERV+4*, DSCHSERV+5, DSCHSERV+6, ADMTYPE+3~, ADMTYPE+4*, ADMTYPE+5 , ADMTYPE+6, ADMUB+3~, ADMUB+4*, ADMUB+5, ADMUB+6, ADMUB+7, ADMSOURC+3~, ADMSOURC+4*, ADMSOURC+5, ADMSOURC+7 , ADMSOURC+9, DSCHTYPE+3~, DSCHTYPE+4*, DSCHTYPE+5, DSCHTYPE+6, DSCHDATE+3~, DSCHDATE+4*, DSCHDATE+5, DDTM+3~, DDTM+4* , DDTM+5, CONSULTS+3~, CONSULTS+5*, CONSULTS+6, LOS+3~, LOS+4*, LOS+5, FACTX+3~, FACTX+4*, FACTX+5 , FACTX+6, FACTX+7, FACTX+8, PCHART+1~ |