VistA Analysis » VistA Reference » RPCs » ORWPT16 GETVSIT

ORWPT16 GETVSIT

Properties

Property Value
Label GETVSIT
MUMPS Implementation ORWPT16
Return Type SINGLE VALUE

MUMPS Method Description

Property Value
Method GETVSIT^ORWPT16
Method Comment procedure
Input Parameters DFN, LOC, ADATE
First Comment 
 Return a visit given a patient, location, and date/time
Code 
 N VSIT,VSITPKG
 S (VSIT,VSIT("VDT"))=ADATE,VSIT("PAT")=DFN,VSIT("LOC")=LOC
 S VSIT("SVC")="A",VSIT("PRI")="P",VSIT(0)="NMD1",VSITPKG="OR"
 D ^VSIT
 S Y=VSIT("IEN") I +VSIT("IEN")'>0 S Y="" Q
 I +VSIT("LOC") S Y=Y_U_VSIT("LOC")_U_$P(^SC(+VSIT("LOC"),0),U,1,2)

CPRS

File Type Description
NOT OSEHRA CPRS  


Document generated on August 31st 2022, 2:55:43 pm