VistA Analysis » VistA Reference » RPCs » ORWPT APPTLST

ORWPT APPTLST

Returns a list of appointments for a patient (for visit selection).

Properties

Property Value
Label APPTLST
MUMPS Implementation ORWPT
Return Type ARRAY

MUMPS Method Description

Property Value
Method APPTLST^ORWPT
Method Comment return a list of appointments
Input Parameters DFN
First Comment 
 APPTTIME^LOCIEN^LOCNAME^EXTSTATUS
Code 
 N ERR,ERRMSG,VASD,VAERR K ^UTILITY("VASD",$J)  ;IA 10061
 S VASD("F")=$$HTFM^XLFDT($H-30,1)
 S VASD("T")=$$HTFM^XLFDT($H+1,1)_".2359"
 S VASD("W")="123456789"
 D SDA^ORQRY01(.ERR,.ERRMSG)
 I ERR K ^UTILITY("VASD",$J) K LST S LST(1)=ERRMSG Q
 S I=0 F  S I=$O(^UTILITY("VASD",$J,I)) Q:'I  D
 . S LST(I)=$P(^UTILITY("VASD",$J,I,"I"),U,1,2)_U_$P(^("E"),U,2,3)
 K ^UTILITY("VASD",$J)

CPRS

File Type Description
Pascal File rCore.pas


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