VistA Analysis » VistA Reference » RPCs » OREVNTX1 ISPASS

OREVNTX1 ISPASS

Properties

Property Value
Label ISPASS
MUMPS Implementation OREVNTX1
Return Type SINGLE VALUE

MUMPS Method Description

Property Value
Method ISPASS^OREVNTX1
Method Comment Return 1 if it's a pass event
Input Parameters PTEVTID, EVTTYPE
Code
 S ORY=$$EVT^OREVNTX(PTEVTID)
S ORY=$P($G(^ORD(100.5,+ORY,0)),U,7)
I EVTTYPE="T",ORY,ORY<4 S ORY=1
E S ORY=0

CPRS

File Type Description
Pascal File Orders/rOrders.pas


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