APCLSILI ; IHS/CMI/LAB - ILI surveillance export ; 27 Jun 2017 2:26 PM
Source file <APCLSILI.m>
| Package | Total | Call Graph | 
|---|---|---|
| Patient Care Component Reports | 8 | ILI^APCLSIHL  ($$OTHVAC,MONUP)^APCLSIL1  SETREC^APCLSIL2  (,PURGE,STOPD)^APCLSIL3  ($$HASADVN6,$$HASAVM,$$HASNVAC,$$HASPVAC,$$PCVANGIO,$$PCVASTH,$$PCVECPEH,$$PCVFEB,$$PCVIMMUN)^APCLSIL4  ($$ICD,COMM,UNFOLDTX)^APCLSILU  $$DEMO^APCLUTL  ($$CLINIC,$$VD)^APCLV | 
| VA Fileman | 4 | UPDATE^DIE ^DIK $$GET1^DIQ ^DIR | 
| IHS VA Utilities | 3 | ($$VAL,$$VALI)^XBDIQ1 ^XBFMK EN^XBVK | 
| Kernel | 2 | ($$FMADD,$$FMTE)^XLFDT $$UP^XLFSTR | 
| Package | Total | Caller Graph | 
|---|---|---|
| Patient Care Component Reports | 6 | APCLSIL1 APCLSIL3 APCLSILA APCLSILR APCLSILU APCLSMUN | 
| Patient Care Component Surveillance | 2 | APCSSIL1 APCSSILI | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| HASVAC(V) | ;EP - get h1n1 vaccine | |
| PURGE | ; | |
| USR() | ;EP - Return name of current user from ^VA(200. | |
| EOP | ;EP - End of page. | |
| HASSRD7(APCLV) | ;EP | |
| MONUP | ;monthly user pop if today is the 1st | |
| TMP100(V) | ;EP | |
| LOC() | ;EP - | |
| CTR(X,Y) | ;EP - Center X in a field Y wide. | |
| UID(APCLA) | ;Given DFN return unique patient record id. | |
| EXIT | ;clean up and exit | |
| DATE(D) | ;EP | |
| JDATE(D) | ;EP - get date | |
| START | ; | |
| S | ;NOW SET TOTAL IN PIECE 13 | |
| SR(R) | ; | |
| STOPD | ;EP | |
| PROC1 | ; | |
| EP | ;EP - called from option to create search template using ILI logic | |
| ILIDX1 | ; | |
| EP1 | ;EP - called from on demand option | |
| H1N1DX | ; | |
| PROC | ;EP - called from xbdbque | |
| ILIDX | ; | |
| HASIVAC(V) | ;EP - get flu iz | 
| Name | Field # of Occurrence | 
|---|---|
| ILI^APCLSIHL | S+41 | 
| $$OTHVAC^APCLSIL1 | PROC1+29 | 
| MONUP^APCLSIL1 | MONUP+10 | 
| SETREC^APCLSIL2 | EP1+33, PROC1+40 | 
| ^APCLSIL3 | EP+1 | 
| PURGE^APCLSIL3 | PURGE+1 | 
| STOPD^APCLSIL3 | STOPD+1 | 
| $$HASADVN6^APCLSIL4 | PROC1+28 | 
| $$HASAVM^APCLSIL4 | PROC1+31 | 
| $$HASNVAC^APCLSIL4 | PROC1+27 | 
| $$HASPVAC^APCLSIL4 | PROC1+26 | 
| $$PCVANGIO^APCLSIL4 | PROC1+35 | 
| $$PCVASTH^APCLSIL4 | PROC1+36 | 
| $$PCVECPEH^APCLSIL4 | PROC1+34 | 
| $$PCVFEB^APCLSIL4 | PROC1+33 | 
| $$PCVIMMUN^APCLSIL4 | PROC1+37 | 
| $$ICD^APCLSILU | HASVAC+16, HASIVAC+30, HASIVAC+36, HASIVAC+42, ILIDX1+8, ILIDX1+9, H1N1DX+4, HASSRD7+5 | 
| COMM^APCLSILU | MONUP+1 | 
| UNFOLDTX^APCLSILU | EP1+4 | 
| $$DEMO^APCLUTL | PROC1+11 | 
| $$CLINIC^APCLV | ILIDX+3, H1N1DX+2 | 
| $$VD^APCLV | EP1+18, HASVAC+10, HASIVAC+11, HASIVAC+23 | 
| UPDATE^DIE | MONUP+7 | 
| ^DIK | EP1+3 | 
| $$GET1^DIQ | UID+4 | 
| ^DIR | EOP+5 | 
| $$VAL^XBDIQ1 | HASVAC+8, HASVAC+17, HASIVAC+9, HASIVAC+21, HASIVAC+31, HASIVAC+37, HASIVAC+43, ILIDX1+8, ILIDX1+9, TMP100+5 , H1N1DX+4, HASSRD7+5 | 
| $$VALI^XBDIQ1 | HASVAC+9, HASIVAC+10, HASIVAC+22, ILIDX+7 | 
| ^XBFMK | EXIT+2 | 
| EN^XBVK | START+5, EXIT+1 | 
| $$FMADD^XLFDT | PROC+24, PROC+25, S+24, S+27 | 
| $$FMTE^XLFDT | JDATE+3 | 
| $$UP^XLFSTR | JDATE+4 | 
| FileNo | Call Tags | 
|---|---|
| ^APCLILIL - [#9001003.4] | Classic Fileman Calls | 
| ^AUTTLOC - [#9999999.06] | GET1^DIQ | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^APCLCNTL - [#9001003] | START+8 | 
| ^APCLCNTL("B" | START+7 | 
| ^APCLDATA($J | PROC+15!, S+1, S+2, S+3, S+4, S+5*, S+8, S+9, S+10, S+11 , S+12*, S+15, S+16, S+17, S+18, S+19*, S+31, S+36*, S+37*, S+38* , S+39*, S+40*, S+42! | 
| ^APCLILIC(1 | PROC+9, PROC+22, PROC+23*, MONUP+12* | 
| ^APCLILIL - [#9001003.4] | EP1+3, EP1+25 | 
| ^APCLILIL("B" | EP1+26, PROC1+3, PROC1+5, PROC1+6, PROC1+38, PROC1+39 | 
| ^APCLILIR("B" | SR+2 | 
| ^ATXAX - [#9002226] | HASVAC+7, HASIVAC+7, HASIVAC+19, ILIDX+12 | 
| ^ATXAX("B" | PROC+16, PROC+17, PROC+18, HASVAC+2, HASVAC+13, HASIVAC+2, HASIVAC+14, HASIVAC+26, HASIVAC+27, HASIVAC+33 , HASIVAC+39, H1N1DX+4, HASSRD7+5 | 
| ^AUPNPAT - [#9000001] | UID+2 | 
| ^AUPNVCPT - [#9000010.18] | HASVAC+14, HASIVAC+28 | 
| ^AUPNVCPT("AD" | HASVAC+14, HASIVAC+28 | 
| ^AUPNVIMM - [#9000010.11] | HASVAC+3, HASVAC+8, HASIVAC+3, HASIVAC+9, HASIVAC+15, HASIVAC+21 | 
| ^AUPNVIMM("AD" | HASVAC+3, HASIVAC+3, HASIVAC+15 | 
| ^AUPNVMSR - [#9000010.01] | TMP100+4, TMP100+6 | 
| ^AUPNVMSR("AD" | TMP100+3 | 
| ^AUPNVPOV - [#9000010.07] | HASIVAC+40, ILIDX1+7, H1N1DX+4, HASSRD7+5 | 
| ^AUPNVPOV("AD" | HASIVAC+40, ILIDX1+6, H1N1DX+4, HASSRD7+5 | 
| ^AUPNVPRC - [#9000010.08] | HASIVAC+34 | 
| ^AUPNVPRC("AD" | HASIVAC+34 | 
| ^AUPNVPRV - [#9000010.06] | ILIDX+5, ILIDX+6 | 
| ^AUPNVPRV("AD" | ILIDX+4 | 
| ^AUPNVSIT - [#9000010] | EP1+26, EP1+27, EP1+28, EP1+30, EP1+31, PROC1+4, PROC1+5, PROC1+6, PROC1+7, PROC1+15 , PROC1+16, PROC1+20, ILIDX+1, ILIDX+2, ILIDX+11, ILIDX+12, ILIDX1+1, H1N1DX+1, HASSRD7+2 | 
| ^AUPNVSIT("ADLM" | EP1+15, EP1+16 | 
| ^AUPNVSIT("AVDEL" | EP1+23, EP1+24 | 
| ^AUPNVSIT("B" | EP1+10, EP1+11 | 
| ^AUTTIML - [#9999999.41] | HASVAC+8, HASIVAC+9, HASIVAC+21 | 
| ^AUTTIMM - [#9999999.14] | HASVAC+5, HASVAC+6, HASIVAC+5, HASIVAC+6, HASIVAC+17, HASIVAC+18 | 
| ^AUTTLOC - [#9999999.06] | EP1+32, PROC1+17 | 
| ^AUTTSITE(1 | UID+4 | 
| ^BGPSITE - [#90241.02] | PROC1+12 | 
| ^DIBT( | PROC1+12 | 
| ^DIC(4 - [#4] | LOC+1 | 
| ^DIC(7 - [#7] | ILIDX+9 | 
| ^DPT - [#2] | PROC1+9, PROC1+10 | 
| ^TMP($J | PROC+14!, S+5, S+12, S+19, S+25, S+28*, S+30*, S+33, S+34, S+38 , S+39, S+40, S+42!, PROC1+19*, PROC1+20*, ILIDX+2*, ILIDX1+1* | 
| ^VA(200 - [#200] | USR+1 | 
| ^XTMP("APCLILITAX" | EXIT+3! | 
| ^XTMP("APCLILIV" | EP1+5!, EP1+17, S+43!, PROC1+1*, EXIT+4! | 
| Name | Line Occurrences | 
|---|---|
| $$HASIVAC | PROC1+25 | 
| $$HASSRD7 | PROC1+30 | 
| $$HASVAC | PROC1+24 | 
| $$TMP100 | ILIDX1+9 | 
| EXIT | START+11, PROC+19, PROC+20, MONUP+14 | 
| H1N1DX | PROC1+23 | 
| ILIDX | PROC1+22 | 
| ILIDX1 | ILIDX+10 | 
| MONUP | EP1+6 | 
| PROC1 | EP1+11, EP1+20 | 
| PURGE | MONUP+13 | 
| S | EP1+13 | 
| SR | EP1+26, PROC1+6, PROC1+22, PROC1+23, PROC1+24, PROC1+25, PROC1+26, PROC1+27, PROC1+30, PROC1+31 , PROC1+39 | 
| Name | Field # of Occurrence | 
|---|---|
| ^(0 | USR+1, LOC+1 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| % | TMP100+1~, TMP100+2*, TMP100+8*, TMP100+9 | 
| A | JDATE+2~, JDATE+3*, JDATE+4 | 
| >> APCL1OM | PROC+7*, PROC+11 | 
| >> APCL1ST | PROC+1*, PROC+2*, PROC+10*, PROC+11*, PROC+23*, MONUP+2 | 
| APCLA | UID~, UID+1, UID+2, UID+4 | 
| >> APCLADVE | EP1+29*, PROC1+14*, PROC1+28*, PROC1+29 | 
| APCLALL1 | PROC+13! | 
| APCLALLT | PROC+13! | 
| >> APCLASUF | EP1+32*, PROC1+17*, PROC1+18, PROC1+19, PROC1+20, ILIDX+2, ILIDX1+1 | 
| >> APCLAV9 | EP1+29*, PROC1+14* | 
| >> APCLAVM | EP1+29*, PROC1+14*, PROC1+31* | 
| >> APCLBDAT | PROC+23*, PROC+24*, S+24 | 
| >> APCLBT | EP1+8* | 
| APCLCLIN | ILIDX+3*, ILIDX+11, ILIDX+12, H1N1DX+2*, HASSRD7+1~ | 
| >> APCLCTAX | PROC+16*, PROC+19, ILIDX+12 | 
| >> APCLDATE | EP1+31*, PROC1+16*, PROC1+19, PROC1+20, PROC1+29, ILIDX+2, ILIDX1+1 | 
| >> APCLDELD | PROC+23*, PROC+24*, EP1+9*, EP1+14, EP1+22 | 
| >> APCLDTAX | PROC+17*, PROC+20, ILIDX1+9 | 
| >> APCLED | PROC+25*, EP1+10, EP1+15, EP1+23, S+27 | 
| >> APCLEIEN | MONUP+9*, MONUP+12 | 
| APCLERR | MONUP+4~ | 
| APCLFDA | MONUP+4~ | 
| APCLFDA( | MONUP+6* | 
| >> APCLFLF | PROC+23*, EP1+2, EP1+13 | 
| >> APCLH1N1 | EP1+29*, PROC1+14*, PROC1+23* | 
| APCLHTOT | PROC+13! | 
| >> APCLHVAC | EP1+29*, PROC1+14*, PROC1+24*, PROC1+28 | 
| APCLIENS | MONUP+4~, MONUP+5*, MONUP+6 | 
| APCLIENS(2 | MONUP+9 | 
| >> APCLILI | EP1+29*, PROC1+14*, PROC1+22* | 
| >> APCLIVAC | EP1+29*, PROC1+14*, PROC1+25*, PROC1+28 | 
| >> APCLKV | EP1+29*, PROC1+14*, PROC1+22*, PROC1+23*, PROC1+24*, PROC1+25*, PROC1+26*, PROC1+27*, PROC1+30*, PROC1+31* , PROC1+38, PROC1+39 | 
| >> APCLLOC | EP1+28*, EP1+30*, EP1+32, PROC1+15*, PROC1+17 | 
| APCLLOCT | PROC+13! | 
| >> APCLNVAC | PROC1+27*, PROC1+28 | 
| >> APCLOVAC | PROC1+29* | 
| >> APCLPCVA | PROC1+35* | 
| >> APCLPCVE | PROC1+34* | 
| >> APCLPCVF | PROC1+33* | 
| >> APCLPCVI | PROC1+37* | 
| >> APCLPCVS | PROC1+36* | 
| >> APCLPRVE | PROC1+3* | 
| >> APCLPVAC | PROC1+26*, PROC1+29, PROC1+33, PROC1+34, PROC1+35, PROC1+36, PROC1+37 | 
| >> APCLREAS | PROC1+2*, SR+1, SR+2* | 
| >> APCLSCOM | PROC+1*, PROC+12*, PROC+23*, MONUP+1 | 
| >> APCLSD | PROC+23*, PROC+24*, EP1+9, EP1+10*, EP1+11, EP1+14*, EP1+15*, EP1+16, EP1+22*, EP1+23* , EP1+24, S+24*, S+26, S+33 | 
| >> APCLSRD | EP1+29*, PROC1+14*, PROC1+30* | 
| >> APCLSTAT | EP1+26*, PROC1+2*, PROC1+3*, PROC1+6*, PROC1+39* | 
| >> APCLTTAX | PROC+18*, ILIDX1+8 | 
| APCLV | EP1+11*, EP1+16*, EP1+17, EP1+18, EP1+24*, EP1+25, EP1+26, EP1+27, EP1+28, EP1+30 , EP1+31, PROC1+1, PROC1+3, PROC1+4, PROC1+5, PROC1+6, PROC1+7, PROC1+15, PROC1+16, PROC1+20 , PROC1+24, PROC1+25, PROC1+26, PROC1+27, PROC1+28, PROC1+30, PROC1+31, PROC1+33, PROC1+34, PROC1+35 , PROC1+36, PROC1+37, PROC1+38, PROC1+39, ILIDX+1, ILIDX+2, ILIDX+3, ILIDX+4, ILIDX+11, ILIDX+12 , ILIDX1+1, ILIDX1+6, ILIDX1+9, H1N1DX+1, H1N1DX+2, H1N1DX+4, HASSRD7~, HASSRD7+2, HASSRD7+5 | 
| >> APCLVTOT | EP1+7* | 
| >> APCLWEXP | EP1+6 | 
| >> APCLX | EP1+3* | 
| >> APCLZHSD | PROC+26* | 
| C | S+31*, S+32*, S+35*, S+36, S+37, S+38, S+39, S+40, HASVAC+1~, HASVAC+3* , HASVAC+8*, HASVAC+10*, HASVAC+12, HASVAC+14*, HASVAC+17*, HASVAC+18, HASIVAC+1~, HASIVAC+3*, HASIVAC+9*, HASIVAC+11* , HASIVAC+13, HASIVAC+15*, HASIVAC+21*, HASIVAC+23*, HASIVAC+25, HASIVAC+28*, HASIVAC+31*, HASIVAC+32, HASIVAC+34*, HASIVAC+37* , HASIVAC+38, HASIVAC+40*, HASIVAC+43*, HASIVAC+44, HASIVAC+45, ILIDX1+4*, ILIDX1+8*, ILIDX1+9*, HASSRD7+1~, HASSRD7+3* , HASSRD7+5* | 
| D | START+6*, START+8*, START+9, S+4*, S+5, S+11*, S+12, S+18*, S+19, S+26* , S+27*, S+28, S+30*, S+33*, S+34, S+37, S+38, S+39, S+40, H1N1DX+4* , H1N1DX+6, HASSRD7+1~, DATE~, DATE+1, JDATE~, JDATE+1, JDATE+3, JDATE+4 | 
| >> DA | EP1+3* | 
| >> DFN | EP1+27*, PROC1+7*, PROC1+8, PROC1+9, PROC1+10, PROC1+11, PROC1+12, PROC1+29 | 
| DFOUT | EOP+4! | 
| >> DIK | EP1+3* | 
| DIR | EOP+3~ | 
| DIR(0 | EOP+5* | 
| DIRUT | EOP+4! | 
| DLOUT | EOP+4! | 
| DT | START+9, PROC+2, PROC+7, PROC+11, PROC+12, PROC+24, PROC+25, PROC+26, MONUP+6, MONUP+12 | 
| DTOUT | EOP+4! | 
| DUOUT | EOP+4! | 
| DUZ | USR+1 | 
| DUZ(2 | LOC+1 | 
| G | PROC1+12*, PROC1+13, PROC1+22*, PROC1+23*, ILIDX1+5!*, ILIDX1+11*, ILIDX1+12*, H1N1DX+3*, H1N1DX+4*, H1N1DX+5 , H1N1DX+6*, HASSRD7+1~, HASSRD7+4!*, HASSRD7+7*, HASSRD7+8*, HASSRD7+9 | 
| IO("S" | EOP+2 | 
| IOM | CTR+1 | 
| IOST | EOP+1 | 
| >> IOT | EOP+2 | 
| J | TMP100+1~, TMP100+6*, TMP100+7 | 
| L | PROC+9*, PROC+10, PROC+11, S+4*, S+5, S+11*, S+12, S+18*, S+19, S+25* , S+28, S+30*, S+31*, S+32, S+34*, S+37, S+38, S+39, S+40, HASVAC+1~ | 
| M | HASVAC+1~, TMP100+1~, TMP100+3*, TMP100+4, TMP100+5, TMP100+6 | 
| P | ILIDX+4*, ILIDX+9*, ILIDX+10, HASSRD7+1~ | 
| R | SR~, SR+2 | 
| T | HASVAC+1~, HASVAC+2*, HASVAC+7, HASVAC+13*, HASVAC+16, HASIVAC+1~, HASIVAC+2*, HASIVAC+7, HASIVAC+14*, HASIVAC+19 , HASIVAC+26*, HASIVAC+30, HASIVAC+33*, HASIVAC+36, HASIVAC+39*, HASIVAC+42, ILIDX1+7*, ILIDX1+8, ILIDX1+9, H1N1DX+4* , HASSRD7+1~, HASSRD7+5* | 
| >> T1 | HASIVAC+27*, HASIVAC+30 | 
| U | START+8, PROC+22, PROC+23, EP1+26, EP1+27, EP1+28, EP1+30, EP1+31, EP1+32, S+10 , MONUP+12, PROC1+5, PROC1+6, PROC1+7, PROC1+10, PROC1+12, PROC1+15, PROC1+16, PROC1+17, PROC1+20 , PROC1+28, PROC1+33, PROC1+34, PROC1+35, PROC1+36, PROC1+37, HASVAC+3, HASVAC+6, HASVAC+8, HASVAC+10 , HASVAC+14, HASVAC+17, HASIVAC+3, HASIVAC+6, HASIVAC+9, HASIVAC+11, HASIVAC+15, HASIVAC+18, HASIVAC+21, HASIVAC+23 , HASIVAC+28, HASIVAC+31, HASIVAC+34, HASIVAC+37, HASIVAC+40, HASIVAC+43, ILIDX+1, ILIDX+2, ILIDX+6, ILIDX+9 , ILIDX+11, ILIDX+12, ILIDX1+1, ILIDX1+7, ILIDX1+11, ILIDX1+12, TMP100+4, TMP100+6, H1N1DX+1, H1N1DX+4 , H1N1DX+6, HASSRD7+2, HASSRD7+5, HASSRD7+7, HASSRD7+8, UID+4, USR+1, LOC+1 | 
| V | HASVAC~, HASVAC+3, HASVAC+10, HASVAC+14, HASIVAC~, HASIVAC+3, HASIVAC+11, HASIVAC+15, HASIVAC+23, HASIVAC+28 , HASIVAC+34, HASIVAC+40, TMP100~, TMP100+3 | 
| X | START+7*, START+8, PROC+9*, S+1*, S+2, S+3, S+4, S+5, S+8*, S+9 , S+10, S+11, S+12, S+15*, S+16, S+17, S+18, S+19, S+31*, PROC1+12* , HASVAC+1~, HASVAC+3*, HASVAC+8, HASVAC+9, HASVAC+14*, HASVAC+17, HASIVAC+1~, HASIVAC+3*, HASIVAC+9, HASIVAC+10 , HASIVAC+15*, HASIVAC+21, HASIVAC+22, HASIVAC+28*, HASIVAC+31, HASIVAC+34*, HASIVAC+37, HASIVAC+40*, HASIVAC+43, ILIDX+4* , ILIDX+5, ILIDX+6, ILIDX1+6*, ILIDX1+7, ILIDX1+8, ILIDX1+9, ILIDX1+11*, H1N1DX+4*, HASSRD7+1~, HASSRD7+5* , HASSRD7+7*, CTR~, CTR+1 | 
| Y | HASVAC+1~, HASVAC+3*, HASVAC+4, HASVAC+5, HASVAC+6, HASVAC+14*, HASVAC+15, HASVAC+16, HASIVAC+1~, HASIVAC+3* , HASIVAC+4, HASIVAC+5, HASIVAC+6, HASIVAC+15*, HASIVAC+16, HASIVAC+17, HASIVAC+18, HASIVAC+28*, HASIVAC+29, HASIVAC+30 , HASIVAC+34*, HASIVAC+35, HASIVAC+36, HASIVAC+40*, HASIVAC+41, HASIVAC+42, ILIDX+6*, ILIDX+7, ILIDX1+5!, ILIDX1+10 , HASSRD7+1~, HASSRD7+4!, HASSRD7+6, CTR~, CTR+1 | 
| Y( | ILIDX1+8*, ILIDX1+9*, ILIDX1+11, HASSRD7+5*, HASSRD7+7 | 
| Z | HASVAC+1~, HASVAC+6*, HASVAC+7, HASVAC+8, HASVAC+9*, HASVAC+10, HASIVAC+1~, HASIVAC+6*, HASIVAC+7, HASIVAC+9 , HASIVAC+10*, HASIVAC+11, HASIVAC+18*, HASIVAC+19, HASIVAC+21, HASIVAC+22*, HASIVAC+23, ILIDX+7*, ILIDX+8, ILIDX+9 , ILIDX1+5!*, HASSRD7+1~ | 
| >> ZTQUEUED | EOP+2 |