VistA Analysis » VistA Reference » RPCs » ORWPT16 LOOKUP

ORWPT16 LOOKUP

Properties

Property Value
Label LOOKUP
MUMPS Implementation ORWPT16
Return Type ARRAY

MUMPS Method Description

Property Value
Method LOOKUP^ORWPT16
Method Comment Return a set of patient names
Input Parameters FROM
Code 
 N I,X
 D FIND^DIC(2,"","","M",FROM)
 S I=0,Y=""
 F  S I=$O(^TMP("DILIST",$J,1,I)) Q:'I  D
 . S X=^TMP("DILIST",$J,"ID",I,.09)
 . S X=$E(X,1,3)_"-"_$E(X,4,5)_"-"_$E(X,6,99)
 . S Y(I)=^TMP("DILIST",$J,2,I)_"^"_^TMP("DILIST",$J,1,I)_"^"_X
 K ^TMP("DILIST",$J)

CPRS

File Type Description
NOT OSEHRA CPRS  


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