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 |  Local Variables |  All
Print Page as PDF
Routine: HMPDJ09

Package: Enterprise Health Management Platform

Routine: HMPDJ09


Information

HMPDJ09 ;SLC/MKB,ASMR/RRB,OB,MAT,CPC,HM - PCE;Apr 13, 2016 16:04:25

Source Information

Source file <HMPDJ09.m>

Call Graph

Call Graph

Call Graph Total: 12

Package Total Call Graph
Enterprise Health Management Platform 6 $$FAC^HMPD  ADD^HMPDJ  $$NAME^HMPDJ04  ADD^HMPMETA  $$EN^HMPSTMP  ($$JSONDT,$$SETNCS,$$SETUID,$$SETVURN,FACILITY,SETTEXT)^HMPUTILS  
VA FileMan 3 $$FIND1^DIC  $$EXTERNAL^DILFD  ($$GET1,GETS)^DIQ  
Kernel 1 ($$NS,$$STA)^XUAF4  
List Manager 1 $$LOWER^VALM1  
PCE Patient Care Encounter 1 ENCEVENT^PXAPI  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Enterprise Health Management Platform 1 HMPDJ0  

Entry Points

Name Comments DBIA/ICR reference
SORT ; -- build ^TMP("HMPPX",$J,9999999-DATE,DA)=ITEM^DATE in range
PXA(ID) ; -- find ID in ^PXRMINDX(FNUM), fall thru to PX1 if successful
PI ; from ^PXRMINDX(FNUM,"PI",DFN,ITEM,DATE,DA)
VIMVISNW(DATA,IMDATA) ;US14129 - Add VIS data to extract
POV
HF
PX1 ; -- PCE ^TMP("HMPPX",$J,HMPIDT,ID)=ITM^DATE for FNUM
VIMIMM(IMMCODE,IMDATA) ;VIMM2.0 Return data for an IMMUNIZATION entry.
VIMM(DA,IMDATA,VISIT) ;VIMM2.0 Return data for a specified V IMMUNIZATION entry.
SK
VIMVIS(DATA) ;VIMM2.0 Return an IMMUNIZATION's VACCINE INFORMATION STATEMENT(s).
IM
VIML(LOT,IMDATA) ;VIMM2.0 Return IMMUNIZATION LOT data (Lot #, Expiration Date, and Mfr. can also be in COMMENTS)
PTF ; from ^PXRMINDX(45,"ICD9","PNI",DFN,TYPE,ITEM,DATE,DA)
PX(FNUM) ; -- PCE item(s)
CPT
PXQ ;finish
PPI ; from ^PXRMINDX(FNUM,"PPI",DFN,TYPE,ITEM,DATE,DA)

External References

Name Field # of Occurrence
$$FIND1^DIC IM+4, IM+33
$$EXTERNAL^DILFD PX1+16, POV+3, CPT+3, CPT+6, IM+23, HF+4
$$GET1^DIQ PX1+30, IM+31, IM+34, HF+2, HF+5, VIMM+30, VIMVISNW+9
GETS^DIQ PX1+23, VIML+4, VIMM+5, VIMIMM+4, VIMVISNW+6
$$FAC^HMPD PX1+27
ADD^HMPDJ PXQ+5
$$NAME^HMPDJ04 PX1+18
ADD^HMPMETA PXQ+4
$$EN^HMPSTMP PXQ+1
$$JSONDT^HMPUTILS PX1+14, PX1+15, IM+8, IM+16, SK+2, VIMVIS+6, VIMVISNW+5, VIMVISNW+7
$$SETNCS^HMPUTILS POV+2, CPT+2, IM+36
$$SETUID^HMPUTILS PX1+11, PX1+17, PX1+30, IM+21, IM+24, IM+31
$$SETVURN^HMPUTILS HF+1, HF+3
FACILITY^HMPUTILS PX1+28
SETTEXT^HMPUTILS VIMIMM+10
ENCEVENT^PXAPI IM+26
$$LOWER^VALM1 HF+1
$$NS^XUAF4 PX1+26
$$STA^XUAF4 PX1+26

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DI(.85 - [#.85] GET1^DIQ
^VA(200 - [#200] GET1^DIQ
^SC - [#44] GET1^DIQ
^PXD(811.1 - [#811.1] FIND1^DIC,  GET1^DIQ
^AUPNVSIT - [#9000010] GETS^DIQ
^AUPNVPOV - [#9000010.07] EXTERNAL^DILFD
^AUPNVIMM - [#9000010.11] EXTERNAL^DILFD,  GET1^DIQ,  GETS^DIQ
^AUPNVCPT - [#9000010.18] EXTERNAL^DILFD
^AUTTIVIS - [#920] GETS^DIQ
^AUTTIMM - [#9999999.14] GETS^DIQ
^AUTTIML - [#9999999.41] FIND1^DIC
^AUTTHF - [#9999999.64] EXTERNAL^DILFD,  GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PXRMINDX( PI+2, PI+3, PI+5, PPI+1, PPI+2, PPI+3, PPI+5, PPI+8, PPI+9, PPI+10
, PPI+12
^PXRMINDX(45 PTF+14, PTF+15, PTF+16, PTF+17, PTF+18, PTF+20
^TMP("HMPPX" PX+3, PX+4, PX+5!, PXA+2!, PXA+8*, PXA+14*, PXA+15, PX1+9, SORT+1!, PI+5*
, PPI+5*, PPI+12*, PTF+20*
^TMP("PXKENC" IM+26, IM+27, IM+29

Label References

Name Line Occurrences
$$VIMVIS VIMM+50
@( PX1+7
PPI SORT+2
PX1 PX+4
PXA PX+1
PXQ POV, CPT, IM, HF
SORT PX+2
VIMIMM IM+2
VIML IM+5
VIMM IM+1
VIMVISNW VIMM+52

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ADMIN1 VIMM+1~
ARR VIML+1~, VIML+3*, VIML+4, VIMM+1~, VIMM+4*, VIMM+5, VIMIMM+1~, VIMIMM+3*, VIMIMM+4
COLL PX1+1~, PX1+10*, PX1+11, PXQ+1, PXQ+4, PXQ+5
COUNT VIMM+29~, VIMM+30*, VIMM+32*, VIMM+33, VIMM+35
CPT IM+35~*, IM+36, IM+37
CT VIMM+29~, VIMM+31*, VIMM+32*, VIMM+33*, VIMM+34*, VIMM+35
DA SORT+1~, PI+5*, PPI+5*, PPI+12*, VIMM~, VIMM+3
DATA VIML+1~, VIMM+1~, VIMM+50, VIMM+52, VIMIMM+1~, VIMVIS~, VIMVISNW~
DATA( VIML+7, VIML+8, VIMM+9, VIMM+12, VIMM+13, VIMM+16, VIMM+19, VIMM+22, VIMM+25, VIMM+38
, VIMM+41, VIMM+44, VIMM+47, VIMIMM+7, VIMIMM+10, VIMVIS+3, VIMVIS+4, VIMVIS+5, VIMVIS+6, VIMVISNW+2
, VIMVISNW+3, VIMVISNW+4, VIMVISNW+5
DATA(920 VIMVISNW+7, VIMVISNW+9
DATE PXA+1~, PXA+7*, PXA+8, PXA+13*, PXA+14, SORT+1~, PI+3*, PI+4, PI+5, PPI+3*
, PPI+4, PPI+5, PPI+10*, PPI+11, PPI+12
>> DFN PXA+3, PXA+4, PXA+10, PX1+4, PX1+11, PX1+17, IM+21, IM+24, PI+2, PI+3
, PI+5, PPI+1, PPI+2, PPI+3, PPI+5, PPI+8, PPI+9, PPI+10, PPI+12, PTF+15
, PTF+16, PTF+17, PTF+18, PTF+20
DT VIMVIS+1~, VIMVIS+2*, VIMVIS+6*, VIMVIS+7
ERR PX1+3~, VIML+1~, VIML+3*, VIML+4, VIMM+1~, VIMM+4*, VIMM+5, VIMIMM+1~, VIMIMM+3*, VIMIMM+4
ERRMSG PX1+2~, PX1+6*
ERRPAT PX1+2~, PX1+4*
FAC PX1+1~, PX1+24*, PX1+26, PX1+27
FILE VIML+1~, VIML+2*, VIML+4, VIML+7, VIML+8
>> FILTER("freshnessDateTime" PX1+15
FLD PX1+1~, CPT+5*, CPT+6
FLDS PX1+3~, PX1+22*, PX1+23, VIML+1~, VIML+3*, VIML+4, VIMM+1~, VIMM+3*, VIMM+5, VIMIMM+1~
, VIMIMM+3*, VIMIMM+4
FLG PX1+3~, PX1+22*, PX1+23
FLGS VIML+1~, VIML+3*, VIML+4, VIMM+1~, VIMM+4*, VIMM+5, VIMIMM+1~, VIMIMM+3*, VIMIMM+4
FNUM PX~, PXA+2, PXA+3, PXA+4, PXA+10, PX1+5, PX1+16, POV, CPT, CPT+5
, CPT+6, IM, HF, SK, SORT+2, PI+2, PI+3, PI+5, PPI+1, PPI+2
, PPI+3, PPI+5, PPI+6, PPI+8, PPI+9, PPI+10, PPI+12
HMPDT PTF+13~, PTF+18*, PTF+19, PTF+20
HMPDX PTF+13~, PTF+17*, PTF+18, PTF+20
HMPF PX1+1~, IM+1, IM+2, IM+5
HMPF("ADMNSITE" IM+14
HMPF("CDCNAME" IM+39
HMPF("COMMENTS" PX1+31
HMPF("CONTRAINDICATED" IM+25
HMPF("CVXCODE" IM+12
HMPF("DATE RE AD" , SK+2
HMPF("DOSE" IM+17
HMPF("DOSEUNITS" IM+18
HMPF("ENCLOC" IM+10
HMPF("EVNTDAT" IM+15, IM+16
HMPF("EXPDATE" IM+8
HMPF("IMMCODE" IM+2
HMPF("INFOSRC" IM+9
HMPF("LOTNUMBER" IM+3, IM+4, IM+6
HMPF("MANUFACTURER" IM+7
HMPF("ORDPRV" IM+11
HMPF("PRIMARY/SECONDARY" POV+1
HMPF("PRINCIP AL PROCEDURE" , CPT+1
HMPF("PROVIDE R NARRATIVE" , POV+3, CPT+3
HMPF("QUANTITY" CPT+4
HMPF("REACTION" IM+22, IM+23, IM+24
HMPF("READING" SK+1
HMPF("REMARKS" IM+20
HMPF("ROUTE" IM+13
HMPF("VALUE" CPT+5
HMPF("VIS" IM+40, IM+41, IM+42, IM+43, IM+44
HMPF("VISDAT" IM+19
HMPF("VISIT" PX1+17
>> HMPI PX+3, PX+4
>> HMPID PX+1
HMPIDT PX+2~, PX+3*, PX+4, PXA+1~, PXA+8*, PXA+14*, PX1+9
HMPISYS PTF+13~, PTF+14*, PTF+15, PTF+16, PTF+17, PTF+18, PTF+20
HMPITEM PTF+13~, PTF+20*
>> HMPMAX PX+3, PX+4
>> HMPMETA PXQ+4
HMPRDT PTF+13~, PTF+19*, PTF+20
>> HMPSTART PI+4, PPI+4, PPI+11, PTF+19
>> HMPSTOP PI+4, PPI+4, PPI+11, PTF+19
HMPTYP PTF+13~, PTF+16*, PTF+17, PTF+18, PTF+20
I PX1+1~, IM+29*, IM+40~*, IM+41, IM+42, IM+43, IM+44, VIMVISNW+2*, VIMVISNW+4, VIMVISNW+5
, VIMVISNW+7, VIMVISNW+9
ICDSYS PXA+1~
ID PX+2~, PX+4*, PXA~, PXA+6, PXA+8, PXA+12, PXA+14, PX1+6, PX1+9, PX1+11
, IM+1, IM+27
IDT SORT+1~, PI+4*, PI+5, PPI+4*, PPI+5, PPI+11*, PPI+12
IDX PXA+1~, PXA+5*, PXA+6, PXA+7, PXA+11*, PXA+12, PXA+13
IEN VIML+1~, VIML+3*, VIML+4, VIML+7, VIML+8, VIMM+1~, VIMM+3*, VIMM+5, VIMM+9, VIMM+12
, VIMM+13, VIMM+16, VIMM+19, VIMM+22, VIMM+25, VIMM+30, VIMM+38, VIMM+41, VIMM+44, VIMM+47
, VIMIMM+1~, VIMIMM+3*, VIMIMM+4, VIMIMM+7, VIMIMM+10, VIMVISNW+1~
IMDATA VIML~, VIMM~, VIMM+52, VIMIMM~, VIMVISNW~
IMDATA("ADMNPRV" VIMM+22*
IMDATA("ADMNSITE" VIMM+47*
IMDATA("CDCNAME" VIMIMM+10
IMDATA("COMMENTS" VIMM+38*
IMDATA("CVXCODE" VIMIMM+7*
IMDATA("DOSE" VIMM+12*
IMDATA("DOSEUNITS" VIMM+13*
IMDATA("EVNTDAT" VIMM+25*
IMDATA("EXPDATE" VIML+7*
IMDATA("IMMCODE" VIMM+9*
IMDATA("INFOSRC" VIMM+41*
IMDATA("LOTNUMBER" VIMM+16*
IMDATA("MANUFACTURER" VIML+8*
IMDATA("ORDPRV" VIMM+19*
IMDATA("REMARKS" VIMM+33*, VIMM+35*
IMDATA("ROUTE" VIMM+44*
IMDATA("VIS" VIMVISNW+4*, VIMVISNW+5*, VIMVISNW+7*, VIMVISNW+9*
IMDATA("VISDAT" VIMM+50*
IMMCODE VIMIMM~, VIMIMM+3
INFO1 VIMM+1~
ITEM PXA+1~, PXA+7*, PXA+8, PXA+13*, PXA+14, SORT+1~, PI+2*, PI+3, PI+5, PPI+2*
, PPI+3, PPI+5, PPI+9*, PPI+10, PPI+12
LANGIEN VIMVISNW+1~, VIMVISNW+9*
LOC PX1+1~, PX1+24*, PX1+27, PX1+30
LOT VIML~, VIML+3
LOTIEN PX1+1~, IM+4*, IM+5
N PXA+1~, PXA+2*, PXA+3, PXA+10, PX1+1~, PX1+5*, PX1+10, PX1+13, PX1+15
P PXA+1~, PXA+6*, PXA+7, PXA+12*, PXA+13
PCE PX1+1~
PCE( PX1+14*, PX1+15*
PCE("categoryName" HF+4*
PCE("categoryUid" HF+3*
PCE("cdcFullVaccineName" IM+39*
PCE("comment" PX1+31*
PCE("contraindicated" IM+25*
PCE("cptCode" CPT+2*, IM+36*
PCE("cptName" IM+37*
PCE("cvxCode" IM+12*
PCE("dateRead" SK+2*
PCE("display" HF+6*
PCE("dosage" IM+17*
PCE("dosageUnits" IM+18*
PCE("encounterLocation" IM+10*
PCE("encounterName" PX1+18*
PCE("encounterUid" PX1+17*
PCE("eventDate" IM+16*
PCE("eventInformationSource" IM+9*
PCE("expirationDate" IM+8*
PCE("icdCode" POV+2*
PCE("kind" HF+7*
PCE("lastUpdateTime" PXQ+1*, PXQ+2
PCE("localId" PX1+9*
PCE("locationName" PX1+30*
PCE("locationUid" PX1+30*
PCE("lotNumber" IM+6*
PCE("manufacturer" IM+7*
PCE("name" PX1+16*, POV+2, POV+3*, CPT+2, CPT+3*, HF+7
PCE("orderingProvider" IM+11*
PCE("performerName" IM+31*
PCE("performerUid" IM+31*
PCE("quantity" CPT+4*
PCE("reactionCode" IM+24*
PCE("reactionName" IM+23*
PCE("reading" SK+1*
PCE("remarks" IM+20*
PCE("result" SK+3*
PCE("routeOfAdministration" IM+13*
PCE("seriesCode" IM+21*
PCE("seriesName" IM+21*
PCE("severityName" HF+1*
PCE("severityUid" HF+1*
PCE("siteOfAdministration" IM+14*
PCE("stampTime" PXQ+2*, PXQ+4
PCE("summary" IM+37*, HF+7*
PCE("type" POV+1*, CPT+1*
PCE("uid" PX1+11*, PXQ+4
PCE("vis" IM+41*, IM+42*, IM+43*, IM+44*
PCE("visData" IM+19*
PTVISIEN VIMVISNW+1~, VIMVISNW+2*, VIMVISNW+3, VIMVISNW+4, VIMVISNW+5
ROOT PXA+1~, PXA+3*, PXA+4*, PXA+5, PXA+10*, PXA+11
ROUTE1 VIMM+1~
SC VIMVIS+1~, VIMVIS+2*, VIMVIS+7
SL VIMVIS+1~, VIMVIS+2*, VIMVIS+7
TAG PX1+1~, PX1+5*, PX1+6, PX1+7, PX1+13*, PX1+14, PX1+15
TEMP VIMM+1~
TMP PX1+1~, PX1+9*, PX1+14, PX1+16, IM+33, HF+2, HF+5
TMPGBL VIMM+1~
TYPE SORT+1~, PPI+1*, PPI+2, PPI+3, PPI+5, PPI+8*, PPI+9, PPI+10, PPI+12
U PXA+8, PXA+14, PX1+14, PX1+26, IM+28, IM+29, IM+35, IM+37, PI+5, PPI+5
, PPI+12, PTF+20
VDX VIMVIS+1~, VIMVIS+2*, VIMVIS+8*
VIS VIMM+1~, VIMVIS+1~, VIMVIS+2*, VIMVIS+4*, VIMVIS+7, VIMVIS+8*, VIMVIS+9
VISALL VIMVIS+1~, VIMVIS+2*
VISALL( VIMVIS+7*, VIMVIS+8
VISIEN VIMM+1~, VIMVIS+1~, VIMVIS+3*, VIMVIS+4, VIMVIS+5, VIMVIS+6, VIMVISNW+1~, VIMVISNW+3*, VIMVISNW+6, VIMVISNW+7
, VIMVISNW+9
VISIT PX1+1~, PX1+17*, PX1+18, PX1+22, IM+1, IM+26, IM+27, IM+29, VIMM~
VISITIEN PX1+3~, PX1+22*, PX1+23, PX1+24
WP VIMM+29~
WP( VIMM+32, VIMM+34, VIMM+35
WP(1 VIMM+31
X PX1+1~, PX1+26*, PX1+27*, PX1+28, POV+1*, POV+2*, POV+3*, CPT+1*, CPT+2*, CPT+3*
, CPT+5*, CPT+6, IM+28*, IM+29*, IM+31, IM+33*, IM+34, HF+1, HF+2*, HF+3
, HF+4, HF+5*, HF+6, VIMM+29~, VIMM+30*
X0 PX1+1~
X0(9000010 PX1+24
X12 PX1+1~, IM+27*, IM+28
Y PX1+1~, CPT+6*, IM+21, IM+34*, IM+35, HF+1, SK+3
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All