Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: HMPDVSIT

Package: Enterprise Health Management Platform

Routine: HMPDVSIT


Information

HMPDVSIT ;SLC/MKB,ASMR/RRB,BL - Visit/Encounter extract;Aug 29, 2016 20:06:27

Source Information

Source file <HMPDVSIT.m>

Call Graph

Call Graph

Call Graph Total: 14

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  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 5

Package Total Caller Graph
Enterprise Health Management Platform 5 HMPDJ0  HMPDJ04  HMPDJ04A  HMPDJ04E  HMPDSDAM  

Entry Points

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

External References

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

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

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

Label References

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

Naked Globals

Name Field # of Occurrence
^( EN1+25, POV+2, CPT+2
^(150 EN1+5

Local Variables

Legend:

>> 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*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All