Routine: NHINVAPT

Information

NHINVAPT ;SLC/MKB -- Appointment extract

Source file <NHINVAPT.m>

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