©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
APCLAPI5 ; IHS/CMI/LAB - visit data ;
Source file <APCLAPI5.m>
| Package | Total | Call Graph |
|---|---|---|
| Patient Care Component Reports | 2 | ($$LASTCPTT,$$LASTDXT,$$LASTITEM,$$LASTLAB)^APCLAPIU $$VD^APCLV |
| DRG Grouper | 1 | $$CPT^ICPTCOD |
| IHS Patient | 1 | $$DOB^AUPNPAT |
| IHS VA Utilities | 1 | $$VAL^XBDIQ1 |
| Package | Total | Caller Graph |
|---|---|---|
| Patient Care Component | 2 | APCHSM06 APCHSM08 |
| IHS Mods To Patient Care Encounter | 1 | BPXRMPC1 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| LASTNUTR(APCLPDFN,APCLBD,APCLED,APCLFORM) | ;PEP - date of last NUTRITION SCRFEENING
; Return the last recorded NUTRITION SCREENING EXAM: ; - V Nutrition Screening |
|
| E | ;
|
|
| LASTCHLA(APCLPDFN,APCLBD,APCLED,APCLFORM) | ;PEP - date of last CHLAMYDIA SCREENING
; Return the last recorded CHLAMYDIA SCREENING: ; - Diagnosis - V POV V73.88, V73.98 ; - V CPT: BGP CHLAMYDIA CPTS taxonomy ; - V LAB : BGP CHLAMYDIA TESTS TAX, BGP CHLAMYDIA LOINC CODES ; ; Input: ; APCLPDFN - Patient DFN ; APCLBD - beginning date to begin search for value - if blank, default is DOB ; APCLED - ending date of search - if blank, default is DT ; APCLFORM - APCLFORM returned: D - return date only - example 3070801 ; A - return value: ; date^text of item found^value if appropriate^visit ien^File found in^ien of file found in ; Default if blank is D ; Output: ; If APCLFORM is blank or APCLFORM is D returns internal fileman date if one found otherwise returns null ; If APCLFORM is A returns the string: ; date^text of item found^value if appropriate^visit ien^File found in^ien of file found in ; |
|
| VR | ;EP
|
|
| LASTNBHS(APCLPDFN,APCLBD,APCLED,APCLFORM) | ;PEP - date of last HEARING EXAM
; Return the last recorded HEARING EXAM: ; - V Exam 38&39 ; - V POV V72.1 ; - V CPT [APCH NEWBORN HEAR SCRN CPTS] ; - V CPT [APCH HEARING SCREEN CPTS] ; - V POV [APCH HEARLING LOSS DXS] ; |
|
| LASTHIVS(APCLPDFN,APCLBD,APCLED,APCLFORM) | ;PEP - LAST HIV SCREENING
|
| Name | Field # of Occurrence |
|---|---|
| $$LASTCPTT^APCLAPIU | LASTCHLA+29, LASTHIVS+26, LASTNBHS+34, LASTNBHS+40 |
| $$LASTDXT^APCLAPIU | LASTCHLA+25, LASTNBHS+36, LASTNBHS+38 |
| $$LASTITEM^APCLAPIU | LASTNBHS+28, LASTNBHS+30 |
| $$LASTLAB^APCLAPIU | LASTCHLA+31, LASTHIVS+28 |
| $$VD^APCLV | LASTNUTR+28 |
| $$DOB^AUPNPAT | LASTCHLA+20, LASTHIVS+21, LASTNBHS+23, LASTNUTR+18 |
| $$CPT^ICPTCOD | VR+1 |
| $$VAL^XBDIQ1 | VR+1 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ATXAX("B" | LASTCHLA+31, LASTHIVS+28 |
| ^ATXLAB("B" | LASTCHLA+31, LASTHIVS+28 |
| ^AUPNVNTS - [#9000010.49] | LASTNUTR+24, LASTNUTR+25, LASTNUTR+31 |
| ^AUPNVNTS("AC" | LASTNUTR+23 |
| ^AUPNVRAD - [#9000010.22] | VR+1 |
| ^AUPNVSIT - [#9000010] | LASTNUTR+27 |
| Name | Line Occurrences |
|---|---|
| E | LASTCHLA+26, LASTCHLA+30, LASTCHLA+32, LASTHIVS+27, LASTHIVS+29, LASTNBHS+29, LASTNBHS+31, LASTNBHS+35, LASTNBHS+37, LASTNBHS+39 , LASTNBHS+41 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| APCLBD | LASTCHLA~, LASTCHLA+20*, LASTCHLA+25, LASTCHLA+29, LASTCHLA+31, LASTHIVS~, LASTHIVS+21*, LASTHIVS+26, LASTHIVS+28, LASTNBHS~ , LASTNBHS+23*, LASTNBHS+28, LASTNBHS+30, LASTNBHS+34, LASTNBHS+36, LASTNBHS+38, LASTNBHS+40, LASTNUTR~, LASTNUTR+18*, LASTNUTR+29 |
| APCLED | LASTCHLA~, LASTCHLA+21*, LASTCHLA+25, LASTCHLA+29, LASTCHLA+31, LASTHIVS~, LASTHIVS+22*, LASTHIVS+26, LASTHIVS+28, LASTNBHS~ , LASTNBHS+24*, LASTNBHS+28, LASTNBHS+30, LASTNBHS+34, LASTNBHS+36, LASTNBHS+38, LASTNBHS+40, LASTNUTR~, LASTNUTR+19*, LASTNUTR+30 |
| APCLF | LASTNBHS+26~, LASTNUTR+21~ |
| APCLFORM | LASTCHLA~, LASTCHLA+22*, LASTCHLA+33, LASTHIVS~, LASTHIVS+23*, LASTHIVS+30, LASTNBHS~, LASTNBHS+25*, LASTNBHS+42, LASTNUTR~ , LASTNUTR+20*, LASTNUTR+32 |
| APCLLAST | LASTCHLA+23~, LASTCHLA+24*, LASTCHLA+25, LASTCHLA+29, LASTCHLA+31, LASTCHLA+33, LASTCHLA+34, VR+1*, E+1*, LASTHIVS+24~ , LASTHIVS+25*, LASTHIVS+26, LASTHIVS+28, LASTHIVS+30, LASTHIVS+31, LASTNBHS+26~, LASTNBHS+27*, LASTNBHS+28, LASTNBHS+30, LASTNBHS+32* , LASTNBHS+33*, LASTNBHS+34, LASTNBHS+36, LASTNBHS+38, LASTNBHS+40, LASTNBHS+42, LASTNBHS+43, LASTNUTR+21~, LASTNUTR+22*, LASTNUTR+31* , LASTNUTR+32, LASTNUTR+33 |
| APCLLE | LASTNBHS+26~, LASTNBHS+30*, LASTNBHS+33, LASTNUTR+21~ |
| APCLPDFN | LASTCHLA~, LASTCHLA+19, LASTCHLA+20, LASTCHLA+25, LASTCHLA+29, LASTCHLA+31, LASTHIVS~, LASTHIVS+20, LASTHIVS+21, LASTHIVS+26 , LASTHIVS+28, LASTNBHS~, LASTNBHS+22, LASTNBHS+23, LASTNBHS+28, LASTNBHS+30, LASTNBHS+34, LASTNBHS+36, LASTNBHS+38, LASTNBHS+40 , LASTNUTR~, LASTNUTR+17, LASTNUTR+18, LASTNUTR+23 |
| APCLRE | LASTNBHS+26~, LASTNBHS+28*, LASTNBHS+32, LASTNUTR+21~ |
| APCLVAL | LASTCHLA+23~, LASTCHLA+25*, LASTCHLA+29*, LASTCHLA+31*, E+1, LASTHIVS+24~, LASTHIVS+26*, LASTHIVS+28*, LASTNBHS+26~, LASTNBHS+28* , LASTNBHS+30*, LASTNBHS+34*, LASTNBHS+36*, LASTNBHS+38*, LASTNBHS+40*, LASTNUTR+21~ |
| APCLX | LASTCHLA+23~, LASTHIVS+24~, LASTNBHS+26~, LASTNUTR+21~ |
| APCLY | LASTNBHS+26~, LASTNUTR+21~ |
| DT | LASTCHLA+21, LASTHIVS+22, LASTNBHS+24, LASTNUTR+19 |
| E | LASTCHLA+23~, LASTHIVS+24~, LASTNBHS+26~, LASTNUTR+21~ |
| G | LASTNBHS+26~, LASTNUTR+21~ |
| R | LASTCHLA+23~, LASTHIVS+24~, LASTNBHS+26~, LASTNUTR+21~ |
| T | LASTNBHS+26~, LASTNUTR+21~ |
| U | LASTCHLA+25, LASTCHLA+29, LASTCHLA+31, LASTCHLA+33, VR+1, E+1, LASTHIVS+26, LASTHIVS+28, LASTHIVS+30, LASTNBHS+28 , LASTNBHS+30, LASTNBHS+34, LASTNBHS+36, LASTNBHS+38, LASTNBHS+40, LASTNBHS+42, LASTNUTR+25, LASTNUTR+31, LASTNUTR+32 |
| V | LASTCHLA+23~, LASTHIVS+24~, LASTNBHS+26~, LASTNUTR+21~, LASTNUTR+25*, LASTNUTR+27, LASTNUTR+28*, LASTNUTR+29, LASTNUTR+30, LASTNUTR+31 |
| X | LASTCHLA+23~, VR+1, LASTHIVS+24~, LASTNBHS+26~, LASTNUTR+21~, LASTNUTR+23*, LASTNUTR+24, LASTNUTR+25, LASTNUTR+26, LASTNUTR+31 |
| Y | LASTCHLA+23~, VR+1, LASTHIVS+24~, LASTNBHS+26~, LASTNUTR+21~ |