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 |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: NHINVPT

Package: National Health Information Network

Routine: NHINVPT


Information

NHINVPT ;SLC/MKB -- Patient demographics extract

Source Information

Source file <NHINVPT.m>

Call Graph

Call Graph

Call Graph Total: 13

Package Total Call Graph
Registration 7 $$CVEDT^DGCV  $$GETSTAT^DGMSTAPI  $$GETCUR^DGNTAPI  $$GETACT^DGPFAPI  (7,ADD,DEM,INP,OAD)^VADPT  TFL^VAFCTFU1  $$SITE^VASITE  
VA FileMan 2 $$EXTERNAL^DILFD  $$GET1^DIQ  
Kernel 1 $$IEN^XUAF4  
Master Patient Index VistA 1 $$GETICN^MPIF001  
National Health Information Network 1 ($$ESC,$$FAC,$$STRING)^NHINV  
Scheduling 1 ($$OUTPTPR,$$OUTPTTM)^SDUTL3  

Entry Points

Name Comments DBIA/ICR reference
EN(DFN,BEG,END,MAX,ID) ; -- find current patient demographics
; [BEG,END,MAX,ID not currently used]
DEM ;-demographic data
SVC ;-service data
PRF ;-patient record flags
ATC ;-address & telecom
SUPP ;-support contacts
ALIAS ;-other names used
FAC ;-treating facilities [see FACLIST^ORWCIRN]
INPT ;-current inpt status data
XML(ITEM) ; -- Return patient data as XML in @NHIN@(n)
; as <element code='123' displayName='ABC' />
ADDR(X) ; -- XML address node from X=street1^st2^st3^city^state^zip
PHONE(X) ; -- XML telecom node from X=home^cell^work numbers
ADD(X) ; Add a line @NHIN@(n)=X

External References

