VistA Analysis » VistA Reference » RPCs » ORWTPR OCDESC

ORWTPR OCDESC

Properties

Property Value
Label OCDESC
MUMPS Implementation ORWTPR
Return Type ARRAY

MUMPS Method Description

Property Value
Method OCDESC^ORWTPR
Method Comment from RPC
Input Parameters IEN
Code 
 N CNT,LINE,NUM K TEXT
 S IEN=+$G(IEN) I IEN<1 Q
 S TEXT(1)=$P($G(^ORD(100.8,IEN,0)),U)
 S TEXT(2)=""
 S CNT=2
 S NUM=0 F  S NUM=$O(^ORD(100.8,IEN,1,NUM)) Q:NUM<1  S LINE=$G(^(NUM,0)) D
 .S CNT=CNT+1
 .S TEXT(CNT)=LINE
 S TEXT(CNT+1)=""

CPRS

File Type Description
NOT OSEHRA CPRS  


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