HMPDVSIT ;SLC/MKB,ASMR/RRB,BL - Visit/Encounter extract;Aug 29, 2016 20:06:27
Source file <HMPDVSIT.m>
| Package | Total | Call Graph |
|---|---|---|
| Enterprise Health Management Platform | 3 | ($$ESC,$$FAC)^HMPD $$TEXT^HMPDTIU LOGDPT^HMPLOG |
| Registration | 3 | RPC^DGPTFAPI (IN5,INP)^VADPT ADM^VADPT2 |
| VA FileMan | 3 | FIND^DIC $$EXTERNAL^DILFD $$GET1^DIQ |
| CPT HCPCS Codes | 1 | $$CPT^ICPTCOD |
| DRG Grouper | 1 | ($$ICDD,$$ICDDX)^ICDEX |
| Kernel | 1 | ($$NS,$$STA)^XUAF4 |
| PCE Patient Care Encounter | 1 | ENCEVENT^PXAPI |
| Scheduling | 1 | $$GETOE^SDOE |
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN(DFN,BEG,END,MAX,ID) | ; -- find patient's visits and appointments
|
|
| ENQ | ; end
|
|
| ENAA(DFN,BEG,END,MAX,ID) | ; -- find patient's visits and appointments [AA]
|
|
| IDT | ; -- invert BEG and END dates for visit format:
; IDT=(9999999-$P(VDT,"."))_"."_$P(VDT,".",2) |
|
| EN1(IEN,VST) | ; -- return a visit in VST("attribute")=value
|
|
| TIU(VISIT) | ; -- add notes to VST("document")
|
|
| POV(VISIT) | ; -- return the primary Purpose of Visit as ICD^ProviderNarrative
|
|
| ICD(IEN) | ; -- return code^description for ICD code, or "^" if error
|
|
| CPT(VISIT) | ; -- Return CPT code of encounter type
|
|
| AMIS(X) | ; -- return the AMIS code^name of Credit Stop X
|
|
| CATG(X) | ; -- Return name of visit Service Category code X
|
|
| SERV(FTS) | ; -- Return #42.4 Service for a Facility Treating Specialty
|
|
| ADM(IEN,DATE,ADM) | ; -- return an admission in ADM("attribute")=value
|
|
| INPT | ; -- return current admission in ADM("attribute")=value [from ADM]
|
|
| PTF(DFN,PTF) | ; -- return ICD code^description for a PTF record
|
|
| ENC(IEN,ENC) | ; -- return an encounter in ENC("attribute")=value
|
|
| XML(VISIT) | ; -- Return patient visit as XML
|
|
| LOOP() | ; -- build sub-items string from NAMES and X
|
|
| ADD(X) | ; -- Add a line @HMP@(n)=X
|
| Name | Field # of Occurrence |
|---|---|
| RPC^DGPTFAPI | PTF+2 |
| FIND^DIC | TIU+2 |
| $$EXTERNAL^DILFD | POV+4, ENC+11 |
| $$GET1^DIQ | TIU+7, SERV+2, ENC+8 |
| $$ESC^HMPD | XML+14, XML+19, LOOP+2 |
| $$FAC^HMPD | EN1+11, ADM+17, INPT+13, ENC+10 |
| $$TEXT^HMPDTIU | TIU+9 |
| LOGDPT^HMPLOG | EN+2, ENAA+2 |
| $$ICDD^ICDEX | ICD+4, PTF+4 |
| $$ICDDX^ICDEX | ICD+2 |
| $$CPT^ICPTCOD | EN1+15, ADM+19, INPT+15 |
| ENCEVENT^PXAPI | EN1+4 |
| $$GETOE^SDOE | ENC+3 |
| IN5^VADPT | ADM+5 |
| INP^VADPT | INPT+1 |
| ADM^VADPT2 | ADM+3 |
| $$NS^XUAF4 | EN1+10 |
| $$STA^XUAF4 | EN1+10 |
| FileNo | Call Tags |
|---|---|
| ^SCE - [#409.68] | EXTERNAL^DILFD |
| ^SC - [#44] | GET1^DIQ |
| ^DIC(45.7 - [#45.7] | GET1^DIQ |
| ^TIU(8925 - [#8925] | FIND^DIC, GET1^DIQ |
| ^AUPNVPOV - [#9000010.07] | EXTERNAL^DILFD |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AUPNVSIT("AA" | ENAA+6, ENAA+7 |
| ^AUPNVSIT("AET" | EN+12, EN+13, EN+14 |
| ^DIC(40.7 - [#40.7] | AMIS+2 |
| ^DIC(42 - [#42] | ADM+15, INPT+11 |
| ^DPT - [#2] | ADM+4 |
| ^SC - [#44] | EN1+16, EN1+19, ADM+16, INPT+12, ENC+6 |
| ^TMP("HMPTEXT" | ENQ+1!, EN1+2! |
| ^TMP("PXKENC" | EN1+5, EN1+25, EN1+29!, POV+2, CPT+2 |
| ^VA(200 - [#200] | EN1+26 |
| Name | Line Occurrences |
|---|---|
| $$AMIS | EN1+18, EN1+20, EN1+22 |
| $$CATG | EN1+12, EN1+16, ADM+19, INPT+15, ENC+13, ENC+14 |
| $$CPT | EN1+15, ADM+19, INPT+15 |
| $$ICD | POV+3 |
| $$LOOP | XML+10, XML+20 |
| $$POV | EN1+23, ADM+13, INPT+9 |
| $$PTF | ADM+13, INPT+9 |
| $$SERV | EN1+21, ADM+12, INPT+8, ENC+9 |
| ADD | XML+2, XML+3, XML+5, XML+11, XML+12, XML+13, XML+14, XML+15, XML+16, XML+21 |
| ADM | EN1+7 |
| EN1 | EN+6, EN+15, ENAA+4, ENAA+8 |
| ENQ | EN+6 |
| IDT | ENAA+5 |
| INPT | ADM+4 |
| TIU | EN1+28, ADM+24, INPT+17 |
| XML | EN+6, EN+16, ENAA+4, ENAA+9 |
| Name | Field # of Occurrence |
|---|---|
| ^( | EN1+25, POV+2, CPT+2 |
| ^(150 | EN1+5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ADM | ADM~, ADM+1! |
| ADM("arrivalDateTime" | ADM+8*, INPT+4* |
| ADM("dateTime" | ADM+8*, INPT+4* |
| ADM("departureDateTime" | ADM+21* |
| ADM("facility" | ADM+17*, INPT+13* |
| ADM("id" | ADM+6*, INPT+2* |
| ADM("location" | ADM+16*, INPT+12* |
| ADM("patientClass" | ADM+6*, INPT+2* |
| ADM("provider" | ADM+9*, ADM+10*, INPT+5*, INPT+6* |
| ADM("reason" | ADM+14*, INPT+10* |
| ADM("roomBed" | ADM+17*, INPT+13* |
| ADM("service" | ADM+12*, INPT+8* |
| ADM("serviceCategory" | ADM+18*, INPT+14* |
| ADM("specialty" | ADM+11*, INPT+7* |
| ADM("type" | ADM+19*, INPT+15* |
| ADM("visitString" | ADM+23* |
| ATT | XML+1~, XML+3*, XML+4, XML+5, XML+6, XML+7, XML+8, XML+9, XML+10, XML+11 , XML+15, XML+16, XML+17, XML+18, XML+19, XML+20 |
| BEG | EN~, EN+3*, EN+12, ENAA~, ENAA+3*, ENAA+6, IDT+2, IDT+3* |
| CATG | EN1+1~, EN1+9*, EN1+12, EN1+13, EN1+14, EN1+16 |
| CNT | TIU+1~, TIU+3*, TIU+8*, TIU+9 |
| DA | ENAA+1~, ENAA+7*, ENAA+8, EN1+1~, EN1+25*, EN1+26, TIU+1~, TIU+6*, TIU+7, TIU+8 , TIU+9, POV+1~, POV+2*, CPT+1~, CPT+2* |
| DATE | ADM~, ADM+2*, ADM+3, ADM+8*, ADM+23, INPT+4*, ENC+1~, ENC+4*, ENC+15 |
| DFN | EN~, EN+2*, EN+12, EN+13, EN+14, ENAA~, ENAA+2*, ENAA+6, ENAA+7, ADM+4 , ADM+13, INPT+9, PTF~ |
| ENC | ENC~, ENC+1! |
| ENC("dateTime" | ENC+4* |
| ENC("facility" | ENC+10* |
| ENC("id" | ENC+3* |
| ENC("location" | ENC+7* |
| ENC("patientClass" | ENC+12* |
| ENC("service" | ENC+9* |
| ENC("serviceCategory" | ENC+14* |
| ENC("type" | ENC+13* |
| ENC("visitString" | ENC+15* |
| END | EN~, EN+3*, EN+9*, EN+12, ENAA~, ENAA+3*, ENAA+6, IDT+3, IDT+4* |
| FAC | EN1+1~, EN1+9*, EN1+10, EN1+11 |
| FTS | SERV~, SERV+1*, SERV+2 |
| HLOC | ADM+1~, ADM+15*, ADM+16, ADM+17, ADM+23, INPT+11*, INPT+12, INPT+13, ENC+1~, ENC+5* , ENC+6*, ENC+7, ENC+8, ENC+10, ENC+13, ENC+15 |
| >> HMP | ADD+2 |
| HMPCNT | EN+1~, EN+10*, EN+12, EN+16*, ENAA+1~, ENAA+5*, ENAA+6, ENAA+9* |
| HMPDA | EN+1~, EN+14*, EN+15 |
| HMPDT | EN+1~, EN+12*, EN+13, EN+14 |
| >> HMPI | ADD+1*, ADD+2 |
| HMPITM | EN+1~, EN+6, EN+15!, EN+16, ENAA+1~, ENAA+4, ENAA+8!, ENAA+9 |
| HMPLOC | EN+1~, EN+13*, EN+14 |
| HMPPTF | PTF+1~, PTF+2 |
| HMPPTF(0 | PTF+2 |
| HMPPTF(1 | PTF+3 |
| >> HMPTEXT | TIU+9 |
| >> HMPTOTL | XML+2* |
| HMPX | TIU+1~, ICD+1~, PTF+1~ |
| HMPX("DILIST" | TIU+4, TIU+5, TIU+6 |
| HMPX(1 | ICD+5, PTF+5 |
| HMPY | TIU+1~ |
| I | TIU+1~, TIU+3*, TIU+4*, TIU+5, TIU+6, ICD+1~, ADM+1~, ADM+8*, ADM+9*, ADM+10* , INPT+4*, INPT+5*, INPT+6*, XML+1~, XML+6*, XML+7, XML+11 |
| ICD | POV+1~, POV+3*, POV+4, ADM+1~, ADM+13*, ADM+14, INPT+9*, INPT+10 |
| ID | EN~, EN+6, ENAA~, ENAA+4 |
| IDT | ENAA+1~, ENAA+6*, ENAA+7 |
| IEN | EN1~, EN1+3*, EN1+4, EN1+5, EN1+7, EN1+8, EN1+15, EN1+23, EN1+25, EN1+28 , EN1+29, ICD~, ICD+1*, ICD+2, ADM~, ADM+2*, ADM+6, ADM+13, ADM+19, ADM+24 , INPT+2, INPT+9, INPT+15, INPT+17, ENC~, ENC+2*, ENC+3 |
| INPT | EN1+1~, EN1+14*, EN1+16, EN1+17 |
| J | XML+1~, XML+14* |
| L0 | EN1+19~*, EN1+20, EN1+21, EN1+22 |
| LOC | EN1+1~, EN1+9*, EN1+11, EN1+13, EN1+16, EN1+18, EN1+19 |
| LT | TIU+1~, TIU+5*, TIU+8 |
| MAX | EN~, EN+3*, EN+12, ENAA~, ENAA+3*, ENAA+6 |
| N | ICD+1~, ICD+4*, ICD+5, PTF+1~, PTF+4*, PTF+5 |
| NAMES | XML+1~, XML+7*, XML+8*, XML+9*, XML+18*, LOOP+2 |
| NT | TIU+1~, TIU+7*, TIU+8 |
| P | LOOP+1~, LOOP+2* |
| PTF | PTF~, PTF+2 |
| STR | LOOP+1~*, LOOP+2*, LOOP+3 |
| STS | ENC+1~, ENC+11*, ENC+12 |
| TAG | LOOP+1~, LOOP+2* |
| TYPE | ENC+1~, ENC+12*, ENC+13, ENC+14, ENC+15 |
| U | EN1+6, EN1+7, EN1+9, EN1+10, EN1+12, EN1+14, EN1+15, EN1+16, EN1+18, EN1+20 , EN1+21, EN1+22, EN1+26, TIU+8, POV+2, POV+3, POV+4, ICD+3, ICD+4, ICD+5 , CPT+3, AMIS+2, ADM+11, ADM+14, ADM+16, ADM+17, ADM+19, INPT+7, INPT+10, INPT+12 , INPT+13, INPT+15, PTF+3, ENC+5, ENC+6, ENC+7, ENC+11, ENC+13, ENC+14, LOOP+2 |
| VADMVT | ADM+1~, ADM+3, ADM+4, ADM+5 |
| VAERR | ADM+1~ |
| VAIN | ADM+1~ |
| VAIN(1 | INPT+1 |
| VAIN(10 | INPT+9 |
| VAIN(11 | INPT+6 |
| VAIN(2 | INPT+5 |
| VAIN(3 | INPT+7, INPT+8 |
| VAIN(4 | INPT+11 |
| VAIN(5 | INPT+13 |
| VAIN(7 | INPT+4 |
| VAIN(9 | INPT+10 |
| VAINDT | ADM+1~, ADM+3*, INPT+1! |
| VAIP | ADM+1~ |
| VAIP("E" | ADM+5* |
| VAIP(1 | ADM+5 |
| VAIP(12 | ADM+13 |
| VAIP(13 | ADM+8 |
| VAIP(17 | ADM+20, ADM+21 |
| VAIP(18 | ADM+10 |
| VAIP(5 | ADM+15 |
| VAIP(6 | ADM+17 |
| VAIP(7 | ADM+9 |
| VAIP(8 | ADM+11, ADM+12 |
| VAIP(9 | ADM+14 |
| VISIT | TIU~, TIU+2, POV~, POV+2, CPT~, CPT+2, XML~ |
| VISIT( | XML+3, XML+4, XML+6, XML+7, XML+11, XML+17 |
| VST | EN1~, EN1+2!, EN1+7 |
| VST("creditStopCode" | EN1+22* |
| VST("dateTime" | EN1+8* |
| VST("document" | TIU+8*, TIU+9* |
| VST("facility" | EN1+10*, EN1+11* |
| VST("id" | EN1+8* |
| VST("location" | EN1+21* |
| VST("patientClass" | EN1+17* |
| VST("provider" | EN1+26* |
| VST("reason" | EN1+23* |
| VST("service" | EN1+21* |
| VST("serviceCategory" | EN1+12* |
| VST("stopCode" | EN1+18*, EN1+20* |
| VST("type" | EN1+15*, EN1+16* |
| VST("visitString" | EN1+13* |
| X | IDT+2~*, IDT+4, EN1+1~, EN1+15*, EN1+16, EN1+18*, EN1+20, EN1+22*, TIU+1~, POV+1~ , POV+3*, POV+4, ICD+1~, CPT+1~, CPT+3*, AMIS~, AMIS+2, CATG~, CATG+2, CATG+3 , CATG+4, CATG+5, CATG+6, CATG+7, CATG+8, CATG+9, CATG+10, CATG+11, CATG+12, CATG+13 , ADM+12*, ADM+19*, INPT+8*, INPT+15*, ENC+1~, ENC+8*, ENC+9, ENC+12*, XML+1~, XML+7* , XML+11*, XML+14, XML+17*, XML+19, XML+20, LOOP+2, ADD~, ADD+2 |
| X0 | EN1+1~, EN1+5*, EN1+6, EN1+7, EN1+8, EN1+9, EN1+13, EN1+18, EN1+25*, EN1+26 , POV+1~, POV+2*, POV+3, ICD+1~, ICD+2*, ICD+3, CPT+1~, CPT+2*, CPT+3, AMIS+1~ , AMIS+2*, ENC+1~, ENC+3*, ENC+4, ENC+5, ENC+11 |
| X15 | EN1+1~, EN1+5*, EN1+6, EN1+14 |
| Y | TIU+1~, TIU+3*, POV+1~*, POV+2, POV+4*, POV+5, ICD+1~, ICD+3*, ICD+4, ICD+5* , ICD+6, CPT+1~*, CPT+2, CPT+3*, CPT+4, AMIS+1~*, AMIS+2*, AMIS+3, CATG+1~*, CATG+2* , CATG+3*, CATG+4*, CATG+5*, CATG+6*, CATG+7*, CATG+8*, CATG+9*, CATG+10*, CATG+11*, CATG+12* , CATG+13*, CATG+14, SERV+1~*, SERV+2*, SERV+3, PTF+3*, PTF+4, PTF+5*, PTF+6, ENC+1~ , XML+1~, XML+3, XML+4*, XML+10*, XML+11*, XML+12*, XML+13*, XML+14*, XML+17*, XML+19* , XML+20* |