Name Field # of Occurrence
$$CVEDT^DGCV SVC+12
$$GETSTAT^DGMSTAPI SVC+11
$$GETCUR^DGNTAPI SVC+9
$$GETACT^DGPFAPI PRF+2
$$EXTERNAL^DILFD INPT+8
$$GET1^DIQ DEM+11, DEM+16, DEM+19, SVC+18, ATC+6, SUPP+9
$$GETICN^MPIF001 DEM+2
$$ESC^NHINV XML+15, XML+19, XML+20, XML+21, XML+22, XML+23, XML+28, XML+29, ADDR+3, ADDR+4
$$FAC^NHINV INPT+11
$$STRING^NHINV PRF+6
$$OUTPTPR^SDUTL3 INPT+13
$$OUTPTTM^SDUTL3 INPT+14
7^VADPT SVC+2
ADD^VADPT ATC+2
DEM^VADPT DEM+3
INP^VADPT INPT+4
OAD^VADPT SUPP+3
TFL^VAFCTFU1 FAC+3
$$SITE^VASITE EN+3, FAC+5
$$IEN^XUAF4 FAC+9

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(10 - [#10] GET1^DIQ
^DIC(10.2 - [#10.2] GET1^DIQ
^DPT - [#2] GET1^DIQ
^DIC(31 - [#31] GET1^DIQ
^DGSL(38.1 - [#38.1] GET1^DIQ
^DIC(42 - [#42] EXTERNAL^DILFD

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(42 - [#42] INPT+6
^DPT - [#2] DEM+9, SVC+8, SVC+16, SVC+17, ALIAS+2, FAC+6, INPT+2

Label References

Name Line Occurrences
ADD XML+3, XML+4, XML+6, XML+7, XML+8, XML+11, XML+12, XML+15, XML+18, XML+24
, XML+30, ADDR+7, PHONE+2, PHONE+3, PHONE+4, PHONE+5, PHONE+6
ADDR XML+16, XML+26
ALIAS EN+4
ATC EN+4
DEM EN+4
FAC EN+4
PHONE XML+17, XML+27
PRF EN+4
SUPP EN+4
SVC EN+4
XML EN+5

Naked Globals

Name Field # of Occurrence
^( ALIAS+2
^(0 INPT+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A SUPP+1~, SUPP+2*, SUPP+3, SUPP+4, SUPP+9
ADM INPT+1~, INPT+2*, INPT+4, INPT+12
AO SVC+1~, SVC+7*, SVC+13
ATT XML+2~, XML+4*, XML+5, XML+9, XML+10, XML+12, XML+13, XML+14, XML+16, XML+17
, XML+19, XML+20, XML+21, XML+22, XML+23, XML+25, XML+26, XML+27, XML+28, XML+29
BEG EN~
CV SVC+1~, SVC+12*, SVC+13
DFN EN~, EN+2*, DEM+2, DEM+5, DEM+9, DEM+11, SVC+8, SVC+9, SVC+11, SVC+12
SVC+16, SVC+17, PRF+2, ATC+6, SUPP+9, ALIAS+2, FAC+1*, FAC+3, FAC+6, INPT+2
INPT+13, INPT+14
DIS SVC+17~*, SVC+18, SVC+19
END EN~
HLOC INPT+3~, INPT+6*, INPT+7, INPT+11
HNC SVC+1~, SVC+10*, SVC+13
HNC("STAT" SVC+9
HOME FAC+2~, FAC+6*, FAC+12
I DEM+15~*, DEM+16*, DEM+18~*, DEM+19*, SVC+1~, SVC+16*, SVC+17, PRF+1~, PRF+3*, PRF+4
PRF+5, PRF+6, ATC+1~, ATC+3*, SUPP+1~, SUPP+6*, SUPP+9*, ALIAS+1~, ALIAS+2*, ALIAS+3
FAC+2~, FAC+7*, FAC+8, XML+2~, XML+6*, XML+7*, XML+12*, XML+13, XML+15, XML+16
, XML+17, XML+22, XML+23, ADDR+1~, ADDR+3*, PHONE+1~
ID EN~, XML+2~, XML+7*, XML+10*, XML+11, XML+24
IEN FAC+2~, FAC+9*, FAC+11, FAC+12
IFN FAC+1~
IR SVC+1~, SVC+7*, SVC+13
ITEM XML~
ITEM( XML+4, XML+9, XML+12, XML+13, XML+16, XML+17, XML+23, XML+25
MAX EN~
MST SVC+1~, SVC+11*, SVC+13
NAME PRF+1~, PRF+4*, PRF+6
>> NHIN ADD+2
>> NHINI ADD+1*, ADD+2
NHINPF PRF+1~
NHINPF( PRF+3, PRF+4, PRF+5
>> NHINTOTL XML+3*
NHINY FAC+2~, FAC+3
NHINY( FAC+7, FAC+8
NHINY(1 FAC+4
PAT EN+3~, EN+5
PAT("address" ATC+5*
PAT("admitted" INPT+4*
PAT("alias" ALIAS+3*
PAT("attending" INPT+10*
PAT("bid" DEM+6*
PAT("died" DEM+10*
PAT("disability" SVC+19*
PAT("dob" DEM+7*
PAT("ethnicity" DEM+16*
PAT("exposures" SVC+13*
PAT("facility" FAC+5*, FAC+11*, FAC+12*
PAT("familyName" DEM+4*
PAT("flag" PRF+6*
PAT("fullName" DEM+3*
PAT("gender" DEM+8*
PAT("givenNames" DEM+4*
PAT("icn" DEM+2*
PAT("id" DEM+5*
PAT("inpatient" INPT+12*
PAT("locSvc" INPT+8*
PAT("location" INPT+7*
PAT("lrdfn" DEM+9*
PAT("maritalStatus" DEM+13*
PAT("pcProvider" INPT+13*
PAT("pcTeam" INPT+14*
PAT("race" DEM+19*
PAT("religion" DEM+12*
PAT("roomBed" INPT+5*
PAT("sc" SVC+4*
PAT("scPercent" SVC+4*
PAT("sensitive" DEM+11*
PAT("site" INPT+11*
PAT("specialty" INPT+9*
PAT("ssn" DEM+5*
PAT("support" SUPP+5*, SUPP+8*, SUPP+10*
PAT("telecom" ATC+7*
PAT("veteran" SVC+3*
PAT("ward" INPT+5*
PGF SVC+1~, SVC+8*, SVC+13
SVC INPT+3~, INPT+6*, INPT+8
SYS EN+3~*
TEXT PRF+1~, PRF+5*, PRF+6
TYPE SUPP+1~, SUPP+4*, SUPP+5, SUPP+8, SUPP+10
U DEM+5, DEM+7, DEM+8, DEM+10, DEM+13, SVC+4, SVC+8, SVC+11, SVC+12, SVC+13
SVC+19, PRF+4, PRF+6, ATC+3, ATC+4, ATC+6, SUPP+5, SUPP+6, SUPP+7, SUPP+9
ALIAS+3, FAC+4, FAC+5, FAC+6, FAC+8, FAC+9, FAC+10, FAC+11, FAC+12, INPT+4
INPT+6, INPT+7, INPT+8, XML+7, XML+15, XML+20, XML+21, XML+22, XML+29, ADDR+3
, ADDR+4, ADDR+5, ADDR+6, PHONE+3, PHONE+4, PHONE+5
VA DEM+1~
VA("BID" DEM+6
VADM DEM+1~
VADM(1 DEM+3
VADM(10 DEM+13
VADM(11 DEM+14, DEM+16
VADM(12 DEM+17, DEM+19
VADM(2 DEM+5
VADM(3 DEM+7
VADM(5 DEM+8
VADM(6 DEM+10
VADM(9 DEM+12
VAEL SVC+1~
VAEL(3 SVC+4
VAEL(4 SVC+3
VAERR DEM+1~, SVC+1~, INPT+3~
VAIN INPT+3~
VAIN(11 INPT+10
VAIN(3 INPT+9
VAIN(4 INPT+5, INPT+6, INPT+7
VAIN(5 INPT+5
VAIN(7 INPT+4
VAOA SUPP+1~, SUPP+2!
VAOA( SUPP+6
VAOA("A" SUPP+3*
VAOA(10 SUPP+5
VAOA(11 SUPP+7
VAOA(5 SUPP+7
VAOA(8 SUPP+9
VAOA(9 SUPP+3, SUPP+5
VAPA ATC+1~
VAPA( ATC+3
VAPA("P" ATC+2*
VAPA(11 ATC+4
VAPA(5 ATC+4
VAPA(8 ATC+6
VASV SVC+1~
VASV(2 SVC+7
VASV(3 SVC+7
X DEM+1~, DEM+2*, DEM+3*, DEM+4, DEM+6, DEM+10*, DEM+11*, DEM+12*, DEM+13*, DEM+16*
DEM+19*, SVC+1~, SVC+8*, SVC+9*, SVC+10, SVC+11*, SVC+12*, ATC+1~, ATC+3*, ATC+4*
ATC+5, ATC+6*, ATC+7, SUPP+1~, SUPP+6*, SUPP+7*, SUPP+8, SUPP+9*, SUPP+10, ALIAS+1~
ALIAS+2*, ALIAS+3, FAC+2~, FAC+5*, FAC+8*, FAC+9, FAC+10*, FAC+11, INPT+1~, INPT+11*
INPT+13*, INPT+14*, XML+2~, XML+5, XML+7, XML+13*, XML+15, XML+16*, XML+17*, XML+19
, XML+20, XML+21, XML+22, XML+25*, XML+26, XML+27, XML+28, XML+29, ADDR~, ADDR+1
, ADDR+3, ADDR+4, ADDR+5, ADDR+6, PHONE~, PHONE+1, PHONE+3, PHONE+4, PHONE+5, ADD~
, ADD+2
Y SVC+1~, SVC+18*, SVC+19, XML+2~, XML+4, XML+5*, XML+6*, XML+7*, XML+12, XML+13*
, XML+14*, XML+15*, XML+19*, XML+20*, XML+21*, XML+22*, XML+23*, XML+24*, XML+25*, XML+26*
, XML+27*, XML+28*, XML+29*, ADDR+1~, ADDR+2*, ADDR+3*, ADDR+4*, ADDR+5*, ADDR+6*, ADDR+7*
, PHONE+1~, PHONE+3*, PHONE+4*, PHONE+5*

Marked Items

Name Field # of Occurrence
$T(TFL^VAFCTFU1 FAC+3
Info |  Source |  Call Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All