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* |