Routine: HMPDVSIT

Information

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

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