VistA Analysis » VistA Reference » RPCs » ORWDLR32 ABBSPEC

ORWDLR32 ABBSPEC

Returns a list of lab specimens with abbreviations.

Properties

Property Value
Label ABBSPEC
MUMPS Implementation ORWDLR32
Return Type ARRAY

MUMPS Method Description

Property Value
Method ABBSPEC^ORWDLR32
Method Comment procedure
First Comment 
 returns specimens with abbreviation (uses 'E' xref)
Code 
 N X,IEN,ILST S ILST=0
 S X="" F  S X=$O(^LAB(61,"E",X)) Q:X=""  S IEN=$O(^(X,0)) D
 . S LST($$NXT)=IEN_U_$P(^LAB(61,IEN,0),U,1)

CPRS

File Type Description
Pascal File Orders/rODLab.pas


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