VistA Analysis » VistA Reference » RPCs » ORIMO ISIVQO

ORIMO ISIVQO

Properties

Property Value
Label ISIVQO
MUMPS Implementation ORIMO
Return Type SINGLE VALUE

MUMPS Method Description

Property Value
Method ISIVQO^ORIMO
Method Comment Is it an IV quick order
Input Parameters DLGID
Code
 S ORY=0
Q:'$D(^ORD(101.41,DLGID,0))
N IVGRP,DLGTYP,DLGGRP
S IVGRP=$O(^ORD(100.98,"B","IV RX",0))
S DLGTYP=$P($G(^ORD(101.41,DLGID,0)),U,4)
S DLGGRP=$P($G(^ORD(101.41,DLGID,0)),U,5)
I (DLGTYP="Q"),(DLGGRP=IVGRP) S ORY=1

CPRS

File Type Description
Pascal File Orders/rOrders.pas


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