©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
APCLAPI2 ; IHS/CMI/LAB - visit data ;
Source file <APCLAPI2.m>
| Package | Total | Call Graph |
|---|---|---|
| Patient Care Component Reports | 3 | ($$LASTCPTI,$$LASTCPTT,$$LASTDXT,$$LASTITEM,$$LASTPRCT)^APCLAPIU $$START1^APCLDF $$VD^APCLV |
| DRG Grouper | 1 | $$ICDDX^ICDEX |
| IHS Patient | 1 | $$DOB^AUPNPAT |
| IHS VA Utilities | 1 | $$VAL^XBDIQ1 |
| Kernel | 1 | $$FMADD^XLFDT |
| Taxonomy | 1 | $$ICD^ATXAPI |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| VPVE | ;EP
|
|
| E | ;
|
|
| LASTDENT(APCLPDFN,APCLBD,APCLED,APCLFORM) | ;PEP - date of last dental exam
; Return the last recorded dental exam: ; - V Dental ADA code 0000 or 0190 ; - V Exam 30 - Dental Exam ; - CHS visit with any ADA code |
|
| LASTPHYS(APCLPDFN,APCLBD,APCLED,APCLFORM) | ;PEP - date of last PHYSICAL exam
; Return the last recorded PHYSICAL exam: ; - V Exam Physical Exam 01 ; - V POV [SURVEILLANCE PHYSICAL EXAM] taxonomy ; - V CPT [APCH PHYSICAL EXAM CPTS] taxonomy |
|
| LASTRECT(APCLPDFN,APCLBD,APCLED,APCLFORM) | ;PEP - date of last RECTAL exam
; Return the last recorded RECTAL exam: ; - V Exam Rectal Exam 14 ; - V POV V76.41, V76.44 ; - V Procedure 89.34 ; - V CPT G0102;S0601;S0605 |
|
| LASTPELV(APCLPDFN,APCLBD,APCLED,APCLFORM) | ;PEP - date of last PELVIC exam
; Return the last recorded PELVIC exam: ; - V Exam Pelvic Exam 15 ; - V POV V72.31, V72.32 ; - V CPT G0101 |
|
| LASTDFE(APCLPDFN,APCLBD,APCLED,APCLFORM) | ;PEP - date of last diabetic FOOT exam
; Return the last recorded DIABETIC FOOT exam: ; - V Exam Diabetic FOOT Exam |
|
| LASTHC(APCLPDFN,APCLBD,APCLED,APCLFORM) | ;PEP - date of last head circumference
; Return the last recorded HEAD CIRCUMFERENCE: ; - V Measurment HC |
|
| LASTFRA(APCLPDFN,APCLBD,APCLED,APCLFORM) | ;PEP - date of last FALL RISK ASSESSMENT
; Return the last recorded FALL RISK ASSESSMENT: ; - V Exam - 37 Fall Risk Exam ; - Diagnosis - V POV V15.88 OR BGP ABNORMAL GAIT OR MOBILITY taxonomy ; - V POV: Ecode in BGP FALL RELATED E-CODES taxonomy ; ; 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 ; |
|
| LASTDEYE(APCLPDFN,APCLBD,APCLED,APCLFORM) | ;PEP - date of last diabetic eye exam
; Return the last recorded DIABETIC EYE exam: ; - V Exam Diabetic Eye Exam ; - V CPT 92250, 92012, 92014, 92002, 2022F, 2024F, 2026F, S3000 |
| Name | Field # of Occurrence |
|---|---|
| $$LASTCPTI^APCLAPIU | LASTRECT+32, LASTPELV+31 |
| $$LASTCPTT^APCLAPIU | LASTDEYE+26, LASTPHYS+29 |
| $$LASTDXT^APCLAPIU | LASTFRA+27, LASTFRA+29, LASTRECT+28, LASTPELV+27, LASTPHYS+27 |
| $$LASTITEM^APCLAPIU | LASTFRA+25, LASTHC+23, LASTDENT+25, LASTDENT+27, LASTDENT+29, LASTDEYE+24, LASTDFE+23, LASTRECT+26, LASTPELV+25, LASTPHYS+25 |
| $$LASTPRCT^APCLAPIU | LASTRECT+30 |
| $$START1^APCLDF | LASTFRA+33, LASTDENT+33 |
| $$VD^APCLV | VPVE+1 |
| $$ICD^ATXAPI | LASTFRA+39, LASTFRA+40, LASTFRA+41 |
| $$DOB^AUPNPAT | LASTFRA+20, LASTHC+18, LASTDENT+20, LASTDEYE+19, LASTDFE+18, LASTRECT+21, LASTPELV+20, LASTPHYS+20 |
| $$ICDDX^ICDEX | VPVE+1 |
| $$VAL^XBDIQ1 | VPVE+1 |
| $$FMADD^XLFDT | LASTFRA+33 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ATXAX("B" | LASTFRA+35 |
| ^AUPNVPOV - [#9000010.07] | LASTFRA+37, LASTFRA+38, LASTFRA+39, LASTFRA+40, LASTFRA+41, VPVE+1 |
| ^AUPNVSIT - [#9000010] | LASTDENT+36 |
| Name | Line Occurrences |
|---|---|
| E | LASTFRA+26, LASTFRA+28, LASTFRA+30, LASTHC+24, LASTDENT+26, LASTDENT+28, LASTDENT+30, LASTDENT+38, LASTDEYE+25, LASTDEYE+27 , LASTDFE+24, LASTRECT+27, LASTRECT+29, LASTRECT+31, LASTRECT+33, LASTPELV+26, LASTPELV+28, LASTPELV+32, LASTPHYS+26, LASTPHYS+28 , LASTPHYS+30 |
| VPVE | LASTFRA+39, LASTFRA+40, LASTFRA+41 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| APCLBD | LASTFRA~, LASTFRA+20*, LASTFRA+25, LASTFRA+27, LASTFRA+29, LASTHC~, LASTHC+18*, LASTHC+23, LASTDENT~, LASTDENT+20* , LASTDENT+25, LASTDENT+27, LASTDENT+29, LASTDENT+33, LASTDEYE~, LASTDEYE+19*, LASTDEYE+24, LASTDEYE+26, LASTDFE~, LASTDFE+18* , LASTDFE+23, LASTRECT~, LASTRECT+21*, LASTRECT+26, LASTRECT+28, LASTRECT+30, LASTRECT+32, LASTPELV~, LASTPELV+20*, LASTPELV+25 , LASTPELV+27, LASTPELV+31, LASTPHYS~, LASTPHYS+20*, LASTPHYS+25, LASTPHYS+27, LASTPHYS+29 |
| APCLED | LASTFRA~, LASTFRA+21*, LASTFRA+25, LASTFRA+27, LASTFRA+29, LASTFRA+33, LASTHC~, LASTHC+19*, LASTHC+23, LASTDENT~ , LASTDENT+21*, LASTDENT+25, LASTDENT+27, LASTDENT+29, LASTDENT+33, LASTDEYE~, LASTDEYE+20*, LASTDEYE+24, LASTDEYE+26, LASTDFE~ , LASTDFE+19*, LASTDFE+23, LASTRECT~, LASTRECT+22*, LASTRECT+26, LASTRECT+28, LASTRECT+30, LASTRECT+32, LASTPELV~, LASTPELV+21* , LASTPELV+25, LASTPELV+27, LASTPELV+31, LASTPHYS~, LASTPHYS+21*, LASTPHYS+25, LASTPHYS+27, LASTPHYS+29 |
| APCLF | LASTFRA+23~, LASTHC+21~, LASTDENT+23~, LASTDEYE+22~, LASTDFE+21~, LASTRECT+24~, LASTPELV+23~, LASTPHYS+23~ |
| APCLFORM | LASTFRA~, LASTFRA+22*, LASTFRA+42, LASTHC~, LASTHC+20*, LASTHC+25, LASTDENT~, LASTDENT+22*, LASTDENT+39, LASTDEYE~ , LASTDEYE+21*, LASTDEYE+28, LASTDFE~, LASTDFE+20*, LASTDFE+25, LASTRECT~, LASTRECT+23*, LASTRECT+34, LASTPELV~, LASTPELV+22* , LASTPELV+33, LASTPHYS~, LASTPHYS+22*, LASTPHYS+31 |
| APCLLAST | LASTFRA+23~, LASTFRA+24*, LASTFRA+25, LASTFRA+27, LASTFRA+29, LASTFRA+42, LASTFRA+43, VPVE+1*, E+1*, LASTHC+21~ , LASTHC+22*, LASTHC+23, LASTHC+25, LASTHC+26, LASTDENT+23~, LASTDENT+24*, LASTDENT+25, LASTDENT+27, LASTDENT+29, LASTDENT+33 , LASTDENT+39, LASTDENT+40, LASTDEYE+22~, LASTDEYE+23*, LASTDEYE+24, LASTDEYE+26, LASTDEYE+28, LASTDEYE+29, LASTDFE+21~, LASTDFE+22* , LASTDFE+23, LASTDFE+25, LASTDFE+26, LASTRECT+24~, LASTRECT+25*, LASTRECT+26, LASTRECT+28, LASTRECT+30, LASTRECT+32, LASTRECT+34 , LASTRECT+35, LASTPELV+23~, LASTPELV+24*, LASTPELV+25, LASTPELV+27, LASTPELV+31, LASTPELV+33, LASTPELV+34, LASTPHYS+23~, LASTPHYS+24* , LASTPHYS+25, LASTPHYS+27, LASTPHYS+29, LASTPHYS+31, LASTPHYS+32 |
| APCLPDFN | LASTFRA~, LASTFRA+19, LASTFRA+20, LASTFRA+25, LASTFRA+27, LASTFRA+29, LASTFRA+33, LASTHC~, LASTHC+17, LASTHC+18 , LASTHC+23, LASTDENT~, LASTDENT+19, LASTDENT+20, LASTDENT+25, LASTDENT+27, LASTDENT+29, LASTDENT+33, LASTDEYE~, LASTDEYE+18 , LASTDEYE+19, LASTDEYE+24, LASTDEYE+26, LASTDFE~, LASTDFE+17, LASTDFE+18, LASTDFE+23, LASTRECT~, LASTRECT+20, LASTRECT+21 , LASTRECT+26, LASTRECT+28, LASTRECT+30, LASTRECT+32, LASTPELV~, LASTPELV+19, LASTPELV+20, LASTPELV+25, LASTPELV+27, LASTPELV+31 , LASTPHYS~, LASTPHYS+19, LASTPHYS+20, LASTPHYS+25, LASTPHYS+27, LASTPHYS+29 |
| APCLVAL | LASTFRA+23~, LASTFRA+25*, LASTFRA+27*, LASTFRA+29*, E+1, LASTHC+21~, LASTHC+23*, LASTDENT+23~, LASTDENT+25*, LASTDENT+27* , LASTDENT+29*, LASTDENT+37*, LASTDEYE+22~, LASTDEYE+24*, LASTDEYE+26*, LASTDFE+21~, LASTDFE+23*, LASTRECT+24~, LASTRECT+26*, LASTRECT+28* , LASTRECT+30*, LASTRECT+32*, LASTPELV+23~, LASTPELV+25*, LASTPELV+27*, LASTPELV+31*, LASTPHYS+23~, LASTPHYS+25*, LASTPHYS+27*, LASTPHYS+29* |
| APCLX | LASTFRA+23~, LASTHC+21~, LASTDENT+23~, LASTDEYE+22~, LASTDFE+21~, LASTRECT+24~, LASTPELV+23~, LASTPHYS+23~ |
| APCLY | LASTFRA+23~, LASTHC+21~, LASTDENT+23~, LASTDENT+32!, LASTDEYE+22~, LASTDFE+21~, LASTRECT+24~, LASTPELV+23~, LASTPHYS+23~ |
| APCLZ | LASTFRA+23~, LASTFRA+32!, LASTDENT+23~ |
| APCLZ( | LASTFRA+36, LASTFRA+37, LASTDENT+34, LASTDENT+35, LASTDENT+37 |
| >> D | LASTFRA+37* |
| DT | LASTFRA+21, LASTFRA+33, LASTHC+19, LASTDENT+21, LASTDEYE+20, LASTDFE+19, LASTRECT+22, LASTPELV+21, LASTPHYS+21 |
| E | LASTFRA+23~, LASTFRA+33*, LASTFRA+39*, LASTFRA+40*, LASTFRA+41*, VPVE+1, LASTHC+21~, LASTDENT+23~, LASTDENT+33*, LASTDEYE+22~ , LASTDFE+21~, LASTRECT+24~, LASTPELV+23~, LASTPHYS+23~ |
| G | LASTFRA+23~, LASTFRA+34*, LASTFRA+37*, LASTHC+21~, LASTDENT+23~, LASTDEYE+22~, LASTDFE+21~, LASTRECT+24~, LASTPELV+23~, LASTPHYS+23~ |
| R | LASTFRA+23~, LASTHC+21~, LASTDENT+23~, LASTDEYE+22~, LASTDFE+21~, LASTRECT+24~, LASTPELV+23~, LASTPHYS+23~ |
| T | LASTFRA+23~, LASTFRA+35*, LASTFRA+39, LASTFRA+40, LASTFRA+41, LASTHC+21~, LASTDENT+23~, LASTDEYE+22~, LASTDFE+21~, LASTRECT+24~ , LASTPELV+23~, LASTPHYS+23~ |
| U | LASTFRA+25, LASTFRA+27, LASTFRA+29, LASTFRA+37, LASTFRA+38, LASTFRA+39, LASTFRA+40, LASTFRA+41, LASTFRA+42, VPVE+1 , E+1, LASTHC+23, LASTHC+25, LASTDENT+25, LASTDENT+27, LASTDENT+29, LASTDENT+33, LASTDENT+35, LASTDENT+36, LASTDENT+37 , LASTDENT+39, LASTDEYE+24, LASTDEYE+26, LASTDEYE+28, LASTDFE+23, LASTDFE+25, LASTRECT+26, LASTRECT+28, LASTRECT+30, LASTRECT+32 , LASTRECT+34, LASTPELV+25, LASTPELV+27, LASTPELV+31, LASTPELV+33, LASTPHYS+25, LASTPHYS+27, LASTPHYS+29, LASTPHYS+31 |
| V | LASTFRA+23~, LASTHC+21~, LASTDENT+23~, LASTDENT+35*, LASTDENT+36, LASTDEYE+22~, LASTDFE+21~, LASTRECT+24~, LASTPELV+23~, LASTPHYS+23~ |
| X | LASTFRA+23~, LASTFRA+33*, LASTFRA+36*, LASTFRA+37, LASTHC+21~, LASTDENT+23~, LASTDENT+33*, LASTDENT+34*, LASTDENT+35, LASTDENT+37 , LASTDEYE+22~, LASTDFE+21~, LASTRECT+24~, LASTPELV+23~, LASTPHYS+23~ |
| Y | LASTFRA+23~, LASTFRA+31*, LASTFRA+33, LASTFRA+37*, LASTFRA+38, LASTFRA+39, LASTFRA+40, LASTFRA+41, VPVE+1, LASTHC+21~ , LASTDENT+23~, LASTDEYE+22~, LASTDFE+21~, LASTRECT+24~, LASTPELV+23~, LASTPHYS+23~ |