Routine: NHINVAPT

Package	Total	Call Graph
National Health Information Network	1	($$ESC,$$FAC)^NHINV
Scheduling	1	GETAPPT^SDAMA201
VA FileMan	1	$$GET1^DIQ

Entry Points

Name	Comments	DBIA/ICR reference
EN(DFN,BEG,END,MAX,ID)	; -- find patient's appointments
EN1(DATE,HLOC,STS,CLS,APPT)	; -- return an appointment in APPT("attribute")=value
SERV(FTS)	; -- Return #42.4 Service for a Facility Treating Specialty
XML(APPT)	; -- Return appointment as XML
LOOP()	; -- build sub-items string from NAMES and X
ADD(X)	; -- Add a line @NHIN@(n)=X

FileNo	Call Tags
^SC - [#44]	GET1^DIQ
^DIC(45.7 - [#45.7]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^TMP($J	EN+10, EN+13!, EN+18, EN+23!

Name	Field # of Occurrence
APPT	EN1~, EN1+1!, XML~
APPT(	XML+3, XML+4
APPT("apptStatus"	EN1+12*
APPT("dateTime"	EN1+3*
APPT("facility"	EN1+8*
APPT("id"	EN1+3*
APPT("location"	EN1+4*
APPT("patientClass"	EN1+9*
APPT("service"	EN1+7*
APPT("serviceCategory"	EN1+10*
APPT("type"	EN1+5*
APPT("visitString"	EN1+13*
ATT	XML+1~, XML+3*, XML+4, XML+5, XML+6
BEG	EN~, EN+3, EN+7, EN+8, EN+16
CLS	EN1~, EN1+2*, EN1+9, EN1+10
DATE	EN1~, EN1+2*, EN1+3, EN1+13
DFN	EN~, EN+2*, EN+8, EN+16
DT	EN+3, EN+20
END	EN~, EN+3, EN+7, EN+8, EN+16
FTS	SERV~, SERV+1*, SERV+2
HLOC	EN1~, EN1+2*, EN1+3, EN1+4, EN1+5, EN1+6, EN1+8, EN1+13
ID	EN~, EN+6, EN+7, EN+11
MAX	EN~, EN+3*, EN+17
NAMES	XML+1~, XML+6*, LOOP+2
NHI	EN+1~, EN+9, EN+10, EN+17, EN+18
NHICNT	EN+1~, EN+17, EN+22
>> NHIN	ADD+2
>> NHINI	ADD+1*, ADD+2
>> NHINTOTL	XML+2*
NHITM	EN+1~, EN+12, EN+21!, EN+22
NHITOT	EN+1~, EN+8, EN+9, EN+16, EN+17
P	LOOP+1~, LOOP+2*
STR	LOOP+1~, LOOP+2, LOOP+3
STS	EN1~, EN1+2*, EN1+11
TAG	LOOP+1~, LOOP+2*
U	EN1+4, EN1+5, LOOP+2
VIEN	EN1+1~
X	EN1+1~, EN1+6, EN1+7, EN1+11, EN1+12, XML+1~, XML+4*, XML+5, XML+6, LOOP+2 , ADD~, ADD+2
X1	EN+1~, EN+10, EN+12, EN+18, EN+20, EN+21
X12	EN+1~, EN+10*, EN+12, EN+21
X2	EN+1~, EN+10, EN+11, EN+12, EN+18, EN+21
X3	EN+1~, EN+10, EN+12, EN+18, EN+20, EN+21
Y	SERV+1~, SERV+2, SERV+3, XML+1~, XML+4, XML+5, XML+6*, XML+7