VistA Analysis » VistA Reference » RPCs » ORWU INPLOC

ORWU INPLOC

Returns a list of wards from the HOSPITAL LOCATION file.

Properties

Property Value
Label INPLOC
MUMPS Implementation ORWU
Return Type ARRAY

MUMPS Method Description

Property Value
Method INPLOC^ORWU
Method Comment Return a set of wards from HOSPITAL LOCATION
Input Parameters FROM, DIR
First Comment 
 .Y=returned list, FROM=text to $O from, DIR=$O direction,
Code 
 N I,IEN,CNT S I=0,CNT=44
 F  Q:I' . S IEN="" F  S IEN=$O(^SC("B",FROM,IEN),DIR) Q:'IEN  D
 . . I ($P($G(^SC(IEN,0)),U,3)'="W") Q
 . . I '$$ACTLOC(IEN) Q
 . . S I=I+1,Y(I)=IEN_"^"_FROM

CPRS

File Type Description
Pascal File rCore.pas


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